1       subroutine hfilterC (y, x, ien, hfres, shgl, shp, Qwtf)  argument
21      &          fresli(npro,16),       Qwtf(ngaussf)
83          wght=Qwtf(intp)         
178      &     hfres, shgl, shp, Qwtf)  argument
191      &          fresli(npro,33),       Qwtf(ngaussf),
404       subroutine hfilterCC (y, x, ien, hfres, shgl, shp, Qwtf)  argument
420      &          fresli(npro,22),       Qwtf(ngaussf),
483          wght=Qwtf(intp)         
594      &     hfres, shgl, shp, Qwtf)  argument
607      &          fresli(npro,33),       Qwtf(ngaussf),
687         wght=Qwtf(intp)
782       subroutine hfilterBB (y, x, ien, hfres, shgl, shp, Qwtf)  argument
798      &          fresli(npro,nshl,24),   Qwtf(ngaussf),
862          wght=Qwtf(intp)    
1089      &                   shpf(lcsyst,1:nshl,:),Qwtf(lcsyst,1:ngaussf),
1236       subroutine resSij (y, x, ien, hfres, shgl, shp, Qwtf)  argument
1252      &          fresli(npro,nshl,24),   Qwtf(ngaussf),
1316          wght=Qwtf(intp)    
1745      &               shpf(lcsyst,1:nshl,:),Qwtf(lcsyst,1:ngaussf))
2435      &               shpf(lcsyst,1:nshl,:),Qwtf(lcsyst,1:ngaussf))
2492      &               shpf(lcsyst,1:nshl,:),Qwtf(lcsyst,1:ngaussf))