7_a_freedoom
The Control key fires the current weapon, and the spacebar will open doors and activate switches.
arc(r_0007_0004__fires, r_0007_0001__The_r_0007_0002__Control_r_0007_0003__key, arg0).
arc(r_0007_0004__fires, r_0007_0005__the_r_0007_0007__weapon, arg1).
arc(r_0007_0005__the_r_0007_0007__weapon, r_0007_0006__current, attrib16).
arc(r_0007_0009__and, r_0007_0004__fires, conj1).
arc(r_0007_0009__and, r_0007_0012__will, conj2).
arc(r_0007_0012__will, r_0007_0015__and, scope).
arc(r_0007_0013__open, r_0007_0010__the_r_0007_0011__spacebar, arg0).
arc(r_0007_0013__open, r_0007_0014__doors, arg1).
arc(r_0007_0015__and, r_0007_0013__open, conj1).
arc(r_0007_0015__and, r_0007_0016__activate, conj2).
arc(r_0007_0016__activate, r_0007_0010__the_r_0007_0011__spacebar, arg0).
arc(r_0007_0016__activate, r_0007_0017__switches, arg1).
fof(formula,axiom,
? [R_7_9_AND,R_7_4_FIRES,R_7_1_THE_CONTROL_KEY,R_7_5_THE_WEAPON,R_7_6_CURRENT] :
( the_Control_key(R_7_1_THE_CONTROL_KEY)
& current(R_7_6_CURRENT)
& and(R_7_9_AND)
& conj1(R_7_9_AND,R_7_4_FIRES)
& fires(R_7_4_FIRES,R_7_1_THE_CONTROL_KEY,R_7_5_THE_WEAPON)
& the_weapon(R_7_5_THE_WEAPON)
& attrib16(R_7_5_THE_WEAPON,R_7_6_CURRENT)
& conj2(R_7_9_AND,R_7_12_WILL)
& ~ ? [R_7_15_AND,R_7_13_OPEN,R_7_14_DOORS,R_7_16_ACTIVATE,R_7_10_THE_SPACEBAR,R_7_17_SWITCHES] :
( doors(R_7_14_DOORS)
& the_spacebar(R_7_10_THE_SPACEBAR)
& switches(R_7_17_SWITCHES)
& and(R_7_15_AND)
& conj1(R_7_15_AND,R_7_13_OPEN)
& open(R_7_13_OPEN,R_7_10_THE_SPACEBAR,R_7_14_DOORS)
& conj2(R_7_15_AND,R_7_16_ACTIVATE)
& activate(R_7_16_ACTIVATE,R_7_10_THE_SPACEBAR,R_7_17_SWITCHES) ) ) ).
( (IP-MAT (ILYR (ILYR (NP-SBJ (D The;{the})
(N Control;{control})
(N key;{key}))
(VBP;_Tn_ fires;{fire})
(NP-OB1 (D the;{the})
(ADJP (ADJ current;{current}))
(N weapon;{weapon})))
(PUNC ,)
(CONJP (CONJ and;{and})
(ILYR (NP-SBJ (D the;{the})
(N spacebar;{spacebar}))
(MD;_cat_Vi_ will;{will})
(IP-INF-CAT (ILYR (ILYR (VB;_Tn_ open;{open})
(NP-OB1 (NS doors;{door})))
(CONJP (CONJ and;{and})
(ILYR (VB;_Tn_ activate;{activate})
(NP-OB1 (NS switches;{switch})))))))))
(PUNC .))
(ID 7_a_freedoom))