Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A DslpwBC.f13 real*8 ck1,ck2,ck3 local
75 ck3=c4*c9 - c8*c5
77 kk=nmax(ck1,ck2,ck3)
120 ck3=c4*c9 - c8*c5
122 kk=nmax(ck1,ck2,ck3)
244 ck3=c4*c9 - c8*c5
246 kk=nmax(ck1,ck2,ck3)