--- trunk/libf/dyn3d/advn.f 2010/04/06 17:52:58 32 +++ trunk/dyn3d/advn.f 2013/11/15 18:45:49 76 @@ -17,10 +17,9 @@ use dimens_m use paramet_m use comconst - use comvert - use logic + use disvert_m + use conf_gcm_m use comgeom - use iniprint IMPLICIT NONE c @@ -137,7 +136,7 @@ c -------------------------------------------------------------------- use dimens_m use paramet_m - use iniprint + use conf_gcm_m IMPLICIT NONE c c @@ -254,7 +253,7 @@ c -------------------------------------------------------------------- use dimens_m use paramet_m - use iniprint + use conf_gcm_m IMPLICIT NONE c c @@ -350,7 +349,7 @@ c -------------------------------------------------------------------- use dimens_m use paramet_m - use iniprint + use conf_gcm_m IMPLICIT NONE c c @@ -473,9 +472,8 @@ use dimens_m use paramet_m use comconst - use comvert - use logic - use iniprint + use disvert_m + use conf_gcm_m IMPLICIT NONE c c @@ -719,7 +717,7 @@ use dimens_m use paramet_m use comgeom - use iniprint + use conf_gcm_m IMPLICIT NONE c c @@ -834,7 +832,7 @@ use dimens_m use paramet_m use comgeom - use iniprint + use conf_gcm_m IMPLICIT NONE c c