Ignore:
Timestamp:
Jan 3, 2016, 11:16:34 AM (9 years ago)
Author:
Ehouarn Millour
Message:

Improving the physics/dynamics interface:

  • added module callphysiq_mod.F90 in dynphy_lonlat/phy* which contains the routine "call_physiq" which is called by calfis* and calls the physics. This way different "physiq" routine from different physics packages may be called: The calfis* routines now exposes all available fields that might be transmitted to physiq but which is actually send (ie: expected/needed by physiq) is decided in call_physiq.
  • turned "physiq.F90" into module "physiq_mod.F90" for better control of "physiq" arguments. Extracted embeded "gr_fi_ecrit" as self-standing routine (but note that this routine actually only works in serial mode).

EM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/trunk/libf/phylmd/dyn1d/lmdz1d.F90

    r2403 r2418  
    3636   USE iniphysiq_mod, ONLY: iniphysiq
    3737   USE mod_const_mpi, ONLY: comm_lmdz
     38   USE physiq_mod, ONLY: physiq
    3839
    3940      implicit none
     
    219220      logical :: firstcall=.true.
    220221      logical :: lastcall=.false.
    221       real :: phis    = 0.0
    222       real :: dpsrf 
     222      real :: phis(1)    = 0.0
     223      real :: dpsrf(1)
    223224
    224225!---------------------------------------------------------------------
Note: See TracChangeset for help on using the changeset viewer.