!JOB
!LIMIT (TIME,1),(CORE,16)
!ASSIGN M:SI,(FILE,S:TIME,X)
!ASSIGN M:BO,(FILE,B:TIME)
!AP SI,BO
!ASSIGN M:SI,(FILE,SA:WHO,X)
!ASSIGN M:BO,(FILE,BA:WHO)
!AP SI,BO
!ASSIGN M:SI,(FILE,SF:WHO,X)
!ASSIGN M:BO,(FILE,BF:WHO)
!ANSF SI,BO
!LYNX BF:WHO,BA:WHO,B:TIME,:MONSTK.X(SL,F) OVER WHO (EX,ALL);.X
!SET M:SI
!PCL
DELETE BF:WHO,BA:WHO,B:TIME
END
!RUN (LMN,SQ,X)
!DATA
 SQ WHO
!EOD
