Changeset 898 for trunk/AGRIF/AGRIF_FILES/modtypes.F

Timestamp:

2008-04-22T17:35:20+02:00 (16 years ago)

Author:

rblod

Message:

Correct some bugs in agrif optimization and add MPP optimization, see #42

File:

• trunk/AGRIF/AGRIF_FILES/modtypes.F (modified) (1 diff)

trunk/AGRIF/AGRIF_FILES/modtypes.F

@@ -267 +267 @@
       INTEGER,DIMENSION(:,:,:), POINTER :: tab5t
       LOGICAL, DIMENSION(:), POINTER :: memberinall2
+      LOGICAL, DIMENSION(:), POINTER :: sendtoproc1    
+      LOGICAL, DIMENSION(:), POINTER :: recvfromproc1      
+      LOGICAL, DIMENSION(:), POINTER :: sendtoproc2      
+      LOGICAL, DIMENSION(:), POINTER :: recvfromproc2      
 #endif      
       End Type Agrif_Interp_Loc