Unverified Commit 98b47b65 authored by Stefan K's avatar Stefan K Committed by GitHub
Browse files

Add gmsh2nek + cgns2nek update (#616)

parent 70146147
......@@ -5,7 +5,7 @@ Reads a CGNS file and generates a .re2 file
* Boundary IDs are stored in the 5th argument of the fluid bc array in re2
* The real BC's have to be specified in the .usr file using the boundaryID
Current Limitations
Limitations
-------------------
* Single zone 3D unstructured grid CGNS file using ADF
* Periodic boundary faces are aligned with global coordinate system and match 1:1
* A periodic boundary face pair has to match 1:1
This diff is collapsed.
Reads a GMSH file and generates a .re2 file
* Supported element types are QUAD8, QUAD9, HEXA20 and HEXA27
* Boundary IDs are stored in the 5th argument of the fluid bc array in re2
* The real BC's have to be specified in the .usr file using the boundaryID
Limitations
-------------------
* Unstructured grid GMSH file format 2.x
* A periodic boundary face pair has to match 1:1
This diff is collapsed.
prefix = $(bin_nek_tools)
OBJS = mod_SIZE.o gmsh2nek.o byte.o speclib.o mxm.o
all: gmsh2nek
gmsh2nek: $(OBJS)
$(FC) $(FFLAGS) -o $(prefix)/gmsh2nek $^ $(LDFLAGS)
clean:
@rm -f *.o
mod_SIZE.o : mod_SIZE.f90 ; $(FC) -c $(FFLAGS) mod_SIZE.f90
gmsh2nek.o : gmsh2nek.f90 ; $(FC) -c $(FFLAGS) gmsh2nek.f90
byte.o : ../../core/byte.c ; $(CC) -c $(CFLAGS) ../../core/byte.c
speclib.o : ../../core/speclib.f ; $(FC) -c $(FFLAGS) ../../core/speclib.f
mxm.o : mxm.f ; $(FC) -c $(FFLAGS) mxm.f
module SIZE
!
!
! Gmsh msh file related variables:
!
character(32) mshname ! MXSTLN=32 max string length in an exodus file
integer totalNode,totalLine,totalQuad,totalHex,totalElem,bcNumber
integer num_dim,num_elem
integer aorb ! file type in fmsh file header, 0 for ascii, 1 for binary
real*8,save,allocatable,dimension(:,:) ::node_xyz ! real data in msh binary file is 8 byte
integer,save,allocatable,dimension(:,:) ::node_quad,node_hex
integer,save,allocatable,dimension(:,:) ::quad_array,hex_array,hex_face_array
integer,save,allocatable,dimension(:,:) ::node_line
integer,save,allocatable,dimension(:,:) ::line_array,quad_line_array
integer,save,allocatable,dimension(:) ::r_or_l ! for 2d msh quad elements, right-hand or left-hand
integer,save,allocatable,dimension(:,:) :: bcID ! bcID(1) = bcID, bcID(2) = surface total quad/lines elements number, bcID(3)=periodic bc id
character(32),save,allocatable,dimension(:) :: bcChar
! NEK CORE variables:
!
real,save,allocatable,dimension(:,:,:) :: bc, curve
real,save,allocatable,dimension(:,:,:,:) :: xm1, ym1, zm1
character(1),save,allocatable,dimension(:,:) :: ccurve
character(3),save,allocatable,dimension(:,:) :: cbc
!
! .RE2 file related variables
!
character*80 re2name
end module SIZE
\ No newline at end of file
This diff is collapsed.
......@@ -177,6 +177,9 @@ else
if [ "$TOOL" == "exo2nek" ]; then
export FFLAGS+=" ${R8}"
fi
if [ "$TOOL" == "gmsh2nek" ]; then
export FFLAGS+=" ${R8}"
fi
if [ "$TOOL" == "n2to3" ]; then
export FFLAGS+=" ${R8}"
fi
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment