MED fichier
MEDiteratorsF.f
Aller à la documentation de ce fichier.
1  block data med_set_it
2 
3  implicit none
4 
5  include "med_parameter.hf"
6 
7  common /med/ med_get_cell_geometry_type
8  integer MED_GET_CELL_GEOMETRY_TYPE(MED_N_CELL_FIXED_GEO)
9  save /med/
10  data med_get_cell_geometry_type /
11  & med_point1, med_seg2, med_seg3,
12  & med_seg4, med_tria3, med_quad4, med_tria6,
13  & med_tria7, med_quad8, med_quad9, med_tetra4,
14  & med_pyra5, med_penta6, med_hexa8, med_tetra10,
15  & med_octa12, med_pyra13, med_penta15, med_penta18, med_hexa20,
16  & med_hexa27, med_polygon, med_polygon2,med_polyhedron /
17 
18  END