Set Language PASCAL
Set Module Sedtmain
Set Scope Sedtmain