Searched refs:theta (Results 1 – 1 of 1) sorted by relevance
36 real(kind=8) :: cf,beta,alpha,delta,theta,s1,rhok,invtheta local72 theta = (beta+alpha)/2.074 s1 = 2.0*theta/delta75 rhok = delta/theta