MED fichier: Fichier source de MEDiteratorsF.f

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