Ignore:
Timestamp:
Aug 17, 2006, 5:41:51 PM (18 years ago)
Author:
Laurent Fairhead
Message:

Inclusion des modifs de Y. Meurdesoif pour la version V3
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/V3_test/libf/phylmd/moyglo_aire.F

    r644 r704  
    22     .            ok_msk, msk, moyglo)
    33c
     4       USE dimphy
    45       IMPLICIT none
    56c
    … …  
    1415c
    1516#include "dimensions.h"
    16 #include "dimphy.h"
     17cym#include "dimphy.h"
    1718       INTEGER i, nhori
    1819       REAL champ(klon), aire(klon), msk(klon)
    … …  
    6162       SUBROUTINE moyglo_pondaima(nhori, nvert, champ,
    6263     . aire, pbord, moyglo)
     64       USE dimphy
    6365       IMPLICIT none
    6466c ==================================================================
    … …  
    7274c ==================================================================
    7375#include "dimensions.h"
    74 #include "dimphy.h"
     76cym#include "dimphy.h"
    7577#include "YOMCST.h"
    7678       INTEGER i, k, nhori, nvert
    … …  
    107109       SUBROUTINE moyglo_pondmass(nhori, nvert, champ,
    108110     . aire, pbord, moyglo)
     111       USE dimphy
    109112       IMPLICIT none
    110113c ==================================================================
    … …  
    118121c ==================================================================
    119122#include "dimensions.h"
    120 #include "dimphy.h"
     123cym#include "dimphy.h"
    121124#include "YOMCST.h"
    122125       INTEGER i, k, nhori, nvert
Note: See TracChangeset for help on using the changeset viewer.