Changeset 770


Ignore:
Timestamp:
Jun 4, 2007, 4:56:05 PM (17 years ago)
Author:
Laurent Fairhead
Message:

Merge entre la version V3_conv et le HEAD
YM, JG, LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/phylmd/conccm.F

    r524 r770  
    55     s                   d_t, d_q, rain, snow, kbascm, ktopcm)
    66c
     7      USE dimphy
    78      IMPLICIT none
    89c======================================================================
    … …  
    1112c        (schema standard du modele NCAR CCM2)
    1213c======================================================================
    13 #include "dimensions.h"
    14 #include "dimphy.h"
     14cym#include "dimensions.h"
     15cym#include "dimphy.h"
    1516#include "YOMCST.h"
    1617#include "YOETHF.h"
    … …  
    143144     $                  tb, shb,
    144145     $                  cmfprt, cmfprs, cnt, cnb)
     146      USE dimphy
    145147      IMPLICIT none
    146148C-----------------------------------------------------------------------
    … …  
    163165c                    simplifier la lecture et la comprehension.
    164166C-----------------------------------------------------------------------
    165 #include "dimensions.h"
    166 #include "dimphy.h"
     167cym#include "dimensions.h"
     168cym#include "dimphy.h"
    167169      INTEGER pcnst ! nombre de traceurs passifs
    168170      PARAMETER (pcnst=1)
Note: See TracChangeset for help on using the changeset viewer.