block(

   load( "/Simulate/MaximaDos/maxima-init.mac" ) ,
   load( operatingsystem ) ,
   load( getenv( "USERMAC" ) )

) $

ZTRANS[1];

F%1;

SUBSTITUTE(ZTRANS[1],F%1, 999);