Searched refs:iswaft (Results 1 – 2 of 2) sorted by relevance
/dports/print/texlive-base/texlive-20150521-source/utils/pmx/pmx-2.7.0/ |
H A D | pmxab.c | 8193 static logical iswaft; in dograce_() local 8227 iswaft = bit_test(*ipl,31); in dograce_() 8259 if (comgrace_1.slurg[*ig - 1] && ! iswaft && ! isgaft) { in dograce_() 8338 if (comgrace_1.slurg[*ig - 1] && ! isgaft && ! iswaft) { in dograce_() 8549 if (comgrace_1.slurg[*ig - 1] && (iswaft || isgaft)) { in dograce_() 8792 if (comgrace_1.slurg[*ig - 1] && ! isgaft && ! iswaft) { in dograce_() 8916 if (isgaft && ! iswaft) { in dograce_() 8956 if ((isgaft || iswaft) && comgrace_1.slurg[*ig - 1]) { in dograce_() 8958 if (iswaft) { in dograce_() 9066 if (isgaft && ! iswaft) { in dograce_() [all …]
|
H A D | pmx270.for | 5038 logical upg,slurg,slashg,bar1syst,upslur,btest,isgaft,iswaft, 5053 iswaft = btest(ipl,31) 5075 if (slurg(ig) .and. .not.iswaft .and..not.isgaft) then 5123 if (slurg(ig) .and. .not.isgaft .and..not.iswaft) then 5250 if (slurg(ig) .and. (iswaft.or.isgaft)) then 5377 if (slurg(ig) .and. .not.isgaft .and. .not.iswaft) then 5436 if (isgaft .and. .not.iswaft) aftshft = aftshft+ptoff 5453 if ((isgaft.or.iswaft) .and. slurg(ig)) then 5454 c if (iswaft) ndxslur = igetbits(ipl,4,23) 5455 if (iswaft) ndxslur = igetbits(ipl,5,23) [all …]
|