The TELEMAC-MASCARET system  trunk
Data Types | Functions/Subroutines | Variables
lib_vtk_io Module Reference

Data Types

interface  vtk_geo
 Y.AUDOUIN 30/06/2013 V6P3 More...
 
interface  vtk_var
 

Functions/Subroutines

integer(i4p) function getunit ()
 
character(len=len(string)) function upper_case (STRING)
 
integer(i4p) function, public vtk_ini (OUTPUT_FORMAT, FILENAME, TITLE, MESH_TOPOLOGY)
 
integer(i4p) function vtk_geo_strp_r8 (NX, NY, NZ, X0, Y0, Z0, DX, DY, DZ)
 
integer(i4p) function vtk_geo_strp_r4 (NX, NY, NZ, X0, Y0, Z0, DX, DY, DZ)
 
integer(i4p) function vtk_geo_strg_r8 (NX, NY, NZ, NN, X, Y, Z)
 
integer(i4p) function vtk_geo_strg_r4 (NX, NY, NZ, NN, X, Y, Z)
 
integer(i4p) function vtk_geo_rect_r8 (NX, NY, NZ, X, Y, Z)
 
integer(i4p) function vtk_geo_rect_r4 (NX, NY, NZ, X, Y, Z)
 
integer(i4p) function vtk_geo_unst_r8 (NN, X, Y, Z)
 
integer(i4p) function vtk_geo_unst_r4 (NN, X, Y, Z)
 
integer(i4p) function, public vtk_con (NC, CONNECT, CELL_TYPE)
 
integer(i4p) function, public vtk_dat (NC_NN, VAR_LOCATION)
 
integer(i4p) function vtk_var_scal_r8 (NC_NN, VARNAME, VAR)
 
integer(i4p) function vtk_var_scal_r4 (NC_NN, VARNAME, VAR)
 
integer(i4p) function vtk_var_scal_i4 (NC_NN, VARNAME, VAR)
 
integer(i4p) function vtk_var_vect_r8 (VEC_TYPE, NC_NN, VARNAME, VARX, VARY, VARZ)
 
integer(i4p) function vtk_var_vect_r4 (VEC_TYPE, NC_NN, VARNAME, VARX, VARY, VARZ)
 
integer(i4p) function vtk_var_vect_i4 (NC_NN, VARNAME, VARX, VARY, VARZ)
 
integer(i4p) function vtk_var_text_r8 (NC_NN, DIMM, VARNAME, TEXTCOO)
 
integer(i4p) function vtk_var_text_r4 (NC_NN, DIMM, VARNAME, TEXTCOO)
 
integer(i4p) function, public vtk_end ()
 

Variables

integer, parameter, public r16p = SELECTED_REAL_KIND(33, 4931)
 
integer, parameter, public r8p = SELECTED_REAL_KIND(15, 307)
 
integer, parameter, public r4p = SELECTED_REAL_KIND(6, 37)
 
integer, parameter, public r_p = R8P
 
integer, parameter, public i8p = SELECTED_INT_KIND(18)
 
integer, parameter, public i4p = SELECTED_INT_KIND(9)
 
integer, parameter, public i2p = SELECTED_INT_KIND(4)
 
integer, parameter, public i1p = SELECTED_INT_KIND(2)
 
integer, parameter, public i_p = I4P
 
character(10), parameter, public fr16p = '(E41.33E4)'
 
character(10), parameter, public fr8p = '(E23.15E3)'
 
character(9), parameter, public fr4p = '(E14.6E2)'
 
character(10), parameter, public fr_p = '(E23.15E3)'
 
character(5), parameter, public fi8p = '(I21)'
 
character(5), parameter, public fi4p = '(I12)'
 
character(4), parameter, public fi2p = '(I7)'
 
character(4), parameter, public fi1p = '(I5)'
 
character(5), parameter, public fi_p = '(I12)'
 
integer(i4p), parameter maxlen = 500
 
character(1), parameter end_rec = CHAR(10)
 
integer(i4p), parameter f_out_ascii = 0
 
integer(i4p), parameter f_out_binary = 1
 
integer(i4pf_out = F_OUT_ASCII
 
character(len=maxlentopology
 
integer(i4punit_vtk
 

Function/Subroutine Documentation

◆ getunit()

integer(i4p) function lib_vtk_io::getunit ( )
private

Definition at line 125 of file lib_vtk_io.F.

+ Here is the caller graph for this function:

◆ upper_case()

character(len=len(string)) function lib_vtk_io::upper_case ( character(len=*), intent(in)  STRING)
private

Definition at line 165 of file lib_vtk_io.F.

+ Here is the caller graph for this function:

◆ vtk_con()

integer(i4p) function, public lib_vtk_io::vtk_con ( integer(i4p), intent(in)  NC,
integer(i4p), dimension(:), intent(in)  CONNECT,
integer(i4p), dimension(1:nc), intent(in)  CELL_TYPE 
)

Definition at line 918 of file lib_vtk_io.F.

+ Here is the caller graph for this function:

◆ vtk_dat()

integer(i4p) function, public lib_vtk_io::vtk_dat ( integer(i4p), intent(in)  NC_NN,
character(*), intent(in)  VAR_LOCATION 
)

Definition at line 1043 of file lib_vtk_io.F.

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ vtk_end()

integer(i4p) function, public lib_vtk_io::vtk_end ( )

Definition at line 1651 of file lib_vtk_io.F.

+ Here is the caller graph for this function:

◆ vtk_geo_rect_r4()

integer(i4p) function lib_vtk_io::vtk_geo_rect_r4 ( integer(i4p), intent(in)  NX,
integer(i4p), intent(in)  NY,
integer(i4p), intent(in)  NZ,
real(r4p), dimension(1:nx), intent(in)  X,
real(r4p), dimension(1:ny), intent(in)  Y,
real(r4p), dimension(1:nz), intent(in)  Z 
)
private

Definition at line 776 of file lib_vtk_io.F.

◆ vtk_geo_rect_r8()

integer(i4p) function lib_vtk_io::vtk_geo_rect_r8 ( integer(i4p), intent(in)  NX,
integer(i4p), intent(in)  NY,
integer(i4p), intent(in)  NZ,
real(r8p), dimension(1:nx), intent(in)  X,
real(r8p), dimension(1:ny), intent(in)  Y,
real(r8p), dimension(1:nz), intent(in)  Z 
)
private

Definition at line 709 of file lib_vtk_io.F.

◆ vtk_geo_strg_r4()

integer(i4p) function lib_vtk_io::vtk_geo_strg_r4 ( integer(i4p), intent(in)  NX,
integer(i4p), intent(in)  NY,
integer(i4p), intent(in)  NZ,
integer(i4p), intent(in)  NN,
real(r4p), dimension(1:nn), intent(in)  X,
real(r4p), dimension(1:nn), intent(in)  Y,
real(r4p), dimension(1:nn), intent(in)  Z 
)
private

Definition at line 663 of file lib_vtk_io.F.

◆ vtk_geo_strg_r8()

integer(i4p) function lib_vtk_io::vtk_geo_strg_r8 ( integer(i4p), intent(in)  NX,
integer(i4p), intent(in)  NY,
integer(i4p), intent(in)  NZ,
integer(i4p), intent(in)  NN,
real(r8p), dimension(1:nn), intent(in)  X,
real(r8p), dimension(1:nn), intent(in)  Y,
real(r8p), dimension(1:nn), intent(in)  Z 
)
private

Definition at line 617 of file lib_vtk_io.F.

◆ vtk_geo_strp_r4()

integer(i4p) function lib_vtk_io::vtk_geo_strp_r4 ( integer(i4p), intent(in)  NX,
integer(i4p), intent(in)  NY,
integer(i4p), intent(in)  NZ,
real(r4p), intent(in)  X0,
real(r4p), intent(in)  Y0,
real(r4p), intent(in)  Z0,
real(r4p), intent(in)  DX,
real(r4p), intent(in)  DY,
real(r4p), intent(in)  DZ 
)
private

Definition at line 569 of file lib_vtk_io.F.

◆ vtk_geo_strp_r8()

integer(i4p) function lib_vtk_io::vtk_geo_strp_r8 ( integer(i4p), intent(in)  NX,
integer(i4p), intent(in)  NY,
integer(i4p), intent(in)  NZ,
real(r8p), intent(in)  X0,
real(r8p), intent(in)  Y0,
real(r8p), intent(in)  Z0,
real(r8p), intent(in)  DX,
real(r8p), intent(in)  DY,
real(r8p), intent(in)  DZ 
)
private

Definition at line 520 of file lib_vtk_io.F.

◆ vtk_geo_unst_r4()

integer(i4p) function lib_vtk_io::vtk_geo_unst_r4 ( integer(i4p), intent(in)  NN,
real(r4p), dimension(1:nn), intent(in)  X,
real(r4p), dimension(1:nn), intent(in)  Y,
real(r4p), dimension(1:nn), intent(in)  Z 
)
private

Definition at line 880 of file lib_vtk_io.F.

◆ vtk_geo_unst_r8()

integer(i4p) function lib_vtk_io::vtk_geo_unst_r8 ( integer(i4p), intent(in)  NN,
real(r8p), dimension(1:nn), intent(in)  X,
real(r8p), dimension(1:nn), intent(in)  Y,
real(r8p), dimension(1:nn), intent(in)  Z 
)
private

Definition at line 843 of file lib_vtk_io.F.

◆ vtk_ini()

integer(i4p) function, public lib_vtk_io::vtk_ini ( character(*), intent(in)  OUTPUT_FORMAT,
character(*), intent(in)  FILENAME,
character(*), intent(in)  TITLE,
character(*), intent(in)  MESH_TOPOLOGY 
)

Definition at line 205 of file lib_vtk_io.F.

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ vtk_var_scal_i4()

integer(i4p) function lib_vtk_io::vtk_var_scal_i4 ( integer(i4p), intent(in)  NC_NN,
character(*), intent(in)  VARNAME,
integer(i4p), dimension(1:nc_nn), intent(in)  VAR 
)
private

Definition at line 1392 of file lib_vtk_io.F.

◆ vtk_var_scal_r4()

integer(i4p) function lib_vtk_io::vtk_var_scal_r4 ( integer(i4p), intent(in)  NC_NN,
character(*), intent(in)  VARNAME,
real(r4p), dimension(1:nc_nn), intent(in)  VAR 
)
private

Definition at line 1358 of file lib_vtk_io.F.

◆ vtk_var_scal_r8()

integer(i4p) function lib_vtk_io::vtk_var_scal_r8 ( integer(i4p), intent(in)  NC_NN,
character(*), intent(in)  VARNAME,
real(r8p), dimension(1:nc_nn), intent(in)  VAR 
)
private

Definition at line 1324 of file lib_vtk_io.F.

◆ vtk_var_text_r4()

integer(i4p) function lib_vtk_io::vtk_var_text_r4 ( integer(i4p), intent(in)  NC_NN,
integer(i4p), intent(in)  DIMM,
character(*), intent(in)  VARNAME,
real(r4p), dimension(1:nc_nn,1:dimm), intent(in)  TEXTCOO 
)
private

Definition at line 1606 of file lib_vtk_io.F.

◆ vtk_var_text_r8()

integer(i4p) function lib_vtk_io::vtk_var_text_r8 ( integer(i4p), intent(in)  NC_NN,
integer(i4p), intent(in)  DIMM,
character(*), intent(in)  VARNAME,
real(r8p), dimension(1:nc_nn,1:dimm), intent(in)  TEXTCOO 
)
private

Definition at line 1561 of file lib_vtk_io.F.

◆ vtk_var_vect_i4()

integer(i4p) function lib_vtk_io::vtk_var_vect_i4 ( integer(i4p), intent(in)  NC_NN,
character(*), intent(in)  VARNAME,
integer(i4p), dimension(1:nc_nn), intent(in)  VARX,
integer(i4p), dimension(1:nc_nn), intent(in)  VARY,
integer(i4p), dimension(1:nc_nn), intent(in)  VARZ 
)
private

Definition at line 1525 of file lib_vtk_io.F.

◆ vtk_var_vect_r4()

integer(i4p) function lib_vtk_io::vtk_var_vect_r4 ( character(*), intent(in)  VEC_TYPE,
integer(i4p), intent(in)  NC_NN,
character(*), intent(in)  VARNAME,
real(r4p), dimension(1:nc_nn), intent(in)  VARX,
real(r4p), dimension(1:nc_nn), intent(in)  VARY,
real(r4p), dimension(1:nc_nn), intent(in)  VARZ 
)
private

Definition at line 1476 of file lib_vtk_io.F.

+ Here is the call graph for this function:

◆ vtk_var_vect_r8()

integer(i4p) function lib_vtk_io::vtk_var_vect_r8 ( character(*), intent(in)  VEC_TYPE,
integer(i4p), intent(in)  NC_NN,
character(*), intent(in)  VARNAME,
real(r8p), dimension(1:nc_nn), intent(in)  VARX,
real(r8p), dimension(1:nc_nn), intent(in)  VARY,
real(r8p), dimension(1:nc_nn), intent(in)  VARZ 
)
private

Definition at line 1427 of file lib_vtk_io.F.

+ Here is the call graph for this function:

Variable Documentation

◆ end_rec

character(1), parameter lib_vtk_io::end_rec = CHAR(10)
private

Definition at line 108 of file lib_vtk_io.F.

◆ f_out

integer(i4p) lib_vtk_io::f_out = F_OUT_ASCII
private

Definition at line 111 of file lib_vtk_io.F.

◆ f_out_ascii

integer(i4p), parameter lib_vtk_io::f_out_ascii = 0
private

Definition at line 109 of file lib_vtk_io.F.

◆ f_out_binary

integer(i4p), parameter lib_vtk_io::f_out_binary = 1
private

Definition at line 110 of file lib_vtk_io.F.

◆ fi1p

character(4), parameter, public lib_vtk_io::fi1p = '(I5)'

Definition at line 101 of file lib_vtk_io.F.

◆ fi2p

character(4), parameter, public lib_vtk_io::fi2p = '(I7)'

Definition at line 100 of file lib_vtk_io.F.

◆ fi4p

character(5), parameter, public lib_vtk_io::fi4p = '(I12)'

Definition at line 99 of file lib_vtk_io.F.

◆ fi8p

character(5), parameter, public lib_vtk_io::fi8p = '(I21)'

Definition at line 98 of file lib_vtk_io.F.

◆ fi_p

character(5), parameter, public lib_vtk_io::fi_p = '(I12)'

Definition at line 102 of file lib_vtk_io.F.

◆ fr16p

character(10), parameter, public lib_vtk_io::fr16p = '(E41.33E4)'

Definition at line 92 of file lib_vtk_io.F.

◆ fr4p

character(9), parameter, public lib_vtk_io::fr4p = '(E14.6E2)'

Definition at line 94 of file lib_vtk_io.F.

◆ fr8p

character(10), parameter, public lib_vtk_io::fr8p = '(E23.15E3)'

Definition at line 93 of file lib_vtk_io.F.

◆ fr_p

character(10), parameter, public lib_vtk_io::fr_p = '(E23.15E3)'

Definition at line 95 of file lib_vtk_io.F.

◆ i1p

integer, parameter, public lib_vtk_io::i1p = SELECTED_INT_KIND(2)

Definition at line 84 of file lib_vtk_io.F.

◆ i2p

integer, parameter, public lib_vtk_io::i2p = SELECTED_INT_KIND(4)

Definition at line 83 of file lib_vtk_io.F.

◆ i4p

integer, parameter, public lib_vtk_io::i4p = SELECTED_INT_KIND(9)

Definition at line 82 of file lib_vtk_io.F.

◆ i8p

integer, parameter, public lib_vtk_io::i8p = SELECTED_INT_KIND(18)

Definition at line 81 of file lib_vtk_io.F.

◆ i_p

integer, parameter, public lib_vtk_io::i_p = I4P

Definition at line 85 of file lib_vtk_io.F.

◆ maxlen

integer(i4p), parameter lib_vtk_io::maxlen = 500
private

Definition at line 107 of file lib_vtk_io.F.

◆ r16p

integer, parameter, public lib_vtk_io::r16p = SELECTED_REAL_KIND(33, 4931)

Definition at line 75 of file lib_vtk_io.F.

◆ r4p

integer, parameter, public lib_vtk_io::r4p = SELECTED_REAL_KIND(6, 37)

Definition at line 77 of file lib_vtk_io.F.

◆ r8p

integer, parameter, public lib_vtk_io::r8p = SELECTED_REAL_KIND(15, 307)

Definition at line 76 of file lib_vtk_io.F.

◆ r_p

integer, parameter, public lib_vtk_io::r_p = R8P

Definition at line 78 of file lib_vtk_io.F.

◆ topology

character(len=maxlen) lib_vtk_io::topology
private

Definition at line 112 of file lib_vtk_io.F.

◆ unit_vtk

integer(i4p) lib_vtk_io::unit_vtk
private

Definition at line 113 of file lib_vtk_io.F.