Searched refs:K3 (Results 1 – 1 of 1) sorted by relevance
60 real(kind=8) :: K1(-1:1), K2(-1:1), K3(-1:1) local93 call fillK(P3,K3)98 sum(K3*P3)/h(3)**2