Searched refs:musize (Results 1 – 2 of 2) sorted by relevance
68 integer musize; member1699 commus_1.musize = 0; in MAIN__()7967 if (commus_1.musize == 20) { in dodyn_()7977 } else if (commus_1.musize == 16) { in dodyn_()7987 } else if (commus_1.musize == 24) { in dodyn_()7997 } else if (commus_1.musize == 29) { in dodyn_()15591 commus_1.musize = i_nint(&fnsyst); in g1etnote_()16205 *musize = i_nint(&r__1); in g1etset_()16220 } else if ((*musize - 16) * (*musize - 20) * (*musize - 24) * (*musize - in g1etset_()29421 fsyst += 4.5f / commus_1.musize; in pmxa_()[all …]
699 common /commus/ musize,whead20774 musize = 04532 common /commus/ musize,whead204923 if (musize .eq. 20) then9829 c Reset musize (musicsize).9838 musize = nint(fnsyst)9839 wheadpt = whead20*musize10229 else if((musize-16)*(musize-20)*(musize-24)*(musize-29).ne.0) then18686 wheadpt = whead20*musize19096 fsyst = fsyst+4.5/musize[all …]