|
| subroutine | jacobian_gen () |
| subroutine | jacobian_quad () |
| subroutine | log2phys_gen () |
| subroutine | log2phys_quad () |
| subroutine | tet_3d_grid (order, xnodes, inodesf, inodesc) |
| | Needs docs.
|
| subroutine | tetmesh_ctang (self, cell, ind, f, tang) |
| | Compute the curve tangent vector for a given edge on a cell.
|
| subroutine | tetmesh_g2inv (jfull, g2op) |
| | Needs docs.
|
| subroutine | tetmesh_get_surf_map (self, face, cell, lmap) |
| | Get mapping between boundary and volume logical coordinates.
|
| subroutine | tetmesh_hessian (self, cell, f, g2op, k) |
| | Compute the spatial hessian matrices for a given cell at a given logical position.
|
| integer(i4) function | tetmesh_in_cell (self, f, tol) |
| | Test if logical position lies within the base cell.
|
| subroutine | tetmesh_invert_cell (self, cell) |
| | Turn cell "inside out", used to ensure consistent orientations.
|
| subroutine | tetmesh_jacinv (jfull, gop, jac) |
| | Invert a 3x3 matrix.
|
| subroutine | tetmesh_jacl (self, cell, gop, j) |
| | Linear implementation of @tetmesh_jacobian.
|
| subroutine | tetmesh_jacobian (self, cell, f, gop, j) |
| | Compute the spatial jacobian matrix and its determinant for a given cell at a given logical position.
|
| real(r8) function, dimension(3) | tetmesh_log2phys (self, cell, f) |
| | Map from logical to physical coordinates in a given cell.
|
| subroutine | tetmesh_phys2log (self, cell, pt, f) |
| | Map from physical to logical coordinates in a given cell.
|
| real(r8) function, dimension(4) | tetmesh_phys2logho (self, i, pt) |
| real(r8) function, dimension(4) | tetmesh_phys2logl (self, i, pt) |
| subroutine | tetmesh_quad_rule (self, order, quad_rule) |
| | Retrieve suitable quadrature rule for mesh with given order.
|
| subroutine | tetmesh_set_order (self, order) |
| | Set maximum order of spatial mapping.
|
| subroutine | tetmesh_setup (self, cad_type) |
| | Setup mesh with implementation specifics (cell_np, cell_ne, etc.).
|
| subroutine | tetmesh_snormal (self, cell, ind, f, norm) |
| | Compute the surface normal vector for a given face on a cell.
|
| subroutine | tetmesh_surf_to_vol (self, fsurf, lmap, fvol) |
| | Map between surface and volume logical coordinates.
|
| subroutine | tetmesh_tessellate (self, rtmp, lctmp, order) |
| | Tessellate mesh onto lagrange FE nodes of specified order (usually for plotting).
|
| integer(i4) function, dimension(2) | tetmesh_tessellated_sizes (self) |
| | Get sizes of arrays returned by tetmesh_tessellate.
|
| subroutine | tetmesh_vlog (self, i, f) |
| | Get position in logical space of vertex i.
|
| subroutine | tm_findcell_error (m, n, uv, err, iflag) |
| | Evalute the error between a logical point and the current active point.
|
|
| integer(i4), private | active_cell = 0 |
| | Active cell for high order find_cell.
|
| class(oft_tetmesh), pointer, private | active_mesh => NULL() |
| | Active mesh for high order find_cell.
|
| real(r8), dimension(3), private | active_pt = 0.d0 |
| | Active point for high order find_cell.
|
| real(r8), parameter, private | ho_find_du =1.d-6 |
| | Step size used for jacobian eval during high order find_cell.
|
| integer(i4), parameter, private | ho_find_nsteps =100 |
| | Maximum number of steps during high order find_cell.
|
| real(r8), parameter, private | ho_find_tol =1.d-6 |
| | Convergence tolerance for high order find_cell.
|
| integer(i4), dimension(2, 6), parameter | tet_ed =RESHAPE((/1,4, 2,4, 3,4, 2,3, 3,1, 1,2/), (/2,6/)) |
| | Tetrahedron edge list.
|
| integer(i4), dimension(3, 4), parameter | tet_fc =RESHAPE((/2,3,4,3,1,4,1,2,4,1,2,3/), (/3,4/)) |
| | Tetrahedron face list.
|
| integer(i4), dimension(3, 4), parameter | tet_fe =RESHAPE((/2,3,4, 1,3,5, 1,2,6, 4,5,6/), (/3,4/)) |
| | Tetrahedron face edge list.
|
| integer(i4), dimension(2, 3), parameter | tri_ed =RESHAPE((/3,2,1,3,2,1/), (/2,3/)) |
| | Triangle edge list.
|
1.17.0