program volatile_doctest
use penf
 use penf
 call penf_init
 print FI1P, BYR4P
endprogram volatile_doctest