# Solfege - ear training for GNOME
# Copyright (C) 2004, 2005 Tom Cato Amundsen
# License is GPL, see file COPYING

header {
    lesson_id = "csound-intonation-min3-15cent"
        module = idbyname
        help = "idbyname-intonation"
        title = _("Is the interval flat, in tune or sharp? %s cent wrong") % 15
        lesson_heading = _("Just interval: %s") % _("minor third") + " (6:5)"
        filldir = vertic
}

question {
 name = _i("intonation|flat")
 set=0
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 220.000000
   i1 + 1 261.722495
 """)
}

question {
 name = _i("intonation|in tune")
 set=0
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 220.000000
   i1 + 1 264.000000
 """)
}

question {
 name = _i("intonation|sharp")
 set=0
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 220.000000
   i1 + 1 266.297324
 """)
}

question {
 name = _i("intonation|flat")
 set=1
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 233.081881
   i1 + 1 277.285325
 """)
}

question {
 name = _i("intonation|in tune")
 set=1
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 233.081881
   i1 + 1 279.698257
 """)
}

question {
 name = _i("intonation|sharp")
 set=1
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 233.081881
   i1 + 1 282.132187
 """)
}

question {
 name = _i("intonation|flat")
 set=2
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 246.941651
   i1 + 1 293.773568
 """)
}

question {
 name = _i("intonation|in tune")
 set=2
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 246.941651
   i1 + 1 296.329981
 """)
}

question {
 name = _i("intonation|sharp")
 set=2
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 246.941651
   i1 + 1 298.908639
 """)
}

question {
 name = _i("intonation|flat")
 set=3
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 261.625565
   i1 + 1 311.242253
 """)
}

question {
 name = _i("intonation|in tune")
 set=3
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 261.625565
   i1 + 1 313.950678
 """)
}

question {
 name = _i("intonation|sharp")
 set=3
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 261.625565
   i1 + 1 316.682672
 """)
}

question {
 name = _i("intonation|flat")
 set=4
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 277.182631
   i1 + 1 329.749681
 """)
}

question {
 name = _i("intonation|in tune")
 set=4
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 277.182631
   i1 + 1 332.619157
 """)
}

question {
 name = _i("intonation|sharp")
 set=4
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 277.182631
   i1 + 1 335.513604
 """)
}

question {
 name = _i("intonation|flat")
 set=5
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 293.664768
   i1 + 1 349.357617
 """)
}

question {
 name = _i("intonation|in tune")
 set=5
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 293.664768
   i1 + 1 352.397722
 """)
}

question {
 name = _i("intonation|sharp")
 set=5
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 293.664768
   i1 + 1 355.464281
 """)
}

question {
 name = _i("intonation|flat")
 set=6
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 311.126984
   i1 + 1 370.131502
 """)
}

question {
 name = _i("intonation|in tune")
 set=6
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 311.126984
   i1 + 1 373.352380
 """)
}

question {
 name = _i("intonation|sharp")
 set=6
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 311.126984
   i1 + 1 376.601287
 """)
}

question {
 name = _i("intonation|flat")
 set=7
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 329.627557
   i1 + 1 392.140667
 """)
}

question {
 name = _i("intonation|in tune")
 set=7
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 329.627557
   i1 + 1 395.553068
 """)
}

question {
 name = _i("intonation|sharp")
 set=7
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 329.627557
   i1 + 1 398.995165
 """)
}

question {
 name = _i("intonation|flat")
 set=8
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 349.228231
   i1 + 1 415.458564
 """)
}

question {
 name = _i("intonation|in tune")
 set=8
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 349.228231
   i1 + 1 419.073878
 """)
}

question {
 name = _i("intonation|sharp")
 set=8
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 349.228231
   i1 + 1 422.720652
 """)
}

question {
 name = _i("intonation|flat")
 set=9
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 369.994423
   i1 + 1 440.163016
 """)
}

question {
 name = _i("intonation|in tune")
 set=9
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 369.994423
   i1 + 1 443.993307
 """)
}

question {
 name = _i("intonation|sharp")
 set=9
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 369.994423
   i1 + 1 447.856930
 """)
}

question {
 name = _i("intonation|flat")
 set=10
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 391.995436
   i1 + 1 466.336471
 """)
}

question {
 name = _i("intonation|in tune")
 set=10
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 391.995436
   i1 + 1 470.394523
 """)
}

question {
 name = _i("intonation|sharp")
 set=10
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 391.995436
   i1 + 1 474.487889
 """)
}

question {
 name = _i("intonation|flat")
 set=11
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 415.304698
   i1 + 1 494.066280
 """)
}

question {
 name = _i("intonation|in tune")
 set=11
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 415.304698
   i1 + 1 498.365637
 """)
}

question {
 name = _i("intonation|sharp")
 set=11
 csound(load("share/sinus.orc"), """
   f1 0 4096 10 1 
   i1 0 1 415.304698
   i1 + 1 502.702407
 """)
}
