![]() |
This module contains subroutines to initialize medium for hexahedron and quadrangle elements. It also contains subroutines to write medium in binary VTK xml format readable by ParaView.
Public Member Functions | |
subroutine, public | init_hexa_medium () |
This subroutine fills medium properties (elastic or viscoelastic) at GLL nodes of hexahedron elements based on material number found in file *.inp generated by CUBIT mesh generator. If files *.cpu.*.mat are present in the simulation's directory, then material number of hexahedron elements are read from files *.cpu*.mat. More... | |
subroutine, public | init_quadp_medium () |
This subroutine fills medium properties at GLL nodes of paraxial quadrangle elements (i.e., absorbing boundary) based on material number of hexahedron elements it belongs. More... | |
Private Member Functions | |
subroutine, private | init_medium_from_mat_file (il_mat_num_of_hexa) |
This subroutine fills medium properties at GLL nodes of hexahedron elements based on material number in files *.cpu*.mat. More... | |
subroutine, private | write_medium_vtk_cell_xml () |
This subroutine writes S and P-wave velocities of the physical domain of cpu myrank in UnstructuredGrid binary vtk_cell xml file readable by ParaView. More... | |
subroutine, private | write_medium_vtk_node_xml (var1, var2) |
This subroutine writes S and P-wave velocities of the physical domain of cpu myrank in UnstructuredGrid binary vtk_node xml file readable by ParaView. More... | |
subroutine, private | write_medium_collection () |
This subroutine writes a VTK xml collection file *.pvd which contains all *.vtu files generated by write_medium_vtk_cell_xml or write_medium_vtk_node_xml. More... | |
Definition at line 126 of file module_init_medium.f90.
subroutine, public mod_init_medium::init_hexa_medium | ( | ) |
Definition at line 158 of file module_init_medium.f90.
References init_medium_from_mat_file(), and write_medium_vtk_node_xml().
Referenced by efispec3d().
|
private |
il_mat_num_of_hexa | : array filled with material number of hexahedron elements in cpu myrank. |
Definition at line 552 of file module_init_medium.f90.
Referenced by init_hexa_medium().
subroutine, public mod_init_medium::init_quadp_medium | ( | ) |
Definition at line 433 of file module_init_medium.f90.
Referenced by efispec3d().
|
private |
Definition at line 908 of file module_init_medium.f90.
Referenced by write_medium_vtk_cell_xml(), and write_medium_vtk_node_xml().
|
private |
Definition at line 585 of file module_init_medium.f90.
References mod_vtk_io::vtk_con_xml(), mod_vtk_io::vtk_dat_xml(), mod_vtk_io::vtk_end_xml(), mod_vtk_io::vtk_ini_xml(), and write_medium_collection().
|
private |
Definition at line 720 of file module_init_medium.f90.
References mod_vtk_io::vtk_con_xml(), mod_vtk_io::vtk_dat_xml(), mod_vtk_io::vtk_end_xml(), mod_vtk_io::vtk_ini_xml(), and write_medium_collection().
Referenced by init_hexa_medium().