--- trunk/libf/dyn3d/divgrad.f 2010/03/09 15:27:15 26 +++ trunk/libf/dyn3d/divgrad.f 2010/03/25 14:29:07 27 @@ -7,6 +7,7 @@ use logic use comgeom use inidissip_m + use filtreg_m, only: filtreg IMPLICIT NONE c c=======================================================================