Ignore:
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

Location:
LMDZ5/trunk/libf/dyn3d
Files:
7 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/trunk/libf/dyn3d/advect.F

    r2603 r2622  
    66      USE comconst_mod, ONLY: daysec
    77      USE logic_mod, ONLY: conser
     8      USE ener_mod, ONLY: gtot
    89     
    910      IMPLICIT NONE
     
    3031      include "paramet.h"
    3132      include "comgeom.h"
    32       include "ener.h"
    3333
    3434c   Arguments:
  • LMDZ5/trunk/libf/dyn3d/advtrac.F90

    r2603 r2622  
    1919  include "comdissip.h"
    2020  include "comgeom2.h"
    21   include "ener.h"
    2221  include "description.h"
    2322  include "iniprint.h"
  • LMDZ5/trunk/libf/dyn3d/dynetat0.f90

    r2603 r2622  
    1616  USE serre_mod, ONLY: clon, clat, grossismx, grossismy
    1717  USE temps_mod, ONLY: annee_ref, day_ini, day_ref, itau_dyn, start_time
     18  USE ener_mod, ONLY: etot0,ptot0,ztot0,stot0,ang0
    1819
    1920  IMPLICIT NONE
     
    2122  include "paramet.h"
    2223  include "comgeom2.h"
    23   include "ener.h"
    2424  include "description.h"
    2525  include "iniprint.h"
  • LMDZ5/trunk/libf/dyn3d/dynredem.F90

    r2603 r2622  
    1818                              taux,tauy
    1919  USE temps_mod, ONLY: annee_ref, day_ref, itau_dyn, itaufin, start_time
     20  USE ener_mod, ONLY: etot0,ptot0,ztot0,stot0,ang0
    2021 
    2122  IMPLICIT NONE
     
    2324  include "paramet.h"
    2425  include "comgeom2.h"
    25   include "ener.h"
    2626  include "description.h"
    2727  include "iniprint.h"
  • LMDZ5/trunk/libf/dyn3d/gcm.F90

    r2603 r2622  
    7373  include "comdissnew.h"
    7474  include "comgeom.h"
    75   include "ener.h"
    7675  include "description.h"
    7776  include "iniprint.h"
  • LMDZ5/trunk/libf/dyn3d/iniacademic.F90

    r2603 r2622  
    2020  USE comvert_mod, ONLY: ap, bp, preff, presnivs, pressure_exner
    2121  USE temps_mod, ONLY: annee_ref, day_ini, day_ref
     22  USE ener_mod, ONLY: etot0,ptot0,ztot0,stot0,ang0
    2223
    2324  !   Author:    Frederic Hourdin      original: 15/01/93
     
    3435  include "comgeom.h"
    3536  include "academic.h"
    36   include "ener.h"
    3737  include "iniprint.h"
    3838
  • LMDZ5/trunk/libf/dyn3d/leapfrog.F

    r2603 r2622  
    6464      include "comdissnew.h"
    6565      include "comgeom.h"
    66       include "ener.h"
    6766      include "description.h"
    6867      include "iniprint.h"
Note: See TracChangeset for help on using the changeset viewer.