30_a_fce_0102_2001_06
Write your story.
arc(r_0030_0001__Write, r_0030_0003__story, arg1).
arc(r_0030_0001__Write, z_000_30_a_fce_0102_2001_06_1, arg0).
arc(r_0030_0003__story, r_0030_0002__your, gen).
fof(formula,axiom,
? [R_30_1_WRITE,Z_30_A_FCE_102_2001_6_1,R_30_3_STORY,R_30_2_YOUR] :
( your(R_30_2_YOUR)
& write(R_30_1_WRITE,Z_30_A_FCE_102_2001_6_1,R_30_3_STORY)
& story(R_30_3_STORY)
& gen(R_30_3_STORY,R_30_2_YOUR) ) ).
( (IP-IMP (VB;_Tn_ Write;{write})
(NP-OB1 (NP-GEN (PRO;_genm_ your;{your}))
(N story;{story}))
(PUNC .))
(ID 30_a_fce_0102_2001_06))