Changeset 2622 for LMDZ5/trunk/libf/dyn3d/iniacademic.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/iniacademic.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/dyn3d/iniacademic.F90

@@ -20 +20 @@
   USE comvert_mod, ONLY: ap, bp, preff, presnivs, pressure_exner
   USE temps_mod, ONLY: annee_ref, day_ini, day_ref
+  USE ener_mod, ONLY: etot0,ptot0,ztot0,stot0,ang0
 
   !   Author:    Frederic Hourdin      original: 15/01/93
@@ -34 +35 @@
   include "comgeom.h"
   include "academic.h"
-  include "ener.h"
   include "iniprint.h"