Ignore:
Timestamp:
03/07/12 17:32:08 (10 years ago)
Author:
ymipsl
Message:

Port to IBM POWER 6 Vargas from IDRIS

YM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XIOS/trunk/src/interface/fortran/gridgroup_interface.f90

    r325 r329  
    44   INTERFACE ! Ne pas appeler directement/Interface FORTRAN 2003 <-> C99 
    55      
    6       SUBROUTINE cxios_domaingroup_handle_create(ret, idt, idt_size) BIND(C) 
     6      SUBROUTINE cxios_gridgroup_handle_create(ret, idt, idt_size) BIND(C) 
    77         USE ISO_C_BINDING 
    88         INTEGER  (kind = C_INTPTR_T)               :: ret 
    99         CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: idt 
    1010         INTEGER  (kind = C_INT)     , VALUE        :: idt_size 
    11       END SUBROUTINE cxios_domaingroup_handle_create 
     11      END SUBROUTINE cxios_gridgroup_handle_create 
    1212 
    1313      SUBROUTINE cxios_gridgroup_valid_id(ret, idt, idt_size) BIND(C) 
Note: See TracChangeset for help on using the changeset viewer.