Ignore:
Timestamp:
Jun 5, 2015, 3:05:35 PM (10 years ago)
Author:
emillour
Message:

Titan and Venus GCMs:
Follow-up to the changes in dynamics/physics interface: ener.h, logic.h, serre.h and temps.h are now modules.
EM

Location:
trunk/LMDZ.COMMON/libf/dynlonlat_phylonlat/phytitan
Files:
6 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.COMMON/libf/dynlonlat_phylonlat/phytitan/ini_archive.F

    r1442 r1443  
    3737#include "paramet.h"
    3838#include "comgeom.h"
    39 #include "temps.h"
    40 #include "ener.h"
    41 #include "logic.h"
    4239#include "description.h"
    43 #include "serre.h"
    4440#include "netcdf.inc"
    4541

  • trunk/LMDZ.COMMON/libf/dynlonlat_phylonlat/phytitan/newstart.F

    r1442 r1443  
    2828     .                       aps,bps,scaleheight,pseudoalt,
    2929     .                       disvert_type,pressure_exner
    30 
     30      USE serre_mod, ONLY: clon,clat,grossismx,grossismy,
     31     &                     dzoomx,dzoomy,taux,tauy
     32      USE ener_mod, ONLY: etot0,ptot0,ztot0,stot0,ang0
     33      USE logic_mod, ONLY: iflag_trac,fxyhypb,ysinus
     34      USE temps_mod, ONLY: day_ref,annee_ref
    3135      implicit none
    3236
    … …  
    3539#include "comdissnew.h"
    3640#include "comgeom2.h"
    37 #include "logic.h"
    38 #include "temps.h"
    39 #include "ener.h"
    4041#include "description.h"
    41 #include "serre.h"
    4242#include "dimsoil.h"
    4343#include "netcdf.inc"

  • trunk/LMDZ.COMMON/libf/dynlonlat_phylonlat/phytitan/readstart.F

    r1442 r1443  
    1010     .                       aps,bps,scaleheight,pseudoalt,
    1111     .                       disvert_type,pressure_exner
    12      
     12      USE serre_mod, ONLY: clon,clat,grossismx,grossismy
     13      USE ener_mod, ONLY: etot0,ptot0,ztot0,stot0,ang0
     14      USE temps_mod, ONLY: day_ref,annee_ref,day_ini,itau_dyn,
     15     &                     start_time
     16      USE logic_mod, ONLY: fxyhypb,ysinus,iflag_trac
    1317      IMPLICIT NONE
    1418
    … …  
    3034#include "dimensions.h"
    3135#include "paramet.h"
    32 #include "temps.h"
    3336#include "comgeom.h"
    34 #include "ener.h"
    3537#include "description.h"
    36 #include "serre.h"
    37 #include "logic.h"
    3838#include "netcdf.inc"
    3939

  • trunk/LMDZ.COMMON/libf/dynlonlat_phylonlat/phytitan/start2archive.F

    r1442 r1443  
    2525     .                       aps,bps,scaleheight,pseudoalt,
    2626     .                       disvert_type,pressure_exner
     27      USE logic_mod, ONLY: iflag_trac
    2728
    2829      implicit none
    … …  
    3233#include "comdissnew.h"
    3334#include "comgeom.h"
    34 #include "logic.h"
    35 #include "temps.h"
    36 #include "ener.h"
    3735#include "description.h"
    3836#include "dimsoil.h"

  • trunk/LMDZ.COMMON/libf/dynlonlat_phylonlat/phytitan/write_archive.F

    r1442 r1443  
    4343#include "comgeom.h"
    4444#include "description.h"
    45 #include "temps.h"
    4645#include "netcdf.inc"
    4746

  • trunk/LMDZ.COMMON/libf/dynlonlat_phylonlat/phytitan/writerestart.F

    r1442 r1443  
    1919#include "paramet.h"
    2020#include "comgeom.h"
    21 #include "ener.h"
    22 #include "logic.h"
    2321#include "netcdf.inc"
    2422#include "description.h"
    25 #include "serre.h"
    2623
    2724c   Arguments:
Note: See TracChangeset for help on using the changeset viewer.