/* rexx */ 00010000
parse arg a 00020000
if a = '' then 00030000
a = wk 00040000
address tso "exec 'A540769.wk.rexx(alib)' '"a"'" 00050001
exit 00060000