Lines Matching refs:tmpQpt
11 real*8, allocatable :: tmpQpt (:,:), tmpQwt (:) local
51 allocate (tmpQpt (4,nint(1)))
56 call symtet(nint(1),tmpQpt,tmpQwt,nerr) ! interior elements
57 Qpt(1,1:4,1:nint(1)) = tmpQpt(1:4,1:nint(1))
65 deallocate (tmpQpt)
131 allocate (tmpQpt (4,nint(2)))
136 call symhex(nint(2),tmpQpt,tmpQwt,nerr)
137 Qpt(2,1:4,1:nint(2)) = tmpQpt(1:4,1:nint(2))
144 deallocate (tmpQpt)
219 allocate (tmpQpt (4,nint(5)))
222 call sympyr(nint(5),tmpQpt,tmpQwt,nerr) ! interior elements
223 Qpt(5,1:4,1:nint(5)) = tmpQpt(1:4,1:nint(5))
226 deallocate (tmpQpt)
312 allocate (tmpQpt (4,nint(3)))
315 call symwdg(nint(3),tmpQpt,tmpQwt,nerr) ! interior elements
316 Qpt(3,1:4,1:nint(3)) = tmpQpt(1:4,1:nint(3))
319 deallocate (tmpQpt)