-- | 'Pitch' names lifted to 'Music' values. module Music.LilyPond.Light.Constant.Note where import Music.LilyPond.Light.Model import Music.Theory.Pitch {- hmt -} import qualified Music.Theory.Pitch.Name as P -- * Notes pitch_to_music :: Pitch -> Music pitch_to_music p = Note p Nothing [] c1,d1,e1,f1,g1,a1,b1 :: Music c1 = pitch_to_music P.c1 d1 = pitch_to_music P.d1 e1 = pitch_to_music P.e1 f1 = pitch_to_music P.f1 g1 = pitch_to_music P.g1 a1 = pitch_to_music P.a1 b1 = pitch_to_music P.b1 ces1,des1,ees1,fes1,ges1,aes1,bes1 :: Music ces1 = pitch_to_music P.ces1 des1 = pitch_to_music P.des1 ees1 = pitch_to_music P.ees1 fes1 = pitch_to_music P.fes1 ges1 = pitch_to_music P.ges1 aes1 = pitch_to_music P.aes1 bes1 = pitch_to_music P.bes1 cis1,dis1,eis1,fis1,gis1,ais1,bis1 :: Music cis1 = pitch_to_music P.cis1 dis1 = pitch_to_music P.dis1 eis1 = pitch_to_music P.eis1 fis1 = pitch_to_music P.fis1 gis1 = pitch_to_music P.gis1 ais1 = pitch_to_music P.ais1 bis1 = pitch_to_music P.bis1 c2,d2,e2,f2,g2,a2,b2 :: Music c2 = pitch_to_music P.c2 d2 = pitch_to_music P.d2 e2 = pitch_to_music P.e2 f2 = pitch_to_music P.f2 g2 = pitch_to_music P.g2 a2 = pitch_to_music P.a2 b2 = pitch_to_music P.b2 ces2,des2,ees2,fes2,ges2,aes2,bes2 :: Music ces2 = pitch_to_music P.ces2 des2 = pitch_to_music P.des2 ees2 = pitch_to_music P.ees2 fes2 = pitch_to_music P.fes2 ges2 = pitch_to_music P.ges2 aes2 = pitch_to_music P.aes2 bes2 = pitch_to_music P.bes2 cis2,dis2,eis2,fis2,gis2,ais2,bis2 :: Music cis2 = pitch_to_music P.cis2 dis2 = pitch_to_music P.dis2 eis2 = pitch_to_music P.eis2 fis2 = pitch_to_music P.fis2 gis2 = pitch_to_music P.gis2 ais2 = pitch_to_music P.ais2 bis2 = pitch_to_music P.bis2 cisis2,disis2,eisis2,fisis2,gisis2,aisis2,bisis2 :: Music cisis2 = pitch_to_music P.cisis2 disis2 = pitch_to_music P.disis2 eisis2 = pitch_to_music P.eisis2 fisis2 = pitch_to_music P.fisis2 gisis2 = pitch_to_music P.gisis2 aisis2 = pitch_to_music P.aisis2 bisis2 = pitch_to_music P.bisis2 c3,d3,e3,f3,g3,a3,b3 :: Music c3 = pitch_to_music P.c3 d3 = pitch_to_music P.d3 e3 = pitch_to_music P.e3 f3 = pitch_to_music P.f3 g3 = pitch_to_music P.g3 a3 = pitch_to_music P.a3 b3 = pitch_to_music P.b3 ces3,des3,ees3,fes3,ges3,aes3,bes3 :: Music ces3 = pitch_to_music P.ces3 des3 = pitch_to_music P.des3 ees3 = pitch_to_music P.ees3 fes3 = pitch_to_music P.fes3 ges3 = pitch_to_music P.ges3 aes3 = pitch_to_music P.aes3 bes3 = pitch_to_music P.bes3 cis3,dis3,eis3,fis3,gis3,ais3,bis3 :: Music cis3 = pitch_to_music P.cis3 dis3 = pitch_to_music P.dis3 eis3 = pitch_to_music P.eis3 fis3 = pitch_to_music P.fis3 gis3 = pitch_to_music P.gis3 ais3 = pitch_to_music P.ais3 bis3 = pitch_to_music P.bis3 cisis3,disis3,eisis3,fisis3,gisis3,aisis3,bisis3 :: Music cisis3 = pitch_to_music P.cisis3 disis3 = pitch_to_music P.disis3 eisis3 = pitch_to_music P.eisis3 fisis3 = pitch_to_music P.fisis3 gisis3 = pitch_to_music P.gisis3 aisis3 = pitch_to_music P.aisis3 bisis3 = pitch_to_music P.bisis3 ceseh3,deseh3,eeseh3,feseh3,geseh3,aeseh3,beseh3 :: Music ceseh3 = pitch_to_music P.ceseh3 deseh3 = pitch_to_music P.deseh3 eeseh3 = pitch_to_music P.eeseh3 feseh3 = pitch_to_music P.feseh3 geseh3 = pitch_to_music P.geseh3 aeseh3 = pitch_to_music P.aeseh3 beseh3 = pitch_to_music P.beseh3 ceh3,deh3,eeh3,feh3,geh3,aeh3,beh3 :: Music ceh3 = pitch_to_music P.ceh3 deh3 = pitch_to_music P.deh3 eeh3 = pitch_to_music P.eeh3 feh3 = pitch_to_music P.feh3 geh3 = pitch_to_music P.geh3 aeh3 = pitch_to_music P.aeh3 beh3 = pitch_to_music P.beh3 cih3,dih3,eih3,fih3,gih3,aih3,bih3 :: Music cih3 = pitch_to_music P.cih3 dih3 = pitch_to_music P.dih3 eih3 = pitch_to_music P.eih3 fih3 = pitch_to_music P.fih3 gih3 = pitch_to_music P.gih3 aih3 = pitch_to_music P.aih3 bih3 = pitch_to_music P.bih3 cisih3,disih3,eisih3,fisih3,gisih3,aisih3,bisih3 :: Music cisih3 = pitch_to_music P.cisih3 disih3 = pitch_to_music P.disih3 eisih3 = pitch_to_music P.eisih3 fisih3 = pitch_to_music P.fisih3 gisih3 = pitch_to_music P.gisih3 aisih3 = pitch_to_music P.aisih3 bisih3 = pitch_to_music P.bisih3 c4,d4,e4,f4,g4,a4,b4 :: Music c4 = pitch_to_music P.c4 d4 = pitch_to_music P.d4 e4 = pitch_to_music P.e4 f4 = pitch_to_music P.f4 g4 = pitch_to_music P.g4 a4 = pitch_to_music P.a4 b4 = pitch_to_music P.b4 ces4,des4,ees4,fes4,ges4,aes4,bes4 :: Music ces4 = pitch_to_music P.ces4 des4 = pitch_to_music P.des4 ees4 = pitch_to_music P.ees4 fes4 = pitch_to_music P.fes4 ges4 = pitch_to_music P.ges4 aes4 = pitch_to_music P.aes4 bes4 = pitch_to_music P.bes4 cis4,dis4,eis4,fis4,gis4,ais4,bis4 :: Music cis4 = pitch_to_music P.cis4 dis4 = pitch_to_music P.dis4 eis4 = pitch_to_music P.eis4 fis4 = pitch_to_music P.fis4 gis4 = pitch_to_music P.gis4 ais4 = pitch_to_music P.ais4 bis4 = pitch_to_music P.bis4 ceses4,deses4,eeses4,feses4,geses4,aeses4,beses4 :: Music ceses4 = pitch_to_music P.ceses4 deses4 = pitch_to_music P.deses4 eeses4 = pitch_to_music P.eeses4 feses4 = pitch_to_music P.feses4 geses4 = pitch_to_music P.geses4 aeses4 = pitch_to_music P.aeses4 beses4 = pitch_to_music P.beses4 cisis4,disis4,eisis4,fisis4,gisis4,aisis4,bisis4 :: Music cisis4 = pitch_to_music P.cisis4 disis4 = pitch_to_music P.disis4 eisis4 = pitch_to_music P.eisis4 fisis4 = pitch_to_music P.fisis4 gisis4 = pitch_to_music P.gisis4 aisis4 = pitch_to_music P.aisis4 bisis4 = pitch_to_music P.bisis4 ceseh4,deseh4,eeseh4,feseh4,geseh4,aeseh4,beseh4 :: Music ceseh4 = pitch_to_music P.ceseh4 deseh4 = pitch_to_music P.deseh4 eeseh4 = pitch_to_music P.eeseh4 feseh4 = pitch_to_music P.feseh4 geseh4 = pitch_to_music P.geseh4 aeseh4 = pitch_to_music P.aeseh4 beseh4 = pitch_to_music P.beseh4 ceh4,deh4,eeh4,feh4,geh4,aeh4,beh4 :: Music ceh4 = pitch_to_music P.ceh4 deh4 = pitch_to_music P.deh4 eeh4 = pitch_to_music P.eeh4 feh4 = pitch_to_music P.feh4 geh4 = pitch_to_music P.geh4 aeh4 = pitch_to_music P.aeh4 beh4 = pitch_to_music P.beh4 cih4,dih4,eih4,fih4,gih4,aih4,bih4 :: Music cih4 = pitch_to_music P.cih4 dih4 = pitch_to_music P.dih4 eih4 = pitch_to_music P.eih4 fih4 = pitch_to_music P.fih4 gih4 = pitch_to_music P.gih4 aih4 = pitch_to_music P.aih4 bih4 = pitch_to_music P.bih4 cisih4,disih4,eisih4,fisih4,gisih4,aisih4,bisih4 :: Music cisih4 = pitch_to_music P.cisih4 disih4 = pitch_to_music P.disih4 eisih4 = pitch_to_music P.eisih4 fisih4 = pitch_to_music P.fisih4 gisih4 = pitch_to_music P.gisih4 aisih4 = pitch_to_music P.aisih4 bisih4 = pitch_to_music P.bisih4 c5,d5,e5,f5,g5,a5,b5 :: Music c5 = pitch_to_music P.c5 d5 = pitch_to_music P.d5 e5 = pitch_to_music P.e5 f5 = pitch_to_music P.f5 g5 = pitch_to_music P.g5 a5 = pitch_to_music P.a5 b5 = pitch_to_music P.b5 ces5,des5,ees5,fes5,ges5,aes5,bes5 :: Music ces5 = pitch_to_music P.ces5 des5 = pitch_to_music P.des5 ees5 = pitch_to_music P.ees5 fes5 = pitch_to_music P.fes5 ges5 = pitch_to_music P.ges5 aes5 = pitch_to_music P.aes5 bes5 = pitch_to_music P.bes5 cis5,dis5,eis5,fis5,gis5,ais5,bis5 :: Music cis5 = pitch_to_music P.cis5 dis5 = pitch_to_music P.dis5 eis5 = pitch_to_music P.eis5 fis5 = pitch_to_music P.fis5 gis5 = pitch_to_music P.gis5 ais5 = pitch_to_music P.ais5 bis5 = pitch_to_music P.bis5 ceses5,deses5,eeses5,feses5,geses5,aeses5,beses5 :: Music ceses5 = pitch_to_music P.ceses5 deses5 = pitch_to_music P.deses5 eeses5 = pitch_to_music P.eeses5 feses5 = pitch_to_music P.feses5 geses5 = pitch_to_music P.geses5 aeses5 = pitch_to_music P.aeses5 beses5 = pitch_to_music P.beses5 cisis5,disis5,eisis5,fisis5,gisis5,aisis5,bisis5 :: Music cisis5 = pitch_to_music P.cisis5 disis5 = pitch_to_music P.disis5 eisis5 = pitch_to_music P.eisis5 fisis5 = pitch_to_music P.fisis5 gisis5 = pitch_to_music P.gisis5 aisis5 = pitch_to_music P.aisis5 bisis5 = pitch_to_music P.bisis5 ceseh5,deseh5,eeseh5,feseh5,geseh5,aeseh5,beseh5 :: Music ceseh5 = pitch_to_music P.ceseh5 deseh5 = pitch_to_music P.deseh5 eeseh5 = pitch_to_music P.eeseh5 feseh5 = pitch_to_music P.feseh5 geseh5 = pitch_to_music P.geseh5 aeseh5 = pitch_to_music P.aeseh5 beseh5 = pitch_to_music P.beseh5 ceh5,deh5,eeh5,feh5,geh5,aeh5,beh5 :: Music ceh5 = pitch_to_music P.ceh5 deh5 = pitch_to_music P.deh5 eeh5 = pitch_to_music P.eeh5 feh5 = pitch_to_music P.feh5 geh5 = pitch_to_music P.geh5 aeh5 = pitch_to_music P.aeh5 beh5 = pitch_to_music P.beh5 cih5,dih5,eih5,fih5,gih5,aih5,bih5 :: Music cih5 = pitch_to_music P.cih5 dih5 = pitch_to_music P.dih5 eih5 = pitch_to_music P.eih5 fih5 = pitch_to_music P.fih5 gih5 = pitch_to_music P.gih5 aih5 = pitch_to_music P.aih5 bih5 = pitch_to_music P.bih5 cisih5,disih5,eisih5,fisih5,gisih5,aisih5,bisih5 :: Music cisih5 = pitch_to_music P.cisih5 disih5 = pitch_to_music P.disih5 eisih5 = pitch_to_music P.eisih5 fisih5 = pitch_to_music P.fisih5 gisih5 = pitch_to_music P.gisih5 aisih5 = pitch_to_music P.aisih5 bisih5 = pitch_to_music P.bisih5 c6,d6,e6,f6,g6,a6,b6 :: Music c6 = pitch_to_music P.c6 d6 = pitch_to_music P.d6 e6 = pitch_to_music P.e6 f6 = pitch_to_music P.f6 g6 = pitch_to_music P.g6 a6 = pitch_to_music P.a6 b6 = pitch_to_music P.b6 ces6,des6,ees6,fes6,ges6,aes6,bes6 :: Music ces6 = pitch_to_music P.ces6 des6 = pitch_to_music P.des6 ees6 = pitch_to_music P.ees6 fes6 = pitch_to_music P.fes6 ges6 = pitch_to_music P.ges6 aes6 = pitch_to_music P.aes6 bes6 = pitch_to_music P.bes6 cis6,dis6,eis6,fis6,gis6,ais6,bis6 :: Music cis6 = pitch_to_music P.cis6 dis6 = pitch_to_music P.dis6 eis6 = pitch_to_music P.eis6 fis6 = pitch_to_music P.fis6 gis6 = pitch_to_music P.gis6 ais6 = pitch_to_music P.ais6 bis6 = pitch_to_music P.bis6 ceseh6,deseh6,eeseh6,feseh6,geseh6,aeseh6,beseh6 :: Music ceseh6 = pitch_to_music P.ceseh6 deseh6 = pitch_to_music P.deseh6 eeseh6 = pitch_to_music P.eeseh6 feseh6 = pitch_to_music P.feseh6 geseh6 = pitch_to_music P.geseh6 aeseh6 = pitch_to_music P.aeseh6 beseh6 = pitch_to_music P.beseh6 ceh6,deh6,eeh6,feh6,geh6,aeh6,beh6 :: Music ceh6 = pitch_to_music P.ceh6 deh6 = pitch_to_music P.deh6 eeh6 = pitch_to_music P.eeh6 feh6 = pitch_to_music P.feh6 geh6 = pitch_to_music P.geh6 aeh6 = pitch_to_music P.aeh6 beh6 = pitch_to_music P.beh6 cih6,dih6,eih6,fih6,gih6,aih6,bih6 :: Music cih6 = pitch_to_music P.cih6 dih6 = pitch_to_music P.dih6 eih6 = pitch_to_music P.eih6 fih6 = pitch_to_music P.fih6 gih6 = pitch_to_music P.gih6 aih6 = pitch_to_music P.aih6 bih6 = pitch_to_music P.bih6 cisih6,disih6,eisih6,fisih6,gisih6,aisih6,bisih6 :: Music cisih6 = pitch_to_music P.cisih6 disih6 = pitch_to_music P.disih6 eisih6 = pitch_to_music P.eisih6 fisih6 = pitch_to_music P.fisih6 gisih6 = pitch_to_music P.gisih6 aisih6 = pitch_to_music P.aisih6 bisih6 = pitch_to_music P.bisih6 c7,d7,e7,f7,g7,a7,b7 :: Music c7 = pitch_to_music P.c7 d7 = pitch_to_music P.d7 e7 = pitch_to_music P.e7 f7 = pitch_to_music P.f7 g7 = pitch_to_music P.g7 a7 = pitch_to_music P.a7 b7 = pitch_to_music P.b7 ces7,des7,ees7,fes7,ges7,aes7,bes7 :: Music ces7 = pitch_to_music P.ces7 des7 = pitch_to_music P.des7 ees7 = pitch_to_music P.ees7 fes7 = pitch_to_music P.fes7 ges7 = pitch_to_music P.ges7 aes7 = pitch_to_music P.aes7 bes7 = pitch_to_music P.bes7 cis7,dis7,eis7,fis7,gis7,ais7,bis7 :: Music cis7 = pitch_to_music P.cis7 dis7 = pitch_to_music P.dis7 eis7 = pitch_to_music P.eis7 fis7 = pitch_to_music P.fis7 gis7 = pitch_to_music P.gis7 ais7 = pitch_to_music P.ais7 bis7 = pitch_to_music P.bis7