Lines Matching refs:tmpQwtf
91 real*8, allocatable :: tmpQptf (:,:), tmpQwtf (:) local
94 allocate (tmpQwtf(nintf(1)))
95 call symtet(nintf(1),tmpQptf,tmpQwtf,nerr)
97 Qwtf(1,1:nintf(1)) = tmpQwtf(1:nintf(1))
107 deallocate (tmpQwtf)
111 allocate (tmpQwtf(nintf(2)))
112 call symhex(nintf(2),tmpQptf,tmpQwtf,nerr)
114 Qwtf(2,1:nintf(2)) = tmpQwtf(1:nintf(2))
116 deallocate (tmpQwtf)
119 allocate (tmpQwtf(nintf(3)))
120 call symwdg(nintf(3),tmpQptf,tmpQwtf,nerr)
122 Qwtf(3,1:nintf(3)) = tmpQwtf(1:nintf(3))
124 deallocate (tmpQwtf)
127 allocate (tmpQwtf(nintf(5)))
128 call sympyr(nintf(5),tmpQptf,tmpQwtf,nerr)
130 Qwtf(5,1:nintf(5)) = tmpQwtf(1:nintf(5))
132 deallocate (tmpQwtf)