Changeset 1621 for trunk/LMDZ.TITAN


Ignore:
Timestamp:
Oct 25, 2016, 9:23:21 AM (8 years ago)
Author:
emillour
Message:

Further work on full dynamics/physics separation.

LMDZ.COMMON:

  • added phy_common/vertical_layers_mod.F90 to store information on vertical grid. This is where routines in the physics should get the information.
  • The contents of vertical_layers_mod intialized via dynphy_lonlat/inigeomphy_mod.F90.

LMDZ.MARS:

  • physics now completely decoupled from dynamics; the physics package may now be compiled as a library (-libphy option of makelmdz_fcm).
  • created an "ini_tracer_mod" routine in module "tracer_mod" for a cleaner initialization of the later.
  • removed some purely dynamics-related outputs (etot0, zoom parameters, etc.) from diagfi.nc and stats.nc outputs as these informations are not available in the physics.

LMDZ.GENERIC:

  • physics now completely decoupled from dynamics; the physics package may now be compiled as a library (-libphy option of makelmdz_fcm).
  • added nqtot to tracer_h.F90.
  • removed some purely dynamics-related outputs (etot0, zoom parameters, etc.) from diagfi.nc and stats.nc outputs as these informations are not available in the physics.

LMDZ.VENUS:

  • physics now completely decoupled from dynamics; the physics package may now be compiled as a library (-libphy option of makelmdz_fcm).
  • added infotrac_phy.F90 to store information on tracers in the physics. Initialized via iniphysiq.
  • added cpdet_phy_mod.F90 to store t2tpot etc. functions to be used in the physics. Initialized via iniphysiq. IMPORTANT: there are some hard-coded constants! These should match what is in cpdet_mod.F90 in the dynamics.
  • got rid of references to moyzon_mod module within the physics. The required variables (tmoy, plevmoy) are passed to the physics as arguments to physiq.

LMDZ.TITAN:

  • added infotrac_phy.F90 to store information on tracers in the physics. Initialized via iniphysiq.
  • added cpdet_phy_mod.F90 to store t2tpot etc. functions to be used in the physics.
  • Extra work required to completely decouple physics and dynamics: moyzon_mod should be cleaned up and information passed from dynamics to physics as as arguments. Likewise moyzon_ch and moyzon_mu should not be queried from logic_mod (which is in the dynamics).

EM

Location:
trunk/LMDZ.TITAN/libf/phytitan
Files:
3 added
11 edited

Legend:

Unmodified
Added
Removed

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

    r1530 r1621  
    88      use dimphy
    99      use mod_grid_phy_lmdz, only: nbp_lev
    10       use cpdet_mod, only: t2tpot, tpot2t
     10      use cpdet_phy_mod, only: t2tpot, tpot2t
    1111      IMPLICIT none
    1212c======================================================================

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

    r1530 r1621  
    3636      use dimphy
    3737      use mod_grid_phy_lmdz, only: nbp_lev
    38       use cpdet_mod, only: t2tpot
     38      use cpdet_phy_mod, only: t2tpot
    3939      IMPLICIT none
    4040c======================================================================
    … …  
    480480      use dimphy
    481481      use mod_grid_phy_lmdz, only: nbp_lon, nbp_lat, nbp_lev
    482       use cpdet_mod, only: t2tpot,tpot2t,cpdet
     482      use cpdet_phy_mod, only: t2tpot,tpot2t,cpdet
    483483
    484484      IMPLICIT none
    … …  
    887887
    888888      use dimphy
    889       use cpdet_mod, only: cpdet,t2tpot
     889      use cpdet_phy_mod, only: cpdet,t2tpot
    890890      IMPLICIT none
    891891c======================================================================
    … …  
    11711171      use dimphy
    11721172      use mod_grid_phy_lmdz, only: nbp_lev
    1173       use cpdet_mod, only: cpdet
     1173      use cpdet_phy_mod, only: cpdet
    11741174      IMPLICIT none
    11751175c======================================================================

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

    r1530 r1621  
    208208 
    209209      use dimphy
    210       use cpdet_mod, only: cpdet
     210      use cpdet_phy_mod, only: cpdet
    211211      IMPLICIT NONE
    212212C

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

    r1056 r1621  
    4646
    4747      use write_field_phy
    48       use cpdet_mod, only: cpdet
     48      use cpdet_phy_mod, only: cpdet
    4949
    5050      IMPLICIT none
    … …  
    197197
    198198  use write_field_phy
    199   use cpdet_mod, only: t2tpot, tpot2t
     199  use cpdet_phy_mod, only: t2tpot, tpot2t
    200200
    201201  IMPLICIT none

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

    r1461 r1621  
    11      SUBROUTINE OPTCI(ykim,qaer,nmicro,IPRINT)
    22      use dimphy
    3       use infotrac
     3      use infotrac_phy, only: nqtot
    44      use common_mod, only:rmcbar,xfbar,ncount,TauHID,TauCID,TauGID
    55      USE TGMDAT_MOD, ONLY: RHCH4,FH2,FHAZE,FHVIS,FHIR,TAUFAC,

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

    r1461 r1621  
    22
    33      use dimphy
    4       use infotrac
     4      use infotrac_phy, only: nqtot
    55      use common_mod, only:rmcbar,xfbar,ncount,TauHVD,TauCVD,TauGVD
    66      USE TGMDAT_MOD, ONLY: RHCH4,FH2,FHAZE,FHVIS,FHIR,TAUFAC,

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

    r1545 r1621  
    1212      USE phys_state_var_mod
    1313      USE iostart
    14       USE infotrac
    1514      USE geometry_mod,  only: latitude_deg,longitude_deg
    1615      USE time_phylmdz_mod, only: itau_phy, raz_date

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

    r1545 r1621  
    1111      USE iostart, only : open_restartphy,close_restartphy, &
    1212                          put_var,put_field
    13       USE infotrac
    1413      USE geometry_mod,  only: longitude_deg, latitude_deg
    1514      USE time_phylmdz_mod, only: day_end, annee_ref, itau_phy, raz_date

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

    r1572 r1621  
    6161      USE ioipsl
    6262!      USE histcom ! not needed; histcom is included in ioipsl
    63       USE infotrac
     63      USE infotrac_phy, ONLY: iflag_trac, tname, ttext
    6464      use dimphy
    6565      USE geometry_mod, ONLY: longitude, latitude, ! in radians
    6666     &                        longitude_deg, latitude_deg, ! in degrees
    6767     &                        cell_area, dx, dy
    68       use cpdet_mod, only: cpdet, t2tpot
     68      use cpdet_phy_mod, only: cpdet, t2tpot
    6969      USE mod_phys_lmdz_para, only : is_parallel,jj_nb,
    7070     &                               is_north_pole_phy,
    … …  
    8181      USE write_field_phy
    8282      USE time_phylmdz_mod, only: itau_phy,day_ref,annee_ref,nday
    83       USE logic_mod, only: iflag_trac,moyzon_ch,moyzon_mu
     83      USE logic_mod, only: moyzon_ch,moyzon_mu
    8484      USE mod_grid_phy_lmdz, ONLY: nbp_lon, nbp_lat, nbp_lev
    8585      IMPLICIT none

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

    r1443 r1621  
    3838c reservoir----outpur-R-un reservoir de surface !!! (m)
    3939c======================================================================
    40       USE infotrac
     40      USE infotrac_phy, ONLY: tname
    4141      use dimphy
    4242      USE common_mod, only: rmcbar,xfbar,ncount,

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

    r1545 r1621  
    3131c   -------------
    3232
    33       USE infotrac
     33      USE infotrac_phy, ONLY: tname
    3434      use dimphy
    3535      USE geometry_mod, ONLY: latitude ! in radians
Note: See TracChangeset for help on using the changeset viewer.