Lines Matching refs:ix2
5 subroutine isortiiddc(ix1,ix2,dy1,dy2,cy,n,kflag) argument
68 integer ix1(2,*),ix2(2,*) local
246 tx12=ix2(1,ij)
247 tx22=ix2(2,ij)
261 ix2(1,ij)=ix2(1,i)
262 ix2(2,ij)=ix2(2,i)
269 ix2(1,i)=tx12
270 ix2(2,i)=tx22
277 tx12=ix2(1,ij)
278 tx22=ix2(2,ij)
294 ix2(1,ij)=ix2(1,j)
295 ix2(2,ij)=ix2(2,j)
302 ix2(1,j)=tx12
303 ix2(2,j)=tx22
310 tx12=ix2(1,ij)
311 tx22=ix2(2,ij)
325 ix2(1,ij)=ix2(1,i)
326 ix2(2,ij)=ix2(2,i)
333 ix2(1,i)=tx12
334 ix2(2,i)=tx22
341 tx12=ix2(1,ij)
342 tx22=ix2(2,ij)
370 ttx12=ix2(1,l)
371 ttx22=ix2(2,l)
378 ix2(1,l)=ix2(1,k)
379 ix2(2,l)=ix2(2,k)
386 ix2(1,k)=ttx12
387 ix2(2,k)=ttx22
426 tx12=ix2(1,i+1)
427 tx22=ix2(2,i+1)
438 ix2(1,k+1)=ix2(1,k)
439 ix2(2,k+1)=ix2(2,k)
449 ix2(1,k+1)=tx12
450 ix2(2,k+1)=tx22