1 # -*- coding: utf-8 -*-
2 # Copyright (C) 2014-2021 EDF R&D
4 # This library is free software; you can redistribute it and/or
5 # modify it under the terms of the GNU Lesser General Public
6 # License as published by the Free Software Foundation; either
7 # version 2.1 of the License, or (at your option) any later version.
9 # This library is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 # Lesser General Public License for more details.
14 # You should have received a copy of the GNU Lesser General Public
15 # License along with this library; if not, write to the Free Software
16 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18 # See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
20 """Préparation maillage du pipe"""
24 from .calculePointsAxiauxPipe_a import calculePointsAxiauxPipe_a
25 from .calculePointsAxiauxPipe_b import calculePointsAxiauxPipe_b
26 from .calculePointsAxiauxPipe_c import calculePointsAxiauxPipe_c
28 def calculePointsAxiauxPipe(edgesFondFiss, edgesIdByOrientation, facesDefaut, \
29 centreFondFiss, wireFondFiss, wirePipeFiss, \
30 lenSegPipe, rayonPipe, nbsegCercle, nbsegRad, \
32 """Préparation maillage du pipe :
34 - détections des points a respecter : jonction des edges/faces constituant la face de fissure externe au pipe
35 - points sur les edges de fond de fissure et edges pipe/face fissure,
36 - vecteurs tangents au fond de fissure (normal au disque maillé)
40 logging.info("Pour le cas n°%s", nro_cas)
42 # --- Maillage selon le rayon de courbure du fond de fissure
44 meshFondFiss = calculePointsAxiauxPipe_a(facesDefaut, centreFondFiss, wireFondFiss, \
47 # --- points géométriques
49 centres, origins, normals = calculePointsAxiauxPipe_b(meshFondFiss, \
50 edgesFondFiss, edgesIdByOrientation, \
51 wireFondFiss, wirePipeFiss, \
54 gptsdisks, raydisks = calculePointsAxiauxPipe_c(centres, origins, normals, \
55 rayonPipe, nbsegCercle, nbsegRad)
57 return (centres, gptsdisks, raydisks)