Searched refs:levson (Results 1 – 2 of 2) sorted by relevance
683 common /comslm/ levson(0:nm),levsoff(0:nm),imidso(0:nm),763 levson(icm) = 01399 if (levson(icm).eq.nolev.and..not.slmon(icm)) 1405 if (levson(icm).eq.nolev.and..not.slmon(icm)) 1555 if (levson(icm).eq.levsoff(icm) .and. iacc.eq.0) then1630 if (.not.dbltie) levson(icm) = 01632 if (levson(icm).gt.0) slmon(icm) = .true.5918 c levson(midchan(iv,kv)) = nolevs6125 levson(icm) = 06541 c levson(midchan(iv,kv)) = nolevs[all …]
30 integer levson[25], levsoff[25], imidso[25], naccbl[25], laccbl[250] member1687 comslm_1.levson[icm] = 0; in MAIN__()2756 if (comslm_1.levson[*icm] == *nolev && ! comslm_1.slmon[*icm]) in addmidi_()2826 if (comslm_1.levson[*icm] > 0 && ! comslm_1.slmon[*icm]) { in addmidi_()3048 comslm_1.levson[*icm] = 0; in addmidi_()3051 if (comslm_1.levson[*icm] > 0) { in addmidi_()9670 comslm_1.levson[commidi_1.midchan[*iv + *kv * 24 - 25]] = in dopsslur_()9948 *iv - 1] - 1] == comslm_1.levson[icm] && (7 & in dopsslur_()9962 comslm_1.levson[icm] = 0; in dopsslur_()10881 *iv - 1] - 1] == comslm_1.levson[icm] && (7 & in doslur_()[all …]