b64_init Subroutine

  1. befor64.F90
  2. befor64
  3. b64_init

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 initialize proc~initialize->proc~b64_init program~volatile_doctest~1106 volatile_doctest program~volatile_doctest~1106->proc~b64_init proc~initialize~6 initialize proc~initialize~6->proc~b64_init program~volatile_doctest~354 volatile_doctest program~volatile_doctest~354->proc~b64_init proc~initialize~2 initialize proc~initialize~2->proc~b64_init program~volatile_doctest~531 volatile_doctest program~volatile_doctest~531->proc~b64_init program~volatile_doctest~929 volatile_doctest program~volatile_doctest~929->proc~b64_init

Contents

Source Code

b64_init

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