b64_init Subroutine

public subroutine b64_init()

Arguments

None

Calls

proc~~b64_init~~CallsGraph proc~b64_init b64_init proc~penf_init penf_init proc~b64_init->proc~penf_init proc~check_endian check_endian proc~penf_init->proc~check_endian

Called by

proc~~b64_init~~CalledByGraph proc~b64_init b64_init proc~initialize vtm_file%initialize proc~initialize->proc~b64_init proc~initialize~2 vtk_file%initialize proc~initialize~2->proc~b64_init proc~initialize~4 pvtk_file%initialize proc~initialize~4->proc~b64_init program~volatile_doctest~296 volatile_doctest program~volatile_doctest~296->proc~b64_init program~volatile_doctest~338 volatile_doctest program~volatile_doctest~338->proc~b64_init program~volatile_doctest~463 volatile_doctest program~volatile_doctest~463->proc~b64_init program~volatile_doctest~909 volatile_doctest program~volatile_doctest~909->proc~b64_init proc~write_check write_check proc~write_check->proc~initialize~2 proc~write_pvts write_pvts proc~write_pvts->proc~initialize~4 proc~write_slave write_slave proc~write_slave->proc~initialize~2 proc~write_vts write_vts proc~write_vts->proc~initialize~2 program~vtk_fortran_write_vtm vtk_fortran_write_vtm program~vtk_fortran_write_vtm->proc~initialize~2 program~vtk_fortran_write_vtr vtk_fortran_write_vtr program~vtk_fortran_write_vtr->proc~initialize~2 program~vtk_fortran_write_vts vtk_fortran_write_vts program~vtk_fortran_write_vts->proc~initialize~2 program~vtk_fortran_write_vtu vtk_fortran_write_vtu program~vtk_fortran_write_vtu->proc~initialize~2 program~vtk_fortran_write_vtu~2 vtk_fortran_write_vtu program~vtk_fortran_write_vtu~2->proc~initialize~2 program~vtk_fortran_write_pvts vtk_fortran_write_pvts program~vtk_fortran_write_pvts->proc~write_pvts program~vtk_fortran_write_pvts->proc~write_vts program~vtk_fortran_write_volatile vtk_fortran_write_volatile program~vtk_fortran_write_volatile->proc~write_check program~vtk_fortran_write_volatile->proc~write_slave

Source Code

   subroutine b64_init()
   !< Initialize the BeFoR64 library.
   !<
   !< @note This procedure **must** be called before encoding/decoding anything!
   !<
   !<```fortran
   !< use befor64
   !< call b64_init
   !< print "(L1)", is_b64_initialized
   !<```
   !=> T <<<

   if (.not.is_initialized) call penf_init
   is_b64_initialized = .true.
   endsubroutine b64_init