Home
last modified time | relevance | path

Searched refs:ck1 (Results 1 – 1 of 1) sorted by relevance

/phasta/phSolver/common/
H A DslpwBC.f13 real*8 ck1,ck2,ck3 local
73 ck1=c5*c10 - c9*c6
77 kk=nmax(ck1,ck2,ck3)
118 ck1=c5*c10 - c9*c6
122 kk=nmax(ck1,ck2,ck3)
242 ck1=c5*c10 - c9*c6 ! ck is the cross product of wn1 and wn2
246 kk=nmax(ck1,ck2,ck3)