'(=> (= (Door_Opening_Type_S (Elevator.Door ?X)) so) (= (Door_Opening_Strike_Side (Elevator.Door ?X)) na))
(<= (Has-Constraint $X Door_Opening_Type_C01) (Elevator $X)) (Inherited-Slot-Value Elevator Has-Constraint Door_Opening_Type_C01) (Used-In-Constraint Door_Opening_Strike_Side Door_Opening_Type_C01) (Used-In-Constraint Door_Opening_Type_S Door_Opening_Type_C01)