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~2 pvtk_file%initialize proc~initialize~2->proc~b64_init proc~initialize~4 vtm_file%initialize proc~initialize~4->proc~b64_init proc~initialize~5 vtk_file%initialize proc~initialize~5->proc~b64_init program~volatile_doctest~194 volatile_doctest program~volatile_doctest~194->proc~b64_init program~volatile_doctest~608 volatile_doctest program~volatile_doctest~608->proc~b64_init program~volatile_doctest~658 volatile_doctest program~volatile_doctest~658->proc~b64_init program~volatile_doctest~901 volatile_doctest program~volatile_doctest~901->proc~b64_init proc~write_check write_check proc~write_check->proc~initialize~5 proc~write_pvts write_pvts proc~write_pvts->proc~initialize~2 proc~write_slave write_slave proc~write_slave->proc~initialize~5 proc~write_vts write_vts proc~write_vts->proc~initialize~5 program~vtk_fortran_write_vtm vtk_fortran_write_vtm program~vtk_fortran_write_vtm->proc~initialize~5 program~vtk_fortran_write_vtr vtk_fortran_write_vtr program~vtk_fortran_write_vtr->proc~initialize~5 program~vtk_fortran_write_vts vtk_fortran_write_vts program~vtk_fortran_write_vts->proc~initialize~5 program~vtk_fortran_write_vtu vtk_fortran_write_vtu program~vtk_fortran_write_vtu->proc~initialize~5 program~vtk_fortran_write_vtu~2 vtk_fortran_write_vtu program~vtk_fortran_write_vtu~2->proc~initialize~5 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