Lines Matching refs:IPN4
138 INTEGER I0, I1, I4, IINFO, IPN4, ITER, IWHILA, IWHILB,
288 IPN4 = 4*( I0+N0 )
291 Z( I4-3 ) = Z( IPN4-I4-3 )
292 Z( IPN4-I4-3 ) = TEMP
294 Z( I4-1 ) = Z( IPN4-I4-5 )
295 Z( IPN4-I4-5 ) = TEMP
426 IPN4 = 4*( I0+N0 )
430 Z( I4-3 ) = Z( IPN4-I4-3 )
431 Z( IPN4-I4-3 ) = TEMP
433 Z( I4-2 ) = Z( IPN4-I4-2 )
434 Z( IPN4-I4-2 ) = TEMP
436 Z( I4-1 ) = Z( IPN4-I4-5 )
437 Z( IPN4-I4-5 ) = TEMP
439 Z( I4 ) = Z( IPN4-I4-4 )
440 Z( IPN4-I4-4 ) = TEMP