--- trunk/libf/dyn3d/inigeom.f90 2013/02/18 16:33:12 69 +++ trunk/libf/dyn3d/inigeom.f90 2013/06/24 15:39:52 70 @@ -62,6 +62,7 @@ use conf_gcm_m, ONLY : fxyhypb, ysinus USE dimens_m, ONLY : iim, jjm use fxy_m, only: fxy + use fxyhyper_m, only: fxyhyper use jumble, only: new_unit use nr_util, only: pi USE paramet_m, ONLY : iip1, jjp1