Searched refs:ai (Results 1 – 1 of 1) sorted by relevance
| /phasta/svLS/ |
| H A D | LHS.f | 52 INTEGER i, j, k, a, Ac, ai, s, e, nTasks, tF, maxnNo, ierr, local
131 ai = gtlPtr(Ac)
132 IF (ai .NE. 0) THEN
133 IF (aNodes(ai,tF) .NE. 0) THEN
134 IF (i .GT. tF) aNodes(ai,tF) = 0
157 ai = gtlPtr(Ac)
158 IF (i.GT.tF .OR. aNodes(ai,tF).NE.0) THEN
161 aNodes(ai,tF) = 0
|