TELEMAC-MASCARET Forum :: Topic: 3D mesh generation (1/1)

Welcome, Guest

TOPIC: 3D mesh generation

3D mesh generation 5 years 3 months ago #32779

ajstamilselvan OFFLINE Junior Boarder Posts: 34	hi What is the procedure to convert/generate the 2D mesh to 3D?
	The administrator has disabled public write access.

3D mesh generation 5 years 3 months ago #32792

amanj2013 OFFLINE Expert Boarder Posts: 211 Thank you received: 24	Hi, The 3D mesh is generated based on 2D mesh inside T3D. There are 5 approaches as mentioned in T3D dico file. Well, it depends on the number of planes. and you can have equal depth or more refine at some planes and coarser at the other. have a look at SUBROUTINE CALCOT
	The administrator has disabled public write access.

3D mesh generation 5 years 3 months ago #32793

amanj2013
OFFLINE
Expert Boarder
Posts: 211
Thank you received: 24

here is an example of CONDIM

!
! DATA TO BUILD VERTICAL COORDINATES IN CALCOT
!
! TRANSF IS KEYWORD "MESH TRANSFORMATION"
! IF TRANSF = 0, SUBROUTINE CALCOT MUST BE IMPLEMENTED BY THE USER
!
! AN EQUIVALENT OF TRANSF MUST BE GIVEN FOR EVERY PLANE:
!
! POSSIBLE VALUES OF TRANSF_PLANE :
!
! 1 : SIGMA TRANSFORMATION WITH EVENLY SPACED PLANES
! 2 : SIGMA TRANSFORMATION WITH PROPORTIONS GIVEN IN ZSTAR
! 3 : PRESCRIBED ELEVATION GIVEN IN ZPLANE
!
! STANDARD BELOW IS: EVENLY SPACED PLANES, NO OTHER DATA REQUIRED
!
DO IPLAN = 1,NPLAN
TRANSF_PLANE%I(IPLAN)=1
ENDDO
!
! OTHER EXAMPLES:
!
! EXAMPLE 1: ALL PLANES WITH PRESCRIBED ELEVATION
!
! DO IPLAN = 1,NPLAN
! TRANSF_PLANE%I(IPLAN)=3
! ENDDO
! ZPLANE%R(2)=-7.D0
! ZPLANE%R(3)=-4.D0
! ...
! ZPLANE%R(NPLAN-1)=-0.05D0
!
!
! EXAMPLE 2: SIGMA TRANSFORMATION WITH GIVEN PROPORTIONS
!
! DO IPLAN = 1,NPLAN
! TRANSF_PLANE%I(IPLAN)=2
! ENDDO
! ZSTAR%R(1)=0.D0
! ZSTAR%R(2)=0.02D0
! ZSTAR%R(3)=0.1D0
! ...
! ZSTAR%R(NPLAN-1)=0.95D0
! ZSTAR%R(NPLAN)=1.D0
!
!
! EXAMPLE 3: ONE PLANE (NUMBER 4) WITH PRESCRIBED ELEVATION
! AND SIGMA ELSEWHERE
!
! DO IPLAN = 1,NPLAN
! TRANSF_PLANE%I(IPLAN)=1
! ENDDO
! TRANSF_PLANE%I(4)=3
! ZPLANE%R(4)=-3.D0
!
!
! EXAMPLE 4: ONE PLANE WITH PRESCRIBED ELEVATION
! AND 2 SIGMA TRANSFORMATIONS, WITH NPLAN=7
! SIGMA TRANSFORMATIONS ARE MEANT BETWEEN
! BOTTOM, FIXED ELEVATION PLANES AND FREE SURFACE
! THE VALUES OF ZSTAR ARE LOCAL FOR EVERY
! SIGMA TRANSFORMATION: 0. FOR LOWER FIXED PLANE
! 1. FOR UPPER FIXED PLANE
!
! DO IPLAN = 1,7
! TRANSF_PLANE%I(IPLAN)=2
! ENDDO
! TRANSF_PLANE%I(4)=3
! ZPLANE%R(4)=3.D0
! ZSTAR%R(2)=0.2D0
! ZSTAR%R(3)=0.8D0
! ZSTAR%R(5)=0.1D0
! ZSTAR%R(6)=0.9D0
!
!
!***********************************************************************
!
! COMPUTES ELEVATIONS
! IF IT IS A CONTINUATION, WILL BE DONE AFTER CALLING 'SUITE'
!
IF(DEBU) CALL CALCOT(Z,H%R)
!
!*********************************

The administrator has disabled public write access.

The following user(s) said Thank You: ajstamilselvan