penf_init Subroutine

public subroutine penf_init()

Initialize PENF’s variables that are not initialized into the definition specification.

 use penf
 call penf_init
 print FI1P, BYR4P

Arguments

None

Calls

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

Called by

proc~~penf_init~~CalledByGraph proc~penf_init penf_init proc~penf_print penf_print proc~penf_print->proc~penf_init program~volatile_doctest~92 volatile_doctest program~volatile_doctest~92->proc~penf_init program~volatile_doctest~96 volatile_doctest program~volatile_doctest~96->proc~penf_print

Contents

Source Code


Source Code

   subroutine penf_init()
   !< Initialize PENF's variables that are not initialized into the definition specification.
   !<
   !<```fortran
   !< use penf
   !< call penf_init
   !< print FI1P, BYR4P
   !<```
   !=> 4 <<<

   call check_endian
   is_initialized = .true.
   endsubroutine penf_init