Lines Matching refs:rz

130       real(kind=8)                       :: rz,rz_0,pq,alpha,beta  local
141       call ramg_dot_p(level,cgZ,cgR,1,rz)
142       rz_0 = rz
152          alpha = rz/pq
158          tmp = rz
159          call ramg_dot_p(level,cgZ,cgR,1,rz)
160          beta = rz/tmp
190       real(kind=8)                       :: rz,rz_0,pq,alpha,beta  variable
226       call ramg_dot_p(1,cgZ,cgR,1,rz)
227       rz_0 = rz
242          alpha = rz/pq
261          tmp = rz
262          call ramg_dot_p(1,cgZ,cgR,1,rz)
263          beta = rz/tmp