Searched refs:gk (Results 1 – 1 of 1) sorted by relevance
32 integer :: gi,gj,gk local346 gk = Prowp%pp(ki)%p(gj)348 Prowp%pp(ki)%p(gi) = gk425 gk = amg_paramap(1)%p(k)426 if ((gi.eq.gk).and.(gi.lt.0) ) then