Lines Matching refs:tmpQwt
11 real*8, allocatable :: tmpQpt (:,:), tmpQwt (:) local
52 allocate (tmpQwt (nint(1)))
56 call symtet(nint(1),tmpQpt,tmpQwt,nerr) ! interior elements
58 Qwt(1,1:nint(1)) = tmpQwt(1:nint(1))
66 deallocate (tmpQwt)
132 allocate (tmpQwt (nint(2)))
136 call symhex(nint(2),tmpQpt,tmpQwt,nerr)
138 Qwt(2,1:nint(2)) = tmpQwt(1:nint(2))
145 deallocate (tmpQwt)
220 allocate (tmpQwt (nint(5)))
222 call sympyr(nint(5),tmpQpt,tmpQwt,nerr) ! interior elements
224 Qwt(5,1:nint(5)) = tmpQwt(1:nint(5))
227 deallocate (tmpQwt)
313 allocate (tmpQwt (nint(3)))
315 call symwdg(nint(3),tmpQpt,tmpQwt,nerr) ! interior elements
317 Qwt(3,1:nint(3)) = tmpQwt(1:nint(3))
320 deallocate (tmpQwt)