Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A DslpwBC.f13 real*8 ck1,ck2,ck3 local
74 ck2=c6*c8 - c4*c10
77 kk=nmax(ck1,ck2,ck3)
119 ck2=c6*c8 - c4*c10
122 kk=nmax(ck1,ck2,ck3)
243 ck2=c6*c8 - c4*c10
246 kk=nmax(ck1,ck2,ck3)