14_a_johnson_letter
You can travel to and from work but should work from home if you can.
arc(r_0014_0002__can, r_0014_0003__travel, scope).
arc(r_0014_0003__travel, r_0014_0001__You, arg0).
arc(r_0014_0003__travel, r_0014_0005__work, r_0014_0004__to_and_from_clr15).
arc(r_0014_0006__but, r_0014_0002__can, conj1).
arc(r_0014_0006__but, r_0014_0011__if, conj2).
arc(r_0014_0007__should, r_0014_0008__work, scope).
arc(r_0014_0008__work, r_0014_0001__You, arg0).
arc(r_0014_0008__work, r_0014_0010__home, r_0014_0009__from_nim30).
arc(r_0014_0011__if, r_0014_0007__should, scope).
arc(r_0014_0011__if, r_0014_0013__can, restriction).
arc(r_0014_0013__can, r_0014_1001____star__, scope).
arc(r_0014_1001____star__, r_0014_0001__You, arg0).
fof(formula,axiom,
? [R_14_6_BUT,R_14_2_CAN_TRAVEL,R_14_1_YOU,R_14_5_WORK] :
( you(R_14_1_YOU)
& work(R_14_5_WORK)
& ! [R_14_13_CAN__STAR_] :
( can__star_(R_14_13_CAN__STAR_,R_14_1_YOU)
=> ? [R_14_7_SHOULD_WORK,R_14_10_HOME] :
( home(R_14_10_HOME)
& should_work(R_14_7_SHOULD_WORK,R_14_1_YOU)
& from_nim30(R_14_7_SHOULD_WORK,R_14_10_HOME) ) )
& conj2(CONJ2)
& but(R_14_6_BUT)
& conj1(R_14_6_BUT,R_14_2_CAN_TRAVEL)
& can_travel(R_14_2_CAN_TRAVEL,R_14_1_YOU)
& to_and_from_clr15(R_14_2_CAN_TRAVEL,R_14_5_WORK) ) ).
( (IP-MAT (NP-SBJ (PRO You;{you}))
(ILYR (ILYR (MD;_cat_Vi_ can;{can})
(IP-INF-CAT (VB;_Ipr_ travel;{travel[to_and_from]})
(PP-CLR (P-ROLE to_and_from;{to_and_from})
(NP (N work;{work})))))
(CONJP (CONJ but;{but})
(ILYR (MD;_cat_Vi_ should;{shall})
(IP-INF-CAT (VB;_I_ work;{work})
(PP-NIM (P-ROLE from;{from})
(NP (N home;{home}))))
(PP-SCON (P-CONN if;{if})
(IP-ADV (NP-SBJ (PRO you;{you}))
(MD;_cat_Vi_ can;{can})
(IP-INF-CAT (VB _*_)))))))
(PUNC .))
(ID 14_a_johnson_letter))