write_vtk_mesh Subroutine

public subroutine write_vtk_mesh(equi, mesh, phi, dphi_bwd, dphi_fwd, vtk2d, vtk3d, quadratic_hex, dbgout)

Writes mesh to vtk files Based on VTKFortran library (https://github.com/szaghi/VTKFortran/) For description of cell types and their definition of connectivity see https://kitware.github.io/vtk-examples/site/VTKBook/05Chapter5/ here used (quad, bi-quadrtatic quad, hexahedron, quadratic hexahedron) For their VTK descriptor see https://vtk.org/doc/nightly/html/vtkCellType_8h_source.html

Arguments

Type IntentOptional Attributes Name
class(equilibrium_t), intent(inout) :: equi

Mesh
type(mesh_cart_t), intent(in) :: mesh

Mesh
real(kind=FP), intent(in) :: phi

Toroidal position at which center 3D mesh is located
real(kind=FP), intent(in) :: dphi_bwd

Toroidal distance in negative phi direction for which 3D aligned mesh is built
real(kind=FP), intent(in) :: dphi_fwd

Toroidal distance in positive phi direction for which 3D aligned mesh is built
type(vtk_file), intent(inout), optional :: vtk2d

VTK file for 2d vtk mesh (inplane)
type(vtk_file), intent(inout), optional :: vtk3d

VTK file for 3d vtk mesh
logical, intent(in), optional :: quadratic_hex

Indicates if 3d mesh is based on standard hexahedrons or quadratic hexahedrons (default)
integer, intent(in), optional :: dbgout

Debug output level

Calls

proc~~write_vtk_mesh~~CallsGraph proc~write_vtk_mesh write_vtk_mesh interface~get_cart_i mesh_cart_t%get_cart_i proc~write_vtk_mesh->interface~get_cart_i interface~get_cart_j mesh_cart_t%get_cart_j proc~write_vtk_mesh->interface~get_cart_j interface~get_n_points mesh_cart_t%get_n_points proc~write_vtk_mesh->interface~get_n_points interface~get_spacing_f mesh_cart_t%get_spacing_f proc~write_vtk_mesh->interface~get_spacing_f interface~get_xmin mesh_cart_t%get_xmin proc~write_vtk_mesh->interface~get_xmin interface~get_ymin mesh_cart_t%get_ymin proc~write_vtk_mesh->interface~get_ymin jacobian jacobian proc~write_vtk_mesh->jacobian proc~findindex_2d findindex_2d proc~write_vtk_mesh->proc~findindex_2d proc~get_stderr get_stderr proc~write_vtk_mesh->proc~get_stderr proc~get_stdout get_stdout proc~write_vtk_mesh->proc~get_stdout proc~is_master is_master proc~write_vtk_mesh->proc~is_master proc~trace trace proc~write_vtk_mesh->proc~trace proc~unique_tuples unique_tuples proc~write_vtk_mesh->proc~unique_tuples write_connectivity write_connectivity proc~write_vtk_mesh->write_connectivity write_geo write_geo proc~write_vtk_mesh->write_geo write_piece write_piece proc~write_vtk_mesh->write_piece proc~findindex_2d->proc~get_stderr mpi_comm_rank mpi_comm_rank proc~is_master->mpi_comm_rank proc~trace->proc~get_stderr destroy destroy proc~trace->destroy initialize initialize proc~trace->initialize integrate integrate proc~trace->integrate proc~handle_error handle_error proc~trace->proc~handle_error none~handle_error error_handler_t%handle_error proc~handle_error->none~handle_error

Called by

proc~~write_vtk_mesh~~CalledByGraph proc~write_vtk_mesh write_vtk_mesh program~test_diffusion test_diffusion program~test_diffusion->proc~write_vtk_mesh