Changeset 1443 for trunk/LMDZ.TITAN/libf


Ignore:
Timestamp:
Jun 5, 2015, 3:05:35 PM (9 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.TITAN/libf/phytitan
Files:
2 added
2 deleted
9 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.TITAN/libf/phytitan/clmain.F

    r1048 r1443  
    144144c======================================================================
    145145c
    146 #include "temps.h"
    147146      LOGICAL zxli ! utiliser un jeu de fonctions simples
    148147      PARAMETER (zxli=.FALSE.)

  • trunk/LMDZ.TITAN/libf/phytitan/dyn1d/rcm1d.F

    r1442 r1443  
    3232#include "comcstfi.h"
    3333#include "netcdf.inc"
    34 #include "logic.h"
    3534#include "clesphys.h"
    3635#include "iniprint.h"

  • trunk/LMDZ.TITAN/libf/phytitan/phyetat0.F90

    r1056 r1443  
    1515      USE comgeomphy,  only: rlatd,rlond
    1616      USE control_mod, only: raz_date
     17      USE temps_mod, only: itau_phy
    1718
    1819implicit none
    … …  
    2627#include "clesphys.h"
    2728#include "tabcontrol.h"
    28 #include "temps.h"
    2929!======================================================================
    3030

  • trunk/LMDZ.TITAN/libf/phytitan/phyredem.F90

    r1056 r1443  
    1414      USE comgeomphy,  only: rlatd,rlond
    1515      USE control_mod, only: raz_date
     16      USE temps_mod, only: day_end, annee_ref, itau_phy
    1617
    1718      implicit none
    … …  
    2526#include "clesphys.h"
    2627#include "tabcontrol.h"
    27 #include "temps.h"
    2828!======================================================================
    2929

  • trunk/LMDZ.TITAN/libf/phytitan/physiq.F

    r1356 r1443  
    7272      USE moyzon_mod
    7373      USE write_field_phy
     74      USE temps_mod, only: itau_phy,day_ref,annee_ref
     75      USE logic_mod, only: iflag_trac,moyzon_ch,moyzon_mu
    7476      IMPLICIT none
    7577c======================================================================
    … …  
    8587#include "dimsoil.h"
    8688#include "clesphys.h"
    87 #include "temps.h"
    8889#include "iniprint.h"
    89 #include "logic.h"
    9090#include "tabcontrol.h"
    9191#include "comorbit.h"

  • trunk/LMDZ.TITAN/libf/phytitan/phytrac.F

    r1126 r1443  
    4545      USE moyzon_mod
    4646      USE write_field_phy
     47      USE logic_mod, ONLY: moyzon_ch,moyzon_mu
    4748      IMPLICIT none
    4849#include "dimensions.h"
    … …  
    5253#include "varmuphy.h"
    5354#include "itemps.h"
    54 #include "logic.h"
    5555
    5656c======================================================================

  • trunk/LMDZ.TITAN/libf/phytitan/readstartphy.F

    r1055 r1443  
    1919#include "netcdf.inc"
    2020#include "dimsoil.h"
    21 #include "temps.h"
    2221c======================================================================
    2322      integer ngridmx

  • trunk/LMDZ.TITAN/libf/phytitan/scal_wind.F

    r1056 r1443  
    1515#include "dimensions.h"
    1616#include "paramet.h"
    17 #include "comgeom.h"
    1817
    1918c   Arguments:

  • trunk/LMDZ.TITAN/libf/phytitan/wind_scal.F

    r1056 r1443  
    1515#include "dimensions.h"
    1616#include "paramet.h"
    17 #include "comgeom.h"
    1817
    1918c   Arguments:
Note: See TracChangeset for help on using the changeset viewer.