| H A D | filters.f | 1 subroutine hfilterC (y, x, ien, hfres, shgl, shp, Qwtf) argument
9 dimension y(nshg,5), hfres(nshg,16)
166 hfres(ien(nel,j),:) = hfres(ien(nel,j),:) + fresl(nel,:)
178 & hfres, shgl, shp, Qwtf) argument
192 & hfres(nshg,16), hfresl(npro,nshl,16),
205 call local (hfres, hfresl, ien, 16, 'gather ')
404 subroutine hfilterCC (y, x, ien, hfres, shgl, shp, Qwtf) argument
408 dimension y(nshg,5), hfres(nshg,22)
581 hfres(ien(nel,j),:) = hfres(ien(nel,j),:) + fresl(nel,:)
594 & hfres, shgl, shp, Qwtf) argument
[all …]
|