The Open FUSION Toolkit 1.0.0-beta6
Modeling tools for plasma and fusion research and engineering
Loading...
Searching...
No Matches
mesh_cubit.F90 File Reference
#include "local.h"

Data Types

 T3D CAD linkage structure. More...
type  exodus_curve
 T3D CAD boundary structure. More...
type  exodus_surf
 T3D CAD boundary structure. More...

Modules

module  oft_mesh_cubit
 Mesh handling for CUBIT meshes.

Functions/Subroutines

subroutine, public cubit_finalize_setup
 Finalize setup/load-in of CUBIT mesh and destroy temporaries created for grid construction (eg. high-order input nodes, in-memory data).
subroutine cubit_ho_tor (pts, wts, n, rmin, pt)
subroutine, public cubit_read_nodesets (nsets, cubit_filename)
 Needs Docs.
subroutine, public cubit_read_sidesets (ssets, cubit_filename)
 Needs Docs.
character(len=3) function format_blknum (ind)
subroutine, public mesh_cubit_add_quad (mg_mesh)
 Add quadratic mesh node points using CAD model.
subroutine, public mesh_cubit_cadlink (mesh)
 Link OpenNURBS CAD objects to Exodus mesh entities for use in refinement.
subroutine mesh_cubit_error (status)
 Catch NETCDF errors.
subroutine mesh_cubit_geom
 Load and initialize OpenNURBS geometry for current Exodus mesh.
subroutine, public mesh_cubit_hobase (self)
 Add quadratic mesh node points from high order import.
subroutine mesh_cubit_hobase_hex (self)
 Add quadratic mesh node points from HEX27 import.
subroutine mesh_cubit_hobase_quad (self)
 Add quadratic mesh node points from QUAD9 import.
subroutine mesh_cubit_hobase_tet (self)
 Add quadratic mesh node points from TETRA10 import.
subroutine mesh_cubit_hobase_tri (self)
 Add quadratic mesh node points from TRI6 import.
subroutine, public mesh_cubit_load (mg_mesh)
 Read in Exodus mesh and geometry information.
subroutine mesh_cubit_read_regions
 Read in Exodus volume mesh.
subroutine mesh_cubit_read_surface
 Read in Exodus surface mesh.
subroutine, public mesh_cubit_reffix (mg_mesh)
 Adjust points to CAD boundary and propogate CAD linkage.
subroutine mesh_cubit_reflect (mesh, tol)
 Reflect an exodus mesh and CAD model across the xy-plane.
subroutine, public mesh_cubit_set_periodic (mesh)
 Needs docs.
subroutine, public mesh_cubit_test_edge (i)
 Add quadratic mesh node points using CAD model.
subroutine read_regions
 Read in Exodus surface mesh.
subroutine, public smesh_cubit_load (mg_mesh)
 Needs Docs.

Variables

type(exodus_cadlink), pointer cad_link => NULL()
 Linkage of mesh to CAD geometry.
integer(i4), parameter cubit_soffset =1E4
real(r4cubit_version = 0.
integer(i4), parameter ex_topc_len =5
integer(i4), parameter ex_tops_len =5
integer(i4), dimension(2, 12), parameter exodus_hex_emap = RESHAPE((/1,2, 2,3, 3,4, 1,4, 1,5, 2,6, 3,7, 4,8, 5,6, 6,7, 7,8, 5,8/), (/2,12/))
integer(i4), dimension(4, 6), parameter exodus_hex_fmap = RESHAPE((/1,2,3,4, 5,6,7,8, 1,4,8,5, 2,3,7,6, 1,2,6,5, 3,4,8,7/), (/4,6/))
integer(i4), dimension(2, 4), parameter exodus_quad_emap = RESHAPE([1,2, 2,3, 3,4, 4,1], [2,4])
integer(i4), parameter exodus_string_len =33
integer(i4), dimension(2, 6), parameter exodus_tet_emap = RESHAPE((/1,2, 2,3, 3,1, 1,4, 2,4, 3,4/), (/2,6/))
integer(i4), dimension(2, 3), parameter exodus_tri_emap = RESHAPE([1,2, 2,3, 3,1], [2,3])
character(len=oft_path_slen) filename = 'none'
 Name of Cubit input file for mesh.
logical have_ho = .FALSE.
character(len=oft_path_slen), public inpname = 'none'
 Name of Cubit input file for geometry (Used to retrieve CAD objects).
integer(i4), dimension(:,:), allocatable lc_ho
logical lf_file = .TRUE.
 Large format file flag.
integer(i4), parameter, public mesh_cubit_id = 2
type(exodus_cadlink), dimension(:), pointer ml_cad_link => NULL()
 ML CAD linkage.
type(exodus_curve), dimension(:), pointer model_curves => NULL()
 List of model curves.
type(exodus_surf), dimension(:), pointer model_surfaces => NULL()
 List of model surfaces.
integer(i4nblks = 0
integer(i4ncid = 0
integer(i4ngmc = 0
 Number of geometry model curves.
integer(i4ngms = 0
 Number of geometry model surfaces.
integer(i4ngwc = 0
 Number of geometry wireframe curves.
integer(i4ngws = 0
 Number of geometry wireframe surfaces.
integer(i4np_ho = 0
integer(i4np_per = 0
integer(i4nregions = 0
integer(i4), dimension(:), allocatable per_nodes
integer(i4per_ns = -1
 Integer index of periodic nodeset.
real(r8), dimension(:,:), allocatable r_ho
logical reflect = .FALSE.
 Logical flag for mesh reflection (z-direction).
logical tor_mesh = .FALSE.
 Curve grid to toroidal shaping.
real(r8tor_rmin = 0.d0
type(nurbs_curve), dimension(:), pointer wf_curves => NULL()
 List of CAD wireframe curves.
type(nurbs_surf), dimension(:), pointer wf_surfs => NULL()
 List of CAD wireframe surfaces.
real(r8zstretch = 1.d0
 Scale for z-coordinates (useful for cylindrical pinch studies).

Function/Subroutine Documentation

◆ format_blknum()

character(len=3) function format_blknum ( integer(4), intent(in) ind)
private

◆ mesh_cubit_read_regions()

subroutine mesh_cubit_read_regions
private

Read in Exodus volume mesh.

  • Merge all blocks

◆ read_regions()

subroutine read_regions
private

Read in Exodus surface mesh.

  • Merge all blocks