$       v:='f$verify(0)'
$       set command 'f$logical("sys$disk")[]rnototex
$       define init$rnototex 'f$logical("sys$disk")[]rnototex.ini
$       delete/symbol/global rnototex
$       define/user sys$input sys$command
$       rnototex 'p2' 'p3' 'p4' 'p5' 'p6' 'p7'
$       if v then set verify