Initialize the BeFoR64 library.
This procedure must be called before encoding/decoding anything!
Nodes of different colours represent the following:
Solid arrows point from a procedure to one which it calls. Dashed arrows point from an interface to procedures which implement that interface. This could include the module procedures in a generic interface or the implementation in a submodule of an interface in a parent module.
subroutine b64_init()
!---------------------------------------------------------------------------------------------------------------------------------
!< Initialize the BeFoR64 library.
!<
!< @note This procedure **must** be called before encoding/decoding anything!
!---------------------------------------------------------------------------------------------------------------------------------
!---------------------------------------------------------------------------------------------------------------------------------
if (.not.is_initialized) call penf_init
is_b64_initialized = .true.
return
!---------------------------------------------------------------------------------------------------------------------------------
endsubroutine b64_init