Ignore:
Timestamp:
Apr 30, 2015, 12:33:45 PM (10 years ago)
Author:
milmd
Message:

In GENERIC, MARS and COMMON models replace some include files by modules (usefull for decoupling physics with dynamics).

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.MARS/libf/dyn3d/amont_qsat.F

    r38 r1422  
    11      SUBROUTINE amont_qsat (nq,iq,q,teta,pk,w, pbaru, pbarv,dq)
     2
     3      USE comvert_mod, ONLY: preff
     4      USE comconst_mod, ONLY: kappa,cpp
     5
    26      IMPLICIT NONE
    37
     
    1923#include "dimensions.h"
    2024#include "paramet.h"
    21 #include "logic.h"
    22 #include "comvert.h"
    23 #include "comconst.h"
    2425#include "comgeom.h"
    25 #include "serre.h"
    2626
    2727c   Arguments:
Note: See TracChangeset for help on using the changeset viewer.