zOs/REXX/@1

$$ out eins