Ignore:
Timestamp:
07/06/11 13:55:03 (13 years ago)
Author:
hozdoba
Message:

Ajout d'une partie d'Interface fortran pour la version 4
Ajout des sorties netcdf4 pour la version 4

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XMLIO_V2/dev/dev_rv/src4/xmlio/fortran/field_interface.f90

    r242 r249  
    9898      END SUBROUTINE xios_set_field_default_value 
    9999    
     100      SUBROUTINE xios_field_handle_create(ret, idt, idt_size) BIND(C) 
     101         import C_CHAR, C_INTPTR_T, C_INT 
     102         INTEGER  (kind = C_INTPTR_T)               :: ret 
     103         CHARACTER(kind = C_CHAR)    , DIMENSION(*) :: idt 
     104         INTEGER  (kind = C_INT)     , VALUE        :: idt_size 
     105      END SUBROUTINE xios_field_handle_create 
     106    
    100107   END INTERFACE 
    101108    
Note: See TracChangeset for help on using the changeset viewer.