Searched refs:QuadPt (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | shp10t.f | 1 subroutine shp10T (QuadPt, nQpt, shp, shgl, wght) argument
39 dimension QuadPt(4,*), shp(nen,*),
50 shp(1,m) = one - QuadPt(1,m) - QuadPt(2,m) - QuadPt(3,m)
51 shp(2,m) = QuadPt(1,m)
52 shp(3,m) = QuadPt(2,m)
53 shp(4,m) = QuadPt(3,m)
72 wght(m) = QuadPt(4,m)
|
| H A D | shp4t.f | 1 subroutine shp4T (QuadPt, nQpt, shp, shgl, wght) argument
39 dimension QuadPt(4,*), shp(nen,*),
48 shp(1,m) = one - QuadPt(1,m) - QuadPt(2,m) - QuadPt(3,m)
49 shp(2,m) = QuadPt(1,m)
50 shp(3,m) = QuadPt(2,m)
51 shp(4,m) = QuadPt(3,m)
70 wght(m) = QuadPt(4,m)
|