Searched refs:swaptemp (Results 1 – 1 of 1) sorted by relevance
37 real(kind=8) :: swaptemp(redun) local349 swaptemp(:) = Pmtx%pp(ki)%p(:,gj)351 Pmtx%pp(ki)%p(:,gi) = swaptemp(:)410 swaptemp(:) = lhsGP%p(:,gi)412 lhsGP%p(:,j) = swaptemp(:)