Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A DslpwBC.f11 real*8 c8,c9,c10,c11 local
67 c9=wn2(2)
73 ck1=c5*c10 - c9*c6
75 ck3=c4*c9 - c8*c5
82 det=c5*c10-c9*c6
85 BC(5)=(c11*c5-c9*c7)/det
86 BC(6)=(c5*c8-c9*c4)/det
91 BC(4)=(c10*c5-c6*c9)/det
93 BC(6)=(c4*c9-c5*c8)/det
96 det=c4*c9-c8*c5
[all …]