Afivo
0.3
|
This file is a modification of code found in Lib_VTK_IO. More...
Data Types | |
type | vtk_t |
Functions/Subroutines | |
subroutine | vtk_ini_xml (vtkf, filename, vtk_type) |
subroutine | vtk_unstr_geo_xml (vtkf, coords, n_nodes, n_cells, n_dim, cycl, time) |
subroutine | vtk_unstr_geo_xml_close (vtkf) |
subroutine | vtk_unstr_con_xml (vtkf, connects, offsets, cell_types, n_cells) |
subroutine | vtk_dat_xml (vtkf, xml_name, true_is_open) |
subroutine | vtk_var_r8_xml (vtkf, varname, var, n_data) |
subroutine | vtk_end_xml (vtkf) |
Variables | |
integer, parameter | dp = kind(0.0d0) |
integer, parameter | sp = kind(0.0) |
integer, parameter | buf_len = 200 |
character, parameter | endl = char(10) |
integer, parameter | indent_spaces = 2 |
integer, parameter | bytes_i4 = 4 |
integer, parameter | bytes_r4 = 4 |
integer, parameter | bytes_r8 = 8 |
This file is a modification of code found in Lib_VTK_IO.
For the original code, see https://github.com/szaghi/Lib_VTK_IO. I have extracted the parts that I needed and simplified them a bit. The license for this file is thus also GPLv3.
Author Lib_VTK_IO: Stefano Zaghi, modifications: Jannis Teunissen
subroutine m_vtk::vtk_ini_xml | ( | type(vtk_t), intent(out) | vtkf, |
character(len=*), intent(in) | filename, | ||
character(len=*), intent(in) | vtk_type | ||
) |
subroutine m_vtk::vtk_unstr_geo_xml_close | ( | type(vtk_t), intent(inout) | vtkf | ) |
subroutine m_vtk::vtk_unstr_con_xml | ( | type(vtk_t), intent(inout) | vtkf, |
integer, dimension(:), intent(in) | connects, | ||
integer, dimension(:), intent(in) | offsets, | ||
integer, dimension(:), intent(in) | cell_types, | ||
integer, intent(in) | n_cells | ||
) |
subroutine m_vtk::vtk_dat_xml | ( | type(vtk_t), intent(inout) | vtkf, |
character(*), intent(in) | xml_name, | ||
logical, intent(in) | true_is_open | ||
) |
subroutine m_vtk::vtk_end_xml | ( | type(vtk_t), intent(inout) | vtkf | ) |