Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A DslpwBC.f11 real*8 c8,c9,c10,c11 local
66 c8=wn2(1)
74 ck2=c6*c8 - c4*c10
75 ck3=c4*c9 - c8*c5
84 BC(4)=(c10*c4-c6*c8)/det
86 BC(6)=(c5*c8-c9*c4)/det
89 det=c4*c10-c8*c6
92 BC(5)=(c11*c4-c8*c7)/det
93 BC(6)=(c4*c9-c5*c8)/det
96 det=c4*c9-c8*c5
[all …]