Searched refs:K2 (Results 1 – 1 of 1) sorted by relevance
60 real(kind=8) :: K1(-1:1), K2(-1:1), K3(-1:1) local92 call fillK(P2,K2)97 sum(K2*P2)/h(2)**2 + &