Changeset 2622 for LMDZ5/trunk/libf/dyn3d/dynetat0.f90

Timestamp:

Sep 4, 2016, 8:12:02 AM (8 years ago)

Author:

Ehouarn Millour

Message:

Some code tidying: turn ener.h into ener_mod.F90
EM

File:

• LMDZ5/trunk/libf/dyn3d/dynetat0.f90 (modified) (2 diffs)

LMDZ5/trunk/libf/dyn3d/dynetat0.f90

@@ -16 +16 @@
   USE serre_mod, ONLY: clon, clat, grossismx, grossismy
   USE temps_mod, ONLY: annee_ref, day_ini, day_ref, itau_dyn, start_time
+  USE ener_mod, ONLY: etot0,ptot0,ztot0,stot0,ang0
 
   IMPLICIT NONE
@@ -21 +22 @@
   include "paramet.h"
   include "comgeom2.h"
-  include "ener.h"
   include "description.h"
   include "iniprint.h"