Searched refs:isdats (Results 1 – 2 of 2) sorted by relevance
10039 static integer isdats; in doslur_() local10154 isdats = isdat; in doslur_()10169 tmove = nolevs == nolevt && (bit_test(isdat1[isdats],11) && in doslur_()10170 bit_test(isdat1[isdatt],11) || ! bit_test(isdat1[isdats], in doslur_()
6272 isdats = isdat6288 * ((btest(isdat1(isdats),11).and.btest(isdat1(isdatt),11)) .or.6289 * (.not.btest(isdat1(isdats),11).and.