Ignore:
Timestamp:
May 4, 2005, 5:11:29 PM (19 years ago)
Author:
Laurent Fairhead
Message:

Modifications faites à la physique pour la rendre parallele YM
Une branche de travail LMDZ4_par_0 a été créée provisoirement afin de tester
les modifs pleinement avant leurs inclusions dans le tronc principal
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/LMDZ4_par_0/libf/phylmd/cv_driver.F

    r633 r634  
    1111     &                   da1,phi1,mp1)
    1212C
     13      USE dimphy
    1314      implicit none
    1415C
    … …  
    6465c
    6566c
    66 #include "dimensions.h"
    67 #include "dimphy.h"
     67cym#include "dimensions.h"
     68cym#include "dimphy.h"
    6869
    6970      integer len
    … …  
    250251c (local) compressed fields:
    251252c
    252       integer nloc
    253       parameter (nloc=klon) ! pour l'instant
    254 
     253cym      integer nloc
     254cym      parameter (nloc=klon) ! pour l'instant
     255#define nloc klon
    255256      integer idcum(nloc)
    256257      integer iflag(nloc),nk(nloc),icb(nloc)
Note: See TracChangeset for help on using the changeset viewer.