PASCAL-S-SUB-SLUTS