program volatile_doctest
use penf_stringify
 use penf
 print "(A)", strz(n=1_I4P, nz_pad=5)
endprogram volatile_doctest