Home
last modified time | relevance | path

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

/phasta/phSolver/common/
H A DslpwBC.f12 real*8 c12,c13,c14,c15 local
165 c12=wn2(1)
169 tmp=det3x3(c4,c5,c6,c8,c9,c10,c12,c13,c14)
170 BC(4)=det3x3(c4,c7,c6,c8,c11,c10,c12,c15,c14)/tmp
172 BC(5)=det3x3(c4,c5,c7,c8,c9,c11,c12,c13,c15)/tmp
189 c12=wn1(1)
193 tmp=det3x3(c4,c5,c6,c8,c9,c10,c12,c13,c14)
194 BC(4)=det3x3(c4,c7,c6,c8,c11,c10,c12,c15,c14)/tmp
196 BC(5)=det3x3(c4,c5,c7,c8,c9,c11,c12,c13,c15)/tmp