Ignore:
Timestamp:
02/16/09 14:24:05 (15 years ago)
Author:
ymipsl
Message:

Correction de bugs pour portage sur Mercure

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XMLIO_SERVER/trunk/src/XMLIO/vector_grid_group_def.inc

    r8 r17  
    11 
    2   TYPE,PRIVATE :: Pt_grid_group  
     2  TYPE Pt_grid_group__  
    33    TYPE (grid_group),POINTER :: Pt 
    44    LOGICAL               :: owned 
    5   END TYPE Pt_grid_group 
     5  END TYPE Pt_grid_group__ 
    66 
    77  TYPE vector_grid_group 
    88   
    9     TYPE (Pt_grid_group), POINTER, DIMENSION(:) :: at => NULL() 
     9    TYPE (Pt_grid_group__), POINTER, DIMENSION(:) :: at => NULL() 
    1010    INTEGER :: size 
    1111     
Note: See TracChangeset for help on using the changeset viewer.