SCHEMA Structured_mesh_arm;

  
USE FROM Mesh_arm -- Mesh
  (Region,
  Composition_of_mesh,
  Mesh);

  
ENTITY Cell_of_structured_mesh
  cell  :  Region;
  mesh  :  Structured_mesh;
  identifier_of_cell  :  ARRAY[1,dimension] OF INTEGER;
DERIVE 
  dimension  :  INTEGER := mesh.dimension;
END_ENTITY;

  
ENTITY Composition_of_structured_mesh
  SUBTYPE OF (Composition_of_mesh);
  SELF\part  :  Structured_mesh;
  SELF\whole  :  Structured_mesh;
  lower_corner  :  ARRAY[1,whole_dimension] OF INTEGER;
  lower_face  :  ARRAY[1,whole_dimension] OF OPTIONAL BOOLEAN;
  used_dimensions  :  ARRAY[1,part_dimension] OF INTEGER;
  used_dimension_sense  :  ARRAY[1,part_dimension] OF BOOLEAN;
DERIVE 
  whole_dimension  :  INTEGER := whole.dimension;
  part_dimension  :  INTEGER := part.dimension; 
END_ENTITY;

  
ENTITY Structured_mesh
  SUBTYPE OF (
  Mesh,
  Region);
  number_of_cells  :  ARRAY[1,dimension] OF INTEGER;
DERIVE 
  dimension  :  INTEGER := SELF\Region.dimension;
END_ENTITY;

  
END_SCHEMA;

Page last updated - 7 Sep 2000