MODULE struct_ames_mod 

IMPLICIT NONE

CONTAINS
USE head_ames_mod
USE grid_ames_mod


type STRUCT_AMES
	CHARACTER(LEN=12)				:: chaine 
	type(grid_ames),DIMENSION(:),pointer        :: grids_ames=>null()	
	type(head_ames)     		   	    :: head	 	

end type STRUCT_AMES

END MODULE struct_ames_mod