Searched refs:wn2 (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | slpwBC.f | 16 real*8 wn1(3),wn2(3),wn3(3) local
61 wn2(:)=wlnorm(:,jslpw)
66 c8=wn2(1)
67 c9=wn2(2)
68 c10=wn2(3)
160 wn2(:)=wlnorm(:,jslpw)
165 c12=wn2(1)
166 c13=wn2(2)
167 c14=wn2(3)
232 wn2(:)=wlnorm(:,jslpw)
[all …]
|
| H A D | findslpw.f | 11 real*8 elnrm(nsd),wn1(nsd),wn2(nsd),wn3(nsd),aedg(nsd),bedg(nsd) local
|