Searched refs:lenlit (Results 1 – 3 of 3) sorted by relevance
822 lenlit <- groundEval fn len824 let q = BS.take (fromIntegral lenlit) (BS.drop (fromIntegral offlit) alit)
535 integer lenlit[83], multg[37]; member5967 static integer itype, lenlit; in chklit_() local5993 lenlit = itype; in chklit_()6003 lenlit += 2; in chklit_()6004 if (lenlit > 128) { in chklit_()6011 ++lenlit; in chklit_()6012 if (lenlit > 128) { in chklit_()23050 comgrace_1.lenlit[comgrace_1.nlit - 1] = 2; in littex_()23078 ++comgrace_1.lenlit[comgrace_1.nlit - 1]; in littex_()23098 comgrace_1.lenlit[comgrace_1.nlit - 1] += comgrace_1.lenlit[ in littex_()[all …]
3502 lenlit = itype3510 lenlit = lenlit+23511 if (lenlit .gt. 128) then3518 lenlit = lenlit+13519 if (lenlit .gt. 128) then14940 lenlit(nlit) = 214949 lenlit(nlit) = lenlit(nlit)+214954 lenlit(nlit) = lenlit(nlit)+114969 lenlit(nlit) = lenlit(nlit)+lenlit(nlit+1)14970 if (lenlit(nlit) .gt. 128) then[all …]