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/mod_field_group.f90

    r8 r17  
    113113   
    114114   
    115   SUBROUTINE field_group__get_default_attribut(Pt_fg,Pt_f) 
     115  SUBROUTINE field_group__get_default_attrib(Pt_fg,Pt_f) 
    116116  IMPLICIT NONE 
    117117    TYPE(field_group),POINTER  :: Pt_fg 
     
    119119     
    120120    Pt_f=>Pt_fg%default_attribut 
    121   END SUBROUTINE field_group__get_default_attribut 
     121  END SUBROUTINE field_group__get_default_attrib 
    122122 
    123123   
Note: See TracChangeset for help on using the changeset viewer.