Lines Matching refs:iposn
6959 iposn = iccount
6962 iposn = iccount-50
6998 i10 = iposn/10
6999 i1 = iposn-10*i10
8001 iposn = 0
8004 iposn = iposn+1
8091 else if (dumq .eq. 'H' .and. iposn.gt.1) then
8121 if (iposn .eq. 1) then
8866 iposn = 0
8868 iposn = iposn+1
8891 if (iposn .ne. 1) then
8909 if (iposn .eq. 1) go to 8
8920 iposn = iposn+1
8952 iposn = iposn+2
9039 else if (dumq .eq. 'H' .and. iposn.gt.1) then