Changeset 634 for LMDZ4/branches/LMDZ4_par_0/libf/phylmd/initrrnpb.F

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:

• LMDZ4/branches/LMDZ4_par_0/libf/phylmd/initrrnpb.F (modified) (2 diffs)

LMDZ4/branches/LMDZ4_par_0/libf/phylmd/initrrnpb.F

@@ -4 +4 @@
       SUBROUTINE  initrrnpb(ftsol,pctsrf,masktr,fshtr,hsoltr,tautr
      .                   ,vdeptr,scavtr)
+      USE dimphy
       IMPLICIT none
 c======================================================================
@@ -24 +25 @@
 c scavtr---output-R- Coefficient de lessivage
 c======================================================================
-#include "dimensions.h"
-#include "dimphy.h"
+cym#include "dimensions.h"
+cym#include "dimphy.h"
 #include "indicesol.h"
 c======================================================================