MODULE mod_field_definition
  USE mod_field_group
  
  TYPE(field_group),SAVE,POINTER :: field_definition
 
CONTAINS

  SUBROUTINE field_definition__Init
  USE mod_field_group
  IMPLICIT NONE
  
    ALLOCATE(field_definition)
    CALL field_group__new(field_definition,"field_definition")
    
  END SUBROUTINE field_definition__Init
        
END MODULE mod_field_definition