--- trunk/libf/dyn3d/etat0.f90 2008/08/07 12:29:13 18 +++ trunk/libf/dyn3d/etat0.f90 2009/07/31 15:18:47 22 @@ -296,7 +296,7 @@ day_ref = dayref annee_ref = anneeref - CALL geopot(ip1jmp1, tpot, pk , pks, phis , phi) + CALL geopot(ip1jmp1, tpot, pk , pks, phis, phi) CALL caldyn0(0, uvent, vvent, tpot, psol, masse, pk, phis, phi, w, & pbaru, pbarv, 0) CALL dynredem0("start.nc", dayref, phis)