Searched refs:det3x3 (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | slpwBC.f | 14 real*8 det,det3x3,tmp,u,v,w local
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
171 BC(3)=det3x3(c7,c5,c6,c11,c9,c10,c15,c13,c14)/tmp
172 BC(5)=det3x3(c4,c5,c7,c8,c9,c11,c12,c13,c15)/tmp
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
195 BC(3)=det3x3(c7,c5,c6,c11,c9,c10,c15,c13,c14)/tmp
196 BC(5)=det3x3(c4,c5,c7,c8,c9,c11,c12,c13,c15)/tmp
295 real*8 function det3x3(a1,a2,a3,a4,a5,a6,a7,a8,a9) function
[all …]
|