PROGRAM VPLANE !ROOT SEGMENT - VIRTUAL VERSION CALL LOGIC CALL EXIT END