1 -- SMESH SMDS : implementaion of Salome mesh data structure
3 -- Copyright (C) 2003 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 -- CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 -- This library is free software; you can redistribute it and/or
7 -- modify it under the terms of the GNU Lesser General Public
8 -- License as published by the Free Software Foundation; either
9 -- version 2.1 of the License.
11 -- This library is distributed in the hope that it will be useful,
12 -- but WITHOUT ANY WARRANTY; without even the implied warranty of
13 -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 -- Lesser General Public License for more details.
16 -- You should have received a copy of the GNU Lesser General Public
17 -- License along with this library; if not, write to the Free Software
18 -- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 -- See http://www.opencascade.org/SALOME/ or email : webmaster.salome@opencascade.org
24 -- File : SMDS_MeshQuadrangle.cdl
25 -- Author : Jean-Michel BOULCOURT
28 class MeshQuadrangle from SMDS inherits MeshFace from SMDS
37 Create (ID,idnode1,idnode2,idnode3,idnode4: Integer) returns mutable MeshQuadrangle;
38 ---Purpose: constructor for a quandrangle
40 ComputeKey(me: mutable) is redefined static;
41 ---Purpose: compute the ID of the face based on the id's of its
45 GetEdgeDefinedByNodes(me; rank: Integer; idnode1, idnode2 : out Integer) is redefined static;
46 ---Purpose: returns the idnodes of the ith edge (rank) of the face
47 -- rank must be comprised between 1 and myNbConnections included.
50 GetConnections(me) returns Address is redefined static;
53 GetConnection(me; rank: Integer) returns Integer is redefined static;
56 SetConnections(me: mutable; idnode1,idnode2,idnode3,idnode4: Integer) is private;
61 myNodes : Integer [4];