Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- % /home/prologmud_server/lib/swipl/pack/pfc/prolog/pfclib/system_autoexec.pfc.pl:120
- % warn(kb_local(already_decl(kb_global, (baseKB->baseKB), mpred_prop, 4))).
- % /home/prologmud_server/lib/swipl/pack/pfc/prolog/pfclib/system_base.pfc.pl:239
- % warn(trace_or_throw(already_decl(kb_global, (baseKB->baseKB), mtHybrid, 1))).
- % /home/prologmud_server/lib/swipl/pack/pfc/prolog/pfclib/system_base.pfc.pl:276
- % warn(kb_local(already_decl(kb_global, (baseKB->baseKB), mtHybrid, 1))).
- % warn(kb_local(already_decl(kb_global, (baseKB->baseKB), genlMt, 2))).
- % /home/prologmud_server/lib/swipl/pack/pfc/prolog/pfclib/system_base.pfc.pl:280
- % warn(kb_local(already_decl(kb_global, (baseKB->baseKB), genlMt, 2))).
- % /home/prologmud_server/lib/swipl/pack/pfc/prolog/pfclib/system_base.pfc.pl:472
- % warn(kb_local(already_decl(kb_global, (baseKB->baseKB), genlMt, 2))).
- % /home/prologmud_server/lib/swipl/pack/pfc/prolog/pfc.pl:31
- % warn(kb_local(already_decl(kb_global, (baseKB->header_sane), mpred_prop, 4))).
- % uses_predicate(baseKB, baseKB, pred_decl_kb_mfa_type, 4).
- % debugm(is_pfc_file('/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc'), sc_success(is_pfc_file('/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc'), fc_mod:ensure_abox(header_sane))).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo_swilib.pl:135
- % Loading logtalk
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo_swilib.pl:137
- % Skipping logtalk
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo_typesystem.pl:81
- % warn(trace_or_throw(already_decl(kb_global, (baseKB->baseKB), mpred_prop, 4))).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/plarkc/logicmoo_i_cyc_rewriting.pl:1796
- % I am here
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/plarkc/logicmoo_i_cyc_rewriting.pl:1859
- % no need to makeRenames!?
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_basic.pfc.pl:566
- % warn(trace_or_throw(already_decl(kb_global, (baseKB->baseKB), mpred_prop, 4))).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl:1047
- % warn(trace_or_throw(already_decl(kb_global, (baseKB->baseKB), ftText, 1))).
- % 21,137,211 inferences, 10.292 CPU in 10.316 seconds (100% CPU, 2053731 Lips)
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/test_header.pl:119
- % uses_predicate(header_sane, header_sane, rtArgsVerbatum, 1).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:28
- % r_sane:mpred_fwc1(feature_setting(make_wff, true)).
- % Found positive trigger: feature_setting(make_wff,true)
- % body: feature_setting(make_wff,_1588),_1588\==true*->rhs([\+feature_setting(make_wff,_1588)])
- % Found positive trigger: feature_setting(make_wff,true)
- % body: rhs([feature_setting(add_admitted_arguments,true),feature_setting(assume_wff,false)])
- % RHS-Post1: feature_setting(add_admitted_arguments,true)
- % Support: feature_setting(make_wff,true),pt(feature_setting(make_wff,true),rhs([feature_setting(add_admitted_arguments,true),feature_setting(assume_wff,false)]))
- % r_sane:mpred_fwc1(feature_setting(add_admitted_arguments, true)).
- % Found positive trigger: feature_setting(add_admitted_arguments,true)
- % body: feature_setting(add_admitted_arguments,_2036),_2036\==true*->rhs([\+feature_setting(add_admitted_arguments,_2036)])
- % Found positive trigger: feature_setting(add_admitted_arguments,true)
- % body: rhs([(_4124/(compound(_4124),\+is_ftVar(_4124))==>{with_current_why(_4124,ignore(\+addAdmittedArguments(_4124)))})])
- % RHS-Post1: _4124/(compound(_4124),\+is_ftVar(_4124))==>{with_current_why(_4124,ignore(\+addAdmittedArguments(_4124)))}
- % Support: feature_setting(add_admitted_arguments,true),pt(feature_setting(add_admitted_arguments,true),rhs([(_4124/(compound(_4124),\+is_ftVar(_4124))==>{with_current_why(_4124,ignore(\+addAdmittedArguments(_4124)))})]))
- % r_sane:mpred_fwc1((_16914/(compound(_16914), \+is_ftVar(_16914))==>{with_current_why(_16914, ignore(\+addAdmittedArguments(_16914)))})).
- % Adding positive
- % trigger: _2962
- % body: compound(_2962),\+is_ftVar(_2962)*->rhs([{with_current_why(_2962,ignore(\+addAdmittedArguments(_2962)))}])
- % Support: (_3192/(compound(_3192),\+is_ftVar(_3192))==>{with_current_why(_3192,ignore(\+addAdmittedArguments(_3192)))}),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % gripe_CPUTIME(true, warn(1.448931746999996>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, (_2038/(compound(_2038), \+is_ftVar(_2038))==>{with_current_why(_2038, ignore(\+addAdmittedArguments(_2038)))}), (feature_setting(add_admitted_arguments, true), pt(feature_setting(add_admitted_arguments, true), rhs([(_2038/(compound(_2038), \+is_ftVar(_2038))==>{with_current_why(_2038, ignore(\+addAdmittedArguments(_2038)))})]))), exact))).
- % Found positive trigger: feature_setting(add_admitted_arguments,true)
- % body: compound(feature_setting(add_admitted_arguments,true)),\+is_ftVar(feature_setting(add_admitted_arguments,true))*->rhs([{with_current_why(feature_setting(add_admitted_arguments,true),ignore(\+addAdmittedArguments(feature_setting(add_admitted_arguments,true))))}])
- % Found positive trigger: feature_setting(add_admitted_arguments,true)
- % body: is_kif_clause(feature_setting(add_admitted_arguments,true))*->rhs([clif(feature_setting(add_admitted_arguments,true))])
- % gripe_CPUTIME(true, warn(1.460481510000001>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, feature_setting(add_admitted_arguments, true), (feature_setting(make_wff, true), pt(feature_setting(make_wff, true), rhs([feature_setting(add_admitted_arguments, true), feature_setting(assume_wff, false)]))), simular((mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_domains.pfc.pl', 30), ax))))).
- % RHS-Post1: feature_setting(assume_wff,false)
- % Support: feature_setting(make_wff,true),pt(feature_setting(make_wff,true),rhs([feature_setting(add_admitted_arguments,true),feature_setting(assume_wff,false)]))
- % r_sane:mpred_fwc1(feature_setting(assume_wff, false)).
- % Found positive trigger: feature_setting(assume_wff,false)
- % body: feature_setting(assume_wff,_2024),_2024\==false*->rhs([\+feature_setting(assume_wff,_2024)])
- % Found positive trigger: feature_setting(assume_wff,false)
- % body: compound(feature_setting(assume_wff,false)),\+is_ftVar(feature_setting(assume_wff,false))*->rhs([{with_current_why(feature_setting(assume_wff,false),ignore(\+addAdmittedArguments(feature_setting(assume_wff,false))))}])
- % Found positive trigger: feature_setting(assume_wff,false)
- % body: is_kif_clause(feature_setting(assume_wff,false))*->rhs([clif(feature_setting(assume_wff,false))])
- % Found positive trigger: feature_setting(assume_wff,false)
- % body: compound(feature_setting(assume_wff,false)),\+is_ftVar(feature_setting(assume_wff,false))*->rhs([{with_current_why(feature_setting(assume_wff,false),ignore(\+addAdmittedArguments(feature_setting(assume_wff,false))))}])
- % Found positive trigger: feature_setting(make_wff,true)
- % body: rhs([(argIsa(_1246,_1248,_1250)/(nonvar(_1250),nonvar(_1246),integer(_1248))==>tCol(_1250),(admittedArgument(_1246,_1248,_1310)/nonvar(_1310)==>isa(_1310,_1250)),(poss(admittedArgument(_1246,_1248,_1310))/nonvar(_1310)==>isa(_1310,_1250)))])
- % RHS-Post1: argIsa(_1246,_1248,_1250)/(nonvar(_1250),nonvar(_1246),integer(_1248))==>tCol(_1250),(admittedArgument(_1246,_1248,_1310)/nonvar(_1310)==>isa(_1310,_1250)),(poss(admittedArgument(_1246,_1248,_1310))/nonvar(_1310)==>isa(_1310,_1250))
- % Support: feature_setting(make_wff,true),pt(feature_setting(make_wff,true),rhs([(argIsa(_1246,_1248,_1250)/(nonvar(_1250),nonvar(_1246),integer(_1248))==>tCol(_1250),(admittedArgument(_1246,_1248,_1310)/nonvar(_1310)==>isa(_1310,_1250)),(poss(admittedArgument(_1246,_1248,_1310))/nonvar(_1310)==>isa(_1310,_1250)))]))
- % r_sane:mpred_fwc1((argIsa(_15678, _15680, _15682)/(nonvar(_15682), nonvar(_15678), integer(_15680))==>tCol(_15682), (admittedArgument(_15678, _15680, _15742)/nonvar(_15742)==>isa(_15742, _15682)), (poss(admittedArgument(_15678, _15680, _15742))/nonvar(_15742)==>isa(_15742, _15682)))).
- % Adding positive
- % trigger: argIsa(_2626,_2628,_2630)
- % body: nonvar(_2630),nonvar(_2626),integer(_2628)*->rhs([tCol(_2630),(admittedArgument(_2626,_2628,_2690)/nonvar(_2690)==>isa(_2690,_2630)),(poss(admittedArgument(_2626,_2628,_2690))/nonvar(_2690)==>isa(_2690,_2630))])
- % Support: (argIsa(_3012,_3014,_3016)/(nonvar(_3016),nonvar(_3012),integer(_3014))==>tCol(_3016),(admittedArgument(_3012,_3014,_3076)/nonvar(_3076)==>isa(_3076,_3016)),(poss(admittedArgument(_3012,_3014,_3076))/nonvar(_3076)==>isa(_3076,_3016))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % uses_predicate(header_sane, header_sane, argIsa, 3).
- % RHS-Post1: tCol(vtSize)
- % Support: argIsa(mudSize,2,vtSize),pt(argIsa(_8646,_8648,_8650),(nonvar(_8650),nonvar(_8646),integer(_8648)*->rhs([tCol(_8650),(admittedArgument(_8646,_8648,_8720)/nonvar(_8720)==>isa(_8720,_8650)),(poss(admittedArgument(_8646,_8648,_8720))/nonvar(_8720)==>isa(_8720,_8650))])))
- % RHS-Post1: admittedArgument(mudSize,2,_2690)/nonvar(_2690)==>isa(_2690,vtSize)
- % Support: argIsa(mudSize,2,vtSize),pt(argIsa(_8646,_8648,_8650),(nonvar(_8650),nonvar(_8646),integer(_8648)*->rhs([tCol(_8650),(admittedArgument(_8646,_8648,_8720)/nonvar(_8720)==>isa(_8720,_8650)),(poss(admittedArgument(_8646,_8648,_8720))/nonvar(_8720)==>isa(_8720,_8650))])))
- % r_sane:mpred_fwc1((admittedArgument(mudSize, 2, _28658)/nonvar(_28658)==>vtSize(_28658))).
- % Adding positive
- % trigger: admittedArgument(mudSize,2,_5096)
- % body: nonvar(_5096)*->rhs([vtSize(_5096)])
- % Support: (admittedArgument(mudSize,2,_5280)/nonvar(_5280)==>vtSize(_5280)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % moving(inherit_above(header_sane, admittedArgument(_10590, _10592, _10594))).
- % RHS-Post1: poss(admittedArgument(mudSize,2,_2666))/nonvar(_2666)==>isa(_2666,vtSize)
- % Support: argIsa(mudSize,2,vtSize),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudSize, 2, _23832))/nonvar(_23832)==>vtSize(_23832))).
- % Adding positive
- % trigger: poss(admittedArgument(mudSize,2,_5144))
- % body: nonvar(_5144)*->rhs([vtSize(_5144)])
- % Support: (poss(admittedArgument(mudSize,2,_5334))/nonvar(_5334)==>vtSize(_5334)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % uses_predicate(header_sane, header_sane, poss, 1).
- % RHS-Post1: tCol(tTemporalThing)
- % Support: argIsa(mudSize,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudSize,1,_2666)/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudSize,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudSize, 1, _12860)/nonvar(_12860)==>tTemporalThing(_12860))).
- % Adding positive
- % trigger: admittedArgument(mudSize,1,_12860)
- % body: nonvar(_12860)*->rhs([tTemporalThing(_12860)])
- % Support: (admittedArgument(mudSize,1,_15496)/nonvar(_15496)==>tTemporalThing(_15496)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudSize,1,_2666))/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudSize,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudSize, 1, _12952))/nonvar(_12952)==>tTemporalThing(_12952))).
- % Adding positive
- % trigger: poss(admittedArgument(mudSize,1,_12952))
- % body: nonvar(_12952)*->rhs([tTemporalThing(_12952)])
- % Support: (poss(admittedArgument(mudSize,1,_15638))/nonvar(_15638)==>tTemporalThing(_15638)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(vtTexture)
- % Support: argIsa(mudTexture,2,vtTexture),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudTexture,2,_2666)/nonvar(_2666)==>isa(_2666,vtTexture)
- % Support: argIsa(mudTexture,2,vtTexture),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudTexture, 2, _19598)/nonvar(_19598)==>vtTexture(_19598))).
- % Adding positive
- % trigger: admittedArgument(mudTexture,2,_5136)
- % body: nonvar(_5136)*->rhs([vtTexture(_5136)])
- % Support: (admittedArgument(mudTexture,2,_5318)/nonvar(_5318)==>vtTexture(_5318)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudTexture,2,_2666))/nonvar(_2666)==>isa(_2666,vtTexture)
- % Support: argIsa(mudTexture,2,vtTexture),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudTexture, 2, _21368))/nonvar(_21368)==>vtTexture(_21368))).
- % Adding positive
- % trigger: poss(admittedArgument(mudTexture,2,_5184))
- % body: nonvar(_5184)*->rhs([vtTexture(_5184)])
- % Support: (poss(admittedArgument(mudTexture,2,_5374))/nonvar(_5374)==>vtTexture(_5374)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tTemporalThing)
- % Support: argIsa(mudTexture,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudTexture,1,_2666)/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudTexture,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudTexture, 1, _12916)/nonvar(_12916)==>tTemporalThing(_12916))).
- % Adding positive
- % trigger: admittedArgument(mudTexture,1,_12916)
- % body: nonvar(_12916)*->rhs([tTemporalThing(_12916)])
- % Support: (admittedArgument(mudTexture,1,_15552)/nonvar(_15552)==>tTemporalThing(_15552)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudTexture,1,_2666))/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudTexture,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudTexture, 1, _13000))/nonvar(_13000)==>tTemporalThing(_13000))).
- % Adding positive
- % trigger: poss(admittedArgument(mudTexture,1,_13000))
- % body: nonvar(_13000)*->rhs([tTemporalThing(_13000)])
- % Support: (poss(admittedArgument(mudTexture,1,_15688))/nonvar(_15688)==>tTemporalThing(_15688)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(vtColor)
- % Support: argIsa(mudColor,2,vtColor),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudColor,2,_2666)/nonvar(_2666)==>isa(_2666,vtColor)
- % Support: argIsa(mudColor,2,vtColor),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudColor, 2, _19652)/nonvar(_19652)==>vtColor(_19652))).
- % Adding positive
- % trigger: admittedArgument(mudColor,2,_5184)
- % body: nonvar(_5184)*->rhs([vtColor(_5184)])
- % Support: (admittedArgument(mudColor,2,_5366)/nonvar(_5366)==>vtColor(_5366)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudColor,2,_2666))/nonvar(_2666)==>isa(_2666,vtColor)
- % Support: argIsa(mudColor,2,vtColor),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudColor, 2, _21410))/nonvar(_21410)==>vtColor(_21410))).
- % Adding positive
- % trigger: poss(admittedArgument(mudColor,2,_5232))
- % body: nonvar(_5232)*->rhs([vtColor(_5232)])
- % Support: (poss(admittedArgument(mudColor,2,_5422))/nonvar(_5422)==>vtColor(_5422)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tTemporalThing)
- % Support: argIsa(mudColor,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudColor,1,_2666)/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudColor,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudColor, 1, _12956)/nonvar(_12956)==>tTemporalThing(_12956))).
- % Adding positive
- % trigger: admittedArgument(mudColor,1,_12956)
- % body: nonvar(_12956)*->rhs([tTemporalThing(_12956)])
- % Support: (admittedArgument(mudColor,1,_15592)/nonvar(_15592)==>tTemporalThing(_15592)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudColor,1,_2666))/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudColor,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudColor, 1, _13048))/nonvar(_13048)==>tTemporalThing(_13048))).
- % Adding positive
- % trigger: poss(admittedArgument(mudColor,1,_13048))
- % body: nonvar(_13048)*->rhs([tTemporalThing(_13048)])
- % Support: (poss(admittedArgument(mudColor,1,_15734))/nonvar(_15734)==>tTemporalThing(_15734)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(vtShape)
- % Support: argIsa(mudShape,2,vtShape),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudShape,2,_2666)/nonvar(_2666)==>isa(_2666,vtShape)
- % Support: argIsa(mudShape,2,vtShape),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudShape, 2, _19760)/nonvar(_19760)==>vtShape(_19760))).
- % Adding positive
- % trigger: admittedArgument(mudShape,2,_5232)
- % body: nonvar(_5232)*->rhs([vtShape(_5232)])
- % Support: (admittedArgument(mudShape,2,_5414)/nonvar(_5414)==>vtShape(_5414)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudShape,2,_2666))/nonvar(_2666)==>isa(_2666,vtShape)
- % Support: argIsa(mudShape,2,vtShape),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudShape, 2, _21464))/nonvar(_21464)==>vtShape(_21464))).
- % Adding positive
- % trigger: poss(admittedArgument(mudShape,2,_5280))
- % body: nonvar(_5280)*->rhs([vtShape(_5280)])
- % Support: (poss(admittedArgument(mudShape,2,_5470))/nonvar(_5470)==>vtShape(_5470)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tTemporalThing)
- % Support: argIsa(mudShape,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudShape,1,_2666)/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudShape,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudShape, 1, _13010)/nonvar(_13010)==>tTemporalThing(_13010))).
- % Adding positive
- % trigger: admittedArgument(mudShape,1,_13010)
- % body: nonvar(_13010)*->rhs([tTemporalThing(_13010)])
- % Support: (admittedArgument(mudShape,1,_15646)/nonvar(_15646)==>tTemporalThing(_15646)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudShape,1,_2666))/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudShape,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudShape, 1, _13096))/nonvar(_13096)==>tTemporalThing(_13096))).
- % Adding positive
- % trigger: poss(admittedArgument(mudShape,1,_13096))
- % body: nonvar(_13096)*->rhs([tTemporalThing(_13096)])
- % Support: (poss(admittedArgument(mudShape,1,_15782))/nonvar(_15782)==>tTemporalThing(_15782)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(vtMaterial)
- % Support: argIsa(mudMaterial,2,vtMaterial),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudMaterial,2,_2666)/nonvar(_2666)==>isa(_2666,vtMaterial)
- % Support: argIsa(mudMaterial,2,vtMaterial),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudMaterial, 2, _19836)/nonvar(_19836)==>vtMaterial(_19836))).
- % Adding positive
- % trigger: admittedArgument(mudMaterial,2,_5280)
- % body: nonvar(_5280)*->rhs([vtMaterial(_5280)])
- % Support: (admittedArgument(mudMaterial,2,_5462)/nonvar(_5462)==>vtMaterial(_5462)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudMaterial,2,_2666))/nonvar(_2666)==>isa(_2666,vtMaterial)
- % Support: argIsa(mudMaterial,2,vtMaterial),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudMaterial, 2, _21516))/nonvar(_21516)==>vtMaterial(_21516))).
- % Adding positive
- % trigger: poss(admittedArgument(mudMaterial,2,_5328))
- % body: nonvar(_5328)*->rhs([vtMaterial(_5328)])
- % Support: (poss(admittedArgument(mudMaterial,2,_5518))/nonvar(_5518)==>vtMaterial(_5518)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tTemporalThing)
- % Support: argIsa(mudMaterial,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudMaterial,1,_2666)/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudMaterial,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudMaterial, 1, _13048)/nonvar(_13048)==>tTemporalThing(_13048))).
- % Adding positive
- % trigger: admittedArgument(mudMaterial,1,_13048)
- % body: nonvar(_13048)*->rhs([tTemporalThing(_13048)])
- % Support: (admittedArgument(mudMaterial,1,_15686)/nonvar(_15686)==>tTemporalThing(_15686)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudMaterial,1,_2666))/nonvar(_2666)==>isa(_2666,tTemporalThing)
- % Support: argIsa(mudMaterial,1,tTemporalThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudMaterial, 1, _13152))/nonvar(_13152)==>tTemporalThing(_13152))).
- % Adding positive
- % trigger: poss(admittedArgument(mudMaterial,1,_13152))
- % body: nonvar(_13152)*->rhs([tTemporalThing(_13152)])
- % Support: (poss(admittedArgument(mudMaterial,1,_15840))/nonvar(_15840)==>tTemporalThing(_15840)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(completeExtentAsserted,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(completeExtentAsserted,1,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(completeExtentAsserted,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(completeExtentAsserted, 1, _19806)/nonvar(_19806)==>tPred(_19806))).
- % Adding positive
- % trigger: admittedArgument(completeExtentAsserted,1,_5354)
- % body: nonvar(_5354)*->rhs([tPred(_5354)])
- % Support: (admittedArgument(completeExtentAsserted,1,_5536)/nonvar(_5536)==>tPred(_5536)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(completeExtentAsserted,1,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(completeExtentAsserted,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(completeExtentAsserted, 1, _21572))/nonvar(_21572)==>tPred(_21572))).
- % Adding positive
- % trigger: poss(admittedArgument(completeExtentAsserted,1,_5370))
- % body: nonvar(_5370)*->rhs([tPred(_5370)])
- % Support: (poss(admittedArgument(completeExtentAsserted,1,_5560))/nonvar(_5560)==>tPred(_5560)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftAssertion)
- % Support: argIsa(mpred_undo_sys,1,ftAssertion),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1(tCol(ftAssertion)).
- % Found positive trigger: tCol(ftAssertion)
- % body: rhs([{decl_type(ftAssertion),kb_local(ftAssertion/1)}])
- % Found positive trigger: tCol(ftAssertion)
- % body: rhs([arity(ftAssertion,1)])
- % RHS-Post1: arity(ftAssertion,1)
- % Support: tCol(ftAssertion),pt(tCol(ftAssertion),rhs([arity(ftAssertion,1)]))
- % Found positive trigger: tCol(ftAssertion)
- % body: compound(tCol(ftAssertion)),\+is_ftVar(tCol(ftAssertion))*->rhs([{with_current_why(tCol(ftAssertion),ignore(\+addAdmittedArguments(tCol(ftAssertion))))}])
- % Found positive trigger: tCol(ftAssertion)
- % body: \+ttExpressionType(ftAssertion)*->rhs([tSet(ftAssertion)])
- % RHS-Post1: tSet(ftAssertion)
- % Support: tCol(ftAssertion),pt(tCol(ftAssertion),(\+ttExpressionType(ftAssertion)*->rhs([tSet(ftAssertion)])))
- % r_sane:mpred_fwc1(tSet(ftAssertion)).
- % Found positive trigger: tSet(ftAssertion)
- % body: rhs([functorDeclares(ftAssertion)])
- % RHS-Post1: functorDeclares(ftAssertion)
- % Support: tSet(ftAssertion),pt(tSet(ftAssertion),rhs([functorDeclares(ftAssertion)]))
- % r_sane:mpred_fwc1(functorDeclares(ftAssertion)).
- % Found positive trigger: functorDeclares(ftAssertion)
- % body: rhs([arityMax(ftAssertion,1),functorIsMacro(ftAssertion)])
- % RHS-Post1: arityMax(ftAssertion,1)
- % Support: functorDeclares(ftAssertion),pt(functorDeclares(ftAssertion),rhs([arityMax(ftAssertion,1),functorIsMacro(ftAssertion)]))
- % r_sane:mpred_fwc1(arityMax(ftAssertion, 1)).
- % Found positive trigger: arityMax(ftAssertion,1)
- % body: compound(arityMax(ftAssertion,1)),\+is_ftVar(arityMax(ftAssertion,1))*->rhs([{with_current_why(arityMax(ftAssertion,1),ignore(\+addAdmittedArguments(arityMax(ftAssertion,1))))}])
- % Found positive trigger: arityMax(ftAssertion,1)
- % body: is_kif_clause(arityMax(ftAssertion,1))*->rhs([clif(arityMax(ftAssertion,1))])
- % Found positive trigger: arityMax(ftAssertion,1)
- % body: compound(arityMax(ftAssertion,1)),\+is_ftVar(arityMax(ftAssertion,1))*->rhs([{with_current_why(arityMax(ftAssertion,1),ignore(\+addAdmittedArguments(arityMax(ftAssertion,1))))}])
- % RHS-Post1: functorIsMacro(ftAssertion)
- % Support: functorDeclares(ftAssertion),pt(functorDeclares(ftAssertion),rhs([arityMax(ftAssertion,1),functorIsMacro(ftAssertion)]))
- % r_sane:mpred_fwc1(functorIsMacro(ftAssertion)).
- % Found positive trigger: functorIsMacro(ftAssertion)
- % body: compound(functorIsMacro(ftAssertion)),\+is_ftVar(functorIsMacro(ftAssertion))*->rhs([{with_current_why(functorIsMacro(ftAssertion),ignore(\+addAdmittedArguments(functorIsMacro(ftAssertion))))}])
- % Found positive trigger: functorIsMacro(ftAssertion)
- % body: is_kif_clause(functorIsMacro(ftAssertion))*->rhs([clif(functorIsMacro(ftAssertion))])
- % Found positive trigger: functorIsMacro(ftAssertion)
- % body: compound(functorIsMacro(ftAssertion)),\+is_ftVar(functorIsMacro(ftAssertion))*->rhs([{with_current_why(functorIsMacro(ftAssertion),ignore(\+addAdmittedArguments(functorIsMacro(ftAssertion))))}])
- % Found positive trigger: functorDeclares(ftAssertion)
- % body: compound(functorDeclares(ftAssertion)),\+is_ftVar(functorDeclares(ftAssertion))*->rhs([{with_current_why(functorDeclares(ftAssertion),ignore(\+addAdmittedArguments(functorDeclares(ftAssertion))))}])
- % Found positive trigger: functorDeclares(ftAssertion)
- % body: is_kif_clause(functorDeclares(ftAssertion))*->rhs([clif(functorDeclares(ftAssertion))])
- % Found positive trigger: functorDeclares(ftAssertion)
- % body: compound(functorDeclares(ftAssertion)),\+is_ftVar(functorDeclares(ftAssertion))*->rhs([{with_current_why(functorDeclares(ftAssertion),ignore(\+addAdmittedArguments(functorDeclares(ftAssertion))))}])
- % Found positive trigger: tSet(ftAssertion)
- % body: rhs([tCol(ftAssertion),\+ttExpressionType(ftAssertion)])
- % RHS-Post1: tCol(ftAssertion)
- % Support: tSet(ftAssertion),pt(tSet(ftAssertion),rhs([tCol(ftAssertion),\+ttExpressionType(ftAssertion)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ftAssertion)
- % Support: tSet(ftAssertion),pt(tSet(ftAssertion),rhs([tCol(ftAssertion),\+ttExpressionType(ftAssertion)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ftAssertion)
- % support (was): _24500,_24502
- % Couldn't retract_i: spft(ttExpressionType(ftAssertion),_6608,_6610).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ftAssertion))).
- % Found positive trigger: tSet(ftAssertion)
- % body: rhs([tCol(ftAssertion)])
- % RHS-Post1: tCol(ftAssertion)
- % Support: tSet(ftAssertion),pt(tSet(ftAssertion),rhs([tCol(ftAssertion)]))
- % Found positive trigger: tSet(ftAssertion)
- % body: compound(tSet(ftAssertion)),\+is_ftVar(tSet(ftAssertion))*->rhs([{with_current_why(tSet(ftAssertion),ignore(\+addAdmittedArguments(tSet(ftAssertion))))}])
- % Found positive trigger: tSet(ftAssertion)
- % body: is_kif_clause(tSet(ftAssertion))*->rhs([clif(tSet(ftAssertion))])
- % Found positive trigger: tSet(ftAssertion)
- % body: compound(tSet(ftAssertion)),\+is_ftVar(tSet(ftAssertion))*->rhs([{with_current_why(tSet(ftAssertion),ignore(\+addAdmittedArguments(tSet(ftAssertion))))}])
- % Found positive trigger: tCol(ftAssertion)
- % body: is_kif_clause(tCol(ftAssertion))*->rhs([clif(tCol(ftAssertion))])
- % Found positive trigger: tCol(ftAssertion)
- % body: compound(tCol(ftAssertion)),\+is_ftVar(tCol(ftAssertion))*->rhs([{with_current_why(tCol(ftAssertion),ignore(\+addAdmittedArguments(tCol(ftAssertion))))}])
- % RHS-Post1: admittedArgument(mpred_undo_sys,1,_2666)/nonvar(_2666)==>isa(_2666,ftAssertion)
- % Support: argIsa(mpred_undo_sys,1,ftAssertion),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mpred_undo_sys, 1, _35486)/nonvar(_35486)==>ftAssertion(_35486))).
- % Adding positive
- % trigger: admittedArgument(mpred_undo_sys,1,_5360)
- % body: nonvar(_5360)*->rhs([ftAssertion(_5360)])
- % Support: (admittedArgument(mpred_undo_sys,1,_5542)/nonvar(_5542)==>ftAssertion(_5542)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mpred_undo_sys,1,_2666))/nonvar(_2666)==>isa(_2666,ftAssertion)
- % Support: argIsa(mpred_undo_sys,1,ftAssertion),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mpred_undo_sys, 1, _21608))/nonvar(_21608)==>ftAssertion(_21608))).
- % Adding positive
- % trigger: poss(admittedArgument(mpred_undo_sys,1,_5408))
- % body: nonvar(_5408)*->rhs([ftAssertion(_5408)])
- % Support: (poss(admittedArgument(mpred_undo_sys,1,_5598))/nonvar(_5598)==>ftAssertion(_5598)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftCallable)
- % Support: argIsa(mpred_undo_sys,2,ftCallable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1(tCol(ftCallable)).
- % Found positive trigger: tCol(ftCallable)
- % body: rhs([{decl_type(ftCallable),kb_local(ftCallable/1)}])
- % Found positive trigger: tCol(ftCallable)
- % body: rhs([arity(ftCallable,1)])
- % RHS-Post1: arity(ftCallable,1)
- % Support: tCol(ftCallable),pt(tCol(ftCallable),rhs([arity(ftCallable,1)]))
- % Found positive trigger: tCol(ftCallable)
- % body: compound(tCol(ftCallable)),\+is_ftVar(tCol(ftCallable))*->rhs([{with_current_why(tCol(ftCallable),ignore(\+addAdmittedArguments(tCol(ftCallable))))}])
- % Found positive trigger: tCol(ftCallable)
- % body: \+ttExpressionType(ftCallable)*->rhs([tSet(ftCallable)])
- % RHS-Post1: tSet(ftCallable)
- % Support: tCol(ftCallable),pt(tCol(ftCallable),(\+ttExpressionType(ftCallable)*->rhs([tSet(ftCallable)])))
- % r_sane:mpred_fwc1(tSet(ftCallable)).
- % Found positive trigger: tSet(ftCallable)
- % body: rhs([functorDeclares(ftCallable)])
- % RHS-Post1: functorDeclares(ftCallable)
- % Support: tSet(ftCallable),pt(tSet(ftCallable),rhs([functorDeclares(ftCallable)]))
- % r_sane:mpred_fwc1(functorDeclares(ftCallable)).
- % Found positive trigger: functorDeclares(ftCallable)
- % body: rhs([arityMax(ftCallable,1),functorIsMacro(ftCallable)])
- % RHS-Post1: arityMax(ftCallable,1)
- % Support: functorDeclares(ftCallable),pt(functorDeclares(ftCallable),rhs([arityMax(ftCallable,1),functorIsMacro(ftCallable)]))
- % r_sane:mpred_fwc1(arityMax(ftCallable, 1)).
- % Found positive trigger: arityMax(ftCallable,1)
- % body: compound(arityMax(ftCallable,1)),\+is_ftVar(arityMax(ftCallable,1))*->rhs([{with_current_why(arityMax(ftCallable,1),ignore(\+addAdmittedArguments(arityMax(ftCallable,1))))}])
- % Found positive trigger: arityMax(ftCallable,1)
- % body: is_kif_clause(arityMax(ftCallable,1))*->rhs([clif(arityMax(ftCallable,1))])
- % Found positive trigger: arityMax(ftCallable,1)
- % body: compound(arityMax(ftCallable,1)),\+is_ftVar(arityMax(ftCallable,1))*->rhs([{with_current_why(arityMax(ftCallable,1),ignore(\+addAdmittedArguments(arityMax(ftCallable,1))))}])
- % RHS-Post1: functorIsMacro(ftCallable)
- % Support: functorDeclares(ftCallable),pt(functorDeclares(ftCallable),rhs([arityMax(ftCallable,1),functorIsMacro(ftCallable)]))
- % r_sane:mpred_fwc1(functorIsMacro(ftCallable)).
- % Found positive trigger: functorIsMacro(ftCallable)
- % body: compound(functorIsMacro(ftCallable)),\+is_ftVar(functorIsMacro(ftCallable))*->rhs([{with_current_why(functorIsMacro(ftCallable),ignore(\+addAdmittedArguments(functorIsMacro(ftCallable))))}])
- % Found positive trigger: functorIsMacro(ftCallable)
- % body: is_kif_clause(functorIsMacro(ftCallable))*->rhs([clif(functorIsMacro(ftCallable))])
- % Found positive trigger: functorIsMacro(ftCallable)
- % body: compound(functorIsMacro(ftCallable)),\+is_ftVar(functorIsMacro(ftCallable))*->rhs([{with_current_why(functorIsMacro(ftCallable),ignore(\+addAdmittedArguments(functorIsMacro(ftCallable))))}])
- % Found positive trigger: functorDeclares(ftCallable)
- % body: compound(functorDeclares(ftCallable)),\+is_ftVar(functorDeclares(ftCallable))*->rhs([{with_current_why(functorDeclares(ftCallable),ignore(\+addAdmittedArguments(functorDeclares(ftCallable))))}])
- % Found positive trigger: functorDeclares(ftCallable)
- % body: is_kif_clause(functorDeclares(ftCallable))*->rhs([clif(functorDeclares(ftCallable))])
- % Found positive trigger: functorDeclares(ftCallable)
- % body: compound(functorDeclares(ftCallable)),\+is_ftVar(functorDeclares(ftCallable))*->rhs([{with_current_why(functorDeclares(ftCallable),ignore(\+addAdmittedArguments(functorDeclares(ftCallable))))}])
- % Found positive trigger: tSet(ftCallable)
- % body: rhs([tCol(ftCallable),\+ttExpressionType(ftCallable)])
- % RHS-Post1: tCol(ftCallable)
- % Support: tSet(ftCallable),pt(tSet(ftCallable),rhs([tCol(ftCallable),\+ttExpressionType(ftCallable)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ftCallable)
- % Support: tSet(ftCallable),pt(tSet(ftCallable),rhs([tCol(ftCallable),\+ttExpressionType(ftCallable)]))
- % Removing (withdraw1 get_first_real_user_reason)
- % term: ttExpressionType(ftCallable)
- % support (was): mfl(baseKB,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_basic.pfc.pl',154),ax
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_basic.pfc.pl', 154), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_basic.pfc.pl', 154), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_basic.pfc.pl', 154), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl', 793), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), subFormat(ftCallable, ftProlog), pt(subFormat(_6872, _6874), ((atom(_6872);atom(_6874))*->rhs([ttExpressionType(_6872), ttExpressionType(_6874)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), quotedDefnIff(ftCallable, is_callable), pt(quotedDefnIff(ftCallable, is_callable), rhs([ttExpressionType(ftCallable)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), _6846, _6848)))).
- % Couldn't retract_i: spft(ttExpressionType(ftCallable),_6846,_6848).
- % still_supported(ttExpressionType(ftCallable))
- % Removing (withdraw1 get_first_real_user_reason)
- % term: ttExpressionType(ftCallable)
- % support (was): mfl(baseKB,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl',793),ax
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl', 793), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl', 793), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_basic.pfc.pl', 154), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl', 793), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), subFormat(ftCallable, ftProlog), pt(subFormat(_6872, _6874), ((atom(_6872);atom(_6874))*->rhs([ttExpressionType(_6872), ttExpressionType(_6874)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), quotedDefnIff(ftCallable, is_callable), pt(quotedDefnIff(ftCallable, is_callable), rhs([ttExpressionType(ftCallable)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftCallable), _6846, _6848)))).
- % Couldn't retract_i: spft(ttExpressionType(ftCallable),_6846,_6848).
- % still_supported(ttExpressionType(ftCallable))
- % Found positive trigger: tSet(ftCallable)
- % body: rhs([tCol(ftCallable)])
- % RHS-Post1: tCol(ftCallable)
- % Support: tSet(ftCallable),pt(tSet(ftCallable),rhs([tCol(ftCallable)]))
- % Found positive trigger: tSet(ftCallable)
- % body: compound(tSet(ftCallable)),\+is_ftVar(tSet(ftCallable))*->rhs([{with_current_why(tSet(ftCallable),ignore(\+addAdmittedArguments(tSet(ftCallable))))}])
- % Found positive trigger: tSet(ftCallable)
- % body: is_kif_clause(tSet(ftCallable))*->rhs([clif(tSet(ftCallable))])
- % Found positive trigger: tSet(ftCallable)
- % body: compound(tSet(ftCallable)),\+is_ftVar(tSet(ftCallable))*->rhs([{with_current_why(tSet(ftCallable),ignore(\+addAdmittedArguments(tSet(ftCallable))))}])
- % Found positive trigger: tCol(ftCallable)
- % body: is_kif_clause(tCol(ftCallable))*->rhs([clif(tCol(ftCallable))])
- % Found positive trigger: tCol(ftCallable)
- % body: compound(tCol(ftCallable)),\+is_ftVar(tCol(ftCallable))*->rhs([{with_current_why(tCol(ftCallable),ignore(\+addAdmittedArguments(tCol(ftCallable))))}])
- % RHS-Post1: admittedArgument(mpred_undo_sys,2,_2666)/nonvar(_2666)==>isa(_2666,ftCallable)
- % Support: argIsa(mpred_undo_sys,2,ftCallable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mpred_undo_sys, 2, _13122)/nonvar(_13122)==>ftCallable(_13122))).
- % Adding positive
- % trigger: admittedArgument(mpred_undo_sys,2,_5384)
- % body: nonvar(_5384)*->rhs([ftCallable(_5384)])
- % Support: (admittedArgument(mpred_undo_sys,2,_5566)/nonvar(_5566)==>ftCallable(_5566)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mpred_undo_sys,2,_2666))/nonvar(_2666)==>isa(_2666,ftCallable)
- % Support: argIsa(mpred_undo_sys,2,ftCallable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mpred_undo_sys, 2, _21624))/nonvar(_21624)==>ftCallable(_21624))).
- % Adding positive
- % trigger: poss(admittedArgument(mpred_undo_sys,2,_5432))
- % body: nonvar(_5432)*->rhs([ftCallable(_5432)])
- % Support: (poss(admittedArgument(mpred_undo_sys,2,_5622))/nonvar(_5622)==>ftCallable(_5622)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftCallable)
- % Support: argIsa(mpred_undo_sys,3,ftCallable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mpred_undo_sys,3,_2666)/nonvar(_2666)==>isa(_2666,ftCallable)
- % Support: argIsa(mpred_undo_sys,3,ftCallable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mpred_undo_sys, 3, _13156)/nonvar(_13156)==>ftCallable(_13156))).
- % Adding positive
- % trigger: admittedArgument(mpred_undo_sys,3,_13156)
- % body: nonvar(_13156)*->rhs([ftCallable(_13156)])
- % Support: (admittedArgument(mpred_undo_sys,3,_15792)/nonvar(_15792)==>ftCallable(_15792)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mpred_undo_sys,3,_2666))/nonvar(_2666)==>isa(_2666,ftCallable)
- % Support: argIsa(mpred_undo_sys,3,ftCallable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mpred_undo_sys, 3, _13246))/nonvar(_13246)==>ftCallable(_13246))).
- % Adding positive
- % trigger: poss(admittedArgument(mpred_undo_sys,3,_13246))
- % body: nonvar(_13246)*->rhs([ftCallable(_13246)])
- % Support: (poss(admittedArgument(mpred_undo_sys,3,_15934))/nonvar(_15934)==>ftCallable(_15934)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(prologSingleValued)
- % Support: argIsa(singleValuedInArgDefault,1,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1(tCol(prologSingleValued)).
- % Found positive trigger: tCol(prologSingleValued)
- % body: rhs([{decl_type(prologSingleValued),kb_local(prologSingleValued/1)}])
- % Found positive trigger: tCol(prologSingleValued)
- % body: rhs([arity(prologSingleValued,1)])
- % RHS-Post1: arity(prologSingleValued,1)
- % Support: tCol(prologSingleValued),pt(tCol(prologSingleValued),rhs([arity(prologSingleValued,1)]))
- % Found positive trigger: tCol(prologSingleValued)
- % body: compound(tCol(prologSingleValued)),\+is_ftVar(tCol(prologSingleValued))*->rhs([{with_current_why(tCol(prologSingleValued),ignore(\+addAdmittedArguments(tCol(prologSingleValued))))}])
- % Found positive trigger: tCol(prologSingleValued)
- % body: \+ttExpressionType(prologSingleValued)*->rhs([tSet(prologSingleValued)])
- % RHS-Post1: tSet(prologSingleValued)
- % Support: tCol(prologSingleValued),pt(tCol(prologSingleValued),(\+ttExpressionType(prologSingleValued)*->rhs([tSet(prologSingleValued)])))
- % r_sane:mpred_fwc1(tSet(prologSingleValued)).
- % Found positive trigger: tSet(prologSingleValued)
- % body: rhs([functorDeclares(prologSingleValued)])
- % RHS-Post1: functorDeclares(prologSingleValued)
- % Support: tSet(prologSingleValued),pt(tSet(prologSingleValued),rhs([functorDeclares(prologSingleValued)]))
- % r_sane:mpred_fwc1(functorDeclares(prologSingleValued)).
- % Found positive trigger: functorDeclares(prologSingleValued)
- % body: rhs([arityMax(prologSingleValued,1),functorIsMacro(prologSingleValued)])
- % RHS-Post1: arityMax(prologSingleValued,1)
- % Support: functorDeclares(prologSingleValued),pt(functorDeclares(prologSingleValued),rhs([arityMax(prologSingleValued,1),functorIsMacro(prologSingleValued)]))
- % r_sane:mpred_fwc1(arityMax(prologSingleValued, 1)).
- % Found positive trigger: arityMax(prologSingleValued,1)
- % body: compound(arityMax(prologSingleValued,1)),\+is_ftVar(arityMax(prologSingleValued,1))*->rhs([{with_current_why(arityMax(prologSingleValued,1),ignore(\+addAdmittedArguments(arityMax(prologSingleValued,1))))}])
- % Found positive trigger: arityMax(prologSingleValued,1)
- % body: is_kif_clause(arityMax(prologSingleValued,1))*->rhs([clif(arityMax(prologSingleValued,1))])
- % Found positive trigger: arityMax(prologSingleValued,1)
- % body: compound(arityMax(prologSingleValued,1)),\+is_ftVar(arityMax(prologSingleValued,1))*->rhs([{with_current_why(arityMax(prologSingleValued,1),ignore(\+addAdmittedArguments(arityMax(prologSingleValued,1))))}])
- % RHS-Post1: functorIsMacro(prologSingleValued)
- % Support: functorDeclares(prologSingleValued),pt(functorDeclares(prologSingleValued),rhs([arityMax(prologSingleValued,1),functorIsMacro(prologSingleValued)]))
- % r_sane:mpred_fwc1(functorIsMacro(prologSingleValued)).
- % Found positive trigger: functorIsMacro(prologSingleValued)
- % body: compound(functorIsMacro(prologSingleValued)),\+is_ftVar(functorIsMacro(prologSingleValued))*->rhs([{with_current_why(functorIsMacro(prologSingleValued),ignore(\+addAdmittedArguments(functorIsMacro(prologSingleValued))))}])
- % Found positive trigger: functorIsMacro(prologSingleValued)
- % body: is_kif_clause(functorIsMacro(prologSingleValued))*->rhs([clif(functorIsMacro(prologSingleValued))])
- % Found positive trigger: functorIsMacro(prologSingleValued)
- % body: compound(functorIsMacro(prologSingleValued)),\+is_ftVar(functorIsMacro(prologSingleValued))*->rhs([{with_current_why(functorIsMacro(prologSingleValued),ignore(\+addAdmittedArguments(functorIsMacro(prologSingleValued))))}])
- % Found positive trigger: functorDeclares(prologSingleValued)
- % body: compound(functorDeclares(prologSingleValued)),\+is_ftVar(functorDeclares(prologSingleValued))*->rhs([{with_current_why(functorDeclares(prologSingleValued),ignore(\+addAdmittedArguments(functorDeclares(prologSingleValued))))}])
- % Found positive trigger: functorDeclares(prologSingleValued)
- % body: is_kif_clause(functorDeclares(prologSingleValued))*->rhs([clif(functorDeclares(prologSingleValued))])
- % Found positive trigger: functorDeclares(prologSingleValued)
- % body: compound(functorDeclares(prologSingleValued)),\+is_ftVar(functorDeclares(prologSingleValued))*->rhs([{with_current_why(functorDeclares(prologSingleValued),ignore(\+addAdmittedArguments(functorDeclares(prologSingleValued))))}])
- % Found positive trigger: tSet(prologSingleValued)
- % body: rhs([tCol(prologSingleValued),\+ttExpressionType(prologSingleValued)])
- % RHS-Post1: tCol(prologSingleValued)
- % Support: tSet(prologSingleValued),pt(tSet(prologSingleValued),rhs([tCol(prologSingleValued),\+ttExpressionType(prologSingleValued)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(prologSingleValued)
- % Support: tSet(prologSingleValued),pt(tSet(prologSingleValued),rhs([tCol(prologSingleValued),\+ttExpressionType(prologSingleValued)]))
- % Removing (withdraw1)
- % term: ttExpressionType(prologSingleValued)
- % support (was): _24608,_24610
- % Couldn't retract_i: spft(ttExpressionType(prologSingleValued),_6766,_6768).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(prologSingleValued))).
- % Found positive trigger: tSet(prologSingleValued)
- % body: rhs([tCol(prologSingleValued)])
- % RHS-Post1: tCol(prologSingleValued)
- % Support: tSet(prologSingleValued),pt(tSet(prologSingleValued),rhs([tCol(prologSingleValued)]))
- % Found positive trigger: tSet(prologSingleValued)
- % body: compound(tSet(prologSingleValued)),\+is_ftVar(tSet(prologSingleValued))*->rhs([{with_current_why(tSet(prologSingleValued),ignore(\+addAdmittedArguments(tSet(prologSingleValued))))}])
- % Found positive trigger: tSet(prologSingleValued)
- % body: is_kif_clause(tSet(prologSingleValued))*->rhs([clif(tSet(prologSingleValued))])
- % Found positive trigger: tSet(prologSingleValued)
- % body: compound(tSet(prologSingleValued)),\+is_ftVar(tSet(prologSingleValued))*->rhs([{with_current_why(tSet(prologSingleValued),ignore(\+addAdmittedArguments(tSet(prologSingleValued))))}])
- % Found positive trigger: tCol(prologSingleValued)
- % body: is_kif_clause(tCol(prologSingleValued))*->rhs([clif(tCol(prologSingleValued))])
- % Found positive trigger: tCol(prologSingleValued)
- % body: compound(tCol(prologSingleValued)),\+is_ftVar(tCol(prologSingleValued))*->rhs([{with_current_why(tCol(prologSingleValued),ignore(\+addAdmittedArguments(tCol(prologSingleValued))))}])
- % RHS-Post1: admittedArgument(singleValuedInArgDefault,1,_2666)/nonvar(_2666)==>isa(_2666,prologSingleValued)
- % Support: argIsa(singleValuedInArgDefault,1,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(singleValuedInArgDefault, 1, _35704)/nonvar(_35704)==>prologSingleValued(_35704))).
- % Adding positive
- % trigger: admittedArgument(singleValuedInArgDefault,1,_5444)
- % body: nonvar(_5444)*->rhs([prologSingleValued(_5444)])
- % Support: (admittedArgument(singleValuedInArgDefault,1,_5626)/nonvar(_5626)==>prologSingleValued(_5626)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(singleValuedInArgDefault,1,_2666))/nonvar(_2666)==>isa(_2666,prologSingleValued)
- % Support: argIsa(singleValuedInArgDefault,1,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(singleValuedInArgDefault, 1, _21684))/nonvar(_21684)==>prologSingleValued(_21684))).
- % Adding positive
- % trigger: poss(admittedArgument(singleValuedInArgDefault,1,_5460))
- % body: nonvar(_5460)*->rhs([prologSingleValued(_5460)])
- % Support: (poss(admittedArgument(singleValuedInArgDefault,1,_5650))/nonvar(_5650)==>prologSingleValued(_5650)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(singleValuedInArgDefault,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1(tCol(ftInt)).
- % Found positive trigger: tCol(ftInt)
- % body: rhs([{decl_type(ftInt),kb_local(ftInt/1)}])
- % Found positive trigger: tCol(ftInt)
- % body: rhs([arity(ftInt,1)])
- % RHS-Post1: arity(ftInt,1)
- % Support: tCol(ftInt),pt(tCol(ftInt),rhs([arity(ftInt,1)]))
- % Found positive trigger: tCol(ftInt)
- % body: compound(tCol(ftInt)),\+is_ftVar(tCol(ftInt))*->rhs([{with_current_why(tCol(ftInt),ignore(\+addAdmittedArguments(tCol(ftInt))))}])
- % Found positive trigger: tCol(ftInt)
- % body: \+ttExpressionType(ftInt)*->rhs([tSet(ftInt)])
- % RHS-Post1: tSet(ftInt)
- % Support: tCol(ftInt),pt(tCol(ftInt),(\+ttExpressionType(ftInt)*->rhs([tSet(ftInt)])))
- % r_sane:mpred_fwc1(tSet(ftInt)).
- % Found positive trigger: tSet(ftInt)
- % body: rhs([functorDeclares(ftInt)])
- % RHS-Post1: functorDeclares(ftInt)
- % Support: tSet(ftInt),pt(tSet(ftInt),rhs([functorDeclares(ftInt)]))
- % r_sane:mpred_fwc1(functorDeclares(ftInt)).
- % Found positive trigger: functorDeclares(ftInt)
- % body: rhs([arityMax(ftInt,1),functorIsMacro(ftInt)])
- % RHS-Post1: arityMax(ftInt,1)
- % Support: functorDeclares(ftInt),pt(functorDeclares(ftInt),rhs([arityMax(ftInt,1),functorIsMacro(ftInt)]))
- % r_sane:mpred_fwc1(arityMax(ftInt, 1)).
- % Found positive trigger: arityMax(ftInt,1)
- % body: compound(arityMax(ftInt,1)),\+is_ftVar(arityMax(ftInt,1))*->rhs([{with_current_why(arityMax(ftInt,1),ignore(\+addAdmittedArguments(arityMax(ftInt,1))))}])
- % Found positive trigger: arityMax(ftInt,1)
- % body: is_kif_clause(arityMax(ftInt,1))*->rhs([clif(arityMax(ftInt,1))])
- % Found positive trigger: arityMax(ftInt,1)
- % body: compound(arityMax(ftInt,1)),\+is_ftVar(arityMax(ftInt,1))*->rhs([{with_current_why(arityMax(ftInt,1),ignore(\+addAdmittedArguments(arityMax(ftInt,1))))}])
- % RHS-Post1: functorIsMacro(ftInt)
- % Support: functorDeclares(ftInt),pt(functorDeclares(ftInt),rhs([arityMax(ftInt,1),functorIsMacro(ftInt)]))
- % r_sane:mpred_fwc1(functorIsMacro(ftInt)).
- % Found positive trigger: functorIsMacro(ftInt)
- % body: compound(functorIsMacro(ftInt)),\+is_ftVar(functorIsMacro(ftInt))*->rhs([{with_current_why(functorIsMacro(ftInt),ignore(\+addAdmittedArguments(functorIsMacro(ftInt))))}])
- % Found positive trigger: functorIsMacro(ftInt)
- % body: is_kif_clause(functorIsMacro(ftInt))*->rhs([clif(functorIsMacro(ftInt))])
- % Found positive trigger: functorIsMacro(ftInt)
- % body: compound(functorIsMacro(ftInt)),\+is_ftVar(functorIsMacro(ftInt))*->rhs([{with_current_why(functorIsMacro(ftInt),ignore(\+addAdmittedArguments(functorIsMacro(ftInt))))}])
- % Found positive trigger: functorDeclares(ftInt)
- % body: compound(functorDeclares(ftInt)),\+is_ftVar(functorDeclares(ftInt))*->rhs([{with_current_why(functorDeclares(ftInt),ignore(\+addAdmittedArguments(functorDeclares(ftInt))))}])
- % Found positive trigger: functorDeclares(ftInt)
- % body: is_kif_clause(functorDeclares(ftInt))*->rhs([clif(functorDeclares(ftInt))])
- % Found positive trigger: functorDeclares(ftInt)
- % body: compound(functorDeclares(ftInt)),\+is_ftVar(functorDeclares(ftInt))*->rhs([{with_current_why(functorDeclares(ftInt),ignore(\+addAdmittedArguments(functorDeclares(ftInt))))}])
- % Found positive trigger: tSet(ftInt)
- % body: rhs([tCol(ftInt),\+ttExpressionType(ftInt)])
- % RHS-Post1: tCol(ftInt)
- % Support: tSet(ftInt),pt(tSet(ftInt),rhs([tCol(ftInt),\+ttExpressionType(ftInt)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ftInt)
- % Support: tSet(ftInt),pt(tSet(ftInt),rhs([tCol(ftInt),\+ttExpressionType(ftInt)]))
- % Removing (withdraw1 get_first_real_user_reason)
- % term: ttExpressionType(ftInt)
- % support (was): mfl(baseKB,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl',881),ax
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftInt), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl', 881), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftInt), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl', 881), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftInt), mfl(baseKB, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/prolog/logicmoo/pfc/system_common.pfc.pl', 881), ax)))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftInt), subFormat(ftInt, ftNumber), pt(subFormat(_6934, _6936), ((atom(_6934);atom(_6936))*->rhs([ttExpressionType(_6934), ttExpressionType(_6936)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftInt), quotedDefnIff(ftInt, integer), pt(quotedDefnIff(ftInt, integer), rhs([ttExpressionType(ftInt)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftInt), subFormat(ftInt, ftPercent), pt(subFormat(ftInt, ftPercent), ((atom(ftInt);atom(ftPercent))*->rhs([ttExpressionType(ftInt), ttExpressionType(ftPercent)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftInt), _6908, _6910)))).
- % Couldn't retract_i: spft(ttExpressionType(ftInt),_6908,_6910).
- % still_supported(ttExpressionType(ftInt))
- % Found positive trigger: tSet(ftInt)
- % body: rhs([tCol(ftInt)])
- % RHS-Post1: tCol(ftInt)
- % Support: tSet(ftInt),pt(tSet(ftInt),rhs([tCol(ftInt)]))
- % Found positive trigger: tSet(ftInt)
- % body: compound(tSet(ftInt)),\+is_ftVar(tSet(ftInt))*->rhs([{with_current_why(tSet(ftInt),ignore(\+addAdmittedArguments(tSet(ftInt))))}])
- % Found positive trigger: tSet(ftInt)
- % body: is_kif_clause(tSet(ftInt))*->rhs([clif(tSet(ftInt))])
- % Found positive trigger: tSet(ftInt)
- % body: compound(tSet(ftInt)),\+is_ftVar(tSet(ftInt))*->rhs([{with_current_why(tSet(ftInt),ignore(\+addAdmittedArguments(tSet(ftInt))))}])
- % Found positive trigger: tCol(ftInt)
- % body: is_kif_clause(tCol(ftInt))*->rhs([clif(tCol(ftInt))])
- % Found positive trigger: tCol(ftInt)
- % body: compound(tCol(ftInt)),\+is_ftVar(tCol(ftInt))*->rhs([{with_current_why(tCol(ftInt),ignore(\+addAdmittedArguments(tCol(ftInt))))}])
- % RHS-Post1: admittedArgument(singleValuedInArgDefault,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(singleValuedInArgDefault,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(singleValuedInArgDefault, 2, _19508)/nonvar(_19508)==>ftInt(_19508))).
- % Adding positive
- % trigger: admittedArgument(singleValuedInArgDefault,2,_5456)
- % body: nonvar(_5456)*->rhs([ftInt(_5456)])
- % Support: (admittedArgument(singleValuedInArgDefault,2,_5638)/nonvar(_5638)==>ftInt(_5638)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(singleValuedInArgDefault,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(singleValuedInArgDefault,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(singleValuedInArgDefault, 2, _21704))/nonvar(_21704)==>ftInt(_21704))).
- % Adding positive
- % trigger: poss(admittedArgument(singleValuedInArgDefault,2,_5504))
- % body: nonvar(_5504)*->rhs([ftInt(_5504)])
- % Support: (poss(admittedArgument(singleValuedInArgDefault,2,_5694))/nonvar(_5694)==>ftInt(_5694)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(singleValuedInArgDefault,3,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1(tCol(ftTerm)).
- % Found positive trigger: tCol(ftTerm)
- % body: rhs([{decl_type(ftTerm),kb_local(ftTerm/1)}])
- % Found positive trigger: tCol(ftTerm)
- % body: rhs([arity(ftTerm,1)])
- % RHS-Post1: arity(ftTerm,1)
- % Support: tCol(ftTerm),pt(tCol(ftTerm),rhs([arity(ftTerm,1)]))
- % Found positive trigger: tCol(ftTerm)
- % body: compound(tCol(ftTerm)),\+is_ftVar(tCol(ftTerm))*->rhs([{with_current_why(tCol(ftTerm),ignore(\+addAdmittedArguments(tCol(ftTerm))))}])
- % Found positive trigger: tCol(ftTerm)
- % body: \+ttExpressionType(ftTerm)*->rhs([tSet(ftTerm)])
- % RHS-Post1: tSet(ftTerm)
- % Support: tCol(ftTerm),pt(tCol(ftTerm),(\+ttExpressionType(ftTerm)*->rhs([tSet(ftTerm)])))
- % r_sane:mpred_fwc1(tSet(ftTerm)).
- % Found positive trigger: tSet(ftTerm)
- % body: rhs([functorDeclares(ftTerm)])
- % RHS-Post1: functorDeclares(ftTerm)
- % Support: tSet(ftTerm),pt(tSet(ftTerm),rhs([functorDeclares(ftTerm)]))
- % r_sane:mpred_fwc1(functorDeclares(ftTerm)).
- % Found positive trigger: functorDeclares(ftTerm)
- % body: rhs([arityMax(ftTerm,1),functorIsMacro(ftTerm)])
- % RHS-Post1: arityMax(ftTerm,1)
- % Support: functorDeclares(ftTerm),pt(functorDeclares(ftTerm),rhs([arityMax(ftTerm,1),functorIsMacro(ftTerm)]))
- % r_sane:mpred_fwc1(arityMax(ftTerm, 1)).
- % Found positive trigger: arityMax(ftTerm,1)
- % body: compound(arityMax(ftTerm,1)),\+is_ftVar(arityMax(ftTerm,1))*->rhs([{with_current_why(arityMax(ftTerm,1),ignore(\+addAdmittedArguments(arityMax(ftTerm,1))))}])
- % Found positive trigger: arityMax(ftTerm,1)
- % body: is_kif_clause(arityMax(ftTerm,1))*->rhs([clif(arityMax(ftTerm,1))])
- % Found positive trigger: arityMax(ftTerm,1)
- % body: compound(arityMax(ftTerm,1)),\+is_ftVar(arityMax(ftTerm,1))*->rhs([{with_current_why(arityMax(ftTerm,1),ignore(\+addAdmittedArguments(arityMax(ftTerm,1))))}])
- % RHS-Post1: functorIsMacro(ftTerm)
- % Support: functorDeclares(ftTerm),pt(functorDeclares(ftTerm),rhs([arityMax(ftTerm,1),functorIsMacro(ftTerm)]))
- % r_sane:mpred_fwc1(functorIsMacro(ftTerm)).
- % Found positive trigger: functorIsMacro(ftTerm)
- % body: compound(functorIsMacro(ftTerm)),\+is_ftVar(functorIsMacro(ftTerm))*->rhs([{with_current_why(functorIsMacro(ftTerm),ignore(\+addAdmittedArguments(functorIsMacro(ftTerm))))}])
- % Found positive trigger: functorIsMacro(ftTerm)
- % body: is_kif_clause(functorIsMacro(ftTerm))*->rhs([clif(functorIsMacro(ftTerm))])
- % Found positive trigger: functorIsMacro(ftTerm)
- % body: compound(functorIsMacro(ftTerm)),\+is_ftVar(functorIsMacro(ftTerm))*->rhs([{with_current_why(functorIsMacro(ftTerm),ignore(\+addAdmittedArguments(functorIsMacro(ftTerm))))}])
- % Found positive trigger: functorDeclares(ftTerm)
- % body: compound(functorDeclares(ftTerm)),\+is_ftVar(functorDeclares(ftTerm))*->rhs([{with_current_why(functorDeclares(ftTerm),ignore(\+addAdmittedArguments(functorDeclares(ftTerm))))}])
- % Found positive trigger: functorDeclares(ftTerm)
- % body: is_kif_clause(functorDeclares(ftTerm))*->rhs([clif(functorDeclares(ftTerm))])
- % Found positive trigger: functorDeclares(ftTerm)
- % body: compound(functorDeclares(ftTerm)),\+is_ftVar(functorDeclares(ftTerm))*->rhs([{with_current_why(functorDeclares(ftTerm),ignore(\+addAdmittedArguments(functorDeclares(ftTerm))))}])
- % Found positive trigger: tSet(ftTerm)
- % body: rhs([tCol(ftTerm),\+ttExpressionType(ftTerm)])
- % RHS-Post1: tCol(ftTerm)
- % Support: tSet(ftTerm),pt(tSet(ftTerm),rhs([tCol(ftTerm),\+ttExpressionType(ftTerm)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ftTerm)
- % Support: tSet(ftTerm),pt(tSet(ftTerm),rhs([tCol(ftTerm),\+ttExpressionType(ftTerm)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ftTerm)
- % support (was): subFormat(ftAtom,ftTerm),pt(subFormat(_24586,_24588),((atom(_24586);atom(_24588))*->rhs([ttExpressionType(_24586),ttExpressionType(_24588)])))
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftAtom, ftTerm), pt(subFormat(_6784, _6786), ((atom(_6784);atom(_6786))*->rhs([ttExpressionType(_6784), ttExpressionType(_6786)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftAtom, ftTerm), pt(subFormat(_6784, _6786), ((atom(_6784);atom(_6786))*->rhs([ttExpressionType(_6784), ttExpressionType(_6786)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftAtom, ftTerm), pt(subFormat(_13080, _13082), ((atom(_13080);atom(_13082))*->rhs([ttExpressionType(_13080), ttExpressionType(_13082)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftString, ftTerm), pt(subFormat(_17776, _17778), ((atom(_17776);atom(_17778))*->rhs([ttExpressionType(_17776), ttExpressionType(_17778)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftTerm, ftProlog), pt(subFormat(_22474, _22476), ((atom(_22474);atom(_22476))*->rhs([ttExpressionType(_22474), ttExpressionType(_22476)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftText, ftTerm), pt(subFormat(_27172, _27174), ((atom(_27172);atom(_27174))*->rhs([ttExpressionType(_27172), ttExpressionType(_27174)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftVoprop, ftTerm), pt(subFormat(_6956, _6958), ((atom(_6956);atom(_6958))*->rhs([ttExpressionType(_6956), ttExpressionType(_6958)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), quotedDefnIff(ftTerm, is_ftNonvar), pt(quotedDefnIff(ftTerm, is_ftNonvar), rhs([ttExpressionType(ftTerm)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), _6930, _6932)))).
- % Couldn't retract_i: spft(ttExpressionType(ftTerm),_6930,_6932).
- % still_supported(ttExpressionType(ftTerm))
- % Removing (withdraw1)
- % term: ttExpressionType(ftTerm)
- % support (was): subFormat(ftString,ftTerm),pt(subFormat(_23054,_23056),((atom(_23054);atom(_23056))*->rhs([ttExpressionType(_23054),ttExpressionType(_23056)])))
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftString, ftTerm), pt(subFormat(_23054, _23056), ((atom(_23054);atom(_23056))*->rhs([ttExpressionType(_23054), ttExpressionType(_23056)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftString, ftTerm), pt(subFormat(_6784, _6786), ((atom(_6784);atom(_6786))*->rhs([ttExpressionType(_6784), ttExpressionType(_6786)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftAtom, ftTerm), pt(subFormat(_8568, _8570), ((atom(_8568);atom(_8570))*->rhs([ttExpressionType(_8568), ttExpressionType(_8570)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftString, ftTerm), pt(subFormat(_13138, _13140), ((atom(_13138);atom(_13140))*->rhs([ttExpressionType(_13138), ttExpressionType(_13140)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftTerm, ftProlog), pt(subFormat(_17836, _17838), ((atom(_17836);atom(_17838))*->rhs([ttExpressionType(_17836), ttExpressionType(_17838)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftText, ftTerm), pt(subFormat(_22534, _22536), ((atom(_22534);atom(_22536))*->rhs([ttExpressionType(_22534), ttExpressionType(_22536)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftVoprop, ftTerm), pt(subFormat(_27230, _27232), ((atom(_27230);atom(_27232))*->rhs([ttExpressionType(_27230), ttExpressionType(_27232)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), quotedDefnIff(ftTerm, is_ftNonvar), pt(quotedDefnIff(ftTerm, is_ftNonvar), rhs([ttExpressionType(ftTerm)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), _8478, _8480)))).
- % Couldn't retract_i: spft(ttExpressionType(ftTerm),_6930,_6932).
- % still_supported(ttExpressionType(ftTerm))
- % Removing (withdraw1)
- % term: ttExpressionType(ftTerm)
- % support (was): subFormat(ftTerm,ftProlog),pt(subFormat(_12064,_12066),((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064),ttExpressionType(_12066)])))
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftTerm, ftProlog), pt(subFormat(_12064, _12066), ((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064), ttExpressionType(_12066)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftTerm, ftProlog), pt(subFormat(_12064, _12066), ((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064), ttExpressionType(_12066)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftAtom, ftTerm), pt(subFormat(_25156, _25158), ((atom(_25156);atom(_25158))*->rhs([ttExpressionType(_25156), ttExpressionType(_25158)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftString, ftTerm), pt(subFormat(_6956, _6958), ((atom(_6956);atom(_6958))*->rhs([ttExpressionType(_6956), ttExpressionType(_6958)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftTerm, ftProlog), pt(subFormat(_8554, _8556), ((atom(_8554);atom(_8556))*->rhs([ttExpressionType(_8554), ttExpressionType(_8556)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftText, ftTerm), pt(subFormat(_13250, _13252), ((atom(_13250);atom(_13252))*->rhs([ttExpressionType(_13250), ttExpressionType(_13252)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftVoprop, ftTerm), pt(subFormat(_17946, _17948), ((atom(_17946);atom(_17948))*->rhs([ttExpressionType(_17946), ttExpressionType(_17948)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), quotedDefnIff(ftTerm, is_ftNonvar), pt(quotedDefnIff(ftTerm, is_ftNonvar), rhs([ttExpressionType(ftTerm)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), _6930, _6932)))).
- % Couldn't retract_i: spft(ttExpressionType(ftTerm),_6930,_6932).
- % still_supported(ttExpressionType(ftTerm))
- % Removing (withdraw1)
- % term: ttExpressionType(ftTerm)
- % support (was): subFormat(ftText,ftTerm),pt(subFormat(_12064,_12066),((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064),ttExpressionType(_12066)])))
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftText, ftTerm), pt(subFormat(_12064, _12066), ((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064), ttExpressionType(_12066)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftText, ftTerm), pt(subFormat(_12064, _12066), ((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064), ttExpressionType(_12066)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftAtom, ftTerm), pt(subFormat(_25150, _25152), ((atom(_25150);atom(_25152))*->rhs([ttExpressionType(_25150), ttExpressionType(_25152)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftString, ftTerm), pt(subFormat(_6956, _6958), ((atom(_6956);atom(_6958))*->rhs([ttExpressionType(_6956), ttExpressionType(_6958)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftTerm, ftProlog), pt(subFormat(_8554, _8556), ((atom(_8554);atom(_8556))*->rhs([ttExpressionType(_8554), ttExpressionType(_8556)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftText, ftTerm), pt(subFormat(_13250, _13252), ((atom(_13250);atom(_13252))*->rhs([ttExpressionType(_13250), ttExpressionType(_13252)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftVoprop, ftTerm), pt(subFormat(_17946, _17948), ((atom(_17946);atom(_17948))*->rhs([ttExpressionType(_17946), ttExpressionType(_17948)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), quotedDefnIff(ftTerm, is_ftNonvar), pt(quotedDefnIff(ftTerm, is_ftNonvar), rhs([ttExpressionType(ftTerm)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), _6930, _6932)))).
- % Couldn't retract_i: spft(ttExpressionType(ftTerm),_6930,_6932).
- % still_supported(ttExpressionType(ftTerm))
- % Removing (withdraw1)
- % term: ttExpressionType(ftTerm)
- % support (was): subFormat(ftVoprop,ftTerm),pt(subFormat(_12064,_12066),((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064),ttExpressionType(_12066)])))
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftVoprop, ftTerm), pt(subFormat(_12064, _12066), ((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064), ttExpressionType(_12066)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftVoprop, ftTerm), pt(subFormat(_12064, _12066), ((atom(_12064);atom(_12066))*->rhs([ttExpressionType(_12064), ttExpressionType(_12066)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftAtom, ftTerm), pt(subFormat(_25156, _25158), ((atom(_25156);atom(_25158))*->rhs([ttExpressionType(_25156), ttExpressionType(_25158)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftString, ftTerm), pt(subFormat(_6956, _6958), ((atom(_6956);atom(_6958))*->rhs([ttExpressionType(_6956), ttExpressionType(_6958)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftTerm, ftProlog), pt(subFormat(_8554, _8556), ((atom(_8554);atom(_8556))*->rhs([ttExpressionType(_8554), ttExpressionType(_8556)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftText, ftTerm), pt(subFormat(_13250, _13252), ((atom(_13250);atom(_13252))*->rhs([ttExpressionType(_13250), ttExpressionType(_13252)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftVoprop, ftTerm), pt(subFormat(_17946, _17948), ((atom(_17946);atom(_17948))*->rhs([ttExpressionType(_17946), ttExpressionType(_17948)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), quotedDefnIff(ftTerm, is_ftNonvar), pt(quotedDefnIff(ftTerm, is_ftNonvar), rhs([ttExpressionType(ftTerm)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), _6930, _6932)))).
- % Couldn't retract_i: spft(ttExpressionType(ftTerm),_6930,_6932).
- % still_supported(ttExpressionType(ftTerm))
- % Removing (withdraw1)
- % term: ttExpressionType(ftTerm)
- % support (was): quotedDefnIff(ftTerm,is_ftNonvar),pt(quotedDefnIff(ftTerm,is_ftNonvar),rhs([ttExpressionType(ftTerm)]))
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), quotedDefnIff(ftTerm, is_ftNonvar), pt(quotedDefnIff(ftTerm, is_ftNonvar), rhs([ttExpressionType(ftTerm)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), quotedDefnIff(ftTerm, is_ftNonvar), pt(quotedDefnIff(ftTerm, is_ftNonvar), rhs([ttExpressionType(ftTerm)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftAtom, ftTerm), pt(subFormat(_24114, _24116), ((atom(_24114);atom(_24116))*->rhs([ttExpressionType(_24114), ttExpressionType(_24116)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftString, ftTerm), pt(subFormat(_6926, _6928), ((atom(_6926);atom(_6928))*->rhs([ttExpressionType(_6926), ttExpressionType(_6928)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftTerm, ftProlog), pt(subFormat(_8524, _8526), ((atom(_8524);atom(_8526))*->rhs([ttExpressionType(_8524), ttExpressionType(_8526)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftText, ftTerm), pt(subFormat(_13220, _13222), ((atom(_13220);atom(_13222))*->rhs([ttExpressionType(_13220), ttExpressionType(_13222)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), subFormat(ftVoprop, ftTerm), pt(subFormat(_17916, _17918), ((atom(_17916);atom(_17918))*->rhs([ttExpressionType(_17916), ttExpressionType(_17918)]))))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), quotedDefnIff(ftTerm, is_ftNonvar), pt(quotedDefnIff(ftTerm, is_ftNonvar), rhs([ttExpressionType(ftTerm)])))))).
- % debugm(mpred, sc_failed(mpred, r_sane:call(r_sane:db_op_call(retract, retract_u0), r_sane:spft(ttExpressionType(ftTerm), _6900, _6902)))).
- % Couldn't retract_i: spft(ttExpressionType(ftTerm),_6900,_6902).
- % still_supported(ttExpressionType(ftTerm))
- % Found positive trigger: tSet(ftTerm)
- % body: rhs([tCol(ftTerm)])
- % RHS-Post1: tCol(ftTerm)
- % Support: tSet(ftTerm),pt(tSet(ftTerm),rhs([tCol(ftTerm)]))
- % Found positive trigger: tSet(ftTerm)
- % body: compound(tSet(ftTerm)),\+is_ftVar(tSet(ftTerm))*->rhs([{with_current_why(tSet(ftTerm),ignore(\+addAdmittedArguments(tSet(ftTerm))))}])
- % Found positive trigger: tSet(ftTerm)
- % body: is_kif_clause(tSet(ftTerm))*->rhs([clif(tSet(ftTerm))])
- % Found positive trigger: tSet(ftTerm)
- % body: compound(tSet(ftTerm)),\+is_ftVar(tSet(ftTerm))*->rhs([{with_current_why(tSet(ftTerm),ignore(\+addAdmittedArguments(tSet(ftTerm))))}])
- % Found positive trigger: tCol(ftTerm)
- % body: is_kif_clause(tCol(ftTerm))*->rhs([clif(tCol(ftTerm))])
- % Found positive trigger: tCol(ftTerm)
- % body: compound(tCol(ftTerm)),\+is_ftVar(tCol(ftTerm))*->rhs([{with_current_why(tCol(ftTerm),ignore(\+addAdmittedArguments(tCol(ftTerm))))}])
- % RHS-Post1: admittedArgument(singleValuedInArgDefault,3,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(singleValuedInArgDefault,3,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(singleValuedInArgDefault, 3, _30360)/nonvar(_30360)==>ftTerm(_30360))).
- % Adding positive
- % trigger: admittedArgument(singleValuedInArgDefault,3,_5480)
- % body: nonvar(_5480)*->rhs([ftTerm(_5480)])
- % Support: (admittedArgument(singleValuedInArgDefault,3,_5662)/nonvar(_5662)==>ftTerm(_5662)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(singleValuedInArgDefault,3,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(singleValuedInArgDefault,3,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(singleValuedInArgDefault, 3, _21722))/nonvar(_21722)==>ftTerm(_21722))).
- % Adding positive
- % trigger: poss(admittedArgument(singleValuedInArgDefault,3,_5528))
- % body: nonvar(_5528)*->rhs([ftTerm(_5528)])
- % Support: (poss(admittedArgument(singleValuedInArgDefault,3,_5718))/nonvar(_5718)==>ftTerm(_5718)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tRelation)
- % Support: argIsa(support_hilog,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1(tCol(tRelation)).
- % Found positive trigger: tCol(tRelation)
- % body: rhs([{decl_type(tRelation),kb_local(tRelation/1)}])
- % Found positive trigger: tCol(tRelation)
- % body: rhs([arity(tRelation,1)])
- % RHS-Post1: arity(tRelation,1)
- % Support: tCol(tRelation),pt(tCol(tRelation),rhs([arity(tRelation,1)]))
- % Found positive trigger: tCol(tRelation)
- % body: compound(tCol(tRelation)),\+is_ftVar(tCol(tRelation))*->rhs([{with_current_why(tCol(tRelation),ignore(\+addAdmittedArguments(tCol(tRelation))))}])
- % Found positive trigger: tCol(tRelation)
- % body: \+ttExpressionType(tRelation)*->rhs([tSet(tRelation)])
- % RHS-Post1: tSet(tRelation)
- % Support: tCol(tRelation),pt(tCol(tRelation),(\+ttExpressionType(tRelation)*->rhs([tSet(tRelation)])))
- % r_sane:mpred_fwc1(tSet(tRelation)).
- % Found positive trigger: tSet(tRelation)
- % body: rhs([functorDeclares(tRelation)])
- % RHS-Post1: functorDeclares(tRelation)
- % Support: tSet(tRelation),pt(tSet(tRelation),rhs([functorDeclares(tRelation)]))
- % r_sane:mpred_fwc1(functorDeclares(tRelation)).
- % Found positive trigger: functorDeclares(tRelation)
- % body: rhs([arityMax(tRelation,1),functorIsMacro(tRelation)])
- % RHS-Post1: arityMax(tRelation,1)
- % Support: functorDeclares(tRelation),pt(functorDeclares(tRelation),rhs([arityMax(tRelation,1),functorIsMacro(tRelation)]))
- % r_sane:mpred_fwc1(arityMax(tRelation, 1)).
- % Found positive trigger: arityMax(tRelation,1)
- % body: compound(arityMax(tRelation,1)),\+is_ftVar(arityMax(tRelation,1))*->rhs([{with_current_why(arityMax(tRelation,1),ignore(\+addAdmittedArguments(arityMax(tRelation,1))))}])
- % Found positive trigger: arityMax(tRelation,1)
- % body: is_kif_clause(arityMax(tRelation,1))*->rhs([clif(arityMax(tRelation,1))])
- % Found positive trigger: arityMax(tRelation,1)
- % body: compound(arityMax(tRelation,1)),\+is_ftVar(arityMax(tRelation,1))*->rhs([{with_current_why(arityMax(tRelation,1),ignore(\+addAdmittedArguments(arityMax(tRelation,1))))}])
- % RHS-Post1: functorIsMacro(tRelation)
- % Support: functorDeclares(tRelation),pt(functorDeclares(tRelation),rhs([arityMax(tRelation,1),functorIsMacro(tRelation)]))
- % r_sane:mpred_fwc1(functorIsMacro(tRelation)).
- % Found positive trigger: functorIsMacro(tRelation)
- % body: compound(functorIsMacro(tRelation)),\+is_ftVar(functorIsMacro(tRelation))*->rhs([{with_current_why(functorIsMacro(tRelation),ignore(\+addAdmittedArguments(functorIsMacro(tRelation))))}])
- % Found positive trigger: functorIsMacro(tRelation)
- % body: is_kif_clause(functorIsMacro(tRelation))*->rhs([clif(functorIsMacro(tRelation))])
- % Found positive trigger: functorIsMacro(tRelation)
- % body: compound(functorIsMacro(tRelation)),\+is_ftVar(functorIsMacro(tRelation))*->rhs([{with_current_why(functorIsMacro(tRelation),ignore(\+addAdmittedArguments(functorIsMacro(tRelation))))}])
- % Found positive trigger: functorDeclares(tRelation)
- % body: compound(functorDeclares(tRelation)),\+is_ftVar(functorDeclares(tRelation))*->rhs([{with_current_why(functorDeclares(tRelation),ignore(\+addAdmittedArguments(functorDeclares(tRelation))))}])
- % Found positive trigger: functorDeclares(tRelation)
- % body: is_kif_clause(functorDeclares(tRelation))*->rhs([clif(functorDeclares(tRelation))])
- % Found positive trigger: functorDeclares(tRelation)
- % body: compound(functorDeclares(tRelation)),\+is_ftVar(functorDeclares(tRelation))*->rhs([{with_current_why(functorDeclares(tRelation),ignore(\+addAdmittedArguments(functorDeclares(tRelation))))}])
- % Found positive trigger: tSet(tRelation)
- % body: rhs([tCol(tRelation),\+ttExpressionType(tRelation)])
- % RHS-Post1: tCol(tRelation)
- % Support: tSet(tRelation),pt(tSet(tRelation),rhs([tCol(tRelation),\+ttExpressionType(tRelation)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tRelation)
- % Support: tSet(tRelation),pt(tSet(tRelation),rhs([tCol(tRelation),\+ttExpressionType(tRelation)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tRelation)
- % support (was): _14494,_14496
- % Couldn't retract_i: spft(ttExpressionType(tRelation),_18642,_18644).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tRelation))).
- % Found positive trigger: tSet(tRelation)
- % body: rhs([tCol(tRelation)])
- % RHS-Post1: tCol(tRelation)
- % Support: tSet(tRelation),pt(tSet(tRelation),rhs([tCol(tRelation)]))
- % Found positive trigger: tSet(tRelation)
- % body: compound(tSet(tRelation)),\+is_ftVar(tSet(tRelation))*->rhs([{with_current_why(tSet(tRelation),ignore(\+addAdmittedArguments(tSet(tRelation))))}])
- % Found positive trigger: tSet(tRelation)
- % body: is_kif_clause(tSet(tRelation))*->rhs([clif(tSet(tRelation))])
- % Found positive trigger: tSet(tRelation)
- % body: compound(tSet(tRelation)),\+is_ftVar(tSet(tRelation))*->rhs([{with_current_why(tSet(tRelation),ignore(\+addAdmittedArguments(tSet(tRelation))))}])
- % Found positive trigger: tCol(tRelation)
- % body: is_kif_clause(tCol(tRelation))*->rhs([clif(tCol(tRelation))])
- % Found positive trigger: tCol(tRelation)
- % body: compound(tCol(tRelation)),\+is_ftVar(tCol(tRelation))*->rhs([{with_current_why(tCol(tRelation),ignore(\+addAdmittedArguments(tCol(tRelation))))}])
- % RHS-Post1: admittedArgument(support_hilog,1,_2666)/nonvar(_2666)==>isa(_2666,tRelation)
- % Support: argIsa(support_hilog,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(support_hilog, 1, _24336)/nonvar(_24336)==>tRelation(_24336))).
- % Adding positive
- % trigger: admittedArgument(support_hilog,1,_5524)
- % body: nonvar(_5524)*->rhs([tRelation(_5524)])
- % Support: (admittedArgument(support_hilog,1,_5706)/nonvar(_5706)==>tRelation(_5706)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(support_hilog,1,_2666))/nonvar(_2666)==>isa(_2666,tRelation)
- % Support: argIsa(support_hilog,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(support_hilog, 1, _21734))/nonvar(_21734)==>tRelation(_21734))).
- % Adding positive
- % trigger: poss(admittedArgument(support_hilog,1,_5540))
- % body: nonvar(_5540)*->rhs([tRelation(_5540)])
- % Support: (poss(admittedArgument(support_hilog,1,_5730))/nonvar(_5730)==>tRelation(_5730)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(support_hilog,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(support_hilog,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(support_hilog,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(support_hilog, 2, _13260)/nonvar(_13260)==>ftInt(_13260))).
- % Adding positive
- % trigger: admittedArgument(support_hilog,2,_13260)
- % body: nonvar(_13260)*->rhs([ftInt(_13260)])
- % Support: (admittedArgument(support_hilog,2,_15894)/nonvar(_15894)==>ftInt(_15894)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(support_hilog,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(support_hilog,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(support_hilog, 2, _13346))/nonvar(_13346)==>ftInt(_13346))).
- % Adding positive
- % trigger: poss(admittedArgument(support_hilog,2,_13346))
- % body: nonvar(_13346)*->rhs([ftInt(_13346)])
- % Support: (poss(admittedArgument(support_hilog,2,_16030))/nonvar(_16030)==>ftInt(_16030)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tRelation)
- % Support: argIsa(prologArity,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(prologArity,1,_2666)/nonvar(_2666)==>isa(_2666,tRelation)
- % Support: argIsa(prologArity,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(prologArity, 1, _20008)/nonvar(_20008)==>tRelation(_20008))).
- % Adding positive
- % trigger: admittedArgument(prologArity,1,_5564)
- % body: nonvar(_5564)*->rhs([tRelation(_5564)])
- % Support: (admittedArgument(prologArity,1,_5746)/nonvar(_5746)==>tRelation(_5746)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(prologArity,1,_2666))/nonvar(_2666)==>isa(_2666,tRelation)
- % Support: argIsa(prologArity,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(prologArity, 1, _21760))/nonvar(_21760)==>tRelation(_21760))).
- % Adding positive
- % trigger: poss(admittedArgument(prologArity,1,_5580))
- % body: nonvar(_5580)*->rhs([tRelation(_5580)])
- % Support: (poss(admittedArgument(prologArity,1,_5770))/nonvar(_5770)==>tRelation(_5770)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(prologArity,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(prologArity,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(prologArity,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(prologArity, 2, _13308)/nonvar(_13308)==>ftInt(_13308))).
- % Adding positive
- % trigger: admittedArgument(prologArity,2,_13308)
- % body: nonvar(_13308)*->rhs([ftInt(_13308)])
- % Support: (admittedArgument(prologArity,2,_15940)/nonvar(_15940)==>ftInt(_15940)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(prologArity,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(prologArity,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(prologArity, 2, _13404))/nonvar(_13404)==>ftInt(_13404))).
- % Adding positive
- % trigger: poss(admittedArgument(prologArity,2,_13404))
- % body: nonvar(_13404)*->rhs([ftInt(_13404)])
- % Support: (poss(admittedArgument(prologArity,2,_16088))/nonvar(_16088)==>ftInt(_16088)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(isa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(isa,1,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(isa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(isa, 1, _20042)/nonvar(_20042)==>ftTerm(_20042))).
- % Adding positive
- % trigger: admittedArgument(isa,1,_5612)
- % body: nonvar(_5612)*->rhs([ftTerm(_5612)])
- % Support: (admittedArgument(isa,1,_5794)/nonvar(_5794)==>ftTerm(_5794)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(isa,1,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(isa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(isa, 1, _21798))/nonvar(_21798)==>ftTerm(_21798))).
- % Adding positive
- % trigger: poss(admittedArgument(isa,1,_5628))
- % body: nonvar(_5628)*->rhs([ftTerm(_5628)])
- % Support: (poss(admittedArgument(isa,1,_5818))/nonvar(_5818)==>ftTerm(_5818)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(isa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1(tCol(tCol)).
- % Found positive trigger: tCol(tCol)
- % body: rhs([{decl_type(tCol),kb_local(tCol/1)}])
- % Found positive trigger: tCol(tCol)
- % body: rhs([arity(tCol,1)])
- % RHS-Post1: arity(tCol,1)
- % Support: tCol(tCol),pt(tCol(tCol),rhs([arity(tCol,1)]))
- % Found positive trigger: tCol(tCol)
- % body: compound(tCol(tCol)),\+is_ftVar(tCol(tCol))*->rhs([{with_current_why(tCol(tCol),ignore(\+addAdmittedArguments(tCol(tCol))))}])
- % Found positive trigger: tCol(tCol)
- % body: \+ttExpressionType(tCol)*->rhs([tSet(tCol)])
- % RHS-Post1: tSet(tCol)
- % Support: tCol(tCol),pt(tCol(tCol),(\+ttExpressionType(tCol)*->rhs([tSet(tCol)])))
- % r_sane:mpred_fwc1(tSet(tCol)).
- % Found positive trigger: tSet(tCol)
- % body: rhs([functorDeclares(tCol)])
- % RHS-Post1: functorDeclares(tCol)
- % Support: tSet(tCol),pt(tSet(tCol),rhs([functorDeclares(tCol)]))
- % r_sane:mpred_fwc1(functorDeclares(tCol)).
- % Found positive trigger: functorDeclares(tCol)
- % body: rhs([arityMax(tCol,1),functorIsMacro(tCol)])
- % RHS-Post1: arityMax(tCol,1)
- % Support: functorDeclares(tCol),pt(functorDeclares(tCol),rhs([arityMax(tCol,1),functorIsMacro(tCol)]))
- % r_sane:mpred_fwc1(arityMax(tCol, 1)).
- % Found positive trigger: arityMax(tCol,1)
- % body: compound(arityMax(tCol,1)),\+is_ftVar(arityMax(tCol,1))*->rhs([{with_current_why(arityMax(tCol,1),ignore(\+addAdmittedArguments(arityMax(tCol,1))))}])
- % Found positive trigger: arityMax(tCol,1)
- % body: is_kif_clause(arityMax(tCol,1))*->rhs([clif(arityMax(tCol,1))])
- % Found positive trigger: arityMax(tCol,1)
- % body: compound(arityMax(tCol,1)),\+is_ftVar(arityMax(tCol,1))*->rhs([{with_current_why(arityMax(tCol,1),ignore(\+addAdmittedArguments(arityMax(tCol,1))))}])
- % RHS-Post1: functorIsMacro(tCol)
- % Support: functorDeclares(tCol),pt(functorDeclares(tCol),rhs([arityMax(tCol,1),functorIsMacro(tCol)]))
- % r_sane:mpred_fwc1(functorIsMacro(tCol)).
- % Found positive trigger: functorIsMacro(tCol)
- % body: compound(functorIsMacro(tCol)),\+is_ftVar(functorIsMacro(tCol))*->rhs([{with_current_why(functorIsMacro(tCol),ignore(\+addAdmittedArguments(functorIsMacro(tCol))))}])
- % Found positive trigger: functorIsMacro(tCol)
- % body: is_kif_clause(functorIsMacro(tCol))*->rhs([clif(functorIsMacro(tCol))])
- % Found positive trigger: functorIsMacro(tCol)
- % body: compound(functorIsMacro(tCol)),\+is_ftVar(functorIsMacro(tCol))*->rhs([{with_current_why(functorIsMacro(tCol),ignore(\+addAdmittedArguments(functorIsMacro(tCol))))}])
- % Found positive trigger: functorDeclares(tCol)
- % body: compound(functorDeclares(tCol)),\+is_ftVar(functorDeclares(tCol))*->rhs([{with_current_why(functorDeclares(tCol),ignore(\+addAdmittedArguments(functorDeclares(tCol))))}])
- % Found positive trigger: functorDeclares(tCol)
- % body: is_kif_clause(functorDeclares(tCol))*->rhs([clif(functorDeclares(tCol))])
- % Found positive trigger: functorDeclares(tCol)
- % body: compound(functorDeclares(tCol)),\+is_ftVar(functorDeclares(tCol))*->rhs([{with_current_why(functorDeclares(tCol),ignore(\+addAdmittedArguments(functorDeclares(tCol))))}])
- % Found positive trigger: tSet(tCol)
- % body: rhs([tCol(tCol),\+ttExpressionType(tCol)])
- % RHS-Post1: tCol(tCol)
- % Support: tSet(tCol),pt(tSet(tCol),rhs([tCol(tCol),\+ttExpressionType(tCol)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tCol)
- % Support: tSet(tCol),pt(tSet(tCol),rhs([tCol(tCol),\+ttExpressionType(tCol)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tCol)
- % support (was): _12934,_12936
- % Couldn't retract_i: spft(ttExpressionType(tCol),_17078,_17080).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tCol))).
- % Found positive trigger: tSet(tCol)
- % body: rhs([tCol(tCol)])
- % RHS-Post1: tCol(tCol)
- % Support: tSet(tCol),pt(tSet(tCol),rhs([tCol(tCol)]))
- % Found positive trigger: tSet(tCol)
- % body: compound(tSet(tCol)),\+is_ftVar(tSet(tCol))*->rhs([{with_current_why(tSet(tCol),ignore(\+addAdmittedArguments(tSet(tCol))))}])
- % Found positive trigger: tSet(tCol)
- % body: is_kif_clause(tSet(tCol))*->rhs([clif(tSet(tCol))])
- % Found positive trigger: tSet(tCol)
- % body: compound(tSet(tCol)),\+is_ftVar(tSet(tCol))*->rhs([{with_current_why(tSet(tCol),ignore(\+addAdmittedArguments(tSet(tCol))))}])
- % Found positive trigger: tCol(tCol)
- % body: is_kif_clause(tCol(tCol))*->rhs([clif(tCol(tCol))])
- % Found positive trigger: tCol(tCol)
- % body: compound(tCol(tCol)),\+is_ftVar(tCol(tCol))*->rhs([{with_current_why(tCol(tCol),ignore(\+addAdmittedArguments(tCol(tCol))))}])
- % RHS-Post1: admittedArgument(isa,2,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(isa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(isa, 2, _19666)/nonvar(_19666)==>tCol(_19666))).
- % Adding positive
- % trigger: admittedArgument(isa,2,_19666)
- % body: nonvar(_19666)*->rhs([tCol(_19666)])
- % Support: (admittedArgument(isa,2,_22294)/nonvar(_22294)==>tCol(_22294)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(isa,2,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(isa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(isa, 2, _13456))/nonvar(_13456)==>tCol(_13456))).
- % Adding positive
- % trigger: poss(admittedArgument(isa,2,_13456))
- % body: nonvar(_13456)*->rhs([tCol(_13456)])
- % Support: (poss(admittedArgument(isa,2,_16136))/nonvar(_16136)==>tCol(_16136)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(mudToCyc,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudToCyc,1,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(mudToCyc,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudToCyc, 1, _20090)/nonvar(_20090)==>ftTerm(_20090))).
- % Adding positive
- % trigger: admittedArgument(mudToCyc,1,_5660)
- % body: nonvar(_5660)*->rhs([ftTerm(_5660)])
- % Support: (admittedArgument(mudToCyc,1,_5842)/nonvar(_5842)==>ftTerm(_5842)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(mudToCyc,1,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(mudToCyc,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudToCyc, 1, _21852))/nonvar(_21852)==>ftTerm(_21852))).
- % Adding positive
- % trigger: poss(admittedArgument(mudToCyc,1,_21852))
- % body: nonvar(_21852)*->rhs([ftTerm(_21852)])
- % Support: (poss(admittedArgument(mudToCyc,1,_24534))/nonvar(_24534)==>ftTerm(_24534)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(mudToCyc,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(mudToCyc,2,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(mudToCyc,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(mudToCyc, 2, _20126)/nonvar(_20126)==>ftTerm(_20126))).
- % Adding positive
- % trigger: admittedArgument(mudToCyc,2,_5684)
- % body: nonvar(_5684)*->rhs([ftTerm(_5684)])
- % Support: (admittedArgument(mudToCyc,2,_5866)/nonvar(_5866)==>ftTerm(_5866)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: ftTerm('MicrotheoryType')
- % Support: admittedArgument(mudToCyc,2,'MicrotheoryType'),pt(admittedArgument(mudToCyc,2,_10900),(nonvar(_10900)*->rhs([ftTerm(_10900)])))
- % r_sane:mpred_fwc1(ftTerm(ttMicrotheoryType)).
- % Found positive trigger: ftTerm(ttMicrotheoryType)
- % body: compound(ftTerm(ttMicrotheoryType)),\+is_ftVar(ftTerm(ttMicrotheoryType))*->rhs([{with_current_why(ftTerm(ttMicrotheoryType),ignore(\+addAdmittedArguments(ftTerm(ttMicrotheoryType))))}])
- % Found positive trigger: ftTerm(ttMicrotheoryType)
- % body: is_kif_clause(ftTerm(ttMicrotheoryType))*->rhs([clif(ftTerm(ttMicrotheoryType))])
- % Found positive trigger: ftTerm(ttMicrotheoryType)
- % body: compound(ftTerm(ttMicrotheoryType)),\+is_ftVar(ftTerm(ttMicrotheoryType))*->rhs([{with_current_why(ftTerm(ttMicrotheoryType),ignore(\+addAdmittedArguments(ftTerm(ttMicrotheoryType))))}])
- % RHS-Post1: ftTerm(tComputerCode)
- % Support: admittedArgument(mudToCyc,2,tComputerCode),pt(admittedArgument(mudToCyc,2,_6284),(nonvar(_6284)*->rhs([ftTerm(_6284)])))
- % r_sane:mpred_fwc1(ftTerm(tComputerCode)).
- % Found positive trigger: ftTerm(tComputerCode)
- % body: compound(ftTerm(tComputerCode)),\+is_ftVar(ftTerm(tComputerCode))*->rhs([{with_current_why(ftTerm(tComputerCode),ignore(\+addAdmittedArguments(ftTerm(tComputerCode))))}])
- % Found positive trigger: ftTerm(tComputerCode)
- % body: is_kif_clause(ftTerm(tComputerCode))*->rhs([clif(ftTerm(tComputerCode))])
- % Found positive trigger: ftTerm(tComputerCode)
- % body: compound(ftTerm(tComputerCode)),\+is_ftVar(ftTerm(tComputerCode))*->rhs([{with_current_why(ftTerm(tComputerCode),ignore(\+addAdmittedArguments(ftTerm(tComputerCode))))}])
- % RHS-Post1: ftTerm(iboPropositionalInformationThing)
- % Support: admittedArgument(mudToCyc,2,iboPropositionalInformationThing),pt(admittedArgument(mudToCyc,2,_6284),(nonvar(_6284)*->rhs([ftTerm(_6284)])))
- % r_sane:mpred_fwc1(ftTerm(iboPropositionalInformationThing)).
- % Found positive trigger: ftTerm(iboPropositionalInformationThing)
- % body: compound(ftTerm(iboPropositionalInformationThing)),\+is_ftVar(ftTerm(iboPropositionalInformationThing))*->rhs([{with_current_why(ftTerm(iboPropositionalInformationThing),ignore(\+addAdmittedArguments(ftTerm(iboPropositionalInformationThing))))}])
- % Found positive trigger: ftTerm(iboPropositionalInformationThing)
- % body: is_kif_clause(ftTerm(iboPropositionalInformationThing))*->rhs([clif(ftTerm(iboPropositionalInformationThing))])
- % Found positive trigger: ftTerm(iboPropositionalInformationThing)
- % body: compound(ftTerm(iboPropositionalInformationThing)),\+is_ftVar(ftTerm(iboPropositionalInformationThing))*->rhs([{with_current_why(ftTerm(iboPropositionalInformationThing),ignore(\+addAdmittedArguments(ftTerm(iboPropositionalInformationThing))))}])
- % RHS-Post1: poss(admittedArgument(mudToCyc,2,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(mudToCyc,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(mudToCyc, 2, _28092))/nonvar(_28092)==>ftTerm(_28092))).
- % Adding positive
- % trigger: poss(admittedArgument(mudToCyc,2,_5700))
- % body: nonvar(_5700)*->rhs([ftTerm(_5700)])
- % Support: (poss(admittedArgument(mudToCyc,2,_5890))/nonvar(_5890)==>ftTerm(_5890)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: ftTerm('MicrotheoryType')
- % Support: poss(admittedArgument(mudToCyc,2,'MicrotheoryType')),pt(poss(admittedArgument(mudToCyc,2,_10972)),(nonvar(_10972)*->rhs([ftTerm(_10972)])))
- % RHS-Post1: ftTerm(tComputerCode)
- % Support: poss(admittedArgument(mudToCyc,2,tComputerCode)),pt(poss(admittedArgument(mudToCyc,2,_10972)),(nonvar(_10972)*->rhs([ftTerm(_10972)])))
- % RHS-Post1: ftTerm(iboPropositionalInformationThing)
- % Support: poss(admittedArgument(mudToCyc,2,iboPropositionalInformationThing)),pt(poss(admittedArgument(mudToCyc,2,_10972)),(nonvar(_10972)*->rhs([ftTerm(_10972)])))
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(pddlSomethingIsa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(pddlSomethingIsa,1,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(pddlSomethingIsa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(pddlSomethingIsa, 1, _20166)/nonvar(_20166)==>ftTerm(_20166))).
- % Adding positive
- % trigger: admittedArgument(pddlSomethingIsa,1,_5708)
- % body: nonvar(_5708)*->rhs([ftTerm(_5708)])
- % Support: (admittedArgument(pddlSomethingIsa,1,_5890)/nonvar(_5890)==>ftTerm(_5890)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(pddlSomethingIsa,1,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(pddlSomethingIsa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(pddlSomethingIsa, 1, _21912))/nonvar(_21912)==>ftTerm(_21912))).
- % Adding positive
- % trigger: poss(admittedArgument(pddlSomethingIsa,1,_21912))
- % body: nonvar(_21912)*->rhs([ftTerm(_21912)])
- % Support: (poss(admittedArgument(pddlSomethingIsa,1,_24598))/nonvar(_24598)==>ftTerm(_24598)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftListFn(tCol))
- % Support: argIsa(pddlSomethingIsa,2,ftListFn(tCol)),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % uses_predicate(header_sane, header_sane, ttRelationType, 1).
- % r_sane:mpred_fwc1(tCol(ftListFn)).
- % Found positive trigger: tCol(ftListFn)
- % body: rhs([{decl_type(ftListFn),kb_local(ftListFn/1)}])
- % Found positive trigger: tCol(ftListFn)
- % body: rhs([arity(ftListFn,1)])
- % RHS-Post1: arity(ftListFn,1)
- % Support: tCol(ftListFn),pt(tCol(ftListFn),rhs([arity(ftListFn,1)]))
- % Found positive trigger: tCol(ftListFn)
- % body: compound(tCol(ftListFn)),\+is_ftVar(tCol(ftListFn))*->rhs([{with_current_why(tCol(ftListFn),ignore(\+addAdmittedArguments(tCol(ftListFn))))}])
- % Found positive trigger: tCol(ftListFn)
- % body: \+ttExpressionType(ftListFn)*->rhs([tSet(ftListFn)])
- % RHS-Post1: tSet(ftListFn)
- % Support: tCol(ftListFn),pt(tCol(ftListFn),(\+ttExpressionType(ftListFn)*->rhs([tSet(ftListFn)])))
- % r_sane:mpred_fwc1(tSet(ftListFn)).
- % Found positive trigger: tSet(ftListFn)
- % body: rhs([functorDeclares(ftListFn)])
- % RHS-Post1: functorDeclares(ftListFn)
- % Support: tSet(ftListFn),pt(tSet(ftListFn),rhs([functorDeclares(ftListFn)]))
- % r_sane:mpred_fwc1(functorDeclares(ftListFn)).
- % Found positive trigger: functorDeclares(ftListFn)
- % body: rhs([arityMax(ftListFn,1),functorIsMacro(ftListFn)])
- % RHS-Post1: arityMax(ftListFn,1)
- % Support: functorDeclares(ftListFn),pt(functorDeclares(ftListFn),rhs([arityMax(ftListFn,1),functorIsMacro(ftListFn)]))
- % r_sane:mpred_fwc1(arityMax(ftListFn, 1)).
- % Found positive trigger: arityMax(ftListFn,1)
- % body: compound(arityMax(ftListFn,1)),\+is_ftVar(arityMax(ftListFn,1))*->rhs([{with_current_why(arityMax(ftListFn,1),ignore(\+addAdmittedArguments(arityMax(ftListFn,1))))}])
- % Found positive trigger: arityMax(ftListFn,1)
- % body: is_kif_clause(arityMax(ftListFn,1))*->rhs([clif(arityMax(ftListFn,1))])
- % Found positive trigger: arityMax(ftListFn,1)
- % body: compound(arityMax(ftListFn,1)),\+is_ftVar(arityMax(ftListFn,1))*->rhs([{with_current_why(arityMax(ftListFn,1),ignore(\+addAdmittedArguments(arityMax(ftListFn,1))))}])
- % RHS-Post1: functorIsMacro(ftListFn)
- % Support: functorDeclares(ftListFn),pt(functorDeclares(ftListFn),rhs([arityMax(ftListFn,1),functorIsMacro(ftListFn)]))
- % r_sane:mpred_fwc1(functorIsMacro(ftListFn)).
- % Found positive trigger: functorIsMacro(ftListFn)
- % body: compound(functorIsMacro(ftListFn)),\+is_ftVar(functorIsMacro(ftListFn))*->rhs([{with_current_why(functorIsMacro(ftListFn),ignore(\+addAdmittedArguments(functorIsMacro(ftListFn))))}])
- % Found positive trigger: functorIsMacro(ftListFn)
- % body: is_kif_clause(functorIsMacro(ftListFn))*->rhs([clif(functorIsMacro(ftListFn))])
- % Found positive trigger: functorIsMacro(ftListFn)
- % body: compound(functorIsMacro(ftListFn)),\+is_ftVar(functorIsMacro(ftListFn))*->rhs([{with_current_why(functorIsMacro(ftListFn),ignore(\+addAdmittedArguments(functorIsMacro(ftListFn))))}])
- % Found positive trigger: functorDeclares(ftListFn)
- % body: compound(functorDeclares(ftListFn)),\+is_ftVar(functorDeclares(ftListFn))*->rhs([{with_current_why(functorDeclares(ftListFn),ignore(\+addAdmittedArguments(functorDeclares(ftListFn))))}])
- % Found positive trigger: functorDeclares(ftListFn)
- % body: is_kif_clause(functorDeclares(ftListFn))*->rhs([clif(functorDeclares(ftListFn))])
- % Found positive trigger: functorDeclares(ftListFn)
- % body: compound(functorDeclares(ftListFn)),\+is_ftVar(functorDeclares(ftListFn))*->rhs([{with_current_why(functorDeclares(ftListFn),ignore(\+addAdmittedArguments(functorDeclares(ftListFn))))}])
- % Found positive trigger: tSet(ftListFn)
- % body: rhs([tCol(ftListFn),\+ttExpressionType(ftListFn)])
- % RHS-Post1: tCol(ftListFn)
- % Support: tSet(ftListFn),pt(tSet(ftListFn),rhs([tCol(ftListFn),\+ttExpressionType(ftListFn)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ftListFn)
- % Support: tSet(ftListFn),pt(tSet(ftListFn),rhs([tCol(ftListFn),\+ttExpressionType(ftListFn)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ftListFn)
- % support (was): _14798,_14800
- % Couldn't retract_i: spft(ttExpressionType(ftListFn),_18944,_18946).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ftListFn))).
- % Found positive trigger: tSet(ftListFn)
- % body: rhs([tCol(ftListFn)])
- % RHS-Post1: tCol(ftListFn)
- % Support: tSet(ftListFn),pt(tSet(ftListFn),rhs([tCol(ftListFn)]))
- % Found positive trigger: tSet(ftListFn)
- % body: compound(tSet(ftListFn)),\+is_ftVar(tSet(ftListFn))*->rhs([{with_current_why(tSet(ftListFn),ignore(\+addAdmittedArguments(tSet(ftListFn))))}])
- % Found positive trigger: tSet(ftListFn)
- % body: is_kif_clause(tSet(ftListFn))*->rhs([clif(tSet(ftListFn))])
- % Found positive trigger: tSet(ftListFn)
- % body: compound(tSet(ftListFn)),\+is_ftVar(tSet(ftListFn))*->rhs([{with_current_why(tSet(ftListFn),ignore(\+addAdmittedArguments(tSet(ftListFn))))}])
- % Found positive trigger: tCol(ftListFn)
- % body: is_kif_clause(tCol(ftListFn))*->rhs([clif(tCol(ftListFn))])
- % Found positive trigger: tCol(ftListFn)
- % body: compound(tCol(ftListFn)),\+is_ftVar(tCol(ftListFn))*->rhs([{with_current_why(tCol(ftListFn),ignore(\+addAdmittedArguments(tCol(ftListFn))))}])
- % RHS-Post1: admittedArgument(pddlSomethingIsa,2,_2666)/nonvar(_2666)==>isa(_2666,ftListFn(tCol))
- % Support: argIsa(pddlSomethingIsa,2,ftListFn(tCol)),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(pddlSomethingIsa, 2, _24376)/nonvar(_24376)==>isa(_24376, ftListFn(tCol)))).
- % Adding positive
- % trigger: admittedArgument(pddlSomethingIsa,2,_5750)
- % body: nonvar(_5750)*->rhs([isa(_5750,ftListFn(tCol))])
- % Support: (admittedArgument(pddlSomethingIsa,2,_5936)/nonvar(_5936)==>isa(_5936,ftListFn(tCol))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(pddlSomethingIsa,2,_2666))/nonvar(_2666)==>isa(_2666,ftListFn(tCol))
- % Support: argIsa(pddlSomethingIsa,2,ftListFn(tCol)),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(pddlSomethingIsa, 2, _21840))/nonvar(_21840)==>isa(_21840, ftListFn(tCol)))).
- % Adding positive
- % trigger: poss(admittedArgument(pddlSomethingIsa,2,_21840))
- % body: nonvar(_21840)*->rhs([isa(_21840,ftListFn(tCol))])
- % Support: (poss(admittedArgument(pddlSomethingIsa,2,_24592))/nonvar(_24592)==>isa(_24592,ftListFn(tCol))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tRelation)
- % Support: argIsa(argIsa,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(argIsa,1,_2666)/nonvar(_2666)==>isa(_2666,tRelation)
- % Support: argIsa(argIsa,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(argIsa, 1, _20204)/nonvar(_20204)==>tRelation(_20204))).
- % Adding positive
- % trigger: admittedArgument(argIsa,1,_5760)
- % body: nonvar(_5760)*->rhs([tRelation(_5760)])
- % Support: (admittedArgument(argIsa,1,_5942)/nonvar(_5942)==>tRelation(_5942)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(argIsa,1,_2666))/nonvar(_2666)==>isa(_2666,tRelation)
- % Support: argIsa(argIsa,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(argIsa, 1, _21954))/nonvar(_21954)==>tRelation(_21954))).
- % Adding positive
- % trigger: poss(admittedArgument(argIsa,1,_21954))
- % body: nonvar(_21954)*->rhs([tRelation(_21954)])
- % Support: (poss(admittedArgument(argIsa,1,_24638))/nonvar(_24638)==>tRelation(_24638)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(argIsa,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(argIsa,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(argIsa,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(argIsa, 2, _20194)/nonvar(_20194)==>ftInt(_20194))).
- % Adding positive
- % trigger: admittedArgument(argIsa,2,_5784)
- % body: nonvar(_5784)*->rhs([ftInt(_5784)])
- % Support: (admittedArgument(argIsa,2,_5966)/nonvar(_5966)==>ftInt(_5966)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(argIsa,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(argIsa,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(argIsa, 2, _21978))/nonvar(_21978)==>ftInt(_21978))).
- % Adding positive
- % trigger: poss(admittedArgument(argIsa,2,_21978))
- % body: nonvar(_21978)*->rhs([ftInt(_21978)])
- % Support: (poss(admittedArgument(argIsa,2,_24660))/nonvar(_24660)==>ftInt(_24660)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(argIsa,3,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(argIsa,3,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(argIsa,3,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(argIsa, 3, _20238)/nonvar(_20238)==>tCol(_20238))).
- % Adding positive
- % trigger: admittedArgument(argIsa,3,_5808)
- % body: nonvar(_5808)*->rhs([tCol(_5808)])
- % Support: (admittedArgument(argIsa,3,_5990)/nonvar(_5990)==>tCol(_5990)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(vtSize)
- % Support: admittedArgument(argIsa,3,vtSize),pt(admittedArgument(argIsa,3,_11022),(nonvar(_11022)*->rhs([tCol(_11022)])))
- % r_sane:mpred_fwc1(tCol(vtSize)).
- % Found positive trigger: tCol(vtSize)
- % body: rhs([{decl_type(vtSize),kb_local(vtSize/1)}])
- % Found positive trigger: tCol(vtSize)
- % body: rhs([arity(vtSize,1)])
- % RHS-Post1: arity(vtSize,1)
- % Support: tCol(vtSize),pt(tCol(vtSize),rhs([arity(vtSize,1)]))
- % Found positive trigger: tCol(vtSize)
- % body: compound(tCol(vtSize)),\+is_ftVar(tCol(vtSize))*->rhs([{with_current_why(tCol(vtSize),ignore(\+addAdmittedArguments(tCol(vtSize))))}])
- % Found positive trigger: tCol(vtSize)
- % body: \+ttExpressionType(vtSize)*->rhs([tSet(vtSize)])
- % RHS-Post1: tSet(vtSize)
- % Support: tCol(vtSize),pt(tCol(vtSize),(\+ttExpressionType(vtSize)*->rhs([tSet(vtSize)])))
- % r_sane:mpred_fwc1(tSet(vtSize)).
- % Found positive trigger: tSet(vtSize)
- % body: rhs([functorDeclares(vtSize)])
- % RHS-Post1: functorDeclares(vtSize)
- % Support: tSet(vtSize),pt(tSet(vtSize),rhs([functorDeclares(vtSize)]))
- % r_sane:mpred_fwc1(functorDeclares(vtSize)).
- % Found positive trigger: functorDeclares(vtSize)
- % body: rhs([arityMax(vtSize,1),functorIsMacro(vtSize)])
- % RHS-Post1: arityMax(vtSize,1)
- % Support: functorDeclares(vtSize),pt(functorDeclares(vtSize),rhs([arityMax(vtSize,1),functorIsMacro(vtSize)]))
- % r_sane:mpred_fwc1(arityMax(vtSize, 1)).
- % Found positive trigger: arityMax(vtSize,1)
- % body: compound(arityMax(vtSize,1)),\+is_ftVar(arityMax(vtSize,1))*->rhs([{with_current_why(arityMax(vtSize,1),ignore(\+addAdmittedArguments(arityMax(vtSize,1))))}])
- % Found positive trigger: arityMax(vtSize,1)
- % body: is_kif_clause(arityMax(vtSize,1))*->rhs([clif(arityMax(vtSize,1))])
- % Found positive trigger: arityMax(vtSize,1)
- % body: compound(arityMax(vtSize,1)),\+is_ftVar(arityMax(vtSize,1))*->rhs([{with_current_why(arityMax(vtSize,1),ignore(\+addAdmittedArguments(arityMax(vtSize,1))))}])
- % RHS-Post1: functorIsMacro(vtSize)
- % Support: functorDeclares(vtSize),pt(functorDeclares(vtSize),rhs([arityMax(vtSize,1),functorIsMacro(vtSize)]))
- % r_sane:mpred_fwc1(functorIsMacro(vtSize)).
- % Found positive trigger: functorIsMacro(vtSize)
- % body: compound(functorIsMacro(vtSize)),\+is_ftVar(functorIsMacro(vtSize))*->rhs([{with_current_why(functorIsMacro(vtSize),ignore(\+addAdmittedArguments(functorIsMacro(vtSize))))}])
- % Found positive trigger: functorIsMacro(vtSize)
- % body: is_kif_clause(functorIsMacro(vtSize))*->rhs([clif(functorIsMacro(vtSize))])
- % Found positive trigger: functorIsMacro(vtSize)
- % body: compound(functorIsMacro(vtSize)),\+is_ftVar(functorIsMacro(vtSize))*->rhs([{with_current_why(functorIsMacro(vtSize),ignore(\+addAdmittedArguments(functorIsMacro(vtSize))))}])
- % Found positive trigger: functorDeclares(vtSize)
- % body: compound(functorDeclares(vtSize)),\+is_ftVar(functorDeclares(vtSize))*->rhs([{with_current_why(functorDeclares(vtSize),ignore(\+addAdmittedArguments(functorDeclares(vtSize))))}])
- % Found positive trigger: functorDeclares(vtSize)
- % body: is_kif_clause(functorDeclares(vtSize))*->rhs([clif(functorDeclares(vtSize))])
- % Found positive trigger: functorDeclares(vtSize)
- % body: compound(functorDeclares(vtSize)),\+is_ftVar(functorDeclares(vtSize))*->rhs([{with_current_why(functorDeclares(vtSize),ignore(\+addAdmittedArguments(functorDeclares(vtSize))))}])
- % Found positive trigger: tSet(vtSize)
- % body: rhs([tCol(vtSize),\+ttExpressionType(vtSize)])
- % RHS-Post1: tCol(vtSize)
- % Support: tSet(vtSize),pt(tSet(vtSize),rhs([tCol(vtSize),\+ttExpressionType(vtSize)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(vtSize)
- % Support: tSet(vtSize),pt(tSet(vtSize),rhs([tCol(vtSize),\+ttExpressionType(vtSize)]))
- % Removing (withdraw1)
- % term: ttExpressionType(vtSize)
- % support (was): _27944,_27946
- % Couldn't retract_i: spft(ttExpressionType(vtSize),_32510,_32512).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(vtSize))).
- % Found positive trigger: tSet(vtSize)
- % body: rhs([tCol(vtSize)])
- % RHS-Post1: tCol(vtSize)
- % Support: tSet(vtSize),pt(tSet(vtSize),rhs([tCol(vtSize)]))
- % Found positive trigger: tSet(vtSize)
- % body: compound(tSet(vtSize)),\+is_ftVar(tSet(vtSize))*->rhs([{with_current_why(tSet(vtSize),ignore(\+addAdmittedArguments(tSet(vtSize))))}])
- % Found positive trigger: tSet(vtSize)
- % body: is_kif_clause(tSet(vtSize))*->rhs([clif(tSet(vtSize))])
- % Found positive trigger: tSet(vtSize)
- % body: compound(tSet(vtSize)),\+is_ftVar(tSet(vtSize))*->rhs([{with_current_why(tSet(vtSize),ignore(\+addAdmittedArguments(tSet(vtSize))))}])
- % Found positive trigger: tCol(vtSize)
- % body: is_kif_clause(tCol(vtSize))*->rhs([clif(tCol(vtSize))])
- % Found positive trigger: tCol(vtSize)
- % body: compound(tCol(vtSize)),\+is_ftVar(tCol(vtSize))*->rhs([{with_current_why(tCol(vtSize),ignore(\+addAdmittedArguments(tCol(vtSize))))}])
- % RHS-Post1: tCol(tTemporalThing)
- % Support: admittedArgument(argIsa,3,tTemporalThing),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(tTemporalThing)).
- % Found positive trigger: tCol(tTemporalThing)
- % body: rhs([{decl_type(tTemporalThing),kb_local(tTemporalThing/1)}])
- % Found positive trigger: tCol(tTemporalThing)
- % body: rhs([arity(tTemporalThing,1)])
- % RHS-Post1: arity(tTemporalThing,1)
- % Support: tCol(tTemporalThing),pt(tCol(tTemporalThing),rhs([arity(tTemporalThing,1)]))
- % Found positive trigger: tCol(tTemporalThing)
- % body: compound(tCol(tTemporalThing)),\+is_ftVar(tCol(tTemporalThing))*->rhs([{with_current_why(tCol(tTemporalThing),ignore(\+addAdmittedArguments(tCol(tTemporalThing))))}])
- % Found positive trigger: tCol(tTemporalThing)
- % body: \+ttExpressionType(tTemporalThing)*->rhs([tSet(tTemporalThing)])
- % RHS-Post1: tSet(tTemporalThing)
- % Support: tCol(tTemporalThing),pt(tCol(tTemporalThing),(\+ttExpressionType(tTemporalThing)*->rhs([tSet(tTemporalThing)])))
- % r_sane:mpred_fwc1(tSet(tTemporalThing)).
- % Found positive trigger: tSet(tTemporalThing)
- % body: rhs([functorDeclares(tTemporalThing)])
- % RHS-Post1: functorDeclares(tTemporalThing)
- % Support: tSet(tTemporalThing),pt(tSet(tTemporalThing),rhs([functorDeclares(tTemporalThing)]))
- % r_sane:mpred_fwc1(functorDeclares(tTemporalThing)).
- % Found positive trigger: functorDeclares(tTemporalThing)
- % body: rhs([arityMax(tTemporalThing,1),functorIsMacro(tTemporalThing)])
- % RHS-Post1: arityMax(tTemporalThing,1)
- % Support: functorDeclares(tTemporalThing),pt(functorDeclares(tTemporalThing),rhs([arityMax(tTemporalThing,1),functorIsMacro(tTemporalThing)]))
- % r_sane:mpred_fwc1(arityMax(tTemporalThing, 1)).
- % Found positive trigger: arityMax(tTemporalThing,1)
- % body: compound(arityMax(tTemporalThing,1)),\+is_ftVar(arityMax(tTemporalThing,1))*->rhs([{with_current_why(arityMax(tTemporalThing,1),ignore(\+addAdmittedArguments(arityMax(tTemporalThing,1))))}])
- % Found positive trigger: arityMax(tTemporalThing,1)
- % body: is_kif_clause(arityMax(tTemporalThing,1))*->rhs([clif(arityMax(tTemporalThing,1))])
- % Found positive trigger: arityMax(tTemporalThing,1)
- % body: compound(arityMax(tTemporalThing,1)),\+is_ftVar(arityMax(tTemporalThing,1))*->rhs([{with_current_why(arityMax(tTemporalThing,1),ignore(\+addAdmittedArguments(arityMax(tTemporalThing,1))))}])
- % RHS-Post1: functorIsMacro(tTemporalThing)
- % Support: functorDeclares(tTemporalThing),pt(functorDeclares(tTemporalThing),rhs([arityMax(tTemporalThing,1),functorIsMacro(tTemporalThing)]))
- % r_sane:mpred_fwc1(functorIsMacro(tTemporalThing)).
- % Found positive trigger: functorIsMacro(tTemporalThing)
- % body: compound(functorIsMacro(tTemporalThing)),\+is_ftVar(functorIsMacro(tTemporalThing))*->rhs([{with_current_why(functorIsMacro(tTemporalThing),ignore(\+addAdmittedArguments(functorIsMacro(tTemporalThing))))}])
- % Found positive trigger: functorIsMacro(tTemporalThing)
- % body: is_kif_clause(functorIsMacro(tTemporalThing))*->rhs([clif(functorIsMacro(tTemporalThing))])
- % Found positive trigger: functorIsMacro(tTemporalThing)
- % body: compound(functorIsMacro(tTemporalThing)),\+is_ftVar(functorIsMacro(tTemporalThing))*->rhs([{with_current_why(functorIsMacro(tTemporalThing),ignore(\+addAdmittedArguments(functorIsMacro(tTemporalThing))))}])
- % Found positive trigger: functorDeclares(tTemporalThing)
- % body: compound(functorDeclares(tTemporalThing)),\+is_ftVar(functorDeclares(tTemporalThing))*->rhs([{with_current_why(functorDeclares(tTemporalThing),ignore(\+addAdmittedArguments(functorDeclares(tTemporalThing))))}])
- % Found positive trigger: functorDeclares(tTemporalThing)
- % body: is_kif_clause(functorDeclares(tTemporalThing))*->rhs([clif(functorDeclares(tTemporalThing))])
- % Found positive trigger: functorDeclares(tTemporalThing)
- % body: compound(functorDeclares(tTemporalThing)),\+is_ftVar(functorDeclares(tTemporalThing))*->rhs([{with_current_why(functorDeclares(tTemporalThing),ignore(\+addAdmittedArguments(functorDeclares(tTemporalThing))))}])
- % Found positive trigger: tSet(tTemporalThing)
- % body: rhs([tCol(tTemporalThing),\+ttExpressionType(tTemporalThing)])
- % RHS-Post1: tCol(tTemporalThing)
- % Support: tSet(tTemporalThing),pt(tSet(tTemporalThing),rhs([tCol(tTemporalThing),\+ttExpressionType(tTemporalThing)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tTemporalThing)
- % Support: tSet(tTemporalThing),pt(tSet(tTemporalThing),rhs([tCol(tTemporalThing),\+ttExpressionType(tTemporalThing)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tTemporalThing)
- % support (was): _28080,_28082
- % Couldn't retract_i: spft(ttExpressionType(tTemporalThing),_32650,_32652).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tTemporalThing))).
- % Found positive trigger: tSet(tTemporalThing)
- % body: rhs([tCol(tTemporalThing)])
- % RHS-Post1: tCol(tTemporalThing)
- % Support: tSet(tTemporalThing),pt(tSet(tTemporalThing),rhs([tCol(tTemporalThing)]))
- % Found positive trigger: tSet(tTemporalThing)
- % body: compound(tSet(tTemporalThing)),\+is_ftVar(tSet(tTemporalThing))*->rhs([{with_current_why(tSet(tTemporalThing),ignore(\+addAdmittedArguments(tSet(tTemporalThing))))}])
- % Found positive trigger: tSet(tTemporalThing)
- % body: is_kif_clause(tSet(tTemporalThing))*->rhs([clif(tSet(tTemporalThing))])
- % Found positive trigger: tSet(tTemporalThing)
- % body: compound(tSet(tTemporalThing)),\+is_ftVar(tSet(tTemporalThing))*->rhs([{with_current_why(tSet(tTemporalThing),ignore(\+addAdmittedArguments(tSet(tTemporalThing))))}])
- % Found positive trigger: tCol(tTemporalThing)
- % body: is_kif_clause(tCol(tTemporalThing))*->rhs([clif(tCol(tTemporalThing))])
- % Found positive trigger: tCol(tTemporalThing)
- % body: compound(tCol(tTemporalThing)),\+is_ftVar(tCol(tTemporalThing))*->rhs([{with_current_why(tCol(tTemporalThing),ignore(\+addAdmittedArguments(tCol(tTemporalThing))))}])
- % RHS-Post1: tCol(vtTexture)
- % Support: admittedArgument(argIsa,3,vtTexture),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(vtTexture)).
- % Found positive trigger: tCol(vtTexture)
- % body: rhs([{decl_type(vtTexture),kb_local(vtTexture/1)}])
- % Found positive trigger: tCol(vtTexture)
- % body: rhs([arity(vtTexture,1)])
- % RHS-Post1: arity(vtTexture,1)
- % Support: tCol(vtTexture),pt(tCol(vtTexture),rhs([arity(vtTexture,1)]))
- % Found positive trigger: tCol(vtTexture)
- % body: compound(tCol(vtTexture)),\+is_ftVar(tCol(vtTexture))*->rhs([{with_current_why(tCol(vtTexture),ignore(\+addAdmittedArguments(tCol(vtTexture))))}])
- % Found positive trigger: tCol(vtTexture)
- % body: \+ttExpressionType(vtTexture)*->rhs([tSet(vtTexture)])
- % RHS-Post1: tSet(vtTexture)
- % Support: tCol(vtTexture),pt(tCol(vtTexture),(\+ttExpressionType(vtTexture)*->rhs([tSet(vtTexture)])))
- % r_sane:mpred_fwc1(tSet(vtTexture)).
- % Found positive trigger: tSet(vtTexture)
- % body: rhs([functorDeclares(vtTexture)])
- % RHS-Post1: functorDeclares(vtTexture)
- % Support: tSet(vtTexture),pt(tSet(vtTexture),rhs([functorDeclares(vtTexture)]))
- % r_sane:mpred_fwc1(functorDeclares(vtTexture)).
- % Found positive trigger: functorDeclares(vtTexture)
- % body: rhs([arityMax(vtTexture,1),functorIsMacro(vtTexture)])
- % RHS-Post1: arityMax(vtTexture,1)
- % Support: functorDeclares(vtTexture),pt(functorDeclares(vtTexture),rhs([arityMax(vtTexture,1),functorIsMacro(vtTexture)]))
- % r_sane:mpred_fwc1(arityMax(vtTexture, 1)).
- % Found positive trigger: arityMax(vtTexture,1)
- % body: compound(arityMax(vtTexture,1)),\+is_ftVar(arityMax(vtTexture,1))*->rhs([{with_current_why(arityMax(vtTexture,1),ignore(\+addAdmittedArguments(arityMax(vtTexture,1))))}])
- % Found positive trigger: arityMax(vtTexture,1)
- % body: is_kif_clause(arityMax(vtTexture,1))*->rhs([clif(arityMax(vtTexture,1))])
- % Found positive trigger: arityMax(vtTexture,1)
- % body: compound(arityMax(vtTexture,1)),\+is_ftVar(arityMax(vtTexture,1))*->rhs([{with_current_why(arityMax(vtTexture,1),ignore(\+addAdmittedArguments(arityMax(vtTexture,1))))}])
- % RHS-Post1: functorIsMacro(vtTexture)
- % Support: functorDeclares(vtTexture),pt(functorDeclares(vtTexture),rhs([arityMax(vtTexture,1),functorIsMacro(vtTexture)]))
- % r_sane:mpred_fwc1(functorIsMacro(vtTexture)).
- % Found positive trigger: functorIsMacro(vtTexture)
- % body: compound(functorIsMacro(vtTexture)),\+is_ftVar(functorIsMacro(vtTexture))*->rhs([{with_current_why(functorIsMacro(vtTexture),ignore(\+addAdmittedArguments(functorIsMacro(vtTexture))))}])
- % Found positive trigger: functorIsMacro(vtTexture)
- % body: is_kif_clause(functorIsMacro(vtTexture))*->rhs([clif(functorIsMacro(vtTexture))])
- % Found positive trigger: functorIsMacro(vtTexture)
- % body: compound(functorIsMacro(vtTexture)),\+is_ftVar(functorIsMacro(vtTexture))*->rhs([{with_current_why(functorIsMacro(vtTexture),ignore(\+addAdmittedArguments(functorIsMacro(vtTexture))))}])
- % Found positive trigger: functorDeclares(vtTexture)
- % body: compound(functorDeclares(vtTexture)),\+is_ftVar(functorDeclares(vtTexture))*->rhs([{with_current_why(functorDeclares(vtTexture),ignore(\+addAdmittedArguments(functorDeclares(vtTexture))))}])
- % Found positive trigger: functorDeclares(vtTexture)
- % body: is_kif_clause(functorDeclares(vtTexture))*->rhs([clif(functorDeclares(vtTexture))])
- % Found positive trigger: functorDeclares(vtTexture)
- % body: compound(functorDeclares(vtTexture)),\+is_ftVar(functorDeclares(vtTexture))*->rhs([{with_current_why(functorDeclares(vtTexture),ignore(\+addAdmittedArguments(functorDeclares(vtTexture))))}])
- % Found positive trigger: tSet(vtTexture)
- % body: rhs([tCol(vtTexture),\+ttExpressionType(vtTexture)])
- % RHS-Post1: tCol(vtTexture)
- % Support: tSet(vtTexture),pt(tSet(vtTexture),rhs([tCol(vtTexture),\+ttExpressionType(vtTexture)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(vtTexture)
- % Support: tSet(vtTexture),pt(tSet(vtTexture),rhs([tCol(vtTexture),\+ttExpressionType(vtTexture)]))
- % Removing (withdraw1)
- % term: ttExpressionType(vtTexture)
- % support (was): _28020,_28022
- % Couldn't retract_i: spft(ttExpressionType(vtTexture),_32588,_32590).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(vtTexture))).
- % Found positive trigger: tSet(vtTexture)
- % body: rhs([tCol(vtTexture)])
- % RHS-Post1: tCol(vtTexture)
- % Support: tSet(vtTexture),pt(tSet(vtTexture),rhs([tCol(vtTexture)]))
- % Found positive trigger: tSet(vtTexture)
- % body: compound(tSet(vtTexture)),\+is_ftVar(tSet(vtTexture))*->rhs([{with_current_why(tSet(vtTexture),ignore(\+addAdmittedArguments(tSet(vtTexture))))}])
- % Found positive trigger: tSet(vtTexture)
- % body: is_kif_clause(tSet(vtTexture))*->rhs([clif(tSet(vtTexture))])
- % Found positive trigger: tSet(vtTexture)
- % body: compound(tSet(vtTexture)),\+is_ftVar(tSet(vtTexture))*->rhs([{with_current_why(tSet(vtTexture),ignore(\+addAdmittedArguments(tSet(vtTexture))))}])
- % Found positive trigger: tCol(vtTexture)
- % body: is_kif_clause(tCol(vtTexture))*->rhs([clif(tCol(vtTexture))])
- % Found positive trigger: tCol(vtTexture)
- % body: compound(tCol(vtTexture)),\+is_ftVar(tCol(vtTexture))*->rhs([{with_current_why(tCol(vtTexture),ignore(\+addAdmittedArguments(tCol(vtTexture))))}])
- % RHS-Post1: tCol(vtColor)
- % Support: admittedArgument(argIsa,3,vtColor),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(vtColor)).
- % Found positive trigger: tCol(vtColor)
- % body: rhs([{decl_type(vtColor),kb_local(vtColor/1)}])
- % Found positive trigger: tCol(vtColor)
- % body: rhs([arity(vtColor,1)])
- % RHS-Post1: arity(vtColor,1)
- % Support: tCol(vtColor),pt(tCol(vtColor),rhs([arity(vtColor,1)]))
- % Found positive trigger: tCol(vtColor)
- % body: compound(tCol(vtColor)),\+is_ftVar(tCol(vtColor))*->rhs([{with_current_why(tCol(vtColor),ignore(\+addAdmittedArguments(tCol(vtColor))))}])
- % Found positive trigger: tCol(vtColor)
- % body: \+ttExpressionType(vtColor)*->rhs([tSet(vtColor)])
- % RHS-Post1: tSet(vtColor)
- % Support: tCol(vtColor),pt(tCol(vtColor),(\+ttExpressionType(vtColor)*->rhs([tSet(vtColor)])))
- % r_sane:mpred_fwc1(tSet(vtColor)).
- % Found positive trigger: tSet(vtColor)
- % body: rhs([functorDeclares(vtColor)])
- % RHS-Post1: functorDeclares(vtColor)
- % Support: tSet(vtColor),pt(tSet(vtColor),rhs([functorDeclares(vtColor)]))
- % r_sane:mpred_fwc1(functorDeclares(vtColor)).
- % Found positive trigger: functorDeclares(vtColor)
- % body: rhs([arityMax(vtColor,1),functorIsMacro(vtColor)])
- % RHS-Post1: arityMax(vtColor,1)
- % Support: functorDeclares(vtColor),pt(functorDeclares(vtColor),rhs([arityMax(vtColor,1),functorIsMacro(vtColor)]))
- % r_sane:mpred_fwc1(arityMax(vtColor, 1)).
- % Found positive trigger: arityMax(vtColor,1)
- % body: compound(arityMax(vtColor,1)),\+is_ftVar(arityMax(vtColor,1))*->rhs([{with_current_why(arityMax(vtColor,1),ignore(\+addAdmittedArguments(arityMax(vtColor,1))))}])
- % Found positive trigger: arityMax(vtColor,1)
- % body: is_kif_clause(arityMax(vtColor,1))*->rhs([clif(arityMax(vtColor,1))])
- % Found positive trigger: arityMax(vtColor,1)
- % body: compound(arityMax(vtColor,1)),\+is_ftVar(arityMax(vtColor,1))*->rhs([{with_current_why(arityMax(vtColor,1),ignore(\+addAdmittedArguments(arityMax(vtColor,1))))}])
- % RHS-Post1: functorIsMacro(vtColor)
- % Support: functorDeclares(vtColor),pt(functorDeclares(vtColor),rhs([arityMax(vtColor,1),functorIsMacro(vtColor)]))
- % r_sane:mpred_fwc1(functorIsMacro(vtColor)).
- % Found positive trigger: functorIsMacro(vtColor)
- % body: compound(functorIsMacro(vtColor)),\+is_ftVar(functorIsMacro(vtColor))*->rhs([{with_current_why(functorIsMacro(vtColor),ignore(\+addAdmittedArguments(functorIsMacro(vtColor))))}])
- % Found positive trigger: functorIsMacro(vtColor)
- % body: is_kif_clause(functorIsMacro(vtColor))*->rhs([clif(functorIsMacro(vtColor))])
- % Found positive trigger: functorIsMacro(vtColor)
- % body: compound(functorIsMacro(vtColor)),\+is_ftVar(functorIsMacro(vtColor))*->rhs([{with_current_why(functorIsMacro(vtColor),ignore(\+addAdmittedArguments(functorIsMacro(vtColor))))}])
- % Found positive trigger: functorDeclares(vtColor)
- % body: compound(functorDeclares(vtColor)),\+is_ftVar(functorDeclares(vtColor))*->rhs([{with_current_why(functorDeclares(vtColor),ignore(\+addAdmittedArguments(functorDeclares(vtColor))))}])
- % Found positive trigger: functorDeclares(vtColor)
- % body: is_kif_clause(functorDeclares(vtColor))*->rhs([clif(functorDeclares(vtColor))])
- % Found positive trigger: functorDeclares(vtColor)
- % body: compound(functorDeclares(vtColor)),\+is_ftVar(functorDeclares(vtColor))*->rhs([{with_current_why(functorDeclares(vtColor),ignore(\+addAdmittedArguments(functorDeclares(vtColor))))}])
- % Found positive trigger: tSet(vtColor)
- % body: rhs([tCol(vtColor),\+ttExpressionType(vtColor)])
- % RHS-Post1: tCol(vtColor)
- % Support: tSet(vtColor),pt(tSet(vtColor),rhs([tCol(vtColor),\+ttExpressionType(vtColor)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(vtColor)
- % Support: tSet(vtColor),pt(tSet(vtColor),rhs([tCol(vtColor),\+ttExpressionType(vtColor)]))
- % Removing (withdraw1)
- % term: ttExpressionType(vtColor)
- % support (was): _28028,_28030
- % Couldn't retract_i: spft(ttExpressionType(vtColor),_32594,_32596).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(vtColor))).
- % Found positive trigger: tSet(vtColor)
- % body: rhs([tCol(vtColor)])
- % RHS-Post1: tCol(vtColor)
- % Support: tSet(vtColor),pt(tSet(vtColor),rhs([tCol(vtColor)]))
- % Found positive trigger: tSet(vtColor)
- % body: compound(tSet(vtColor)),\+is_ftVar(tSet(vtColor))*->rhs([{with_current_why(tSet(vtColor),ignore(\+addAdmittedArguments(tSet(vtColor))))}])
- % Found positive trigger: tSet(vtColor)
- % body: is_kif_clause(tSet(vtColor))*->rhs([clif(tSet(vtColor))])
- % Found positive trigger: tSet(vtColor)
- % body: compound(tSet(vtColor)),\+is_ftVar(tSet(vtColor))*->rhs([{with_current_why(tSet(vtColor),ignore(\+addAdmittedArguments(tSet(vtColor))))}])
- % Found positive trigger: tCol(vtColor)
- % body: is_kif_clause(tCol(vtColor))*->rhs([clif(tCol(vtColor))])
- % Found positive trigger: tCol(vtColor)
- % body: compound(tCol(vtColor)),\+is_ftVar(tCol(vtColor))*->rhs([{with_current_why(tCol(vtColor),ignore(\+addAdmittedArguments(tCol(vtColor))))}])
- % RHS-Post1: tCol(vtShape)
- % Support: admittedArgument(argIsa,3,vtShape),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(vtShape)).
- % Found positive trigger: tCol(vtShape)
- % body: rhs([{decl_type(vtShape),kb_local(vtShape/1)}])
- % Found positive trigger: tCol(vtShape)
- % body: rhs([arity(vtShape,1)])
- % RHS-Post1: arity(vtShape,1)
- % Support: tCol(vtShape),pt(tCol(vtShape),rhs([arity(vtShape,1)]))
- % Found positive trigger: tCol(vtShape)
- % body: compound(tCol(vtShape)),\+is_ftVar(tCol(vtShape))*->rhs([{with_current_why(tCol(vtShape),ignore(\+addAdmittedArguments(tCol(vtShape))))}])
- % Found positive trigger: tCol(vtShape)
- % body: \+ttExpressionType(vtShape)*->rhs([tSet(vtShape)])
- % RHS-Post1: tSet(vtShape)
- % Support: tCol(vtShape),pt(tCol(vtShape),(\+ttExpressionType(vtShape)*->rhs([tSet(vtShape)])))
- % r_sane:mpred_fwc1(tSet(vtShape)).
- % Found positive trigger: tSet(vtShape)
- % body: rhs([functorDeclares(vtShape)])
- % RHS-Post1: functorDeclares(vtShape)
- % Support: tSet(vtShape),pt(tSet(vtShape),rhs([functorDeclares(vtShape)]))
- % r_sane:mpred_fwc1(functorDeclares(vtShape)).
- % Found positive trigger: functorDeclares(vtShape)
- % body: rhs([arityMax(vtShape,1),functorIsMacro(vtShape)])
- % RHS-Post1: arityMax(vtShape,1)
- % Support: functorDeclares(vtShape),pt(functorDeclares(vtShape),rhs([arityMax(vtShape,1),functorIsMacro(vtShape)]))
- % r_sane:mpred_fwc1(arityMax(vtShape, 1)).
- % Found positive trigger: arityMax(vtShape,1)
- % body: compound(arityMax(vtShape,1)),\+is_ftVar(arityMax(vtShape,1))*->rhs([{with_current_why(arityMax(vtShape,1),ignore(\+addAdmittedArguments(arityMax(vtShape,1))))}])
- % Found positive trigger: arityMax(vtShape,1)
- % body: is_kif_clause(arityMax(vtShape,1))*->rhs([clif(arityMax(vtShape,1))])
- % Found positive trigger: arityMax(vtShape,1)
- % body: compound(arityMax(vtShape,1)),\+is_ftVar(arityMax(vtShape,1))*->rhs([{with_current_why(arityMax(vtShape,1),ignore(\+addAdmittedArguments(arityMax(vtShape,1))))}])
- % RHS-Post1: functorIsMacro(vtShape)
- % Support: functorDeclares(vtShape),pt(functorDeclares(vtShape),rhs([arityMax(vtShape,1),functorIsMacro(vtShape)]))
- % r_sane:mpred_fwc1(functorIsMacro(vtShape)).
- % Found positive trigger: functorIsMacro(vtShape)
- % body: compound(functorIsMacro(vtShape)),\+is_ftVar(functorIsMacro(vtShape))*->rhs([{with_current_why(functorIsMacro(vtShape),ignore(\+addAdmittedArguments(functorIsMacro(vtShape))))}])
- % Found positive trigger: functorIsMacro(vtShape)
- % body: is_kif_clause(functorIsMacro(vtShape))*->rhs([clif(functorIsMacro(vtShape))])
- % Found positive trigger: functorIsMacro(vtShape)
- % body: compound(functorIsMacro(vtShape)),\+is_ftVar(functorIsMacro(vtShape))*->rhs([{with_current_why(functorIsMacro(vtShape),ignore(\+addAdmittedArguments(functorIsMacro(vtShape))))}])
- % Found positive trigger: functorDeclares(vtShape)
- % body: compound(functorDeclares(vtShape)),\+is_ftVar(functorDeclares(vtShape))*->rhs([{with_current_why(functorDeclares(vtShape),ignore(\+addAdmittedArguments(functorDeclares(vtShape))))}])
- % Found positive trigger: functorDeclares(vtShape)
- % body: is_kif_clause(functorDeclares(vtShape))*->rhs([clif(functorDeclares(vtShape))])
- % Found positive trigger: functorDeclares(vtShape)
- % body: compound(functorDeclares(vtShape)),\+is_ftVar(functorDeclares(vtShape))*->rhs([{with_current_why(functorDeclares(vtShape),ignore(\+addAdmittedArguments(functorDeclares(vtShape))))}])
- % Found positive trigger: tSet(vtShape)
- % body: rhs([tCol(vtShape),\+ttExpressionType(vtShape)])
- % RHS-Post1: tCol(vtShape)
- % Support: tSet(vtShape),pt(tSet(vtShape),rhs([tCol(vtShape),\+ttExpressionType(vtShape)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(vtShape)
- % Support: tSet(vtShape),pt(tSet(vtShape),rhs([tCol(vtShape),\+ttExpressionType(vtShape)]))
- % Removing (withdraw1)
- % term: ttExpressionType(vtShape)
- % support (was): _28064,_28066
- % Couldn't retract_i: spft(ttExpressionType(vtShape),_32630,_32632).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(vtShape))).
- % Found positive trigger: tSet(vtShape)
- % body: rhs([tCol(vtShape)])
- % RHS-Post1: tCol(vtShape)
- % Support: tSet(vtShape),pt(tSet(vtShape),rhs([tCol(vtShape)]))
- % Found positive trigger: tSet(vtShape)
- % body: compound(tSet(vtShape)),\+is_ftVar(tSet(vtShape))*->rhs([{with_current_why(tSet(vtShape),ignore(\+addAdmittedArguments(tSet(vtShape))))}])
- % Found positive trigger: tSet(vtShape)
- % body: is_kif_clause(tSet(vtShape))*->rhs([clif(tSet(vtShape))])
- % Found positive trigger: tSet(vtShape)
- % body: compound(tSet(vtShape)),\+is_ftVar(tSet(vtShape))*->rhs([{with_current_why(tSet(vtShape),ignore(\+addAdmittedArguments(tSet(vtShape))))}])
- % Found positive trigger: tCol(vtShape)
- % body: is_kif_clause(tCol(vtShape))*->rhs([clif(tCol(vtShape))])
- % Found positive trigger: tCol(vtShape)
- % body: compound(tCol(vtShape)),\+is_ftVar(tCol(vtShape))*->rhs([{with_current_why(tCol(vtShape),ignore(\+addAdmittedArguments(tCol(vtShape))))}])
- % RHS-Post1: tCol(vtMaterial)
- % Support: admittedArgument(argIsa,3,vtMaterial),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(vtMaterial)).
- % Found positive trigger: tCol(vtMaterial)
- % body: rhs([{decl_type(vtMaterial),kb_local(vtMaterial/1)}])
- % Found positive trigger: tCol(vtMaterial)
- % body: rhs([arity(vtMaterial,1)])
- % RHS-Post1: arity(vtMaterial,1)
- % Support: tCol(vtMaterial),pt(tCol(vtMaterial),rhs([arity(vtMaterial,1)]))
- % Found positive trigger: tCol(vtMaterial)
- % body: compound(tCol(vtMaterial)),\+is_ftVar(tCol(vtMaterial))*->rhs([{with_current_why(tCol(vtMaterial),ignore(\+addAdmittedArguments(tCol(vtMaterial))))}])
- % Found positive trigger: tCol(vtMaterial)
- % body: \+ttExpressionType(vtMaterial)*->rhs([tSet(vtMaterial)])
- % RHS-Post1: tSet(vtMaterial)
- % Support: tCol(vtMaterial),pt(tCol(vtMaterial),(\+ttExpressionType(vtMaterial)*->rhs([tSet(vtMaterial)])))
- % r_sane:mpred_fwc1(tSet(vtMaterial)).
- % Found positive trigger: tSet(vtMaterial)
- % body: rhs([functorDeclares(vtMaterial)])
- % RHS-Post1: functorDeclares(vtMaterial)
- % Support: tSet(vtMaterial),pt(tSet(vtMaterial),rhs([functorDeclares(vtMaterial)]))
- % r_sane:mpred_fwc1(functorDeclares(vtMaterial)).
- % Found positive trigger: functorDeclares(vtMaterial)
- % body: rhs([arityMax(vtMaterial,1),functorIsMacro(vtMaterial)])
- % RHS-Post1: arityMax(vtMaterial,1)
- % Support: functorDeclares(vtMaterial),pt(functorDeclares(vtMaterial),rhs([arityMax(vtMaterial,1),functorIsMacro(vtMaterial)]))
- % r_sane:mpred_fwc1(arityMax(vtMaterial, 1)).
- % Found positive trigger: arityMax(vtMaterial,1)
- % body: compound(arityMax(vtMaterial,1)),\+is_ftVar(arityMax(vtMaterial,1))*->rhs([{with_current_why(arityMax(vtMaterial,1),ignore(\+addAdmittedArguments(arityMax(vtMaterial,1))))}])
- % Found positive trigger: arityMax(vtMaterial,1)
- % body: is_kif_clause(arityMax(vtMaterial,1))*->rhs([clif(arityMax(vtMaterial,1))])
- % Found positive trigger: arityMax(vtMaterial,1)
- % body: compound(arityMax(vtMaterial,1)),\+is_ftVar(arityMax(vtMaterial,1))*->rhs([{with_current_why(arityMax(vtMaterial,1),ignore(\+addAdmittedArguments(arityMax(vtMaterial,1))))}])
- % RHS-Post1: functorIsMacro(vtMaterial)
- % Support: functorDeclares(vtMaterial),pt(functorDeclares(vtMaterial),rhs([arityMax(vtMaterial,1),functorIsMacro(vtMaterial)]))
- % r_sane:mpred_fwc1(functorIsMacro(vtMaterial)).
- % Found positive trigger: functorIsMacro(vtMaterial)
- % body: compound(functorIsMacro(vtMaterial)),\+is_ftVar(functorIsMacro(vtMaterial))*->rhs([{with_current_why(functorIsMacro(vtMaterial),ignore(\+addAdmittedArguments(functorIsMacro(vtMaterial))))}])
- % Found positive trigger: functorIsMacro(vtMaterial)
- % body: is_kif_clause(functorIsMacro(vtMaterial))*->rhs([clif(functorIsMacro(vtMaterial))])
- % Found positive trigger: functorIsMacro(vtMaterial)
- % body: compound(functorIsMacro(vtMaterial)),\+is_ftVar(functorIsMacro(vtMaterial))*->rhs([{with_current_why(functorIsMacro(vtMaterial),ignore(\+addAdmittedArguments(functorIsMacro(vtMaterial))))}])
- % Found positive trigger: functorDeclares(vtMaterial)
- % body: compound(functorDeclares(vtMaterial)),\+is_ftVar(functorDeclares(vtMaterial))*->rhs([{with_current_why(functorDeclares(vtMaterial),ignore(\+addAdmittedArguments(functorDeclares(vtMaterial))))}])
- % Found positive trigger: functorDeclares(vtMaterial)
- % body: is_kif_clause(functorDeclares(vtMaterial))*->rhs([clif(functorDeclares(vtMaterial))])
- % Found positive trigger: functorDeclares(vtMaterial)
- % body: compound(functorDeclares(vtMaterial)),\+is_ftVar(functorDeclares(vtMaterial))*->rhs([{with_current_why(functorDeclares(vtMaterial),ignore(\+addAdmittedArguments(functorDeclares(vtMaterial))))}])
- % Found positive trigger: tSet(vtMaterial)
- % body: rhs([tCol(vtMaterial),\+ttExpressionType(vtMaterial)])
- % RHS-Post1: tCol(vtMaterial)
- % Support: tSet(vtMaterial),pt(tSet(vtMaterial),rhs([tCol(vtMaterial),\+ttExpressionType(vtMaterial)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(vtMaterial)
- % Support: tSet(vtMaterial),pt(tSet(vtMaterial),rhs([tCol(vtMaterial),\+ttExpressionType(vtMaterial)]))
- % Removing (withdraw1)
- % term: ttExpressionType(vtMaterial)
- % support (was): _28100,_28102
- % Couldn't retract_i: spft(ttExpressionType(vtMaterial),_32668,_32670).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(vtMaterial))).
- % Found positive trigger: tSet(vtMaterial)
- % body: rhs([tCol(vtMaterial)])
- % RHS-Post1: tCol(vtMaterial)
- % Support: tSet(vtMaterial),pt(tSet(vtMaterial),rhs([tCol(vtMaterial)]))
- % Found positive trigger: tSet(vtMaterial)
- % body: compound(tSet(vtMaterial)),\+is_ftVar(tSet(vtMaterial))*->rhs([{with_current_why(tSet(vtMaterial),ignore(\+addAdmittedArguments(tSet(vtMaterial))))}])
- % Found positive trigger: tSet(vtMaterial)
- % body: is_kif_clause(tSet(vtMaterial))*->rhs([clif(tSet(vtMaterial))])
- % Found positive trigger: tSet(vtMaterial)
- % body: compound(tSet(vtMaterial)),\+is_ftVar(tSet(vtMaterial))*->rhs([{with_current_why(tSet(vtMaterial),ignore(\+addAdmittedArguments(tSet(vtMaterial))))}])
- % Found positive trigger: tCol(vtMaterial)
- % body: is_kif_clause(tCol(vtMaterial))*->rhs([clif(tCol(vtMaterial))])
- % Found positive trigger: tCol(vtMaterial)
- % body: compound(tCol(vtMaterial)),\+is_ftVar(tCol(vtMaterial))*->rhs([{with_current_why(tCol(vtMaterial),ignore(\+addAdmittedArguments(tCol(vtMaterial))))}])
- % RHS-Post1: tCol(tPred)
- % Support: admittedArgument(argIsa,3,tPred),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(tPred)).
- % Found positive trigger: tCol(tPred)
- % body: rhs([{decl_type(tPred),kb_local(tPred/1)}])
- % Found positive trigger: tCol(tPred)
- % body: rhs([arity(tPred,1)])
- % RHS-Post1: arity(tPred,1)
- % Support: tCol(tPred),pt(tCol(tPred),rhs([arity(tPred,1)]))
- % Found positive trigger: tCol(tPred)
- % body: compound(tCol(tPred)),\+is_ftVar(tCol(tPred))*->rhs([{with_current_why(tCol(tPred),ignore(\+addAdmittedArguments(tCol(tPred))))}])
- % Found positive trigger: tCol(tPred)
- % body: \+ttExpressionType(tPred)*->rhs([tSet(tPred)])
- % RHS-Post1: tSet(tPred)
- % Support: tCol(tPred),pt(tCol(tPred),(\+ttExpressionType(tPred)*->rhs([tSet(tPred)])))
- % r_sane:mpred_fwc1(tSet(tPred)).
- % Found positive trigger: tSet(tPred)
- % body: rhs([functorDeclares(tPred)])
- % RHS-Post1: functorDeclares(tPred)
- % Support: tSet(tPred),pt(tSet(tPred),rhs([functorDeclares(tPred)]))
- % r_sane:mpred_fwc1(functorDeclares(tPred)).
- % Found positive trigger: functorDeclares(tPred)
- % body: rhs([arityMax(tPred,1),functorIsMacro(tPred)])
- % RHS-Post1: arityMax(tPred,1)
- % Support: functorDeclares(tPred),pt(functorDeclares(tPred),rhs([arityMax(tPred,1),functorIsMacro(tPred)]))
- % r_sane:mpred_fwc1(arityMax(tPred, 1)).
- % Found positive trigger: arityMax(tPred,1)
- % body: compound(arityMax(tPred,1)),\+is_ftVar(arityMax(tPred,1))*->rhs([{with_current_why(arityMax(tPred,1),ignore(\+addAdmittedArguments(arityMax(tPred,1))))}])
- % Found positive trigger: arityMax(tPred,1)
- % body: is_kif_clause(arityMax(tPred,1))*->rhs([clif(arityMax(tPred,1))])
- % Found positive trigger: arityMax(tPred,1)
- % body: compound(arityMax(tPred,1)),\+is_ftVar(arityMax(tPred,1))*->rhs([{with_current_why(arityMax(tPred,1),ignore(\+addAdmittedArguments(arityMax(tPred,1))))}])
- % RHS-Post1: functorIsMacro(tPred)
- % Support: functorDeclares(tPred),pt(functorDeclares(tPred),rhs([arityMax(tPred,1),functorIsMacro(tPred)]))
- % r_sane:mpred_fwc1(functorIsMacro(tPred)).
- % Found positive trigger: functorIsMacro(tPred)
- % body: compound(functorIsMacro(tPred)),\+is_ftVar(functorIsMacro(tPred))*->rhs([{with_current_why(functorIsMacro(tPred),ignore(\+addAdmittedArguments(functorIsMacro(tPred))))}])
- % Found positive trigger: functorIsMacro(tPred)
- % body: is_kif_clause(functorIsMacro(tPred))*->rhs([clif(functorIsMacro(tPred))])
- % Found positive trigger: functorIsMacro(tPred)
- % body: compound(functorIsMacro(tPred)),\+is_ftVar(functorIsMacro(tPred))*->rhs([{with_current_why(functorIsMacro(tPred),ignore(\+addAdmittedArguments(functorIsMacro(tPred))))}])
- % Found positive trigger: functorDeclares(tPred)
- % body: compound(functorDeclares(tPred)),\+is_ftVar(functorDeclares(tPred))*->rhs([{with_current_why(functorDeclares(tPred),ignore(\+addAdmittedArguments(functorDeclares(tPred))))}])
- % Found positive trigger: functorDeclares(tPred)
- % body: is_kif_clause(functorDeclares(tPred))*->rhs([clif(functorDeclares(tPred))])
- % Found positive trigger: functorDeclares(tPred)
- % body: compound(functorDeclares(tPred)),\+is_ftVar(functorDeclares(tPred))*->rhs([{with_current_why(functorDeclares(tPred),ignore(\+addAdmittedArguments(functorDeclares(tPred))))}])
- % Found positive trigger: tSet(tPred)
- % body: rhs([tCol(tPred),\+ttExpressionType(tPred)])
- % RHS-Post1: tCol(tPred)
- % Support: tSet(tPred),pt(tSet(tPred),rhs([tCol(tPred),\+ttExpressionType(tPred)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tPred)
- % Support: tSet(tPred),pt(tSet(tPred),rhs([tCol(tPred),\+ttExpressionType(tPred)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tPred)
- % support (was): _28136,_28138
- % Couldn't retract_i: spft(ttExpressionType(tPred),_32700,_32702).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tPred))).
- % Found positive trigger: tSet(tPred)
- % body: rhs([tCol(tPred)])
- % RHS-Post1: tCol(tPred)
- % Support: tSet(tPred),pt(tSet(tPred),rhs([tCol(tPred)]))
- % Found positive trigger: tSet(tPred)
- % body: compound(tSet(tPred)),\+is_ftVar(tSet(tPred))*->rhs([{with_current_why(tSet(tPred),ignore(\+addAdmittedArguments(tSet(tPred))))}])
- % Found positive trigger: tSet(tPred)
- % body: is_kif_clause(tSet(tPred))*->rhs([clif(tSet(tPred))])
- % Found positive trigger: tSet(tPred)
- % body: compound(tSet(tPred)),\+is_ftVar(tSet(tPred))*->rhs([{with_current_why(tSet(tPred),ignore(\+addAdmittedArguments(tSet(tPred))))}])
- % Found positive trigger: tCol(tPred)
- % body: is_kif_clause(tCol(tPred))*->rhs([clif(tCol(tPred))])
- % Found positive trigger: tCol(tPred)
- % body: compound(tCol(tPred)),\+is_ftVar(tCol(tPred))*->rhs([{with_current_why(tCol(tPred),ignore(\+addAdmittedArguments(tCol(tPred))))}])
- % RHS-Post1: tCol(ftAssertion)
- % Support: admittedArgument(argIsa,3,ftAssertion),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % RHS-Post1: tCol(ftCallable)
- % Support: admittedArgument(argIsa,3,ftCallable),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % RHS-Post1: tCol(prologSingleValued)
- % Support: admittedArgument(argIsa,3,prologSingleValued),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % RHS-Post1: tCol(ftInt)
- % Support: admittedArgument(argIsa,3,ftInt),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % RHS-Post1: tCol(ftTerm)
- % Support: admittedArgument(argIsa,3,ftTerm),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % RHS-Post1: tCol(tRelation)
- % Support: admittedArgument(argIsa,3,tRelation),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % RHS-Post1: tCol(tCol)
- % Support: admittedArgument(argIsa,3,tCol),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % RHS-Post1: tCol(ttExpressionType)
- % Support: admittedArgument(argIsa,3,ttExpressionType),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(ttExpressionType)).
- % Found positive trigger: tCol(ttExpressionType)
- % body: rhs([{decl_type(ttExpressionType),kb_local(ttExpressionType/1)}])
- % Found positive trigger: tCol(ttExpressionType)
- % body: rhs([arity(ttExpressionType,1)])
- % RHS-Post1: arity(ttExpressionType,1)
- % Support: tCol(ttExpressionType),pt(tCol(ttExpressionType),rhs([arity(ttExpressionType,1)]))
- % Found positive trigger: tCol(ttExpressionType)
- % body: compound(tCol(ttExpressionType)),\+is_ftVar(tCol(ttExpressionType))*->rhs([{with_current_why(tCol(ttExpressionType),ignore(\+addAdmittedArguments(tCol(ttExpressionType))))}])
- % Found positive trigger: tCol(ttExpressionType)
- % body: \+ttExpressionType(ttExpressionType)*->rhs([tSet(ttExpressionType)])
- % RHS-Post1: tSet(ttExpressionType)
- % Support: tCol(ttExpressionType),pt(tCol(ttExpressionType),(\+ttExpressionType(ttExpressionType)*->rhs([tSet(ttExpressionType)])))
- % r_sane:mpred_fwc1(tSet(ttExpressionType)).
- % Found positive trigger: tSet(ttExpressionType)
- % body: rhs([functorDeclares(ttExpressionType)])
- % RHS-Post1: functorDeclares(ttExpressionType)
- % Support: tSet(ttExpressionType),pt(tSet(ttExpressionType),rhs([functorDeclares(ttExpressionType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttExpressionType)).
- % Found positive trigger: functorDeclares(ttExpressionType)
- % body: rhs([arityMax(ttExpressionType,1),functorIsMacro(ttExpressionType)])
- % RHS-Post1: arityMax(ttExpressionType,1)
- % Support: functorDeclares(ttExpressionType),pt(functorDeclares(ttExpressionType),rhs([arityMax(ttExpressionType,1),functorIsMacro(ttExpressionType)]))
- % r_sane:mpred_fwc1(arityMax(ttExpressionType, 1)).
- % Found positive trigger: arityMax(ttExpressionType,1)
- % body: compound(arityMax(ttExpressionType,1)),\+is_ftVar(arityMax(ttExpressionType,1))*->rhs([{with_current_why(arityMax(ttExpressionType,1),ignore(\+addAdmittedArguments(arityMax(ttExpressionType,1))))}])
- % Found positive trigger: arityMax(ttExpressionType,1)
- % body: is_kif_clause(arityMax(ttExpressionType,1))*->rhs([clif(arityMax(ttExpressionType,1))])
- % Found positive trigger: arityMax(ttExpressionType,1)
- % body: compound(arityMax(ttExpressionType,1)),\+is_ftVar(arityMax(ttExpressionType,1))*->rhs([{with_current_why(arityMax(ttExpressionType,1),ignore(\+addAdmittedArguments(arityMax(ttExpressionType,1))))}])
- % RHS-Post1: functorIsMacro(ttExpressionType)
- % Support: functorDeclares(ttExpressionType),pt(functorDeclares(ttExpressionType),rhs([arityMax(ttExpressionType,1),functorIsMacro(ttExpressionType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttExpressionType)).
- % Found positive trigger: functorIsMacro(ttExpressionType)
- % body: compound(functorIsMacro(ttExpressionType)),\+is_ftVar(functorIsMacro(ttExpressionType))*->rhs([{with_current_why(functorIsMacro(ttExpressionType),ignore(\+addAdmittedArguments(functorIsMacro(ttExpressionType))))}])
- % Found positive trigger: functorIsMacro(ttExpressionType)
- % body: is_kif_clause(functorIsMacro(ttExpressionType))*->rhs([clif(functorIsMacro(ttExpressionType))])
- % Found positive trigger: functorIsMacro(ttExpressionType)
- % body: compound(functorIsMacro(ttExpressionType)),\+is_ftVar(functorIsMacro(ttExpressionType))*->rhs([{with_current_why(functorIsMacro(ttExpressionType),ignore(\+addAdmittedArguments(functorIsMacro(ttExpressionType))))}])
- % Found positive trigger: functorDeclares(ttExpressionType)
- % body: compound(functorDeclares(ttExpressionType)),\+is_ftVar(functorDeclares(ttExpressionType))*->rhs([{with_current_why(functorDeclares(ttExpressionType),ignore(\+addAdmittedArguments(functorDeclares(ttExpressionType))))}])
- % Found positive trigger: functorDeclares(ttExpressionType)
- % body: is_kif_clause(functorDeclares(ttExpressionType))*->rhs([clif(functorDeclares(ttExpressionType))])
- % Found positive trigger: functorDeclares(ttExpressionType)
- % body: compound(functorDeclares(ttExpressionType)),\+is_ftVar(functorDeclares(ttExpressionType))*->rhs([{with_current_why(functorDeclares(ttExpressionType),ignore(\+addAdmittedArguments(functorDeclares(ttExpressionType))))}])
- % Found positive trigger: tSet(ttExpressionType)
- % body: rhs([tCol(ttExpressionType),\+ttExpressionType(ttExpressionType)])
- % RHS-Post1: tCol(ttExpressionType)
- % Support: tSet(ttExpressionType),pt(tSet(ttExpressionType),rhs([tCol(ttExpressionType),\+ttExpressionType(ttExpressionType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttExpressionType)
- % Support: tSet(ttExpressionType),pt(tSet(ttExpressionType),rhs([tCol(ttExpressionType),\+ttExpressionType(ttExpressionType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttExpressionType)
- % support (was): _28398,_28400
- % Couldn't retract_i: spft(ttExpressionType(ttExpressionType),_32968,_32970).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttExpressionType))).
- % Found positive trigger: tSet(ttExpressionType)
- % body: rhs([tCol(ttExpressionType)])
- % RHS-Post1: tCol(ttExpressionType)
- % Support: tSet(ttExpressionType),pt(tSet(ttExpressionType),rhs([tCol(ttExpressionType)]))
- % Found positive trigger: tSet(ttExpressionType)
- % body: compound(tSet(ttExpressionType)),\+is_ftVar(tSet(ttExpressionType))*->rhs([{with_current_why(tSet(ttExpressionType),ignore(\+addAdmittedArguments(tSet(ttExpressionType))))}])
- % Found positive trigger: tSet(ttExpressionType)
- % body: is_kif_clause(tSet(ttExpressionType))*->rhs([clif(tSet(ttExpressionType))])
- % Found positive trigger: tSet(ttExpressionType)
- % body: compound(tSet(ttExpressionType)),\+is_ftVar(tSet(ttExpressionType))*->rhs([{with_current_why(tSet(ttExpressionType),ignore(\+addAdmittedArguments(tSet(ttExpressionType))))}])
- % Found positive trigger: tCol(ttExpressionType)
- % body: is_kif_clause(tCol(ttExpressionType))*->rhs([clif(tCol(ttExpressionType))])
- % Found positive trigger: tCol(ttExpressionType)
- % body: compound(tCol(ttExpressionType)),\+is_ftVar(tCol(ttExpressionType))*->rhs([{with_current_why(tCol(ttExpressionType),ignore(\+addAdmittedArguments(tCol(ttExpressionType))))}])
- % RHS-Post1: tCol(tObj)
- % Support: admittedArgument(argIsa,3,tObj),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(tObj)).
- % Found positive trigger: tCol(tObj)
- % body: rhs([{decl_type(tObj),kb_local(tObj/1)}])
- % Found positive trigger: tCol(tObj)
- % body: rhs([arity(tObj,1)])
- % RHS-Post1: arity(tObj,1)
- % Support: tCol(tObj),pt(tCol(tObj),rhs([arity(tObj,1)]))
- % Found positive trigger: tCol(tObj)
- % body: compound(tCol(tObj)),\+is_ftVar(tCol(tObj))*->rhs([{with_current_why(tCol(tObj),ignore(\+addAdmittedArguments(tCol(tObj))))}])
- % Found positive trigger: tCol(tObj)
- % body: \+ttExpressionType(tObj)*->rhs([tSet(tObj)])
- % RHS-Post1: tSet(tObj)
- % Support: tCol(tObj),pt(tCol(tObj),(\+ttExpressionType(tObj)*->rhs([tSet(tObj)])))
- % r_sane:mpred_fwc1(tSet(tObj)).
- % Found positive trigger: tSet(tObj)
- % body: rhs([functorDeclares(tObj)])
- % RHS-Post1: functorDeclares(tObj)
- % Support: tSet(tObj),pt(tSet(tObj),rhs([functorDeclares(tObj)]))
- % r_sane:mpred_fwc1(functorDeclares(tObj)).
- % Found positive trigger: functorDeclares(tObj)
- % body: rhs([arityMax(tObj,1),functorIsMacro(tObj)])
- % RHS-Post1: arityMax(tObj,1)
- % Support: functorDeclares(tObj),pt(functorDeclares(tObj),rhs([arityMax(tObj,1),functorIsMacro(tObj)]))
- % r_sane:mpred_fwc1(arityMax(tObj, 1)).
- % Found positive trigger: arityMax(tObj,1)
- % body: compound(arityMax(tObj,1)),\+is_ftVar(arityMax(tObj,1))*->rhs([{with_current_why(arityMax(tObj,1),ignore(\+addAdmittedArguments(arityMax(tObj,1))))}])
- % Found positive trigger: arityMax(tObj,1)
- % body: is_kif_clause(arityMax(tObj,1))*->rhs([clif(arityMax(tObj,1))])
- % Found positive trigger: arityMax(tObj,1)
- % body: compound(arityMax(tObj,1)),\+is_ftVar(arityMax(tObj,1))*->rhs([{with_current_why(arityMax(tObj,1),ignore(\+addAdmittedArguments(arityMax(tObj,1))))}])
- % RHS-Post1: functorIsMacro(tObj)
- % Support: functorDeclares(tObj),pt(functorDeclares(tObj),rhs([arityMax(tObj,1),functorIsMacro(tObj)]))
- % r_sane:mpred_fwc1(functorIsMacro(tObj)).
- % Found positive trigger: functorIsMacro(tObj)
- % body: compound(functorIsMacro(tObj)),\+is_ftVar(functorIsMacro(tObj))*->rhs([{with_current_why(functorIsMacro(tObj),ignore(\+addAdmittedArguments(functorIsMacro(tObj))))}])
- % Found positive trigger: functorIsMacro(tObj)
- % body: is_kif_clause(functorIsMacro(tObj))*->rhs([clif(functorIsMacro(tObj))])
- % Found positive trigger: functorIsMacro(tObj)
- % body: compound(functorIsMacro(tObj)),\+is_ftVar(functorIsMacro(tObj))*->rhs([{with_current_why(functorIsMacro(tObj),ignore(\+addAdmittedArguments(functorIsMacro(tObj))))}])
- % Found positive trigger: functorDeclares(tObj)
- % body: compound(functorDeclares(tObj)),\+is_ftVar(functorDeclares(tObj))*->rhs([{with_current_why(functorDeclares(tObj),ignore(\+addAdmittedArguments(functorDeclares(tObj))))}])
- % Found positive trigger: functorDeclares(tObj)
- % body: is_kif_clause(functorDeclares(tObj))*->rhs([clif(functorDeclares(tObj))])
- % Found positive trigger: functorDeclares(tObj)
- % body: compound(functorDeclares(tObj)),\+is_ftVar(functorDeclares(tObj))*->rhs([{with_current_why(functorDeclares(tObj),ignore(\+addAdmittedArguments(functorDeclares(tObj))))}])
- % Found positive trigger: tSet(tObj)
- % body: rhs([tCol(tObj),\+ttExpressionType(tObj)])
- % RHS-Post1: tCol(tObj)
- % Support: tSet(tObj),pt(tSet(tObj),rhs([tCol(tObj),\+ttExpressionType(tObj)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tObj)
- % Support: tSet(tObj),pt(tSet(tObj),rhs([tCol(tObj),\+ttExpressionType(tObj)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tObj)
- % support (was): _26476,_26478
- % Couldn't retract_i: spft(ttExpressionType(tObj),_31040,_31042).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tObj))).
- % Found positive trigger: tSet(tObj)
- % body: rhs([tCol(tObj)])
- % RHS-Post1: tCol(tObj)
- % Support: tSet(tObj),pt(tSet(tObj),rhs([tCol(tObj)]))
- % Found positive trigger: tSet(tObj)
- % body: compound(tSet(tObj)),\+is_ftVar(tSet(tObj))*->rhs([{with_current_why(tSet(tObj),ignore(\+addAdmittedArguments(tSet(tObj))))}])
- % Found positive trigger: tSet(tObj)
- % body: is_kif_clause(tSet(tObj))*->rhs([clif(tSet(tObj))])
- % Found positive trigger: tSet(tObj)
- % body: compound(tSet(tObj)),\+is_ftVar(tSet(tObj))*->rhs([{with_current_why(tSet(tObj),ignore(\+addAdmittedArguments(tSet(tObj))))}])
- % Found positive trigger: tCol(tObj)
- % body: is_kif_clause(tCol(tObj))*->rhs([clif(tCol(tObj))])
- % Found positive trigger: tCol(tObj)
- % body: compound(tCol(tObj)),\+is_ftVar(tCol(tObj))*->rhs([{with_current_why(tCol(tObj),ignore(\+addAdmittedArguments(tCol(tObj))))}])
- % RHS-Post1: tCol(tRegion)
- % Support: admittedArgument(argIsa,3,tRegion),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(tRegion)).
- % Found positive trigger: tCol(tRegion)
- % body: rhs([{decl_type(tRegion),kb_local(tRegion/1)}])
- % Found positive trigger: tCol(tRegion)
- % body: rhs([arity(tRegion,1)])
- % RHS-Post1: arity(tRegion,1)
- % Support: tCol(tRegion),pt(tCol(tRegion),rhs([arity(tRegion,1)]))
- % Found positive trigger: tCol(tRegion)
- % body: compound(tCol(tRegion)),\+is_ftVar(tCol(tRegion))*->rhs([{with_current_why(tCol(tRegion),ignore(\+addAdmittedArguments(tCol(tRegion))))}])
- % Found positive trigger: tCol(tRegion)
- % body: \+ttExpressionType(tRegion)*->rhs([tSet(tRegion)])
- % RHS-Post1: tSet(tRegion)
- % Support: tCol(tRegion),pt(tCol(tRegion),(\+ttExpressionType(tRegion)*->rhs([tSet(tRegion)])))
- % r_sane:mpred_fwc1(tSet(tRegion)).
- % Found positive trigger: tSet(tRegion)
- % body: rhs([functorDeclares(tRegion)])
- % RHS-Post1: functorDeclares(tRegion)
- % Support: tSet(tRegion),pt(tSet(tRegion),rhs([functorDeclares(tRegion)]))
- % r_sane:mpred_fwc1(functorDeclares(tRegion)).
- % Found positive trigger: functorDeclares(tRegion)
- % body: rhs([arityMax(tRegion,1),functorIsMacro(tRegion)])
- % RHS-Post1: arityMax(tRegion,1)
- % Support: functorDeclares(tRegion),pt(functorDeclares(tRegion),rhs([arityMax(tRegion,1),functorIsMacro(tRegion)]))
- % r_sane:mpred_fwc1(arityMax(tRegion, 1)).
- % Found positive trigger: arityMax(tRegion,1)
- % body: compound(arityMax(tRegion,1)),\+is_ftVar(arityMax(tRegion,1))*->rhs([{with_current_why(arityMax(tRegion,1),ignore(\+addAdmittedArguments(arityMax(tRegion,1))))}])
- % Found positive trigger: arityMax(tRegion,1)
- % body: is_kif_clause(arityMax(tRegion,1))*->rhs([clif(arityMax(tRegion,1))])
- % Found positive trigger: arityMax(tRegion,1)
- % body: compound(arityMax(tRegion,1)),\+is_ftVar(arityMax(tRegion,1))*->rhs([{with_current_why(arityMax(tRegion,1),ignore(\+addAdmittedArguments(arityMax(tRegion,1))))}])
- % RHS-Post1: functorIsMacro(tRegion)
- % Support: functorDeclares(tRegion),pt(functorDeclares(tRegion),rhs([arityMax(tRegion,1),functorIsMacro(tRegion)]))
- % r_sane:mpred_fwc1(functorIsMacro(tRegion)).
- % Found positive trigger: functorIsMacro(tRegion)
- % body: compound(functorIsMacro(tRegion)),\+is_ftVar(functorIsMacro(tRegion))*->rhs([{with_current_why(functorIsMacro(tRegion),ignore(\+addAdmittedArguments(functorIsMacro(tRegion))))}])
- % Found positive trigger: functorIsMacro(tRegion)
- % body: is_kif_clause(functorIsMacro(tRegion))*->rhs([clif(functorIsMacro(tRegion))])
- % Found positive trigger: functorIsMacro(tRegion)
- % body: compound(functorIsMacro(tRegion)),\+is_ftVar(functorIsMacro(tRegion))*->rhs([{with_current_why(functorIsMacro(tRegion),ignore(\+addAdmittedArguments(functorIsMacro(tRegion))))}])
- % Found positive trigger: functorDeclares(tRegion)
- % body: compound(functorDeclares(tRegion)),\+is_ftVar(functorDeclares(tRegion))*->rhs([{with_current_why(functorDeclares(tRegion),ignore(\+addAdmittedArguments(functorDeclares(tRegion))))}])
- % Found positive trigger: functorDeclares(tRegion)
- % body: is_kif_clause(functorDeclares(tRegion))*->rhs([clif(functorDeclares(tRegion))])
- % Found positive trigger: functorDeclares(tRegion)
- % body: compound(functorDeclares(tRegion)),\+is_ftVar(functorDeclares(tRegion))*->rhs([{with_current_why(functorDeclares(tRegion),ignore(\+addAdmittedArguments(functorDeclares(tRegion))))}])
- % Found positive trigger: tSet(tRegion)
- % body: rhs([tCol(tRegion),\+ttExpressionType(tRegion)])
- % RHS-Post1: tCol(tRegion)
- % Support: tSet(tRegion),pt(tSet(tRegion),rhs([tCol(tRegion),\+ttExpressionType(tRegion)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tRegion)
- % Support: tSet(tRegion),pt(tSet(tRegion),rhs([tCol(tRegion),\+ttExpressionType(tRegion)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tRegion)
- % support (was): _26522,_26524
- % Couldn't retract_i: spft(ttExpressionType(tRegion),_31088,_31090).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tRegion))).
- % Found positive trigger: tSet(tRegion)
- % body: rhs([tCol(tRegion)])
- % RHS-Post1: tCol(tRegion)
- % Support: tSet(tRegion),pt(tSet(tRegion),rhs([tCol(tRegion)]))
- % Found positive trigger: tSet(tRegion)
- % body: compound(tSet(tRegion)),\+is_ftVar(tSet(tRegion))*->rhs([{with_current_why(tSet(tRegion),ignore(\+addAdmittedArguments(tSet(tRegion))))}])
- % Found positive trigger: tSet(tRegion)
- % body: is_kif_clause(tSet(tRegion))*->rhs([clif(tSet(tRegion))])
- % Found positive trigger: tSet(tRegion)
- % body: compound(tSet(tRegion)),\+is_ftVar(tSet(tRegion))*->rhs([{with_current_why(tSet(tRegion),ignore(\+addAdmittedArguments(tSet(tRegion))))}])
- % Found positive trigger: tCol(tRegion)
- % body: is_kif_clause(tCol(tRegion))*->rhs([clif(tCol(tRegion))])
- % Found positive trigger: tCol(tRegion)
- % body: compound(tCol(tRegion)),\+is_ftVar(tCol(tRegion))*->rhs([{with_current_why(tCol(tRegion),ignore(\+addAdmittedArguments(tCol(tRegion))))}])
- % RHS-Post1: tCol(vtDirection)
- % Support: admittedArgument(argIsa,3,vtDirection),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(vtDirection)).
- % Found positive trigger: tCol(vtDirection)
- % body: rhs([{decl_type(vtDirection),kb_local(vtDirection/1)}])
- % Found positive trigger: tCol(vtDirection)
- % body: rhs([arity(vtDirection,1)])
- % RHS-Post1: arity(vtDirection,1)
- % Support: tCol(vtDirection),pt(tCol(vtDirection),rhs([arity(vtDirection,1)]))
- % Found positive trigger: tCol(vtDirection)
- % body: compound(tCol(vtDirection)),\+is_ftVar(tCol(vtDirection))*->rhs([{with_current_why(tCol(vtDirection),ignore(\+addAdmittedArguments(tCol(vtDirection))))}])
- % Found positive trigger: tCol(vtDirection)
- % body: \+ttExpressionType(vtDirection)*->rhs([tSet(vtDirection)])
- % RHS-Post1: tSet(vtDirection)
- % Support: tCol(vtDirection),pt(tCol(vtDirection),(\+ttExpressionType(vtDirection)*->rhs([tSet(vtDirection)])))
- % r_sane:mpred_fwc1(tSet(vtDirection)).
- % Found positive trigger: tSet(vtDirection)
- % body: rhs([functorDeclares(vtDirection)])
- % RHS-Post1: functorDeclares(vtDirection)
- % Support: tSet(vtDirection),pt(tSet(vtDirection),rhs([functorDeclares(vtDirection)]))
- % r_sane:mpred_fwc1(functorDeclares(vtDirection)).
- % Found positive trigger: functorDeclares(vtDirection)
- % body: rhs([arityMax(vtDirection,1),functorIsMacro(vtDirection)])
- % RHS-Post1: arityMax(vtDirection,1)
- % Support: functorDeclares(vtDirection),pt(functorDeclares(vtDirection),rhs([arityMax(vtDirection,1),functorIsMacro(vtDirection)]))
- % r_sane:mpred_fwc1(arityMax(vtDirection, 1)).
- % Found positive trigger: arityMax(vtDirection,1)
- % body: compound(arityMax(vtDirection,1)),\+is_ftVar(arityMax(vtDirection,1))*->rhs([{with_current_why(arityMax(vtDirection,1),ignore(\+addAdmittedArguments(arityMax(vtDirection,1))))}])
- % Found positive trigger: arityMax(vtDirection,1)
- % body: is_kif_clause(arityMax(vtDirection,1))*->rhs([clif(arityMax(vtDirection,1))])
- % Found positive trigger: arityMax(vtDirection,1)
- % body: compound(arityMax(vtDirection,1)),\+is_ftVar(arityMax(vtDirection,1))*->rhs([{with_current_why(arityMax(vtDirection,1),ignore(\+addAdmittedArguments(arityMax(vtDirection,1))))}])
- % RHS-Post1: functorIsMacro(vtDirection)
- % Support: functorDeclares(vtDirection),pt(functorDeclares(vtDirection),rhs([arityMax(vtDirection,1),functorIsMacro(vtDirection)]))
- % r_sane:mpred_fwc1(functorIsMacro(vtDirection)).
- % Found positive trigger: functorIsMacro(vtDirection)
- % body: compound(functorIsMacro(vtDirection)),\+is_ftVar(functorIsMacro(vtDirection))*->rhs([{with_current_why(functorIsMacro(vtDirection),ignore(\+addAdmittedArguments(functorIsMacro(vtDirection))))}])
- % Found positive trigger: functorIsMacro(vtDirection)
- % body: is_kif_clause(functorIsMacro(vtDirection))*->rhs([clif(functorIsMacro(vtDirection))])
- % Found positive trigger: functorIsMacro(vtDirection)
- % body: compound(functorIsMacro(vtDirection)),\+is_ftVar(functorIsMacro(vtDirection))*->rhs([{with_current_why(functorIsMacro(vtDirection),ignore(\+addAdmittedArguments(functorIsMacro(vtDirection))))}])
- % Found positive trigger: functorDeclares(vtDirection)
- % body: compound(functorDeclares(vtDirection)),\+is_ftVar(functorDeclares(vtDirection))*->rhs([{with_current_why(functorDeclares(vtDirection),ignore(\+addAdmittedArguments(functorDeclares(vtDirection))))}])
- % Found positive trigger: functorDeclares(vtDirection)
- % body: is_kif_clause(functorDeclares(vtDirection))*->rhs([clif(functorDeclares(vtDirection))])
- % Found positive trigger: functorDeclares(vtDirection)
- % body: compound(functorDeclares(vtDirection)),\+is_ftVar(functorDeclares(vtDirection))*->rhs([{with_current_why(functorDeclares(vtDirection),ignore(\+addAdmittedArguments(functorDeclares(vtDirection))))}])
- % Found positive trigger: tSet(vtDirection)
- % body: rhs([tCol(vtDirection),\+ttExpressionType(vtDirection)])
- % RHS-Post1: tCol(vtDirection)
- % Support: tSet(vtDirection),pt(tSet(vtDirection),rhs([tCol(vtDirection),\+ttExpressionType(vtDirection)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(vtDirection)
- % Support: tSet(vtDirection),pt(tSet(vtDirection),rhs([tCol(vtDirection),\+ttExpressionType(vtDirection)]))
- % Removing (withdraw1)
- % term: ttExpressionType(vtDirection)
- % support (was): _28328,_28330
- % Couldn't retract_i: spft(ttExpressionType(vtDirection),_32896,_32898).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(vtDirection))).
- % Found positive trigger: tSet(vtDirection)
- % body: rhs([tCol(vtDirection)])
- % RHS-Post1: tCol(vtDirection)
- % Support: tSet(vtDirection),pt(tSet(vtDirection),rhs([tCol(vtDirection)]))
- % Found positive trigger: tSet(vtDirection)
- % body: compound(tSet(vtDirection)),\+is_ftVar(tSet(vtDirection))*->rhs([{with_current_why(tSet(vtDirection),ignore(\+addAdmittedArguments(tSet(vtDirection))))}])
- % Found positive trigger: tSet(vtDirection)
- % body: is_kif_clause(tSet(vtDirection))*->rhs([clif(tSet(vtDirection))])
- % Found positive trigger: tSet(vtDirection)
- % body: compound(tSet(vtDirection)),\+is_ftVar(tSet(vtDirection))*->rhs([{with_current_why(tSet(vtDirection),ignore(\+addAdmittedArguments(tSet(vtDirection))))}])
- % Found positive trigger: tCol(vtDirection)
- % body: is_kif_clause(tCol(vtDirection))*->rhs([clif(tCol(vtDirection))])
- % Found positive trigger: tCol(vtDirection)
- % body: compound(tCol(vtDirection)),\+is_ftVar(tCol(vtDirection))*->rhs([{with_current_why(tCol(vtDirection),ignore(\+addAdmittedArguments(tCol(vtDirection))))}])
- % RHS-Post1: tCol(tSpatialThing)
- % Support: admittedArgument(argIsa,3,tSpatialThing),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(tSpatialThing)).
- % Found positive trigger: tCol(tSpatialThing)
- % body: rhs([{decl_type(tSpatialThing),kb_local(tSpatialThing/1)}])
- % Found positive trigger: tCol(tSpatialThing)
- % body: rhs([arity(tSpatialThing,1)])
- % RHS-Post1: arity(tSpatialThing,1)
- % Support: tCol(tSpatialThing),pt(tCol(tSpatialThing),rhs([arity(tSpatialThing,1)]))
- % Found positive trigger: tCol(tSpatialThing)
- % body: compound(tCol(tSpatialThing)),\+is_ftVar(tCol(tSpatialThing))*->rhs([{with_current_why(tCol(tSpatialThing),ignore(\+addAdmittedArguments(tCol(tSpatialThing))))}])
- % Found positive trigger: tCol(tSpatialThing)
- % body: \+ttExpressionType(tSpatialThing)*->rhs([tSet(tSpatialThing)])
- % RHS-Post1: tSet(tSpatialThing)
- % Support: tCol(tSpatialThing),pt(tCol(tSpatialThing),(\+ttExpressionType(tSpatialThing)*->rhs([tSet(tSpatialThing)])))
- % r_sane:mpred_fwc1(tSet(tSpatialThing)).
- % Found positive trigger: tSet(tSpatialThing)
- % body: rhs([functorDeclares(tSpatialThing)])
- % RHS-Post1: functorDeclares(tSpatialThing)
- % Support: tSet(tSpatialThing),pt(tSet(tSpatialThing),rhs([functorDeclares(tSpatialThing)]))
- % r_sane:mpred_fwc1(functorDeclares(tSpatialThing)).
- % Found positive trigger: functorDeclares(tSpatialThing)
- % body: rhs([arityMax(tSpatialThing,1),functorIsMacro(tSpatialThing)])
- % RHS-Post1: arityMax(tSpatialThing,1)
- % Support: functorDeclares(tSpatialThing),pt(functorDeclares(tSpatialThing),rhs([arityMax(tSpatialThing,1),functorIsMacro(tSpatialThing)]))
- % r_sane:mpred_fwc1(arityMax(tSpatialThing, 1)).
- % Found positive trigger: arityMax(tSpatialThing,1)
- % body: compound(arityMax(tSpatialThing,1)),\+is_ftVar(arityMax(tSpatialThing,1))*->rhs([{with_current_why(arityMax(tSpatialThing,1),ignore(\+addAdmittedArguments(arityMax(tSpatialThing,1))))}])
- % Found positive trigger: arityMax(tSpatialThing,1)
- % body: is_kif_clause(arityMax(tSpatialThing,1))*->rhs([clif(arityMax(tSpatialThing,1))])
- % Found positive trigger: arityMax(tSpatialThing,1)
- % body: compound(arityMax(tSpatialThing,1)),\+is_ftVar(arityMax(tSpatialThing,1))*->rhs([{with_current_why(arityMax(tSpatialThing,1),ignore(\+addAdmittedArguments(arityMax(tSpatialThing,1))))}])
- % RHS-Post1: functorIsMacro(tSpatialThing)
- % Support: functorDeclares(tSpatialThing),pt(functorDeclares(tSpatialThing),rhs([arityMax(tSpatialThing,1),functorIsMacro(tSpatialThing)]))
- % r_sane:mpred_fwc1(functorIsMacro(tSpatialThing)).
- % Found positive trigger: functorIsMacro(tSpatialThing)
- % body: compound(functorIsMacro(tSpatialThing)),\+is_ftVar(functorIsMacro(tSpatialThing))*->rhs([{with_current_why(functorIsMacro(tSpatialThing),ignore(\+addAdmittedArguments(functorIsMacro(tSpatialThing))))}])
- % Found positive trigger: functorIsMacro(tSpatialThing)
- % body: is_kif_clause(functorIsMacro(tSpatialThing))*->rhs([clif(functorIsMacro(tSpatialThing))])
- % Found positive trigger: functorIsMacro(tSpatialThing)
- % body: compound(functorIsMacro(tSpatialThing)),\+is_ftVar(functorIsMacro(tSpatialThing))*->rhs([{with_current_why(functorIsMacro(tSpatialThing),ignore(\+addAdmittedArguments(functorIsMacro(tSpatialThing))))}])
- % Found positive trigger: functorDeclares(tSpatialThing)
- % body: compound(functorDeclares(tSpatialThing)),\+is_ftVar(functorDeclares(tSpatialThing))*->rhs([{with_current_why(functorDeclares(tSpatialThing),ignore(\+addAdmittedArguments(functorDeclares(tSpatialThing))))}])
- % Found positive trigger: functorDeclares(tSpatialThing)
- % body: is_kif_clause(functorDeclares(tSpatialThing))*->rhs([clif(functorDeclares(tSpatialThing))])
- % Found positive trigger: functorDeclares(tSpatialThing)
- % body: compound(functorDeclares(tSpatialThing)),\+is_ftVar(functorDeclares(tSpatialThing))*->rhs([{with_current_why(functorDeclares(tSpatialThing),ignore(\+addAdmittedArguments(functorDeclares(tSpatialThing))))}])
- % Found positive trigger: tSet(tSpatialThing)
- % body: rhs([tCol(tSpatialThing),\+ttExpressionType(tSpatialThing)])
- % RHS-Post1: tCol(tSpatialThing)
- % Support: tSet(tSpatialThing),pt(tSet(tSpatialThing),rhs([tCol(tSpatialThing),\+ttExpressionType(tSpatialThing)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tSpatialThing)
- % Support: tSet(tSpatialThing),pt(tSet(tSpatialThing),rhs([tCol(tSpatialThing),\+ttExpressionType(tSpatialThing)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tSpatialThing)
- % support (was): _28484,_28486
- % Couldn't retract_i: spft(ttExpressionType(tSpatialThing),_33052,_33054).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tSpatialThing))).
- % Found positive trigger: tSet(tSpatialThing)
- % body: rhs([tCol(tSpatialThing)])
- % RHS-Post1: tCol(tSpatialThing)
- % Support: tSet(tSpatialThing),pt(tSet(tSpatialThing),rhs([tCol(tSpatialThing)]))
- % Found positive trigger: tSet(tSpatialThing)
- % body: compound(tSet(tSpatialThing)),\+is_ftVar(tSet(tSpatialThing))*->rhs([{with_current_why(tSet(tSpatialThing),ignore(\+addAdmittedArguments(tSet(tSpatialThing))))}])
- % Found positive trigger: tSet(tSpatialThing)
- % body: is_kif_clause(tSet(tSpatialThing))*->rhs([clif(tSet(tSpatialThing))])
- % Found positive trigger: tSet(tSpatialThing)
- % body: compound(tSet(tSpatialThing)),\+is_ftVar(tSet(tSpatialThing))*->rhs([{with_current_why(tSet(tSpatialThing),ignore(\+addAdmittedArguments(tSet(tSpatialThing))))}])
- % Found positive trigger: tCol(tSpatialThing)
- % body: is_kif_clause(tCol(tSpatialThing))*->rhs([clif(tCol(tSpatialThing))])
- % Found positive trigger: tCol(tSpatialThing)
- % body: compound(tCol(tSpatialThing)),\+is_ftVar(tCol(tSpatialThing))*->rhs([{with_current_why(tCol(tSpatialThing),ignore(\+addAdmittedArguments(tCol(tSpatialThing))))}])
- % RHS-Post1: tCol(ftVoprop)
- % Support: admittedArgument(argIsa,3,ftVoprop),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(ftVoprop)).
- % Found positive trigger: tCol(ftVoprop)
- % body: rhs([{decl_type(ftVoprop),kb_local(ftVoprop/1)}])
- % Found positive trigger: tCol(ftVoprop)
- % body: rhs([arity(ftVoprop,1)])
- % RHS-Post1: arity(ftVoprop,1)
- % Support: tCol(ftVoprop),pt(tCol(ftVoprop),rhs([arity(ftVoprop,1)]))
- % Found positive trigger: tCol(ftVoprop)
- % body: compound(tCol(ftVoprop)),\+is_ftVar(tCol(ftVoprop))*->rhs([{with_current_why(tCol(ftVoprop),ignore(\+addAdmittedArguments(tCol(ftVoprop))))}])
- % Found positive trigger: tCol(ftVoprop)
- % body: \+ttExpressionType(ftVoprop)*->rhs([tSet(ftVoprop)])
- % Found positive trigger: tCol(ftVoprop)
- % body: is_kif_clause(tCol(ftVoprop))*->rhs([clif(tCol(ftVoprop))])
- % Found positive trigger: tCol(ftVoprop)
- % body: compound(tCol(ftVoprop)),\+is_ftVar(tCol(ftVoprop))*->rhs([{with_current_why(tCol(ftVoprop),ignore(\+addAdmittedArguments(tCol(ftVoprop))))}])
- % RHS-Post1: tCol(ftString)
- % Support: admittedArgument(argIsa,3,ftString),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(ftString)).
- % Found positive trigger: tCol(ftString)
- % body: rhs([{decl_type(ftString),kb_local(ftString/1)}])
- % Found positive trigger: tCol(ftString)
- % body: rhs([arity(ftString,1)])
- % RHS-Post1: arity(ftString,1)
- % Support: tCol(ftString),pt(tCol(ftString),rhs([arity(ftString,1)]))
- % Found positive trigger: tCol(ftString)
- % body: compound(tCol(ftString)),\+is_ftVar(tCol(ftString))*->rhs([{with_current_why(tCol(ftString),ignore(\+addAdmittedArguments(tCol(ftString))))}])
- % Found positive trigger: tCol(ftString)
- % body: \+ttExpressionType(ftString)*->rhs([tSet(ftString)])
- % Found positive trigger: tCol(ftString)
- % body: is_kif_clause(tCol(ftString))*->rhs([clif(tCol(ftString))])
- % Found positive trigger: tCol(ftString)
- % body: compound(tCol(ftString)),\+is_ftVar(tCol(ftString))*->rhs([{with_current_why(tCol(ftString),ignore(\+addAdmittedArguments(tCol(ftString))))}])
- % RHS-Post1: tCol(ftSpec)
- % Support: admittedArgument(argIsa,3,ftSpec),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(ftSpec)).
- % Found positive trigger: tCol(ftSpec)
- % body: rhs([{decl_type(ftSpec),kb_local(ftSpec/1)}])
- % Found positive trigger: tCol(ftSpec)
- % body: rhs([arity(ftSpec,1)])
- % RHS-Post1: arity(ftSpec,1)
- % Support: tCol(ftSpec),pt(tCol(ftSpec),rhs([arity(ftSpec,1)]))
- % Found positive trigger: tCol(ftSpec)
- % body: compound(tCol(ftSpec)),\+is_ftVar(tCol(ftSpec))*->rhs([{with_current_why(tCol(ftSpec),ignore(\+addAdmittedArguments(tCol(ftSpec))))}])
- % Found positive trigger: tCol(ftSpec)
- % body: \+ttExpressionType(ftSpec)*->rhs([tSet(ftSpec)])
- % Found positive trigger: tCol(ftSpec)
- % body: is_kif_clause(tCol(ftSpec))*->rhs([clif(tCol(ftSpec))])
- % Found positive trigger: tCol(ftSpec)
- % body: compound(tCol(ftSpec)),\+is_ftVar(tCol(ftSpec))*->rhs([{with_current_why(tCol(ftSpec),ignore(\+addAdmittedArguments(tCol(ftSpec))))}])
- % RHS-Post1: tCol(ftAskable)
- % Support: admittedArgument(argIsa,3,ftAskable),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(ftAskable)).
- % Found positive trigger: tCol(ftAskable)
- % body: rhs([{decl_type(ftAskable),kb_local(ftAskable/1)}])
- % Found positive trigger: tCol(ftAskable)
- % body: rhs([arity(ftAskable,1)])
- % RHS-Post1: arity(ftAskable,1)
- % Support: tCol(ftAskable),pt(tCol(ftAskable),rhs([arity(ftAskable,1)]))
- % Found positive trigger: tCol(ftAskable)
- % body: compound(tCol(ftAskable)),\+is_ftVar(tCol(ftAskable))*->rhs([{with_current_why(tCol(ftAskable),ignore(\+addAdmittedArguments(tCol(ftAskable))))}])
- % Found positive trigger: tCol(ftAskable)
- % body: \+ttExpressionType(ftAskable)*->rhs([tSet(ftAskable)])
- % Found positive trigger: tCol(ftAskable)
- % body: is_kif_clause(tCol(ftAskable))*->rhs([clif(tCol(ftAskable))])
- % Found positive trigger: tCol(ftAskable)
- % body: compound(tCol(ftAskable)),\+is_ftVar(tCol(ftAskable))*->rhs([{with_current_why(tCol(ftAskable),ignore(\+addAdmittedArguments(tCol(ftAskable))))}])
- % RHS-Post1: tCol(ftAssertable)
- % Support: admittedArgument(argIsa,3,ftAssertable),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(ftAssertable)).
- % Found positive trigger: tCol(ftAssertable)
- % body: rhs([{decl_type(ftAssertable),kb_local(ftAssertable/1)}])
- % Found positive trigger: tCol(ftAssertable)
- % body: rhs([arity(ftAssertable,1)])
- % RHS-Post1: arity(ftAssertable,1)
- % Support: tCol(ftAssertable),pt(tCol(ftAssertable),rhs([arity(ftAssertable,1)]))
- % Found positive trigger: tCol(ftAssertable)
- % body: compound(tCol(ftAssertable)),\+is_ftVar(tCol(ftAssertable))*->rhs([{with_current_why(tCol(ftAssertable),ignore(\+addAdmittedArguments(tCol(ftAssertable))))}])
- % Found positive trigger: tCol(ftAssertable)
- % body: \+ttExpressionType(ftAssertable)*->rhs([tSet(ftAssertable)])
- % Found positive trigger: tCol(ftAssertable)
- % body: is_kif_clause(tCol(ftAssertable))*->rhs([clif(tCol(ftAssertable))])
- % Found positive trigger: tCol(ftAssertable)
- % body: compound(tCol(ftAssertable)),\+is_ftVar(tCol(ftAssertable))*->rhs([{with_current_why(tCol(ftAssertable),ignore(\+addAdmittedArguments(tCol(ftAssertable))))}])
- % RHS-Post1: tCol(prologMultiValued)
- % Support: admittedArgument(argIsa,3,prologMultiValued),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(prologMultiValued)).
- % Found positive trigger: tCol(prologMultiValued)
- % body: rhs([{decl_type(prologMultiValued),kb_local(prologMultiValued/1)}])
- % Found positive trigger: tCol(prologMultiValued)
- % body: rhs([arity(prologMultiValued,1)])
- % RHS-Post1: arity(prologMultiValued,1)
- % Support: tCol(prologMultiValued),pt(tCol(prologMultiValued),rhs([arity(prologMultiValued,1)]))
- % Found positive trigger: tCol(prologMultiValued)
- % body: compound(tCol(prologMultiValued)),\+is_ftVar(tCol(prologMultiValued))*->rhs([{with_current_why(tCol(prologMultiValued),ignore(\+addAdmittedArguments(tCol(prologMultiValued))))}])
- % Found positive trigger: tCol(prologMultiValued)
- % body: \+ttExpressionType(prologMultiValued)*->rhs([tSet(prologMultiValued)])
- % RHS-Post1: tSet(prologMultiValued)
- % Support: tCol(prologMultiValued),pt(tCol(prologMultiValued),(\+ttExpressionType(prologMultiValued)*->rhs([tSet(prologMultiValued)])))
- % r_sane:mpred_fwc1(tSet(prologMultiValued)).
- % Found positive trigger: tSet(prologMultiValued)
- % body: rhs([functorDeclares(prologMultiValued)])
- % RHS-Post1: functorDeclares(prologMultiValued)
- % Support: tSet(prologMultiValued),pt(tSet(prologMultiValued),rhs([functorDeclares(prologMultiValued)]))
- % r_sane:mpred_fwc1(functorDeclares(prologMultiValued)).
- % Found positive trigger: functorDeclares(prologMultiValued)
- % body: rhs([arityMax(prologMultiValued,1),functorIsMacro(prologMultiValued)])
- % RHS-Post1: arityMax(prologMultiValued,1)
- % Support: functorDeclares(prologMultiValued),pt(functorDeclares(prologMultiValued),rhs([arityMax(prologMultiValued,1),functorIsMacro(prologMultiValued)]))
- % r_sane:mpred_fwc1(arityMax(prologMultiValued, 1)).
- % Found positive trigger: arityMax(prologMultiValued,1)
- % body: compound(arityMax(prologMultiValued,1)),\+is_ftVar(arityMax(prologMultiValued,1))*->rhs([{with_current_why(arityMax(prologMultiValued,1),ignore(\+addAdmittedArguments(arityMax(prologMultiValued,1))))}])
- % Found positive trigger: arityMax(prologMultiValued,1)
- % body: is_kif_clause(arityMax(prologMultiValued,1))*->rhs([clif(arityMax(prologMultiValued,1))])
- % Found positive trigger: arityMax(prologMultiValued,1)
- % body: compound(arityMax(prologMultiValued,1)),\+is_ftVar(arityMax(prologMultiValued,1))*->rhs([{with_current_why(arityMax(prologMultiValued,1),ignore(\+addAdmittedArguments(arityMax(prologMultiValued,1))))}])
- % RHS-Post1: functorIsMacro(prologMultiValued)
- % Support: functorDeclares(prologMultiValued),pt(functorDeclares(prologMultiValued),rhs([arityMax(prologMultiValued,1),functorIsMacro(prologMultiValued)]))
- % r_sane:mpred_fwc1(functorIsMacro(prologMultiValued)).
- % Found positive trigger: functorIsMacro(prologMultiValued)
- % body: compound(functorIsMacro(prologMultiValued)),\+is_ftVar(functorIsMacro(prologMultiValued))*->rhs([{with_current_why(functorIsMacro(prologMultiValued),ignore(\+addAdmittedArguments(functorIsMacro(prologMultiValued))))}])
- % Found positive trigger: functorIsMacro(prologMultiValued)
- % body: is_kif_clause(functorIsMacro(prologMultiValued))*->rhs([clif(functorIsMacro(prologMultiValued))])
- % Found positive trigger: functorIsMacro(prologMultiValued)
- % body: compound(functorIsMacro(prologMultiValued)),\+is_ftVar(functorIsMacro(prologMultiValued))*->rhs([{with_current_why(functorIsMacro(prologMultiValued),ignore(\+addAdmittedArguments(functorIsMacro(prologMultiValued))))}])
- % Found positive trigger: functorDeclares(prologMultiValued)
- % body: compound(functorDeclares(prologMultiValued)),\+is_ftVar(functorDeclares(prologMultiValued))*->rhs([{with_current_why(functorDeclares(prologMultiValued),ignore(\+addAdmittedArguments(functorDeclares(prologMultiValued))))}])
- % Found positive trigger: functorDeclares(prologMultiValued)
- % body: is_kif_clause(functorDeclares(prologMultiValued))*->rhs([clif(functorDeclares(prologMultiValued))])
- % Found positive trigger: functorDeclares(prologMultiValued)
- % body: compound(functorDeclares(prologMultiValued)),\+is_ftVar(functorDeclares(prologMultiValued))*->rhs([{with_current_why(functorDeclares(prologMultiValued),ignore(\+addAdmittedArguments(functorDeclares(prologMultiValued))))}])
- % Found positive trigger: tSet(prologMultiValued)
- % body: rhs([tCol(prologMultiValued),\+ttExpressionType(prologMultiValued)])
- % RHS-Post1: tCol(prologMultiValued)
- % Support: tSet(prologMultiValued),pt(tSet(prologMultiValued),rhs([tCol(prologMultiValued),\+ttExpressionType(prologMultiValued)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(prologMultiValued)
- % Support: tSet(prologMultiValued),pt(tSet(prologMultiValued),rhs([tCol(prologMultiValued),\+ttExpressionType(prologMultiValued)]))
- % Removing (withdraw1)
- % term: ttExpressionType(prologMultiValued)
- % support (was): _28662,_28664
- % Couldn't retract_i: spft(ttExpressionType(prologMultiValued),_33234,_33236).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(prologMultiValued))).
- % Found positive trigger: tSet(prologMultiValued)
- % body: rhs([tCol(prologMultiValued)])
- % RHS-Post1: tCol(prologMultiValued)
- % Support: tSet(prologMultiValued),pt(tSet(prologMultiValued),rhs([tCol(prologMultiValued)]))
- % Found positive trigger: tSet(prologMultiValued)
- % body: compound(tSet(prologMultiValued)),\+is_ftVar(tSet(prologMultiValued))*->rhs([{with_current_why(tSet(prologMultiValued),ignore(\+addAdmittedArguments(tSet(prologMultiValued))))}])
- % Found positive trigger: tSet(prologMultiValued)
- % body: is_kif_clause(tSet(prologMultiValued))*->rhs([clif(tSet(prologMultiValued))])
- % Found positive trigger: tSet(prologMultiValued)
- % body: compound(tSet(prologMultiValued)),\+is_ftVar(tSet(prologMultiValued))*->rhs([{with_current_why(tSet(prologMultiValued),ignore(\+addAdmittedArguments(tSet(prologMultiValued))))}])
- % Found positive trigger: tCol(prologMultiValued)
- % body: is_kif_clause(tCol(prologMultiValued))*->rhs([clif(tCol(prologMultiValued))])
- % Found positive trigger: tCol(prologMultiValued)
- % body: compound(tCol(prologMultiValued)),\+is_ftVar(tCol(prologMultiValued))*->rhs([{with_current_why(tCol(prologMultiValued),ignore(\+addAdmittedArguments(tCol(prologMultiValued))))}])
- % RHS-Post1: tCol(ftID)
- % Support: admittedArgument(argIsa,3,ftID),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(ftID)).
- % Found positive trigger: tCol(ftID)
- % body: rhs([{decl_type(ftID),kb_local(ftID/1)}])
- % Found positive trigger: tCol(ftID)
- % body: rhs([arity(ftID,1)])
- % RHS-Post1: arity(ftID,1)
- % Support: tCol(ftID),pt(tCol(ftID),rhs([arity(ftID,1)]))
- % Found positive trigger: tCol(ftID)
- % body: compound(tCol(ftID)),\+is_ftVar(tCol(ftID))*->rhs([{with_current_why(tCol(ftID),ignore(\+addAdmittedArguments(tCol(ftID))))}])
- % Found positive trigger: tCol(ftID)
- % body: \+ttExpressionType(ftID)*->rhs([tSet(ftID)])
- % Found positive trigger: tCol(ftID)
- % body: is_kif_clause(tCol(ftID))*->rhs([clif(tCol(ftID))])
- % Found positive trigger: tCol(ftID)
- % body: compound(tCol(ftID)),\+is_ftVar(tCol(ftID))*->rhs([{with_current_why(tCol(ftID),ignore(\+addAdmittedArguments(tCol(ftID))))}])
- % RHS-Post1: tCol(tAgent)
- % Support: admittedArgument(argIsa,3,tAgent),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(tAgent)).
- % Found positive trigger: tCol(tAgent)
- % body: rhs([{decl_type(tAgent),kb_local(tAgent/1)}])
- % Found positive trigger: tCol(tAgent)
- % body: rhs([arity(tAgent,1)])
- % RHS-Post1: arity(tAgent,1)
- % Support: tCol(tAgent),pt(tCol(tAgent),rhs([arity(tAgent,1)]))
- % Found positive trigger: tCol(tAgent)
- % body: compound(tCol(tAgent)),\+is_ftVar(tCol(tAgent))*->rhs([{with_current_why(tCol(tAgent),ignore(\+addAdmittedArguments(tCol(tAgent))))}])
- % Found positive trigger: tCol(tAgent)
- % body: \+ttExpressionType(tAgent)*->rhs([tSet(tAgent)])
- % RHS-Post1: tSet(tAgent)
- % Support: tCol(tAgent),pt(tCol(tAgent),(\+ttExpressionType(tAgent)*->rhs([tSet(tAgent)])))
- % r_sane:mpred_fwc1(tSet(tAgent)).
- % Found positive trigger: tSet(tAgent)
- % body: rhs([functorDeclares(tAgent)])
- % RHS-Post1: functorDeclares(tAgent)
- % Support: tSet(tAgent),pt(tSet(tAgent),rhs([functorDeclares(tAgent)]))
- % r_sane:mpred_fwc1(functorDeclares(tAgent)).
- % Found positive trigger: functorDeclares(tAgent)
- % body: rhs([arityMax(tAgent,1),functorIsMacro(tAgent)])
- % RHS-Post1: arityMax(tAgent,1)
- % Support: functorDeclares(tAgent),pt(functorDeclares(tAgent),rhs([arityMax(tAgent,1),functorIsMacro(tAgent)]))
- % r_sane:mpred_fwc1(arityMax(tAgent, 1)).
- % Found positive trigger: arityMax(tAgent,1)
- % body: compound(arityMax(tAgent,1)),\+is_ftVar(arityMax(tAgent,1))*->rhs([{with_current_why(arityMax(tAgent,1),ignore(\+addAdmittedArguments(arityMax(tAgent,1))))}])
- % Found positive trigger: arityMax(tAgent,1)
- % body: is_kif_clause(arityMax(tAgent,1))*->rhs([clif(arityMax(tAgent,1))])
- % Found positive trigger: arityMax(tAgent,1)
- % body: compound(arityMax(tAgent,1)),\+is_ftVar(arityMax(tAgent,1))*->rhs([{with_current_why(arityMax(tAgent,1),ignore(\+addAdmittedArguments(arityMax(tAgent,1))))}])
- % RHS-Post1: functorIsMacro(tAgent)
- % Support: functorDeclares(tAgent),pt(functorDeclares(tAgent),rhs([arityMax(tAgent,1),functorIsMacro(tAgent)]))
- % r_sane:mpred_fwc1(functorIsMacro(tAgent)).
- % Found positive trigger: functorIsMacro(tAgent)
- % body: compound(functorIsMacro(tAgent)),\+is_ftVar(functorIsMacro(tAgent))*->rhs([{with_current_why(functorIsMacro(tAgent),ignore(\+addAdmittedArguments(functorIsMacro(tAgent))))}])
- % Found positive trigger: functorIsMacro(tAgent)
- % body: is_kif_clause(functorIsMacro(tAgent))*->rhs([clif(functorIsMacro(tAgent))])
- % Found positive trigger: functorIsMacro(tAgent)
- % body: compound(functorIsMacro(tAgent)),\+is_ftVar(functorIsMacro(tAgent))*->rhs([{with_current_why(functorIsMacro(tAgent),ignore(\+addAdmittedArguments(functorIsMacro(tAgent))))}])
- % Found positive trigger: functorDeclares(tAgent)
- % body: compound(functorDeclares(tAgent)),\+is_ftVar(functorDeclares(tAgent))*->rhs([{with_current_why(functorDeclares(tAgent),ignore(\+addAdmittedArguments(functorDeclares(tAgent))))}])
- % Found positive trigger: functorDeclares(tAgent)
- % body: is_kif_clause(functorDeclares(tAgent))*->rhs([clif(functorDeclares(tAgent))])
- % Found positive trigger: functorDeclares(tAgent)
- % body: compound(functorDeclares(tAgent)),\+is_ftVar(functorDeclares(tAgent))*->rhs([{with_current_why(functorDeclares(tAgent),ignore(\+addAdmittedArguments(functorDeclares(tAgent))))}])
- % Found positive trigger: tSet(tAgent)
- % body: rhs([tCol(tAgent),\+ttExpressionType(tAgent)])
- % RHS-Post1: tCol(tAgent)
- % Support: tSet(tAgent),pt(tSet(tAgent),rhs([tCol(tAgent),\+ttExpressionType(tAgent)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tAgent)
- % Support: tSet(tAgent),pt(tSet(tAgent),rhs([tCol(tAgent),\+ttExpressionType(tAgent)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tAgent)
- % support (was): _11116,_11118
- % Couldn't retract_i: spft(ttExpressionType(tAgent),_15682,_15684).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tAgent))).
- % Found positive trigger: tSet(tAgent)
- % body: rhs([tCol(tAgent)])
- % RHS-Post1: tCol(tAgent)
- % Support: tSet(tAgent),pt(tSet(tAgent),rhs([tCol(tAgent)]))
- % Found positive trigger: tSet(tAgent)
- % body: compound(tSet(tAgent)),\+is_ftVar(tSet(tAgent))*->rhs([{with_current_why(tSet(tAgent),ignore(\+addAdmittedArguments(tSet(tAgent))))}])
- % Found positive trigger: tSet(tAgent)
- % body: is_kif_clause(tSet(tAgent))*->rhs([clif(tSet(tAgent))])
- % Found positive trigger: tSet(tAgent)
- % body: compound(tSet(tAgent)),\+is_ftVar(tSet(tAgent))*->rhs([{with_current_why(tSet(tAgent),ignore(\+addAdmittedArguments(tSet(tAgent))))}])
- % Found positive trigger: tCol(tAgent)
- % body: is_kif_clause(tCol(tAgent))*->rhs([clif(tCol(tAgent))])
- % Found positive trigger: tCol(tAgent)
- % body: compound(tCol(tAgent)),\+is_ftVar(tCol(tAgent))*->rhs([{with_current_why(tCol(tAgent),ignore(\+addAdmittedArguments(tCol(tAgent))))}])
- % RHS-Post1: tCol(mobEmbodiedAgent)
- % Support: admittedArgument(argIsa,3,mobEmbodiedAgent),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(mobEmbodiedAgent)).
- % Found positive trigger: tCol(mobEmbodiedAgent)
- % body: rhs([{decl_type(mobEmbodiedAgent),kb_local(mobEmbodiedAgent/1)}])
- % Found positive trigger: tCol(mobEmbodiedAgent)
- % body: rhs([arity(mobEmbodiedAgent,1)])
- % RHS-Post1: arity(mobEmbodiedAgent,1)
- % Support: tCol(mobEmbodiedAgent),pt(tCol(mobEmbodiedAgent),rhs([arity(mobEmbodiedAgent,1)]))
- % Found positive trigger: tCol(mobEmbodiedAgent)
- % body: compound(tCol(mobEmbodiedAgent)),\+is_ftVar(tCol(mobEmbodiedAgent))*->rhs([{with_current_why(tCol(mobEmbodiedAgent),ignore(\+addAdmittedArguments(tCol(mobEmbodiedAgent))))}])
- % Found positive trigger: tCol(mobEmbodiedAgent)
- % body: \+ttExpressionType(mobEmbodiedAgent)*->rhs([tSet(mobEmbodiedAgent)])
- % RHS-Post1: tSet(mobEmbodiedAgent)
- % Support: tCol(mobEmbodiedAgent),pt(tCol(mobEmbodiedAgent),(\+ttExpressionType(mobEmbodiedAgent)*->rhs([tSet(mobEmbodiedAgent)])))
- % r_sane:mpred_fwc1(tSet(mobEmbodiedAgent)).
- % Found positive trigger: tSet(mobEmbodiedAgent)
- % body: rhs([functorDeclares(mobEmbodiedAgent)])
- % RHS-Post1: functorDeclares(mobEmbodiedAgent)
- % Support: tSet(mobEmbodiedAgent),pt(tSet(mobEmbodiedAgent),rhs([functorDeclares(mobEmbodiedAgent)]))
- % r_sane:mpred_fwc1(functorDeclares(mobEmbodiedAgent)).
- % Found positive trigger: functorDeclares(mobEmbodiedAgent)
- % body: rhs([arityMax(mobEmbodiedAgent,1),functorIsMacro(mobEmbodiedAgent)])
- % RHS-Post1: arityMax(mobEmbodiedAgent,1)
- % Support: functorDeclares(mobEmbodiedAgent),pt(functorDeclares(mobEmbodiedAgent),rhs([arityMax(mobEmbodiedAgent,1),functorIsMacro(mobEmbodiedAgent)]))
- % r_sane:mpred_fwc1(arityMax(mobEmbodiedAgent, 1)).
- % Found positive trigger: arityMax(mobEmbodiedAgent,1)
- % body: compound(arityMax(mobEmbodiedAgent,1)),\+is_ftVar(arityMax(mobEmbodiedAgent,1))*->rhs([{with_current_why(arityMax(mobEmbodiedAgent,1),ignore(\+addAdmittedArguments(arityMax(mobEmbodiedAgent,1))))}])
- % Found positive trigger: arityMax(mobEmbodiedAgent,1)
- % body: is_kif_clause(arityMax(mobEmbodiedAgent,1))*->rhs([clif(arityMax(mobEmbodiedAgent,1))])
- % Found positive trigger: arityMax(mobEmbodiedAgent,1)
- % body: compound(arityMax(mobEmbodiedAgent,1)),\+is_ftVar(arityMax(mobEmbodiedAgent,1))*->rhs([{with_current_why(arityMax(mobEmbodiedAgent,1),ignore(\+addAdmittedArguments(arityMax(mobEmbodiedAgent,1))))}])
- % RHS-Post1: functorIsMacro(mobEmbodiedAgent)
- % Support: functorDeclares(mobEmbodiedAgent),pt(functorDeclares(mobEmbodiedAgent),rhs([arityMax(mobEmbodiedAgent,1),functorIsMacro(mobEmbodiedAgent)]))
- % r_sane:mpred_fwc1(functorIsMacro(mobEmbodiedAgent)).
- % Found positive trigger: functorIsMacro(mobEmbodiedAgent)
- % body: compound(functorIsMacro(mobEmbodiedAgent)),\+is_ftVar(functorIsMacro(mobEmbodiedAgent))*->rhs([{with_current_why(functorIsMacro(mobEmbodiedAgent),ignore(\+addAdmittedArguments(functorIsMacro(mobEmbodiedAgent))))}])
- % Found positive trigger: functorIsMacro(mobEmbodiedAgent)
- % body: is_kif_clause(functorIsMacro(mobEmbodiedAgent))*->rhs([clif(functorIsMacro(mobEmbodiedAgent))])
- % Found positive trigger: functorIsMacro(mobEmbodiedAgent)
- % body: compound(functorIsMacro(mobEmbodiedAgent)),\+is_ftVar(functorIsMacro(mobEmbodiedAgent))*->rhs([{with_current_why(functorIsMacro(mobEmbodiedAgent),ignore(\+addAdmittedArguments(functorIsMacro(mobEmbodiedAgent))))}])
- % Found positive trigger: functorDeclares(mobEmbodiedAgent)
- % body: compound(functorDeclares(mobEmbodiedAgent)),\+is_ftVar(functorDeclares(mobEmbodiedAgent))*->rhs([{with_current_why(functorDeclares(mobEmbodiedAgent),ignore(\+addAdmittedArguments(functorDeclares(mobEmbodiedAgent))))}])
- % Found positive trigger: functorDeclares(mobEmbodiedAgent)
- % body: is_kif_clause(functorDeclares(mobEmbodiedAgent))*->rhs([clif(functorDeclares(mobEmbodiedAgent))])
- % Found positive trigger: functorDeclares(mobEmbodiedAgent)
- % body: compound(functorDeclares(mobEmbodiedAgent)),\+is_ftVar(functorDeclares(mobEmbodiedAgent))*->rhs([{with_current_why(functorDeclares(mobEmbodiedAgent),ignore(\+addAdmittedArguments(functorDeclares(mobEmbodiedAgent))))}])
- % Found positive trigger: tSet(mobEmbodiedAgent)
- % body: rhs([tCol(mobEmbodiedAgent),\+ttExpressionType(mobEmbodiedAgent)])
- % RHS-Post1: tCol(mobEmbodiedAgent)
- % Support: tSet(mobEmbodiedAgent),pt(tSet(mobEmbodiedAgent),rhs([tCol(mobEmbodiedAgent),\+ttExpressionType(mobEmbodiedAgent)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(mobEmbodiedAgent)
- % Support: tSet(mobEmbodiedAgent),pt(tSet(mobEmbodiedAgent),rhs([tCol(mobEmbodiedAgent),\+ttExpressionType(mobEmbodiedAgent)]))
- % Removing (withdraw1)
- % term: ttExpressionType(mobEmbodiedAgent)
- % support (was): _11024,_11026
- % Couldn't retract_i: spft(ttExpressionType(mobEmbodiedAgent),_15594,_15596).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(mobEmbodiedAgent))).
- % Found positive trigger: tSet(mobEmbodiedAgent)
- % body: rhs([tCol(mobEmbodiedAgent)])
- % RHS-Post1: tCol(mobEmbodiedAgent)
- % Support: tSet(mobEmbodiedAgent),pt(tSet(mobEmbodiedAgent),rhs([tCol(mobEmbodiedAgent)]))
- % Found positive trigger: tSet(mobEmbodiedAgent)
- % body: compound(tSet(mobEmbodiedAgent)),\+is_ftVar(tSet(mobEmbodiedAgent))*->rhs([{with_current_why(tSet(mobEmbodiedAgent),ignore(\+addAdmittedArguments(tSet(mobEmbodiedAgent))))}])
- % Found positive trigger: tSet(mobEmbodiedAgent)
- % body: is_kif_clause(tSet(mobEmbodiedAgent))*->rhs([clif(tSet(mobEmbodiedAgent))])
- % Found positive trigger: tSet(mobEmbodiedAgent)
- % body: compound(tSet(mobEmbodiedAgent)),\+is_ftVar(tSet(mobEmbodiedAgent))*->rhs([{with_current_why(tSet(mobEmbodiedAgent),ignore(\+addAdmittedArguments(tSet(mobEmbodiedAgent))))}])
- % Found positive trigger: tCol(mobEmbodiedAgent)
- % body: is_kif_clause(tCol(mobEmbodiedAgent))*->rhs([clif(tCol(mobEmbodiedAgent))])
- % Found positive trigger: tCol(mobEmbodiedAgent)
- % body: compound(tCol(mobEmbodiedAgent)),\+is_ftVar(tCol(mobEmbodiedAgent))*->rhs([{with_current_why(tCol(mobEmbodiedAgent),ignore(\+addAdmittedArguments(tCol(mobEmbodiedAgent))))}])
- % RHS-Post1: tCol(ttFirstOrderCollection)
- % Support: admittedArgument(argIsa,3,ttFirstOrderCollection),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(ttFirstOrderCollection)).
- % Found positive trigger: tCol(ttFirstOrderCollection)
- % body: rhs([{decl_type(ttFirstOrderCollection),kb_local(ttFirstOrderCollection/1)}])
- % Found positive trigger: tCol(ttFirstOrderCollection)
- % body: rhs([arity(ttFirstOrderCollection,1)])
- % RHS-Post1: arity(ttFirstOrderCollection,1)
- % Support: tCol(ttFirstOrderCollection),pt(tCol(ttFirstOrderCollection),rhs([arity(ttFirstOrderCollection,1)]))
- % Found positive trigger: tCol(ttFirstOrderCollection)
- % body: compound(tCol(ttFirstOrderCollection)),\+is_ftVar(tCol(ttFirstOrderCollection))*->rhs([{with_current_why(tCol(ttFirstOrderCollection),ignore(\+addAdmittedArguments(tCol(ttFirstOrderCollection))))}])
- % Found positive trigger: tCol(ttFirstOrderCollection)
- % body: \+ttExpressionType(ttFirstOrderCollection)*->rhs([tSet(ttFirstOrderCollection)])
- % RHS-Post1: tSet(ttFirstOrderCollection)
- % Support: tCol(ttFirstOrderCollection),pt(tCol(ttFirstOrderCollection),(\+ttExpressionType(ttFirstOrderCollection)*->rhs([tSet(ttFirstOrderCollection)])))
- % r_sane:mpred_fwc1(tSet(ttFirstOrderCollection)).
- % Found positive trigger: tSet(ttFirstOrderCollection)
- % body: rhs([functorDeclares(ttFirstOrderCollection)])
- % RHS-Post1: functorDeclares(ttFirstOrderCollection)
- % Support: tSet(ttFirstOrderCollection),pt(tSet(ttFirstOrderCollection),rhs([functorDeclares(ttFirstOrderCollection)]))
- % r_sane:mpred_fwc1(functorDeclares(ttFirstOrderCollection)).
- % Found positive trigger: functorDeclares(ttFirstOrderCollection)
- % body: rhs([arityMax(ttFirstOrderCollection,1),functorIsMacro(ttFirstOrderCollection)])
- % RHS-Post1: arityMax(ttFirstOrderCollection,1)
- % Support: functorDeclares(ttFirstOrderCollection),pt(functorDeclares(ttFirstOrderCollection),rhs([arityMax(ttFirstOrderCollection,1),functorIsMacro(ttFirstOrderCollection)]))
- % r_sane:mpred_fwc1(arityMax(ttFirstOrderCollection, 1)).
- % Found positive trigger: arityMax(ttFirstOrderCollection,1)
- % body: compound(arityMax(ttFirstOrderCollection,1)),\+is_ftVar(arityMax(ttFirstOrderCollection,1))*->rhs([{with_current_why(arityMax(ttFirstOrderCollection,1),ignore(\+addAdmittedArguments(arityMax(ttFirstOrderCollection,1))))}])
- % Found positive trigger: arityMax(ttFirstOrderCollection,1)
- % body: is_kif_clause(arityMax(ttFirstOrderCollection,1))*->rhs([clif(arityMax(ttFirstOrderCollection,1))])
- % Found positive trigger: arityMax(ttFirstOrderCollection,1)
- % body: compound(arityMax(ttFirstOrderCollection,1)),\+is_ftVar(arityMax(ttFirstOrderCollection,1))*->rhs([{with_current_why(arityMax(ttFirstOrderCollection,1),ignore(\+addAdmittedArguments(arityMax(ttFirstOrderCollection,1))))}])
- % RHS-Post1: functorIsMacro(ttFirstOrderCollection)
- % Support: functorDeclares(ttFirstOrderCollection),pt(functorDeclares(ttFirstOrderCollection),rhs([arityMax(ttFirstOrderCollection,1),functorIsMacro(ttFirstOrderCollection)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttFirstOrderCollection)).
- % Found positive trigger: functorIsMacro(ttFirstOrderCollection)
- % body: compound(functorIsMacro(ttFirstOrderCollection)),\+is_ftVar(functorIsMacro(ttFirstOrderCollection))*->rhs([{with_current_why(functorIsMacro(ttFirstOrderCollection),ignore(\+addAdmittedArguments(functorIsMacro(ttFirstOrderCollection))))}])
- % Found positive trigger: functorIsMacro(ttFirstOrderCollection)
- % body: is_kif_clause(functorIsMacro(ttFirstOrderCollection))*->rhs([clif(functorIsMacro(ttFirstOrderCollection))])
- % Found positive trigger: functorIsMacro(ttFirstOrderCollection)
- % body: compound(functorIsMacro(ttFirstOrderCollection)),\+is_ftVar(functorIsMacro(ttFirstOrderCollection))*->rhs([{with_current_why(functorIsMacro(ttFirstOrderCollection),ignore(\+addAdmittedArguments(functorIsMacro(ttFirstOrderCollection))))}])
- % Found positive trigger: functorDeclares(ttFirstOrderCollection)
- % body: compound(functorDeclares(ttFirstOrderCollection)),\+is_ftVar(functorDeclares(ttFirstOrderCollection))*->rhs([{with_current_why(functorDeclares(ttFirstOrderCollection),ignore(\+addAdmittedArguments(functorDeclares(ttFirstOrderCollection))))}])
- % Found positive trigger: functorDeclares(ttFirstOrderCollection)
- % body: is_kif_clause(functorDeclares(ttFirstOrderCollection))*->rhs([clif(functorDeclares(ttFirstOrderCollection))])
- % Found positive trigger: functorDeclares(ttFirstOrderCollection)
- % body: compound(functorDeclares(ttFirstOrderCollection)),\+is_ftVar(functorDeclares(ttFirstOrderCollection))*->rhs([{with_current_why(functorDeclares(ttFirstOrderCollection),ignore(\+addAdmittedArguments(functorDeclares(ttFirstOrderCollection))))}])
- % Found positive trigger: tSet(ttFirstOrderCollection)
- % body: rhs([tCol(ttFirstOrderCollection),\+ttExpressionType(ttFirstOrderCollection)])
- % RHS-Post1: tCol(ttFirstOrderCollection)
- % Support: tSet(ttFirstOrderCollection),pt(tSet(ttFirstOrderCollection),rhs([tCol(ttFirstOrderCollection),\+ttExpressionType(ttFirstOrderCollection)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttFirstOrderCollection)
- % Support: tSet(ttFirstOrderCollection),pt(tSet(ttFirstOrderCollection),rhs([tCol(ttFirstOrderCollection),\+ttExpressionType(ttFirstOrderCollection)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttFirstOrderCollection)
- % support (was): _11056,_11058
- % Couldn't retract_i: spft(ttExpressionType(ttFirstOrderCollection),_15630,_15632).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttFirstOrderCollection))).
- % Found positive trigger: tSet(ttFirstOrderCollection)
- % body: rhs([tCol(ttFirstOrderCollection)])
- % RHS-Post1: tCol(ttFirstOrderCollection)
- % Support: tSet(ttFirstOrderCollection),pt(tSet(ttFirstOrderCollection),rhs([tCol(ttFirstOrderCollection)]))
- % Found positive trigger: tSet(ttFirstOrderCollection)
- % body: compound(tSet(ttFirstOrderCollection)),\+is_ftVar(tSet(ttFirstOrderCollection))*->rhs([{with_current_why(tSet(ttFirstOrderCollection),ignore(\+addAdmittedArguments(tSet(ttFirstOrderCollection))))}])
- % Found positive trigger: tSet(ttFirstOrderCollection)
- % body: is_kif_clause(tSet(ttFirstOrderCollection))*->rhs([clif(tSet(ttFirstOrderCollection))])
- % Found positive trigger: tSet(ttFirstOrderCollection)
- % body: compound(tSet(ttFirstOrderCollection)),\+is_ftVar(tSet(ttFirstOrderCollection))*->rhs([{with_current_why(tSet(ttFirstOrderCollection),ignore(\+addAdmittedArguments(tSet(ttFirstOrderCollection))))}])
- % Found positive trigger: tCol(ttFirstOrderCollection)
- % body: is_kif_clause(tCol(ttFirstOrderCollection))*->rhs([clif(tCol(ttFirstOrderCollection))])
- % Found positive trigger: tCol(ttFirstOrderCollection)
- % body: compound(tCol(ttFirstOrderCollection)),\+is_ftVar(tCol(ttFirstOrderCollection))*->rhs([{with_current_why(tCol(ttFirstOrderCollection),ignore(\+addAdmittedArguments(tCol(ttFirstOrderCollection))))}])
- % RHS-Post1: tCol(rtBinaryRolePredicate)
- % Support: admittedArgument(argIsa,3,rtBinaryRolePredicate),pt(admittedArgument(argIsa,3,_6408),(nonvar(_6408)*->rhs([tCol(_6408)])))
- % r_sane:mpred_fwc1(tCol(rtBinaryRolePredicate)).
- % Found positive trigger: tCol(rtBinaryRolePredicate)
- % body: rhs([{decl_type(rtBinaryRolePredicate),kb_local(rtBinaryRolePredicate/1)}])
- % Found positive trigger: tCol(rtBinaryRolePredicate)
- % body: rhs([arity(rtBinaryRolePredicate,1)])
- % RHS-Post1: arity(rtBinaryRolePredicate,1)
- % Support: tCol(rtBinaryRolePredicate),pt(tCol(rtBinaryRolePredicate),rhs([arity(rtBinaryRolePredicate,1)]))
- % Found positive trigger: tCol(rtBinaryRolePredicate)
- % body: compound(tCol(rtBinaryRolePredicate)),\+is_ftVar(tCol(rtBinaryRolePredicate))*->rhs([{with_current_why(tCol(rtBinaryRolePredicate),ignore(\+addAdmittedArguments(tCol(rtBinaryRolePredicate))))}])
- % Found positive trigger: tCol(rtBinaryRolePredicate)
- % body: \+ttExpressionType(rtBinaryRolePredicate)*->rhs([tSet(rtBinaryRolePredicate)])
- % RHS-Post1: tSet(rtBinaryRolePredicate)
- % Support: tCol(rtBinaryRolePredicate),pt(tCol(rtBinaryRolePredicate),(\+ttExpressionType(rtBinaryRolePredicate)*->rhs([tSet(rtBinaryRolePredicate)])))
- % r_sane:mpred_fwc1(tSet(rtBinaryRolePredicate)).
- % Found positive trigger: tSet(rtBinaryRolePredicate)
- % body: rhs([functorDeclares(rtBinaryRolePredicate)])
- % RHS-Post1: functorDeclares(rtBinaryRolePredicate)
- % Support: tSet(rtBinaryRolePredicate),pt(tSet(rtBinaryRolePredicate),rhs([functorDeclares(rtBinaryRolePredicate)]))
- % r_sane:mpred_fwc1(functorDeclares(rtBinaryRolePredicate)).
- % Found positive trigger: functorDeclares(rtBinaryRolePredicate)
- % body: rhs([arityMax(rtBinaryRolePredicate,1),functorIsMacro(rtBinaryRolePredicate)])
- % RHS-Post1: arityMax(rtBinaryRolePredicate,1)
- % Support: functorDeclares(rtBinaryRolePredicate),pt(functorDeclares(rtBinaryRolePredicate),rhs([arityMax(rtBinaryRolePredicate,1),functorIsMacro(rtBinaryRolePredicate)]))
- % r_sane:mpred_fwc1(arityMax(rtBinaryRolePredicate, 1)).
- % Found positive trigger: arityMax(rtBinaryRolePredicate,1)
- % body: compound(arityMax(rtBinaryRolePredicate,1)),\+is_ftVar(arityMax(rtBinaryRolePredicate,1))*->rhs([{with_current_why(arityMax(rtBinaryRolePredicate,1),ignore(\+addAdmittedArguments(arityMax(rtBinaryRolePredicate,1))))}])
- % Found positive trigger: arityMax(rtBinaryRolePredicate,1)
- % body: is_kif_clause(arityMax(rtBinaryRolePredicate,1))*->rhs([clif(arityMax(rtBinaryRolePredicate,1))])
- % Found positive trigger: arityMax(rtBinaryRolePredicate,1)
- % body: compound(arityMax(rtBinaryRolePredicate,1)),\+is_ftVar(arityMax(rtBinaryRolePredicate,1))*->rhs([{with_current_why(arityMax(rtBinaryRolePredicate,1),ignore(\+addAdmittedArguments(arityMax(rtBinaryRolePredicate,1))))}])
- % RHS-Post1: functorIsMacro(rtBinaryRolePredicate)
- % Support: functorDeclares(rtBinaryRolePredicate),pt(functorDeclares(rtBinaryRolePredicate),rhs([arityMax(rtBinaryRolePredicate,1),functorIsMacro(rtBinaryRolePredicate)]))
- % r_sane:mpred_fwc1(functorIsMacro(rtBinaryRolePredicate)).
- % Found positive trigger: functorIsMacro(rtBinaryRolePredicate)
- % body: compound(functorIsMacro(rtBinaryRolePredicate)),\+is_ftVar(functorIsMacro(rtBinaryRolePredicate))*->rhs([{with_current_why(functorIsMacro(rtBinaryRolePredicate),ignore(\+addAdmittedArguments(functorIsMacro(rtBinaryRolePredicate))))}])
- % Found positive trigger: functorIsMacro(rtBinaryRolePredicate)
- % body: is_kif_clause(functorIsMacro(rtBinaryRolePredicate))*->rhs([clif(functorIsMacro(rtBinaryRolePredicate))])
- % Found positive trigger: functorIsMacro(rtBinaryRolePredicate)
- % body: compound(functorIsMacro(rtBinaryRolePredicate)),\+is_ftVar(functorIsMacro(rtBinaryRolePredicate))*->rhs([{with_current_why(functorIsMacro(rtBinaryRolePredicate),ignore(\+addAdmittedArguments(functorIsMacro(rtBinaryRolePredicate))))}])
- % Found positive trigger: functorDeclares(rtBinaryRolePredicate)
- % body: compound(functorDeclares(rtBinaryRolePredicate)),\+is_ftVar(functorDeclares(rtBinaryRolePredicate))*->rhs([{with_current_why(functorDeclares(rtBinaryRolePredicate),ignore(\+addAdmittedArguments(functorDeclares(rtBinaryRolePredicate))))}])
- % Found positive trigger: functorDeclares(rtBinaryRolePredicate)
- % body: is_kif_clause(functorDeclares(rtBinaryRolePredicate))*->rhs([clif(functorDeclares(rtBinaryRolePredicate))])
- % Found positive trigger: functorDeclares(rtBinaryRolePredicate)
- % body: compound(functorDeclares(rtBinaryRolePredicate)),\+is_ftVar(functorDeclares(rtBinaryRolePredicate))*->rhs([{with_current_why(functorDeclares(rtBinaryRolePredicate),ignore(\+addAdmittedArguments(functorDeclares(rtBinaryRolePredicate))))}])
- % Found positive trigger: tSet(rtBinaryRolePredicate)
- % body: rhs([tCol(rtBinaryRolePredicate),\+ttExpressionType(rtBinaryRolePredicate)])
- % RHS-Post1: tCol(rtBinaryRolePredicate)
- % Support: tSet(rtBinaryRolePredicate),pt(tSet(rtBinaryRolePredicate),rhs([tCol(rtBinaryRolePredicate),\+ttExpressionType(rtBinaryRolePredicate)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(rtBinaryRolePredicate)
- % Support: tSet(rtBinaryRolePredicate),pt(tSet(rtBinaryRolePredicate),rhs([tCol(rtBinaryRolePredicate),\+ttExpressionType(rtBinaryRolePredicate)]))
- % Removing (withdraw1)
- % term: ttExpressionType(rtBinaryRolePredicate)
- % support (was): _27888,_27890
- % Couldn't retract_i: spft(ttExpressionType(rtBinaryRolePredicate),_32460,_32462).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(rtBinaryRolePredicate))).
- % Found positive trigger: tSet(rtBinaryRolePredicate)
- % body: rhs([tCol(rtBinaryRolePredicate)])
- % RHS-Post1: tCol(rtBinaryRolePredicate)
- % Support: tSet(rtBinaryRolePredicate),pt(tSet(rtBinaryRolePredicate),rhs([tCol(rtBinaryRolePredicate)]))
- % Found positive trigger: tSet(rtBinaryRolePredicate)
- % body: compound(tSet(rtBinaryRolePredicate)),\+is_ftVar(tSet(rtBinaryRolePredicate))*->rhs([{with_current_why(tSet(rtBinaryRolePredicate),ignore(\+addAdmittedArguments(tSet(rtBinaryRolePredicate))))}])
- % Found positive trigger: tSet(rtBinaryRolePredicate)
- % body: is_kif_clause(tSet(rtBinaryRolePredicate))*->rhs([clif(tSet(rtBinaryRolePredicate))])
- % Found positive trigger: tSet(rtBinaryRolePredicate)
- % body: compound(tSet(rtBinaryRolePredicate)),\+is_ftVar(tSet(rtBinaryRolePredicate))*->rhs([{with_current_why(tSet(rtBinaryRolePredicate),ignore(\+addAdmittedArguments(tSet(rtBinaryRolePredicate))))}])
- % Found positive trigger: tCol(rtBinaryRolePredicate)
- % body: is_kif_clause(tCol(rtBinaryRolePredicate))*->rhs([clif(tCol(rtBinaryRolePredicate))])
- % Found positive trigger: tCol(rtBinaryRolePredicate)
- % body: compound(tCol(rtBinaryRolePredicate)),\+is_ftVar(tCol(rtBinaryRolePredicate))*->rhs([{with_current_why(tCol(rtBinaryRolePredicate),ignore(\+addAdmittedArguments(tCol(rtBinaryRolePredicate))))}])
- % gripe_CPUTIME(true, warn(0.832430384999995>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, (admittedArgument(argIsa, 3, _2666)/nonvar(_2666)==>tCol(_2666)), (argIsa(argIsa, 3, tCol), pt(argIsa(_3870, _3872, _3874), (nonvar(_3874), nonvar(_3870), integer(_3872)*->rhs([tCol(_3874), (admittedArgument(_3870, _3872, _3944)/nonvar(_3944)==>isa(_3944, _3874)), (poss(admittedArgument(_3870, _3872, _3944))/nonvar(_3944)==>isa(_3944, _3874))])))), none))).
- % RHS-Post1: poss(admittedArgument(argIsa,3,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(argIsa,3,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(argIsa, 3, _31998))/nonvar(_31998)==>tCol(_31998))).
- % Adding positive
- % trigger: poss(admittedArgument(argIsa,3,_5824))
- % body: nonvar(_5824)*->rhs([tCol(_5824)])
- % Support: (poss(admittedArgument(argIsa,3,_6014))/nonvar(_6014)==>tCol(_6014)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(vtSize)
- % Support: poss(admittedArgument(argIsa,3,vtSize)),pt(poss(admittedArgument(argIsa,3,_11094)),(nonvar(_11094)*->rhs([tCol(_11094)])))
- % RHS-Post1: tCol(tTemporalThing)
- % Support: poss(admittedArgument(argIsa,3,tTemporalThing)),pt(poss(admittedArgument(argIsa,3,_11094)),(nonvar(_11094)*->rhs([tCol(_11094)])))
- % RHS-Post1: tCol(vtTexture)
- % Support: poss(admittedArgument(argIsa,3,vtTexture)),pt(poss(admittedArgument(argIsa,3,_11094)),(nonvar(_11094)*->rhs([tCol(_11094)])))
- % RHS-Post1: tCol(vtColor)
- % Support: poss(admittedArgument(argIsa,3,vtColor)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(vtShape)
- % Support: poss(admittedArgument(argIsa,3,vtShape)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(vtMaterial)
- % Support: poss(admittedArgument(argIsa,3,vtMaterial)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(tPred)
- % Support: poss(admittedArgument(argIsa,3,tPred)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftAssertion)
- % Support: poss(admittedArgument(argIsa,3,ftAssertion)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftCallable)
- % Support: poss(admittedArgument(argIsa,3,ftCallable)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(prologSingleValued)
- % Support: poss(admittedArgument(argIsa,3,prologSingleValued)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftInt)
- % Support: poss(admittedArgument(argIsa,3,ftInt)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftTerm)
- % Support: poss(admittedArgument(argIsa,3,ftTerm)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(tRelation)
- % Support: poss(admittedArgument(argIsa,3,tRelation)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(tCol)
- % Support: poss(admittedArgument(argIsa,3,tCol)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ttExpressionType)
- % Support: poss(admittedArgument(argIsa,3,ttExpressionType)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(tObj)
- % Support: poss(admittedArgument(argIsa,3,tObj)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(tRegion)
- % Support: poss(admittedArgument(argIsa,3,tRegion)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(vtDirection)
- % Support: poss(admittedArgument(argIsa,3,vtDirection)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(tSpatialThing)
- % Support: poss(admittedArgument(argIsa,3,tSpatialThing)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftVoprop)
- % Support: poss(admittedArgument(argIsa,3,ftVoprop)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftString)
- % Support: poss(admittedArgument(argIsa,3,ftString)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftSpec)
- % Support: poss(admittedArgument(argIsa,3,ftSpec)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftAskable)
- % Support: poss(admittedArgument(argIsa,3,ftAskable)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftAssertable)
- % Support: poss(admittedArgument(argIsa,3,ftAssertable)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(prologMultiValued)
- % Support: poss(admittedArgument(argIsa,3,prologMultiValued)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ftID)
- % Support: poss(admittedArgument(argIsa,3,ftID)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(tAgent)
- % Support: poss(admittedArgument(argIsa,3,tAgent)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(mobEmbodiedAgent)
- % Support: poss(admittedArgument(argIsa,3,mobEmbodiedAgent)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(ttFirstOrderCollection)
- % Support: poss(admittedArgument(argIsa,3,ttFirstOrderCollection)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(rtBinaryRolePredicate)
- % Support: poss(admittedArgument(argIsa,3,rtBinaryRolePredicate)),pt(poss(admittedArgument(argIsa,3,_6452)),(nonvar(_6452)*->rhs([tCol(_6452)])))
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(genlPreds,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(genlPreds,1,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(genlPreds,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(genlPreds, 1, _20280)/nonvar(_20280)==>tPred(_20280))).
- % Adding positive
- % trigger: admittedArgument(genlPreds,1,_5832)
- % body: nonvar(_5832)*->rhs([tPred(_5832)])
- % Support: (admittedArgument(genlPreds,1,_6014)/nonvar(_6014)==>tPred(_6014)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(genlPreds,1,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(genlPreds,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(genlPreds, 1, _22024))/nonvar(_22024)==>tPred(_22024))).
- % Adding positive
- % trigger: poss(admittedArgument(genlPreds,1,_22024))
- % body: nonvar(_22024)*->rhs([tPred(_22024)])
- % Support: (poss(admittedArgument(genlPreds,1,_24706))/nonvar(_24706)==>tPred(_24706)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(genlPreds,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(genlPreds,2,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(genlPreds,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(genlPreds, 2, _20286)/nonvar(_20286)==>tPred(_20286))).
- % Adding positive
- % trigger: admittedArgument(genlPreds,2,_5856)
- % body: nonvar(_5856)*->rhs([tPred(_5856)])
- % Support: (admittedArgument(genlPreds,2,_6038)/nonvar(_6038)==>tPred(_6038)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tPred(pfcControlled)
- % Support: admittedArgument(genlPreds,2,pfcControlled),pt(admittedArgument(genlPreds,2,_11072),(nonvar(_11072)*->rhs([tPred(_11072)])))
- % r_sane:mpred_fwc1(tPred(pfcControlled)).
- % Found positive trigger: tPred(pfcControlled)
- % body: rhs([tRelation(pfcControlled)])
- % RHS-Post1: tRelation(pfcControlled)
- % Support: tPred(pfcControlled),pt(tPred(pfcControlled),rhs([tRelation(pfcControlled)]))
- % r_sane:mpred_fwc1(tRelation(pfcControlled)).
- % Found positive trigger: tRelation(pfcControlled)
- % body: nt(tFunction(pfcControlled),call_u_no_bc(tFunction(pfcControlled)),rhs([tPred(pfcControlled)]))
- % Adding negative
- % trigger: tFunction(pfcControlled)
- % test: call_u_no_bc(tFunction(pfcControlled))
- % body: rhs([tPred(pfcControlled)])
- % Support: tRelation(pfcControlled),pt(tRelation(pfcControlled),nt(tFunction(pfcControlled),call_u_no_bc(tFunction(pfcControlled)),rhs([tPred(pfcControlled)])))
- % uses_predicate(header_sane, header_sane, tFunction, 1).
- % RHS-Post1: tPred(pfcControlled)
- % Support: \+tFunction(pfcControlled),nt(tFunction(pfcControlled),call_u_no_bc(tFunction(pfcControlled)),rhs([tPred(pfcControlled)]))
- % Found positive trigger: tRelation(pfcControlled)
- % body: compound(tRelation(pfcControlled)),\+is_ftVar(tRelation(pfcControlled))*->rhs([{with_current_why(tRelation(pfcControlled),ignore(\+addAdmittedArguments(tRelation(pfcControlled))))}])
- % Found positive trigger: tRelation(pfcControlled)
- % body: is_kif_clause(tRelation(pfcControlled))*->rhs([clif(tRelation(pfcControlled))])
- % Found positive trigger: tRelation(pfcControlled)
- % body: compound(tRelation(pfcControlled)),\+is_ftVar(tRelation(pfcControlled))*->rhs([{with_current_why(tRelation(pfcControlled),ignore(\+addAdmittedArguments(tRelation(pfcControlled))))}])
- % Found positive trigger: tPred(pfcControlled)
- % body: compound(tPred(pfcControlled)),\+is_ftVar(tPred(pfcControlled))*->rhs([{with_current_why(tPred(pfcControlled),ignore(\+addAdmittedArguments(tPred(pfcControlled))))}])
- % Found positive trigger: tPred(pfcControlled)
- % body: arity(pfcControlled,2)*->rhs([rtBinaryPredicate(pfcControlled)])
- % Found positive trigger: tPred(pfcControlled)
- % body: is_kif_clause(tPred(pfcControlled))*->rhs([clif(tPred(pfcControlled))])
- % Found positive trigger: tPred(pfcControlled)
- % body: compound(tPred(pfcControlled)),\+is_ftVar(tPred(pfcControlled))*->rhs([{with_current_why(tPred(pfcControlled),ignore(\+addAdmittedArguments(tPred(pfcControlled))))}])
- % RHS-Post1: tPred(rtNotForUnboundPredicates)
- % Support: admittedArgument(genlPreds,2,rtNotForUnboundPredicates),pt(admittedArgument(genlPreds,2,_6456),(nonvar(_6456)*->rhs([tPred(_6456)])))
- % r_sane:mpred_fwc1(tPred(rtNotForUnboundPredicates)).
- % Found positive trigger: tPred(rtNotForUnboundPredicates)
- % body: rhs([tRelation(rtNotForUnboundPredicates)])
- % RHS-Post1: tRelation(rtNotForUnboundPredicates)
- % Support: tPred(rtNotForUnboundPredicates),pt(tPred(rtNotForUnboundPredicates),rhs([tRelation(rtNotForUnboundPredicates)]))
- % r_sane:mpred_fwc1(tRelation(rtNotForUnboundPredicates)).
- % Found positive trigger: tRelation(rtNotForUnboundPredicates)
- % body: nt(tFunction(rtNotForUnboundPredicates),call_u_no_bc(tFunction(rtNotForUnboundPredicates)),rhs([tPred(rtNotForUnboundPredicates)]))
- % Adding negative
- % trigger: tFunction(rtNotForUnboundPredicates)
- % test: call_u_no_bc(tFunction(rtNotForUnboundPredicates))
- % body: rhs([tPred(rtNotForUnboundPredicates)])
- % Support: tRelation(rtNotForUnboundPredicates),pt(tRelation(rtNotForUnboundPredicates),nt(tFunction(rtNotForUnboundPredicates),call_u_no_bc(tFunction(rtNotForUnboundPredicates)),rhs([tPred(rtNotForUnboundPredicates)])))
- % RHS-Post1: tPred(rtNotForUnboundPredicates)
- % Support: \+tFunction(rtNotForUnboundPredicates),nt(tFunction(rtNotForUnboundPredicates),call_u_no_bc(tFunction(rtNotForUnboundPredicates)),rhs([tPred(rtNotForUnboundPredicates)]))
- % Found positive trigger: tRelation(rtNotForUnboundPredicates)
- % body: compound(tRelation(rtNotForUnboundPredicates)),\+is_ftVar(tRelation(rtNotForUnboundPredicates))*->rhs([{with_current_why(tRelation(rtNotForUnboundPredicates),ignore(\+addAdmittedArguments(tRelation(rtNotForUnboundPredicates))))}])
- % Found positive trigger: tRelation(rtNotForUnboundPredicates)
- % body: is_kif_clause(tRelation(rtNotForUnboundPredicates))*->rhs([clif(tRelation(rtNotForUnboundPredicates))])
- % Found positive trigger: tRelation(rtNotForUnboundPredicates)
- % body: compound(tRelation(rtNotForUnboundPredicates)),\+is_ftVar(tRelation(rtNotForUnboundPredicates))*->rhs([{with_current_why(tRelation(rtNotForUnboundPredicates),ignore(\+addAdmittedArguments(tRelation(rtNotForUnboundPredicates))))}])
- % Found positive trigger: tPred(rtNotForUnboundPredicates)
- % body: compound(tPred(rtNotForUnboundPredicates)),\+is_ftVar(tPred(rtNotForUnboundPredicates))*->rhs([{with_current_why(tPred(rtNotForUnboundPredicates),ignore(\+addAdmittedArguments(tPred(rtNotForUnboundPredicates))))}])
- % Found positive trigger: tPred(rtNotForUnboundPredicates)
- % body: arity(rtNotForUnboundPredicates,2)*->rhs([rtBinaryPredicate(rtNotForUnboundPredicates)])
- % Found positive trigger: tPred(rtNotForUnboundPredicates)
- % body: is_kif_clause(tPred(rtNotForUnboundPredicates))*->rhs([clif(tPred(rtNotForUnboundPredicates))])
- % Found positive trigger: tPred(rtNotForUnboundPredicates)
- % body: compound(tPred(rtNotForUnboundPredicates)),\+is_ftVar(tPred(rtNotForUnboundPredicates))*->rhs([{with_current_why(tPred(rtNotForUnboundPredicates),ignore(\+addAdmittedArguments(tPred(rtNotForUnboundPredicates))))}])
- % RHS-Post1: tPred(prologHybrid)
- % Support: admittedArgument(genlPreds,2,prologHybrid),pt(admittedArgument(genlPreds,2,_6456),(nonvar(_6456)*->rhs([tPred(_6456)])))
- % r_sane:mpred_fwc1(tPred(prologHybrid)).
- % Found positive trigger: tPred(prologHybrid)
- % body: rhs([tRelation(prologHybrid)])
- % RHS-Post1: tRelation(prologHybrid)
- % Support: tPred(prologHybrid),pt(tPred(prologHybrid),rhs([tRelation(prologHybrid)]))
- % r_sane:mpred_fwc1(tRelation(prologHybrid)).
- % Found positive trigger: tRelation(prologHybrid)
- % body: nt(tFunction(prologHybrid),call_u_no_bc(tFunction(prologHybrid)),rhs([tPred(prologHybrid)]))
- % Adding negative
- % trigger: tFunction(prologHybrid)
- % test: call_u_no_bc(tFunction(prologHybrid))
- % body: rhs([tPred(prologHybrid)])
- % Support: tRelation(prologHybrid),pt(tRelation(prologHybrid),nt(tFunction(prologHybrid),call_u_no_bc(tFunction(prologHybrid)),rhs([tPred(prologHybrid)])))
- % RHS-Post1: tPred(prologHybrid)
- % Support: \+tFunction(prologHybrid),nt(tFunction(prologHybrid),call_u_no_bc(tFunction(prologHybrid)),rhs([tPred(prologHybrid)]))
- % Found positive trigger: tRelation(prologHybrid)
- % body: compound(tRelation(prologHybrid)),\+is_ftVar(tRelation(prologHybrid))*->rhs([{with_current_why(tRelation(prologHybrid),ignore(\+addAdmittedArguments(tRelation(prologHybrid))))}])
- % Found positive trigger: tRelation(prologHybrid)
- % body: is_kif_clause(tRelation(prologHybrid))*->rhs([clif(tRelation(prologHybrid))])
- % Found positive trigger: tRelation(prologHybrid)
- % body: compound(tRelation(prologHybrid)),\+is_ftVar(tRelation(prologHybrid))*->rhs([{with_current_why(tRelation(prologHybrid),ignore(\+addAdmittedArguments(tRelation(prologHybrid))))}])
- % Found positive trigger: tPred(prologHybrid)
- % body: compound(tPred(prologHybrid)),\+is_ftVar(tPred(prologHybrid))*->rhs([{with_current_why(tPred(prologHybrid),ignore(\+addAdmittedArguments(tPred(prologHybrid))))}])
- % Found positive trigger: tPred(prologHybrid)
- % body: arity(prologHybrid,2)*->rhs([rtBinaryPredicate(prologHybrid)])
- % Found positive trigger: tPred(prologHybrid)
- % body: is_kif_clause(tPred(prologHybrid))*->rhs([clif(tPred(prologHybrid))])
- % Found positive trigger: tPred(prologHybrid)
- % body: compound(tPred(prologHybrid)),\+is_ftVar(tPred(prologHybrid))*->rhs([{with_current_why(tPred(prologHybrid),ignore(\+addAdmittedArguments(tPred(prologHybrid))))}])
- % RHS-Post1: poss(admittedArgument(genlPreds,2,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(genlPreds,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(genlPreds, 2, _13672))/nonvar(_13672)==>tPred(_13672))).
- % Adding positive
- % trigger: poss(admittedArgument(genlPreds,2,_13672))
- % body: nonvar(_13672)*->rhs([tPred(_13672)])
- % Support: (poss(admittedArgument(genlPreds,2,_16354))/nonvar(_16354)==>tPred(_16354)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tPred(pfcControlled)
- % Support: poss(admittedArgument(genlPreds,2,pfcControlled)),pt(poss(admittedArgument(genlPreds,2,_6510)),(nonvar(_6510)*->rhs([tPred(_6510)])))
- % RHS-Post1: tPred(rtNotForUnboundPredicates)
- % Support: poss(admittedArgument(genlPreds,2,rtNotForUnboundPredicates)),pt(poss(admittedArgument(genlPreds,2,_6510)),(nonvar(_6510)*->rhs([tPred(_6510)])))
- % RHS-Post1: tPred(prologHybrid)
- % Support: poss(admittedArgument(genlPreds,2,prologHybrid)),pt(poss(admittedArgument(genlPreds,2,_6510)),(nonvar(_6510)*->rhs([tPred(_6510)])))
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(quotedIsa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(quotedIsa,1,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(quotedIsa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(quotedIsa, 1, _20322)/nonvar(_20322)==>ftTerm(_20322))).
- % Adding positive
- % trigger: admittedArgument(quotedIsa,1,_5880)
- % body: nonvar(_5880)*->rhs([ftTerm(_5880)])
- % Support: (admittedArgument(quotedIsa,1,_6062)/nonvar(_6062)==>ftTerm(_6062)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(quotedIsa,1,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(quotedIsa,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(quotedIsa, 1, _22080))/nonvar(_22080)==>ftTerm(_22080))).
- % Adding positive
- % trigger: poss(admittedArgument(quotedIsa,1,_22080))
- % body: nonvar(_22080)*->rhs([ftTerm(_22080)])
- % Support: (poss(admittedArgument(quotedIsa,1,_24764))/nonvar(_24764)==>ftTerm(_24764)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttExpressionType)
- % Support: argIsa(quotedIsa,2,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(quotedIsa,2,_2666)/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(quotedIsa,2,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(quotedIsa, 2, _20362)/nonvar(_20362)==>ttExpressionType(_20362))).
- % Adding positive
- % trigger: admittedArgument(quotedIsa,2,_5904)
- % body: nonvar(_5904)*->rhs([ttExpressionType(_5904)])
- % Support: (admittedArgument(quotedIsa,2,_6086)/nonvar(_6086)==>ttExpressionType(_6086)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(quotedIsa,2,_2666))/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(quotedIsa,2,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(quotedIsa, 2, _22108))/nonvar(_22108)==>ttExpressionType(_22108))).
- % Adding positive
- % trigger: poss(admittedArgument(quotedIsa,2,_22108))
- % body: nonvar(_22108)*->rhs([ttExpressionType(_22108)])
- % Support: (poss(admittedArgument(quotedIsa,2,_24796))/nonvar(_24796)==>ttExpressionType(_24796)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(arityMax,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(arityMax,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(arityMax,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(arityMax, 2, _20334)/nonvar(_20334)==>ftInt(_20334))).
- % Adding positive
- % trigger: admittedArgument(arityMax,2,_5928)
- % body: nonvar(_5928)*->rhs([ftInt(_5928)])
- % Support: (admittedArgument(arityMax,2,_6110)/nonvar(_6110)==>ftInt(_6110)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(arityMax,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(arityMax,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(arityMax, 2, _22126))/nonvar(_22126)==>ftInt(_22126))).
- % Adding positive
- % trigger: poss(admittedArgument(arityMax,2,_22126))
- % body: nonvar(_22126)*->rhs([ftInt(_22126)])
- % Support: (poss(admittedArgument(arityMax,2,_24808))/nonvar(_24808)==>ftInt(_24808)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(tPred,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(tPred,1,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(tPred,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(tPred, 1, _20396)/nonvar(_20396)==>tPred(_20396))).
- % Adding positive
- % trigger: admittedArgument(tPred,1,_5952)
- % body: nonvar(_5952)*->rhs([tPred(_5952)])
- % Support: (admittedArgument(tPred,1,_6134)/nonvar(_6134)==>tPred(_6134)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(tPred,1,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(tPred,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(tPred, 1, _22132))/nonvar(_22132)==>tPred(_22132))).
- % Adding positive
- % trigger: poss(admittedArgument(tPred,1,_22132))
- % body: nonvar(_22132)*->rhs([tPred(_22132)])
- % Support: (poss(admittedArgument(tPred,1,_24812))/nonvar(_24812)==>tPred(_24812)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(genls,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(genls,1,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(genls,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(genls, 1, _20416)/nonvar(_20416)==>tCol(_20416))).
- % Adding positive
- % trigger: admittedArgument(genls,1,_5982)
- % body: nonvar(_5982)*->rhs([tCol(_5982)])
- % Support: (admittedArgument(genls,1,_6164)/nonvar(_6164)==>tCol(_6164)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(genls,1,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(genls,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(genls, 1, _22174))/nonvar(_22174)==>tCol(_22174))).
- % Adding positive
- % trigger: poss(admittedArgument(genls,1,_22174))
- % body: nonvar(_22174)*->rhs([tCol(_22174)])
- % Support: (poss(admittedArgument(genls,1,_24854))/nonvar(_24854)==>tCol(_24854)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(genls,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(genls,2,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(genls,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(genls, 2, _20434)/nonvar(_20434)==>tCol(_20434))).
- % Adding positive
- % trigger: admittedArgument(genls,2,_6000)
- % body: nonvar(_6000)*->rhs([tCol(_6000)])
- % Support: (admittedArgument(genls,2,_6182)/nonvar(_6182)==>tCol(_6182)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(completelyAssertedCollection)
- % Support: admittedArgument(genls,2,completelyAssertedCollection),pt(admittedArgument(genls,2,_11214),(nonvar(_11214)*->rhs([tCol(_11214)])))
- % r_sane:mpred_fwc1(tCol(completelyAssertedCollection)).
- % Found positive trigger: tCol(completelyAssertedCollection)
- % body: rhs([{decl_type(completelyAssertedCollection),kb_local(completelyAssertedCollection/1)}])
- % Found positive trigger: tCol(completelyAssertedCollection)
- % body: rhs([arity(completelyAssertedCollection,1)])
- % RHS-Post1: arity(completelyAssertedCollection,1)
- % Support: tCol(completelyAssertedCollection),pt(tCol(completelyAssertedCollection),rhs([arity(completelyAssertedCollection,1)]))
- % Found positive trigger: tCol(completelyAssertedCollection)
- % body: compound(tCol(completelyAssertedCollection)),\+is_ftVar(tCol(completelyAssertedCollection))*->rhs([{with_current_why(tCol(completelyAssertedCollection),ignore(\+addAdmittedArguments(tCol(completelyAssertedCollection))))}])
- % Found positive trigger: tCol(completelyAssertedCollection)
- % body: \+ttExpressionType(completelyAssertedCollection)*->rhs([tSet(completelyAssertedCollection)])
- % RHS-Post1: tSet(completelyAssertedCollection)
- % Support: tCol(completelyAssertedCollection),pt(tCol(completelyAssertedCollection),(\+ttExpressionType(completelyAssertedCollection)*->rhs([tSet(completelyAssertedCollection)])))
- % r_sane:mpred_fwc1(tSet(completelyAssertedCollection)).
- % Found positive trigger: tSet(completelyAssertedCollection)
- % body: rhs([functorDeclares(completelyAssertedCollection)])
- % RHS-Post1: functorDeclares(completelyAssertedCollection)
- % Support: tSet(completelyAssertedCollection),pt(tSet(completelyAssertedCollection),rhs([functorDeclares(completelyAssertedCollection)]))
- % r_sane:mpred_fwc1(functorDeclares(completelyAssertedCollection)).
- % Found positive trigger: functorDeclares(completelyAssertedCollection)
- % body: rhs([arityMax(completelyAssertedCollection,1),functorIsMacro(completelyAssertedCollection)])
- % RHS-Post1: arityMax(completelyAssertedCollection,1)
- % Support: functorDeclares(completelyAssertedCollection),pt(functorDeclares(completelyAssertedCollection),rhs([arityMax(completelyAssertedCollection,1),functorIsMacro(completelyAssertedCollection)]))
- % r_sane:mpred_fwc1(arityMax(completelyAssertedCollection, 1)).
- % Found positive trigger: arityMax(completelyAssertedCollection,1)
- % body: compound(arityMax(completelyAssertedCollection,1)),\+is_ftVar(arityMax(completelyAssertedCollection,1))*->rhs([{with_current_why(arityMax(completelyAssertedCollection,1),ignore(\+addAdmittedArguments(arityMax(completelyAssertedCollection,1))))}])
- % Found positive trigger: arityMax(completelyAssertedCollection,1)
- % body: is_kif_clause(arityMax(completelyAssertedCollection,1))*->rhs([clif(arityMax(completelyAssertedCollection,1))])
- % Found positive trigger: arityMax(completelyAssertedCollection,1)
- % body: compound(arityMax(completelyAssertedCollection,1)),\+is_ftVar(arityMax(completelyAssertedCollection,1))*->rhs([{with_current_why(arityMax(completelyAssertedCollection,1),ignore(\+addAdmittedArguments(arityMax(completelyAssertedCollection,1))))}])
- % RHS-Post1: functorIsMacro(completelyAssertedCollection)
- % Support: functorDeclares(completelyAssertedCollection),pt(functorDeclares(completelyAssertedCollection),rhs([arityMax(completelyAssertedCollection,1),functorIsMacro(completelyAssertedCollection)]))
- % r_sane:mpred_fwc1(functorIsMacro(completelyAssertedCollection)).
- % Found positive trigger: functorIsMacro(completelyAssertedCollection)
- % body: compound(functorIsMacro(completelyAssertedCollection)),\+is_ftVar(functorIsMacro(completelyAssertedCollection))*->rhs([{with_current_why(functorIsMacro(completelyAssertedCollection),ignore(\+addAdmittedArguments(functorIsMacro(completelyAssertedCollection))))}])
- % Found positive trigger: functorIsMacro(completelyAssertedCollection)
- % body: is_kif_clause(functorIsMacro(completelyAssertedCollection))*->rhs([clif(functorIsMacro(completelyAssertedCollection))])
- % Found positive trigger: functorIsMacro(completelyAssertedCollection)
- % body: compound(functorIsMacro(completelyAssertedCollection)),\+is_ftVar(functorIsMacro(completelyAssertedCollection))*->rhs([{with_current_why(functorIsMacro(completelyAssertedCollection),ignore(\+addAdmittedArguments(functorIsMacro(completelyAssertedCollection))))}])
- % Found positive trigger: functorDeclares(completelyAssertedCollection)
- % body: compound(functorDeclares(completelyAssertedCollection)),\+is_ftVar(functorDeclares(completelyAssertedCollection))*->rhs([{with_current_why(functorDeclares(completelyAssertedCollection),ignore(\+addAdmittedArguments(functorDeclares(completelyAssertedCollection))))}])
- % Found positive trigger: functorDeclares(completelyAssertedCollection)
- % body: is_kif_clause(functorDeclares(completelyAssertedCollection))*->rhs([clif(functorDeclares(completelyAssertedCollection))])
- % Found positive trigger: functorDeclares(completelyAssertedCollection)
- % body: compound(functorDeclares(completelyAssertedCollection)),\+is_ftVar(functorDeclares(completelyAssertedCollection))*->rhs([{with_current_why(functorDeclares(completelyAssertedCollection),ignore(\+addAdmittedArguments(functorDeclares(completelyAssertedCollection))))}])
- % Found positive trigger: tSet(completelyAssertedCollection)
- % body: rhs([tCol(completelyAssertedCollection),\+ttExpressionType(completelyAssertedCollection)])
- % RHS-Post1: tCol(completelyAssertedCollection)
- % Support: tSet(completelyAssertedCollection),pt(tSet(completelyAssertedCollection),rhs([tCol(completelyAssertedCollection),\+ttExpressionType(completelyAssertedCollection)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(completelyAssertedCollection)
- % Support: tSet(completelyAssertedCollection),pt(tSet(completelyAssertedCollection),rhs([tCol(completelyAssertedCollection),\+ttExpressionType(completelyAssertedCollection)]))
- % Removing (withdraw1)
- % term: ttExpressionType(completelyAssertedCollection)
- % support (was): _28324,_28326
- % Couldn't retract_i: spft(ttExpressionType(completelyAssertedCollection),_32900,_32902).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(completelyAssertedCollection))).
- % Found positive trigger: tSet(completelyAssertedCollection)
- % body: rhs([tCol(completelyAssertedCollection)])
- % RHS-Post1: tCol(completelyAssertedCollection)
- % Support: tSet(completelyAssertedCollection),pt(tSet(completelyAssertedCollection),rhs([tCol(completelyAssertedCollection)]))
- % Found positive trigger: tSet(completelyAssertedCollection)
- % body: compound(tSet(completelyAssertedCollection)),\+is_ftVar(tSet(completelyAssertedCollection))*->rhs([{with_current_why(tSet(completelyAssertedCollection),ignore(\+addAdmittedArguments(tSet(completelyAssertedCollection))))}])
- % Found positive trigger: tSet(completelyAssertedCollection)
- % body: is_kif_clause(tSet(completelyAssertedCollection))*->rhs([clif(tSet(completelyAssertedCollection))])
- % Found positive trigger: tSet(completelyAssertedCollection)
- % body: compound(tSet(completelyAssertedCollection)),\+is_ftVar(tSet(completelyAssertedCollection))*->rhs([{with_current_why(tSet(completelyAssertedCollection),ignore(\+addAdmittedArguments(tSet(completelyAssertedCollection))))}])
- % Found positive trigger: tCol(completelyAssertedCollection)
- % body: is_kif_clause(tCol(completelyAssertedCollection))*->rhs([clif(tCol(completelyAssertedCollection))])
- % Found positive trigger: tCol(completelyAssertedCollection)
- % body: compound(tCol(completelyAssertedCollection)),\+is_ftVar(tCol(completelyAssertedCollection))*->rhs([{with_current_why(tCol(completelyAssertedCollection),ignore(\+addAdmittedArguments(tCol(completelyAssertedCollection))))}])
- % RHS-Post1: tCol(tMicrotheory)
- % Support: admittedArgument(genls,2,tMicrotheory),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(tMicrotheory)).
- % Found positive trigger: tCol(tMicrotheory)
- % body: rhs([{decl_type(tMicrotheory),kb_local(tMicrotheory/1)}])
- % Found positive trigger: tCol(tMicrotheory)
- % body: rhs([arity(tMicrotheory,1)])
- % RHS-Post1: arity(tMicrotheory,1)
- % Support: tCol(tMicrotheory),pt(tCol(tMicrotheory),rhs([arity(tMicrotheory,1)]))
- % Found positive trigger: tCol(tMicrotheory)
- % body: compound(tCol(tMicrotheory)),\+is_ftVar(tCol(tMicrotheory))*->rhs([{with_current_why(tCol(tMicrotheory),ignore(\+addAdmittedArguments(tCol(tMicrotheory))))}])
- % Found positive trigger: tCol(tMicrotheory)
- % body: \+ttExpressionType(tMicrotheory)*->rhs([tSet(tMicrotheory)])
- % RHS-Post1: tSet(tMicrotheory)
- % Support: tCol(tMicrotheory),pt(tCol(tMicrotheory),(\+ttExpressionType(tMicrotheory)*->rhs([tSet(tMicrotheory)])))
- % r_sane:mpred_fwc1(tSet(tMicrotheory)).
- % Found positive trigger: tSet(tMicrotheory)
- % body: rhs([functorDeclares(tMicrotheory)])
- % RHS-Post1: functorDeclares(tMicrotheory)
- % Support: tSet(tMicrotheory),pt(tSet(tMicrotheory),rhs([functorDeclares(tMicrotheory)]))
- % r_sane:mpred_fwc1(functorDeclares(tMicrotheory)).
- % Found positive trigger: functorDeclares(tMicrotheory)
- % body: rhs([arityMax(tMicrotheory,1),functorIsMacro(tMicrotheory)])
- % RHS-Post1: arityMax(tMicrotheory,1)
- % Support: functorDeclares(tMicrotheory),pt(functorDeclares(tMicrotheory),rhs([arityMax(tMicrotheory,1),functorIsMacro(tMicrotheory)]))
- % r_sane:mpred_fwc1(arityMax(tMicrotheory, 1)).
- % Found positive trigger: arityMax(tMicrotheory,1)
- % body: compound(arityMax(tMicrotheory,1)),\+is_ftVar(arityMax(tMicrotheory,1))*->rhs([{with_current_why(arityMax(tMicrotheory,1),ignore(\+addAdmittedArguments(arityMax(tMicrotheory,1))))}])
- % Found positive trigger: arityMax(tMicrotheory,1)
- % body: is_kif_clause(arityMax(tMicrotheory,1))*->rhs([clif(arityMax(tMicrotheory,1))])
- % Found positive trigger: arityMax(tMicrotheory,1)
- % body: compound(arityMax(tMicrotheory,1)),\+is_ftVar(arityMax(tMicrotheory,1))*->rhs([{with_current_why(arityMax(tMicrotheory,1),ignore(\+addAdmittedArguments(arityMax(tMicrotheory,1))))}])
- % RHS-Post1: functorIsMacro(tMicrotheory)
- % Support: functorDeclares(tMicrotheory),pt(functorDeclares(tMicrotheory),rhs([arityMax(tMicrotheory,1),functorIsMacro(tMicrotheory)]))
- % r_sane:mpred_fwc1(functorIsMacro(tMicrotheory)).
- % Found positive trigger: functorIsMacro(tMicrotheory)
- % body: compound(functorIsMacro(tMicrotheory)),\+is_ftVar(functorIsMacro(tMicrotheory))*->rhs([{with_current_why(functorIsMacro(tMicrotheory),ignore(\+addAdmittedArguments(functorIsMacro(tMicrotheory))))}])
- % Found positive trigger: functorIsMacro(tMicrotheory)
- % body: is_kif_clause(functorIsMacro(tMicrotheory))*->rhs([clif(functorIsMacro(tMicrotheory))])
- % Found positive trigger: functorIsMacro(tMicrotheory)
- % body: compound(functorIsMacro(tMicrotheory)),\+is_ftVar(functorIsMacro(tMicrotheory))*->rhs([{with_current_why(functorIsMacro(tMicrotheory),ignore(\+addAdmittedArguments(functorIsMacro(tMicrotheory))))}])
- % Found positive trigger: functorDeclares(tMicrotheory)
- % body: compound(functorDeclares(tMicrotheory)),\+is_ftVar(functorDeclares(tMicrotheory))*->rhs([{with_current_why(functorDeclares(tMicrotheory),ignore(\+addAdmittedArguments(functorDeclares(tMicrotheory))))}])
- % Found positive trigger: functorDeclares(tMicrotheory)
- % body: is_kif_clause(functorDeclares(tMicrotheory))*->rhs([clif(functorDeclares(tMicrotheory))])
- % Found positive trigger: functorDeclares(tMicrotheory)
- % body: compound(functorDeclares(tMicrotheory)),\+is_ftVar(functorDeclares(tMicrotheory))*->rhs([{with_current_why(functorDeclares(tMicrotheory),ignore(\+addAdmittedArguments(functorDeclares(tMicrotheory))))}])
- % Found positive trigger: tSet(tMicrotheory)
- % body: rhs([tCol(tMicrotheory),\+ttExpressionType(tMicrotheory)])
- % RHS-Post1: tCol(tMicrotheory)
- % Support: tSet(tMicrotheory),pt(tSet(tMicrotheory),rhs([tCol(tMicrotheory),\+ttExpressionType(tMicrotheory)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tMicrotheory)
- % Support: tSet(tMicrotheory),pt(tSet(tMicrotheory),rhs([tCol(tMicrotheory),\+ttExpressionType(tMicrotheory)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tMicrotheory)
- % support (was): _26394,_26396
- % Couldn't retract_i: spft(ttExpressionType(tMicrotheory),_30962,_30964).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tMicrotheory))).
- % Found positive trigger: tSet(tMicrotheory)
- % body: rhs([tCol(tMicrotheory)])
- % RHS-Post1: tCol(tMicrotheory)
- % Support: tSet(tMicrotheory),pt(tSet(tMicrotheory),rhs([tCol(tMicrotheory)]))
- % Found positive trigger: tSet(tMicrotheory)
- % body: compound(tSet(tMicrotheory)),\+is_ftVar(tSet(tMicrotheory))*->rhs([{with_current_why(tSet(tMicrotheory),ignore(\+addAdmittedArguments(tSet(tMicrotheory))))}])
- % Found positive trigger: tSet(tMicrotheory)
- % body: is_kif_clause(tSet(tMicrotheory))*->rhs([clif(tSet(tMicrotheory))])
- % Found positive trigger: tSet(tMicrotheory)
- % body: compound(tSet(tMicrotheory)),\+is_ftVar(tSet(tMicrotheory))*->rhs([{with_current_why(tSet(tMicrotheory),ignore(\+addAdmittedArguments(tSet(tMicrotheory))))}])
- % Found positive trigger: tCol(tMicrotheory)
- % body: is_kif_clause(tCol(tMicrotheory))*->rhs([clif(tCol(tMicrotheory))])
- % Found positive trigger: tCol(tMicrotheory)
- % body: compound(tCol(tMicrotheory)),\+is_ftVar(tCol(tMicrotheory))*->rhs([{with_current_why(tCol(tMicrotheory),ignore(\+addAdmittedArguments(tCol(tMicrotheory))))}])
- % RHS-Post1: tCol(tCol)
- % Support: admittedArgument(genls,2,tCol),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % RHS-Post1: tCol(tTemporalThing)
- % Support: admittedArgument(genls,2,tTemporalThing),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % RHS-Post1: tCol(ttObjectType)
- % Support: admittedArgument(genls,2,ttObjectType),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(ttObjectType)).
- % Found positive trigger: tCol(ttObjectType)
- % body: rhs([{decl_type(ttObjectType),kb_local(ttObjectType/1)}])
- % Found positive trigger: tCol(ttObjectType)
- % body: rhs([arity(ttObjectType,1)])
- % RHS-Post1: arity(ttObjectType,1)
- % Support: tCol(ttObjectType),pt(tCol(ttObjectType),rhs([arity(ttObjectType,1)]))
- % Found positive trigger: tCol(ttObjectType)
- % body: compound(tCol(ttObjectType)),\+is_ftVar(tCol(ttObjectType))*->rhs([{with_current_why(tCol(ttObjectType),ignore(\+addAdmittedArguments(tCol(ttObjectType))))}])
- % Found positive trigger: tCol(ttObjectType)
- % body: \+ttExpressionType(ttObjectType)*->rhs([tSet(ttObjectType)])
- % RHS-Post1: tSet(ttObjectType)
- % Support: tCol(ttObjectType),pt(tCol(ttObjectType),(\+ttExpressionType(ttObjectType)*->rhs([tSet(ttObjectType)])))
- % r_sane:mpred_fwc1(tSet(ttObjectType)).
- % Found positive trigger: tSet(ttObjectType)
- % body: rhs([functorDeclares(ttObjectType)])
- % RHS-Post1: functorDeclares(ttObjectType)
- % Support: tSet(ttObjectType),pt(tSet(ttObjectType),rhs([functorDeclares(ttObjectType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttObjectType)).
- % Found positive trigger: functorDeclares(ttObjectType)
- % body: rhs([arityMax(ttObjectType,1),functorIsMacro(ttObjectType)])
- % RHS-Post1: arityMax(ttObjectType,1)
- % Support: functorDeclares(ttObjectType),pt(functorDeclares(ttObjectType),rhs([arityMax(ttObjectType,1),functorIsMacro(ttObjectType)]))
- % r_sane:mpred_fwc1(arityMax(ttObjectType, 1)).
- % Found positive trigger: arityMax(ttObjectType,1)
- % body: compound(arityMax(ttObjectType,1)),\+is_ftVar(arityMax(ttObjectType,1))*->rhs([{with_current_why(arityMax(ttObjectType,1),ignore(\+addAdmittedArguments(arityMax(ttObjectType,1))))}])
- % Found positive trigger: arityMax(ttObjectType,1)
- % body: is_kif_clause(arityMax(ttObjectType,1))*->rhs([clif(arityMax(ttObjectType,1))])
- % Found positive trigger: arityMax(ttObjectType,1)
- % body: compound(arityMax(ttObjectType,1)),\+is_ftVar(arityMax(ttObjectType,1))*->rhs([{with_current_why(arityMax(ttObjectType,1),ignore(\+addAdmittedArguments(arityMax(ttObjectType,1))))}])
- % RHS-Post1: functorIsMacro(ttObjectType)
- % Support: functorDeclares(ttObjectType),pt(functorDeclares(ttObjectType),rhs([arityMax(ttObjectType,1),functorIsMacro(ttObjectType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttObjectType)).
- % Found positive trigger: functorIsMacro(ttObjectType)
- % body: compound(functorIsMacro(ttObjectType)),\+is_ftVar(functorIsMacro(ttObjectType))*->rhs([{with_current_why(functorIsMacro(ttObjectType),ignore(\+addAdmittedArguments(functorIsMacro(ttObjectType))))}])
- % Found positive trigger: functorIsMacro(ttObjectType)
- % body: is_kif_clause(functorIsMacro(ttObjectType))*->rhs([clif(functorIsMacro(ttObjectType))])
- % Found positive trigger: functorIsMacro(ttObjectType)
- % body: compound(functorIsMacro(ttObjectType)),\+is_ftVar(functorIsMacro(ttObjectType))*->rhs([{with_current_why(functorIsMacro(ttObjectType),ignore(\+addAdmittedArguments(functorIsMacro(ttObjectType))))}])
- % Found positive trigger: functorDeclares(ttObjectType)
- % body: compound(functorDeclares(ttObjectType)),\+is_ftVar(functorDeclares(ttObjectType))*->rhs([{with_current_why(functorDeclares(ttObjectType),ignore(\+addAdmittedArguments(functorDeclares(ttObjectType))))}])
- % Found positive trigger: functorDeclares(ttObjectType)
- % body: is_kif_clause(functorDeclares(ttObjectType))*->rhs([clif(functorDeclares(ttObjectType))])
- % Found positive trigger: functorDeclares(ttObjectType)
- % body: compound(functorDeclares(ttObjectType)),\+is_ftVar(functorDeclares(ttObjectType))*->rhs([{with_current_why(functorDeclares(ttObjectType),ignore(\+addAdmittedArguments(functorDeclares(ttObjectType))))}])
- % Found positive trigger: tSet(ttObjectType)
- % body: rhs([tCol(ttObjectType),\+ttExpressionType(ttObjectType)])
- % RHS-Post1: tCol(ttObjectType)
- % Support: tSet(ttObjectType),pt(tSet(ttObjectType),rhs([tCol(ttObjectType),\+ttExpressionType(ttObjectType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttObjectType)
- % Support: tSet(ttObjectType),pt(tSet(ttObjectType),rhs([tCol(ttObjectType),\+ttExpressionType(ttObjectType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttObjectType)
- % support (was): _10750,_10752
- % Couldn't retract_i: spft(ttExpressionType(ttObjectType),_15318,_15320).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttObjectType))).
- % Found positive trigger: tSet(ttObjectType)
- % body: rhs([tCol(ttObjectType)])
- % RHS-Post1: tCol(ttObjectType)
- % Support: tSet(ttObjectType),pt(tSet(ttObjectType),rhs([tCol(ttObjectType)]))
- % Found positive trigger: tSet(ttObjectType)
- % body: compound(tSet(ttObjectType)),\+is_ftVar(tSet(ttObjectType))*->rhs([{with_current_why(tSet(ttObjectType),ignore(\+addAdmittedArguments(tSet(ttObjectType))))}])
- % Found positive trigger: tSet(ttObjectType)
- % body: is_kif_clause(tSet(ttObjectType))*->rhs([clif(tSet(ttObjectType))])
- % Found positive trigger: tSet(ttObjectType)
- % body: compound(tSet(ttObjectType)),\+is_ftVar(tSet(ttObjectType))*->rhs([{with_current_why(tSet(ttObjectType),ignore(\+addAdmittedArguments(tSet(ttObjectType))))}])
- % Found positive trigger: tCol(ttObjectType)
- % body: is_kif_clause(tCol(ttObjectType))*->rhs([clif(tCol(ttObjectType))])
- % Found positive trigger: tCol(ttObjectType)
- % body: compound(tCol(ttObjectType)),\+is_ftVar(tCol(ttObjectType))*->rhs([{with_current_why(tCol(ttObjectType),ignore(\+addAdmittedArguments(tCol(ttObjectType))))}])
- % RHS-Post1: tCol(ttSpatialType)
- % Support: admittedArgument(genls,2,ttSpatialType),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(ttSpatialType)).
- % Found positive trigger: tCol(ttSpatialType)
- % body: rhs([{decl_type(ttSpatialType),kb_local(ttSpatialType/1)}])
- % Found positive trigger: tCol(ttSpatialType)
- % body: rhs([arity(ttSpatialType,1)])
- % RHS-Post1: arity(ttSpatialType,1)
- % Support: tCol(ttSpatialType),pt(tCol(ttSpatialType),rhs([arity(ttSpatialType,1)]))
- % Found positive trigger: tCol(ttSpatialType)
- % body: compound(tCol(ttSpatialType)),\+is_ftVar(tCol(ttSpatialType))*->rhs([{with_current_why(tCol(ttSpatialType),ignore(\+addAdmittedArguments(tCol(ttSpatialType))))}])
- % Found positive trigger: tCol(ttSpatialType)
- % body: \+ttExpressionType(ttSpatialType)*->rhs([tSet(ttSpatialType)])
- % RHS-Post1: tSet(ttSpatialType)
- % Support: tCol(ttSpatialType),pt(tCol(ttSpatialType),(\+ttExpressionType(ttSpatialType)*->rhs([tSet(ttSpatialType)])))
- % r_sane:mpred_fwc1(tSet(ttSpatialType)).
- % Found positive trigger: tSet(ttSpatialType)
- % body: rhs([functorDeclares(ttSpatialType)])
- % RHS-Post1: functorDeclares(ttSpatialType)
- % Support: tSet(ttSpatialType),pt(tSet(ttSpatialType),rhs([functorDeclares(ttSpatialType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttSpatialType)).
- % Found positive trigger: functorDeclares(ttSpatialType)
- % body: rhs([arityMax(ttSpatialType,1),functorIsMacro(ttSpatialType)])
- % RHS-Post1: arityMax(ttSpatialType,1)
- % Support: functorDeclares(ttSpatialType),pt(functorDeclares(ttSpatialType),rhs([arityMax(ttSpatialType,1),functorIsMacro(ttSpatialType)]))
- % r_sane:mpred_fwc1(arityMax(ttSpatialType, 1)).
- % Found positive trigger: arityMax(ttSpatialType,1)
- % body: compound(arityMax(ttSpatialType,1)),\+is_ftVar(arityMax(ttSpatialType,1))*->rhs([{with_current_why(arityMax(ttSpatialType,1),ignore(\+addAdmittedArguments(arityMax(ttSpatialType,1))))}])
- % Found positive trigger: arityMax(ttSpatialType,1)
- % body: is_kif_clause(arityMax(ttSpatialType,1))*->rhs([clif(arityMax(ttSpatialType,1))])
- % Found positive trigger: arityMax(ttSpatialType,1)
- % body: compound(arityMax(ttSpatialType,1)),\+is_ftVar(arityMax(ttSpatialType,1))*->rhs([{with_current_why(arityMax(ttSpatialType,1),ignore(\+addAdmittedArguments(arityMax(ttSpatialType,1))))}])
- % RHS-Post1: functorIsMacro(ttSpatialType)
- % Support: functorDeclares(ttSpatialType),pt(functorDeclares(ttSpatialType),rhs([arityMax(ttSpatialType,1),functorIsMacro(ttSpatialType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttSpatialType)).
- % Found positive trigger: functorIsMacro(ttSpatialType)
- % body: compound(functorIsMacro(ttSpatialType)),\+is_ftVar(functorIsMacro(ttSpatialType))*->rhs([{with_current_why(functorIsMacro(ttSpatialType),ignore(\+addAdmittedArguments(functorIsMacro(ttSpatialType))))}])
- % Found positive trigger: functorIsMacro(ttSpatialType)
- % body: is_kif_clause(functorIsMacro(ttSpatialType))*->rhs([clif(functorIsMacro(ttSpatialType))])
- % Found positive trigger: functorIsMacro(ttSpatialType)
- % body: compound(functorIsMacro(ttSpatialType)),\+is_ftVar(functorIsMacro(ttSpatialType))*->rhs([{with_current_why(functorIsMacro(ttSpatialType),ignore(\+addAdmittedArguments(functorIsMacro(ttSpatialType))))}])
- % Found positive trigger: functorDeclares(ttSpatialType)
- % body: compound(functorDeclares(ttSpatialType)),\+is_ftVar(functorDeclares(ttSpatialType))*->rhs([{with_current_why(functorDeclares(ttSpatialType),ignore(\+addAdmittedArguments(functorDeclares(ttSpatialType))))}])
- % Found positive trigger: functorDeclares(ttSpatialType)
- % body: is_kif_clause(functorDeclares(ttSpatialType))*->rhs([clif(functorDeclares(ttSpatialType))])
- % Found positive trigger: functorDeclares(ttSpatialType)
- % body: compound(functorDeclares(ttSpatialType)),\+is_ftVar(functorDeclares(ttSpatialType))*->rhs([{with_current_why(functorDeclares(ttSpatialType),ignore(\+addAdmittedArguments(functorDeclares(ttSpatialType))))}])
- % Found positive trigger: tSet(ttSpatialType)
- % body: rhs([tCol(ttSpatialType),\+ttExpressionType(ttSpatialType)])
- % RHS-Post1: tCol(ttSpatialType)
- % Support: tSet(ttSpatialType),pt(tSet(ttSpatialType),rhs([tCol(ttSpatialType),\+ttExpressionType(ttSpatialType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttSpatialType)
- % Support: tSet(ttSpatialType),pt(tSet(ttSpatialType),rhs([tCol(ttSpatialType),\+ttExpressionType(ttSpatialType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttSpatialType)
- % support (was): _17138,_17140
- % Couldn't retract_i: spft(ttExpressionType(ttSpatialType),_21706,_21708).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttSpatialType))).
- % Found positive trigger: tSet(ttSpatialType)
- % body: rhs([tCol(ttSpatialType)])
- % RHS-Post1: tCol(ttSpatialType)
- % Support: tSet(ttSpatialType),pt(tSet(ttSpatialType),rhs([tCol(ttSpatialType)]))
- % Found positive trigger: tSet(ttSpatialType)
- % body: compound(tSet(ttSpatialType)),\+is_ftVar(tSet(ttSpatialType))*->rhs([{with_current_why(tSet(ttSpatialType),ignore(\+addAdmittedArguments(tSet(ttSpatialType))))}])
- % Found positive trigger: tSet(ttSpatialType)
- % body: is_kif_clause(tSet(ttSpatialType))*->rhs([clif(tSet(ttSpatialType))])
- % Found positive trigger: tSet(ttSpatialType)
- % body: compound(tSet(ttSpatialType)),\+is_ftVar(tSet(ttSpatialType))*->rhs([{with_current_why(tSet(ttSpatialType),ignore(\+addAdmittedArguments(tSet(ttSpatialType))))}])
- % Found positive trigger: tCol(ttSpatialType)
- % body: is_kif_clause(tCol(ttSpatialType))*->rhs([clif(tCol(ttSpatialType))])
- % Found positive trigger: tCol(ttSpatialType)
- % body: compound(tCol(ttSpatialType)),\+is_ftVar(tCol(ttSpatialType))*->rhs([{with_current_why(tCol(ttSpatialType),ignore(\+addAdmittedArguments(tCol(ttSpatialType))))}])
- % RHS-Post1: tCol(ttIndividualType)
- % Support: admittedArgument(genls,2,ttIndividualType),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(ttIndividualType)).
- % Found positive trigger: tCol(ttIndividualType)
- % body: rhs([{decl_type(ttIndividualType),kb_local(ttIndividualType/1)}])
- % Found positive trigger: tCol(ttIndividualType)
- % body: rhs([arity(ttIndividualType,1)])
- % RHS-Post1: arity(ttIndividualType,1)
- % Support: tCol(ttIndividualType),pt(tCol(ttIndividualType),rhs([arity(ttIndividualType,1)]))
- % Found positive trigger: tCol(ttIndividualType)
- % body: compound(tCol(ttIndividualType)),\+is_ftVar(tCol(ttIndividualType))*->rhs([{with_current_why(tCol(ttIndividualType),ignore(\+addAdmittedArguments(tCol(ttIndividualType))))}])
- % Found positive trigger: tCol(ttIndividualType)
- % body: \+ttExpressionType(ttIndividualType)*->rhs([tSet(ttIndividualType)])
- % RHS-Post1: tSet(ttIndividualType)
- % Support: tCol(ttIndividualType),pt(tCol(ttIndividualType),(\+ttExpressionType(ttIndividualType)*->rhs([tSet(ttIndividualType)])))
- % r_sane:mpred_fwc1(tSet(ttIndividualType)).
- % Found positive trigger: tSet(ttIndividualType)
- % body: rhs([functorDeclares(ttIndividualType)])
- % RHS-Post1: functorDeclares(ttIndividualType)
- % Support: tSet(ttIndividualType),pt(tSet(ttIndividualType),rhs([functorDeclares(ttIndividualType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttIndividualType)).
- % Found positive trigger: functorDeclares(ttIndividualType)
- % body: rhs([arityMax(ttIndividualType,1),functorIsMacro(ttIndividualType)])
- % RHS-Post1: arityMax(ttIndividualType,1)
- % Support: functorDeclares(ttIndividualType),pt(functorDeclares(ttIndividualType),rhs([arityMax(ttIndividualType,1),functorIsMacro(ttIndividualType)]))
- % r_sane:mpred_fwc1(arityMax(ttIndividualType, 1)).
- % Found positive trigger: arityMax(ttIndividualType,1)
- % body: compound(arityMax(ttIndividualType,1)),\+is_ftVar(arityMax(ttIndividualType,1))*->rhs([{with_current_why(arityMax(ttIndividualType,1),ignore(\+addAdmittedArguments(arityMax(ttIndividualType,1))))}])
- % Found positive trigger: arityMax(ttIndividualType,1)
- % body: is_kif_clause(arityMax(ttIndividualType,1))*->rhs([clif(arityMax(ttIndividualType,1))])
- % Found positive trigger: arityMax(ttIndividualType,1)
- % body: compound(arityMax(ttIndividualType,1)),\+is_ftVar(arityMax(ttIndividualType,1))*->rhs([{with_current_why(arityMax(ttIndividualType,1),ignore(\+addAdmittedArguments(arityMax(ttIndividualType,1))))}])
- % RHS-Post1: functorIsMacro(ttIndividualType)
- % Support: functorDeclares(ttIndividualType),pt(functorDeclares(ttIndividualType),rhs([arityMax(ttIndividualType,1),functorIsMacro(ttIndividualType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttIndividualType)).
- % Found positive trigger: functorIsMacro(ttIndividualType)
- % body: compound(functorIsMacro(ttIndividualType)),\+is_ftVar(functorIsMacro(ttIndividualType))*->rhs([{with_current_why(functorIsMacro(ttIndividualType),ignore(\+addAdmittedArguments(functorIsMacro(ttIndividualType))))}])
- % Found positive trigger: functorIsMacro(ttIndividualType)
- % body: is_kif_clause(functorIsMacro(ttIndividualType))*->rhs([clif(functorIsMacro(ttIndividualType))])
- % Found positive trigger: functorIsMacro(ttIndividualType)
- % body: compound(functorIsMacro(ttIndividualType)),\+is_ftVar(functorIsMacro(ttIndividualType))*->rhs([{with_current_why(functorIsMacro(ttIndividualType),ignore(\+addAdmittedArguments(functorIsMacro(ttIndividualType))))}])
- % Found positive trigger: functorDeclares(ttIndividualType)
- % body: compound(functorDeclares(ttIndividualType)),\+is_ftVar(functorDeclares(ttIndividualType))*->rhs([{with_current_why(functorDeclares(ttIndividualType),ignore(\+addAdmittedArguments(functorDeclares(ttIndividualType))))}])
- % Found positive trigger: functorDeclares(ttIndividualType)
- % body: is_kif_clause(functorDeclares(ttIndividualType))*->rhs([clif(functorDeclares(ttIndividualType))])
- % Found positive trigger: functorDeclares(ttIndividualType)
- % body: compound(functorDeclares(ttIndividualType)),\+is_ftVar(functorDeclares(ttIndividualType))*->rhs([{with_current_why(functorDeclares(ttIndividualType),ignore(\+addAdmittedArguments(functorDeclares(ttIndividualType))))}])
- % Found positive trigger: tSet(ttIndividualType)
- % body: rhs([tCol(ttIndividualType),\+ttExpressionType(ttIndividualType)])
- % RHS-Post1: tCol(ttIndividualType)
- % Support: tSet(ttIndividualType),pt(tSet(ttIndividualType),rhs([tCol(ttIndividualType),\+ttExpressionType(ttIndividualType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttIndividualType)
- % Support: tSet(ttIndividualType),pt(tSet(ttIndividualType),rhs([tCol(ttIndividualType),\+ttExpressionType(ttIndividualType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttIndividualType)
- % support (was): _26516,_26518
- % Couldn't retract_i: spft(ttExpressionType(ttIndividualType),_31086,_31088).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttIndividualType))).
- % Found positive trigger: tSet(ttIndividualType)
- % body: rhs([tCol(ttIndividualType)])
- % RHS-Post1: tCol(ttIndividualType)
- % Support: tSet(ttIndividualType),pt(tSet(ttIndividualType),rhs([tCol(ttIndividualType)]))
- % Found positive trigger: tSet(ttIndividualType)
- % body: compound(tSet(ttIndividualType)),\+is_ftVar(tSet(ttIndividualType))*->rhs([{with_current_why(tSet(ttIndividualType),ignore(\+addAdmittedArguments(tSet(ttIndividualType))))}])
- % Found positive trigger: tSet(ttIndividualType)
- % body: is_kif_clause(tSet(ttIndividualType))*->rhs([clif(tSet(ttIndividualType))])
- % Found positive trigger: tSet(ttIndividualType)
- % body: compound(tSet(ttIndividualType)),\+is_ftVar(tSet(ttIndividualType))*->rhs([{with_current_why(tSet(ttIndividualType),ignore(\+addAdmittedArguments(tSet(ttIndividualType))))}])
- % Found positive trigger: tCol(ttIndividualType)
- % body: is_kif_clause(tCol(ttIndividualType))*->rhs([clif(tCol(ttIndividualType))])
- % Found positive trigger: tCol(ttIndividualType)
- % body: compound(tCol(ttIndividualType)),\+is_ftVar(tCol(ttIndividualType))*->rhs([{with_current_why(tCol(ttIndividualType),ignore(\+addAdmittedArguments(tCol(ttIndividualType))))}])
- % RHS-Post1: tCol(tIndividual)
- % Support: admittedArgument(genls,2,tIndividual),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(tIndividual)).
- % Found positive trigger: tCol(tIndividual)
- % body: rhs([{decl_type(tIndividual),kb_local(tIndividual/1)}])
- % Found positive trigger: tCol(tIndividual)
- % body: rhs([arity(tIndividual,1)])
- % RHS-Post1: arity(tIndividual,1)
- % Support: tCol(tIndividual),pt(tCol(tIndividual),rhs([arity(tIndividual,1)]))
- % Found positive trigger: tCol(tIndividual)
- % body: compound(tCol(tIndividual)),\+is_ftVar(tCol(tIndividual))*->rhs([{with_current_why(tCol(tIndividual),ignore(\+addAdmittedArguments(tCol(tIndividual))))}])
- % Found positive trigger: tCol(tIndividual)
- % body: \+ttExpressionType(tIndividual)*->rhs([tSet(tIndividual)])
- % RHS-Post1: tSet(tIndividual)
- % Support: tCol(tIndividual),pt(tCol(tIndividual),(\+ttExpressionType(tIndividual)*->rhs([tSet(tIndividual)])))
- % r_sane:mpred_fwc1(tSet(tIndividual)).
- % Found positive trigger: tSet(tIndividual)
- % body: rhs([functorDeclares(tIndividual)])
- % RHS-Post1: functorDeclares(tIndividual)
- % Support: tSet(tIndividual),pt(tSet(tIndividual),rhs([functorDeclares(tIndividual)]))
- % r_sane:mpred_fwc1(functorDeclares(tIndividual)).
- % Found positive trigger: functorDeclares(tIndividual)
- % body: rhs([arityMax(tIndividual,1),functorIsMacro(tIndividual)])
- % RHS-Post1: arityMax(tIndividual,1)
- % Support: functorDeclares(tIndividual),pt(functorDeclares(tIndividual),rhs([arityMax(tIndividual,1),functorIsMacro(tIndividual)]))
- % r_sane:mpred_fwc1(arityMax(tIndividual, 1)).
- % Found positive trigger: arityMax(tIndividual,1)
- % body: compound(arityMax(tIndividual,1)),\+is_ftVar(arityMax(tIndividual,1))*->rhs([{with_current_why(arityMax(tIndividual,1),ignore(\+addAdmittedArguments(arityMax(tIndividual,1))))}])
- % Found positive trigger: arityMax(tIndividual,1)
- % body: is_kif_clause(arityMax(tIndividual,1))*->rhs([clif(arityMax(tIndividual,1))])
- % Found positive trigger: arityMax(tIndividual,1)
- % body: compound(arityMax(tIndividual,1)),\+is_ftVar(arityMax(tIndividual,1))*->rhs([{with_current_why(arityMax(tIndividual,1),ignore(\+addAdmittedArguments(arityMax(tIndividual,1))))}])
- % RHS-Post1: functorIsMacro(tIndividual)
- % Support: functorDeclares(tIndividual),pt(functorDeclares(tIndividual),rhs([arityMax(tIndividual,1),functorIsMacro(tIndividual)]))
- % r_sane:mpred_fwc1(functorIsMacro(tIndividual)).
- % Found positive trigger: functorIsMacro(tIndividual)
- % body: compound(functorIsMacro(tIndividual)),\+is_ftVar(functorIsMacro(tIndividual))*->rhs([{with_current_why(functorIsMacro(tIndividual),ignore(\+addAdmittedArguments(functorIsMacro(tIndividual))))}])
- % Found positive trigger: functorIsMacro(tIndividual)
- % body: is_kif_clause(functorIsMacro(tIndividual))*->rhs([clif(functorIsMacro(tIndividual))])
- % Found positive trigger: functorIsMacro(tIndividual)
- % body: compound(functorIsMacro(tIndividual)),\+is_ftVar(functorIsMacro(tIndividual))*->rhs([{with_current_why(functorIsMacro(tIndividual),ignore(\+addAdmittedArguments(functorIsMacro(tIndividual))))}])
- % Found positive trigger: functorDeclares(tIndividual)
- % body: compound(functorDeclares(tIndividual)),\+is_ftVar(functorDeclares(tIndividual))*->rhs([{with_current_why(functorDeclares(tIndividual),ignore(\+addAdmittedArguments(functorDeclares(tIndividual))))}])
- % Found positive trigger: functorDeclares(tIndividual)
- % body: is_kif_clause(functorDeclares(tIndividual))*->rhs([clif(functorDeclares(tIndividual))])
- % Found positive trigger: functorDeclares(tIndividual)
- % body: compound(functorDeclares(tIndividual)),\+is_ftVar(functorDeclares(tIndividual))*->rhs([{with_current_why(functorDeclares(tIndividual),ignore(\+addAdmittedArguments(functorDeclares(tIndividual))))}])
- % Found positive trigger: tSet(tIndividual)
- % body: rhs([tCol(tIndividual),\+ttExpressionType(tIndividual)])
- % RHS-Post1: tCol(tIndividual)
- % Support: tSet(tIndividual),pt(tSet(tIndividual),rhs([tCol(tIndividual),\+ttExpressionType(tIndividual)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tIndividual)
- % Support: tSet(tIndividual),pt(tSet(tIndividual),rhs([tCol(tIndividual),\+ttExpressionType(tIndividual)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tIndividual)
- % support (was): _26466,_26468
- % Couldn't retract_i: spft(ttExpressionType(tIndividual),_31034,_31036).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tIndividual))).
- % Found positive trigger: tSet(tIndividual)
- % body: rhs([tCol(tIndividual)])
- % RHS-Post1: tCol(tIndividual)
- % Support: tSet(tIndividual),pt(tSet(tIndividual),rhs([tCol(tIndividual)]))
- % Found positive trigger: tSet(tIndividual)
- % body: compound(tSet(tIndividual)),\+is_ftVar(tSet(tIndividual))*->rhs([{with_current_why(tSet(tIndividual),ignore(\+addAdmittedArguments(tSet(tIndividual))))}])
- % Found positive trigger: tSet(tIndividual)
- % body: is_kif_clause(tSet(tIndividual))*->rhs([clif(tSet(tIndividual))])
- % Found positive trigger: tSet(tIndividual)
- % body: compound(tSet(tIndividual)),\+is_ftVar(tSet(tIndividual))*->rhs([{with_current_why(tSet(tIndividual),ignore(\+addAdmittedArguments(tSet(tIndividual))))}])
- % Found positive trigger: tCol(tIndividual)
- % body: is_kif_clause(tCol(tIndividual))*->rhs([clif(tCol(tIndividual))])
- % Found positive trigger: tCol(tIndividual)
- % body: compound(tCol(tIndividual)),\+is_ftVar(tCol(tIndividual))*->rhs([{with_current_why(tCol(tIndividual),ignore(\+addAdmittedArguments(tCol(tIndividual))))}])
- % RHS-Post1: tCol(tRelation)
- % Support: admittedArgument(genls,2,tRelation),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % RHS-Post1: tCol(tAgent)
- % Support: admittedArgument(genls,2,tAgent),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % RHS-Post1: tCol(tFunction)
- % Support: admittedArgument(genls,2,tFunction),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(tFunction)).
- % Found positive trigger: tCol(tFunction)
- % body: rhs([{decl_type(tFunction),kb_local(tFunction/1)}])
- % Found positive trigger: tCol(tFunction)
- % body: rhs([arity(tFunction,1)])
- % RHS-Post1: arity(tFunction,1)
- % Support: tCol(tFunction),pt(tCol(tFunction),rhs([arity(tFunction,1)]))
- % Found positive trigger: tCol(tFunction)
- % body: compound(tCol(tFunction)),\+is_ftVar(tCol(tFunction))*->rhs([{with_current_why(tCol(tFunction),ignore(\+addAdmittedArguments(tCol(tFunction))))}])
- % Found positive trigger: tCol(tFunction)
- % body: \+ttExpressionType(tFunction)*->rhs([tSet(tFunction)])
- % RHS-Post1: tSet(tFunction)
- % Support: tCol(tFunction),pt(tCol(tFunction),(\+ttExpressionType(tFunction)*->rhs([tSet(tFunction)])))
- % r_sane:mpred_fwc1(tSet(tFunction)).
- % Found positive trigger: tSet(tFunction)
- % body: rhs([functorDeclares(tFunction)])
- % RHS-Post1: functorDeclares(tFunction)
- % Support: tSet(tFunction),pt(tSet(tFunction),rhs([functorDeclares(tFunction)]))
- % r_sane:mpred_fwc1(functorDeclares(tFunction)).
- % Found positive trigger: functorDeclares(tFunction)
- % body: rhs([arityMax(tFunction,1),functorIsMacro(tFunction)])
- % RHS-Post1: arityMax(tFunction,1)
- % Support: functorDeclares(tFunction),pt(functorDeclares(tFunction),rhs([arityMax(tFunction,1),functorIsMacro(tFunction)]))
- % r_sane:mpred_fwc1(arityMax(tFunction, 1)).
- % Found positive trigger: arityMax(tFunction,1)
- % body: compound(arityMax(tFunction,1)),\+is_ftVar(arityMax(tFunction,1))*->rhs([{with_current_why(arityMax(tFunction,1),ignore(\+addAdmittedArguments(arityMax(tFunction,1))))}])
- % Found positive trigger: arityMax(tFunction,1)
- % body: is_kif_clause(arityMax(tFunction,1))*->rhs([clif(arityMax(tFunction,1))])
- % Found positive trigger: arityMax(tFunction,1)
- % body: compound(arityMax(tFunction,1)),\+is_ftVar(arityMax(tFunction,1))*->rhs([{with_current_why(arityMax(tFunction,1),ignore(\+addAdmittedArguments(arityMax(tFunction,1))))}])
- % RHS-Post1: functorIsMacro(tFunction)
- % Support: functorDeclares(tFunction),pt(functorDeclares(tFunction),rhs([arityMax(tFunction,1),functorIsMacro(tFunction)]))
- % r_sane:mpred_fwc1(functorIsMacro(tFunction)).
- % Found positive trigger: functorIsMacro(tFunction)
- % body: compound(functorIsMacro(tFunction)),\+is_ftVar(functorIsMacro(tFunction))*->rhs([{with_current_why(functorIsMacro(tFunction),ignore(\+addAdmittedArguments(functorIsMacro(tFunction))))}])
- % Found positive trigger: functorIsMacro(tFunction)
- % body: is_kif_clause(functorIsMacro(tFunction))*->rhs([clif(functorIsMacro(tFunction))])
- % Found positive trigger: functorIsMacro(tFunction)
- % body: compound(functorIsMacro(tFunction)),\+is_ftVar(functorIsMacro(tFunction))*->rhs([{with_current_why(functorIsMacro(tFunction),ignore(\+addAdmittedArguments(functorIsMacro(tFunction))))}])
- % Found positive trigger: functorDeclares(tFunction)
- % body: compound(functorDeclares(tFunction)),\+is_ftVar(functorDeclares(tFunction))*->rhs([{with_current_why(functorDeclares(tFunction),ignore(\+addAdmittedArguments(functorDeclares(tFunction))))}])
- % Found positive trigger: functorDeclares(tFunction)
- % body: is_kif_clause(functorDeclares(tFunction))*->rhs([clif(functorDeclares(tFunction))])
- % Found positive trigger: functorDeclares(tFunction)
- % body: compound(functorDeclares(tFunction)),\+is_ftVar(functorDeclares(tFunction))*->rhs([{with_current_why(functorDeclares(tFunction),ignore(\+addAdmittedArguments(functorDeclares(tFunction))))}])
- % Found positive trigger: tSet(tFunction)
- % body: rhs([tCol(tFunction),\+ttExpressionType(tFunction)])
- % RHS-Post1: tCol(tFunction)
- % Support: tSet(tFunction),pt(tSet(tFunction),rhs([tCol(tFunction),\+ttExpressionType(tFunction)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tFunction)
- % Support: tSet(tFunction),pt(tSet(tFunction),rhs([tCol(tFunction),\+ttExpressionType(tFunction)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tFunction)
- % support (was): _10890,_10892
- % Couldn't retract_i: spft(ttExpressionType(tFunction),_15458,_15460).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tFunction))).
- % Found positive trigger: tSet(tFunction)
- % body: rhs([tCol(tFunction)])
- % RHS-Post1: tCol(tFunction)
- % Support: tSet(tFunction),pt(tSet(tFunction),rhs([tCol(tFunction)]))
- % Found positive trigger: tSet(tFunction)
- % body: compound(tSet(tFunction)),\+is_ftVar(tSet(tFunction))*->rhs([{with_current_why(tSet(tFunction),ignore(\+addAdmittedArguments(tSet(tFunction))))}])
- % Found positive trigger: tSet(tFunction)
- % body: is_kif_clause(tSet(tFunction))*->rhs([clif(tSet(tFunction))])
- % Found positive trigger: tSet(tFunction)
- % body: compound(tSet(tFunction)),\+is_ftVar(tSet(tFunction))*->rhs([{with_current_why(tSet(tFunction),ignore(\+addAdmittedArguments(tSet(tFunction))))}])
- % Found positive trigger: tCol(tFunction)
- % body: is_kif_clause(tCol(tFunction))*->rhs([clif(tCol(tFunction))])
- % Found positive trigger: tCol(tFunction)
- % body: compound(tCol(tFunction)),\+is_ftVar(tCol(tFunction))*->rhs([{with_current_why(tCol(tFunction),ignore(\+addAdmittedArguments(tCol(tFunction))))}])
- % RHS-Post1: tCol(vtValue)
- % Support: admittedArgument(genls,2,vtValue),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(vtValue)).
- % Found positive trigger: tCol(vtValue)
- % body: rhs([{decl_type(vtValue),kb_local(vtValue/1)}])
- % Found positive trigger: tCol(vtValue)
- % body: rhs([arity(vtValue,1)])
- % RHS-Post1: arity(vtValue,1)
- % Support: tCol(vtValue),pt(tCol(vtValue),rhs([arity(vtValue,1)]))
- % Found positive trigger: tCol(vtValue)
- % body: compound(tCol(vtValue)),\+is_ftVar(tCol(vtValue))*->rhs([{with_current_why(tCol(vtValue),ignore(\+addAdmittedArguments(tCol(vtValue))))}])
- % Found positive trigger: tCol(vtValue)
- % body: \+ttExpressionType(vtValue)*->rhs([tSet(vtValue)])
- % RHS-Post1: tSet(vtValue)
- % Support: tCol(vtValue),pt(tCol(vtValue),(\+ttExpressionType(vtValue)*->rhs([tSet(vtValue)])))
- % r_sane:mpred_fwc1(tSet(vtValue)).
- % Found positive trigger: tSet(vtValue)
- % body: rhs([functorDeclares(vtValue)])
- % RHS-Post1: functorDeclares(vtValue)
- % Support: tSet(vtValue),pt(tSet(vtValue),rhs([functorDeclares(vtValue)]))
- % r_sane:mpred_fwc1(functorDeclares(vtValue)).
- % Found positive trigger: functorDeclares(vtValue)
- % body: rhs([arityMax(vtValue,1),functorIsMacro(vtValue)])
- % RHS-Post1: arityMax(vtValue,1)
- % Support: functorDeclares(vtValue),pt(functorDeclares(vtValue),rhs([arityMax(vtValue,1),functorIsMacro(vtValue)]))
- % r_sane:mpred_fwc1(arityMax(vtValue, 1)).
- % Found positive trigger: arityMax(vtValue,1)
- % body: compound(arityMax(vtValue,1)),\+is_ftVar(arityMax(vtValue,1))*->rhs([{with_current_why(arityMax(vtValue,1),ignore(\+addAdmittedArguments(arityMax(vtValue,1))))}])
- % Found positive trigger: arityMax(vtValue,1)
- % body: is_kif_clause(arityMax(vtValue,1))*->rhs([clif(arityMax(vtValue,1))])
- % Found positive trigger: arityMax(vtValue,1)
- % body: compound(arityMax(vtValue,1)),\+is_ftVar(arityMax(vtValue,1))*->rhs([{with_current_why(arityMax(vtValue,1),ignore(\+addAdmittedArguments(arityMax(vtValue,1))))}])
- % RHS-Post1: functorIsMacro(vtValue)
- % Support: functorDeclares(vtValue),pt(functorDeclares(vtValue),rhs([arityMax(vtValue,1),functorIsMacro(vtValue)]))
- % r_sane:mpred_fwc1(functorIsMacro(vtValue)).
- % Found positive trigger: functorIsMacro(vtValue)
- % body: compound(functorIsMacro(vtValue)),\+is_ftVar(functorIsMacro(vtValue))*->rhs([{with_current_why(functorIsMacro(vtValue),ignore(\+addAdmittedArguments(functorIsMacro(vtValue))))}])
- % Found positive trigger: functorIsMacro(vtValue)
- % body: is_kif_clause(functorIsMacro(vtValue))*->rhs([clif(functorIsMacro(vtValue))])
- % Found positive trigger: functorIsMacro(vtValue)
- % body: compound(functorIsMacro(vtValue)),\+is_ftVar(functorIsMacro(vtValue))*->rhs([{with_current_why(functorIsMacro(vtValue),ignore(\+addAdmittedArguments(functorIsMacro(vtValue))))}])
- % Found positive trigger: functorDeclares(vtValue)
- % body: compound(functorDeclares(vtValue)),\+is_ftVar(functorDeclares(vtValue))*->rhs([{with_current_why(functorDeclares(vtValue),ignore(\+addAdmittedArguments(functorDeclares(vtValue))))}])
- % Found positive trigger: functorDeclares(vtValue)
- % body: is_kif_clause(functorDeclares(vtValue))*->rhs([clif(functorDeclares(vtValue))])
- % Found positive trigger: functorDeclares(vtValue)
- % body: compound(functorDeclares(vtValue)),\+is_ftVar(functorDeclares(vtValue))*->rhs([{with_current_why(functorDeclares(vtValue),ignore(\+addAdmittedArguments(functorDeclares(vtValue))))}])
- % Found positive trigger: tSet(vtValue)
- % body: rhs([tCol(vtValue),\+ttExpressionType(vtValue)])
- % RHS-Post1: tCol(vtValue)
- % Support: tSet(vtValue),pt(tSet(vtValue),rhs([tCol(vtValue),\+ttExpressionType(vtValue)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(vtValue)
- % Support: tSet(vtValue),pt(tSet(vtValue),rhs([tCol(vtValue),\+ttExpressionType(vtValue)]))
- % Removing (withdraw1)
- % term: ttExpressionType(vtValue)
- % support (was): _10948,_10950
- % Couldn't retract_i: spft(ttExpressionType(vtValue),_15514,_15516).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(vtValue))).
- % Found positive trigger: tSet(vtValue)
- % body: rhs([tCol(vtValue)])
- % RHS-Post1: tCol(vtValue)
- % Support: tSet(vtValue),pt(tSet(vtValue),rhs([tCol(vtValue)]))
- % Found positive trigger: tSet(vtValue)
- % body: compound(tSet(vtValue)),\+is_ftVar(tSet(vtValue))*->rhs([{with_current_why(tSet(vtValue),ignore(\+addAdmittedArguments(tSet(vtValue))))}])
- % Found positive trigger: tSet(vtValue)
- % body: is_kif_clause(tSet(vtValue))*->rhs([clif(tSet(vtValue))])
- % Found positive trigger: tSet(vtValue)
- % body: compound(tSet(vtValue)),\+is_ftVar(tSet(vtValue))*->rhs([{with_current_why(tSet(vtValue),ignore(\+addAdmittedArguments(tSet(vtValue))))}])
- % Found positive trigger: tCol(vtValue)
- % body: is_kif_clause(tCol(vtValue))*->rhs([clif(tCol(vtValue))])
- % Found positive trigger: tCol(vtValue)
- % body: compound(tCol(vtValue)),\+is_ftVar(tCol(vtValue))*->rhs([{with_current_why(tCol(vtValue),ignore(\+addAdmittedArguments(tCol(vtValue))))}])
- % RHS-Post1: tCol(rtSententialOperator)
- % Support: admittedArgument(genls,2,rtSententialOperator),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(rtSententialOperator)).
- % Found positive trigger: tCol(rtSententialOperator)
- % body: rhs([{decl_type(rtSententialOperator),kb_local(rtSententialOperator/1)}])
- % Found positive trigger: tCol(rtSententialOperator)
- % body: rhs([arity(rtSententialOperator,1)])
- % RHS-Post1: arity(rtSententialOperator,1)
- % Support: tCol(rtSententialOperator),pt(tCol(rtSententialOperator),rhs([arity(rtSententialOperator,1)]))
- % Found positive trigger: tCol(rtSententialOperator)
- % body: compound(tCol(rtSententialOperator)),\+is_ftVar(tCol(rtSententialOperator))*->rhs([{with_current_why(tCol(rtSententialOperator),ignore(\+addAdmittedArguments(tCol(rtSententialOperator))))}])
- % Found positive trigger: tCol(rtSententialOperator)
- % body: \+ttExpressionType(rtSententialOperator)*->rhs([tSet(rtSententialOperator)])
- % RHS-Post1: tSet(rtSententialOperator)
- % Support: tCol(rtSententialOperator),pt(tCol(rtSententialOperator),(\+ttExpressionType(rtSententialOperator)*->rhs([tSet(rtSententialOperator)])))
- % r_sane:mpred_fwc1(tSet(rtSententialOperator)).
- % Found positive trigger: tSet(rtSententialOperator)
- % body: rhs([functorDeclares(rtSententialOperator)])
- % RHS-Post1: functorDeclares(rtSententialOperator)
- % Support: tSet(rtSententialOperator),pt(tSet(rtSententialOperator),rhs([functorDeclares(rtSententialOperator)]))
- % r_sane:mpred_fwc1(functorDeclares(rtSententialOperator)).
- % Found positive trigger: functorDeclares(rtSententialOperator)
- % body: rhs([arityMax(rtSententialOperator,1),functorIsMacro(rtSententialOperator)])
- % RHS-Post1: arityMax(rtSententialOperator,1)
- % Support: functorDeclares(rtSententialOperator),pt(functorDeclares(rtSententialOperator),rhs([arityMax(rtSententialOperator,1),functorIsMacro(rtSententialOperator)]))
- % r_sane:mpred_fwc1(arityMax(rtSententialOperator, 1)).
- % Found positive trigger: arityMax(rtSententialOperator,1)
- % body: compound(arityMax(rtSententialOperator,1)),\+is_ftVar(arityMax(rtSententialOperator,1))*->rhs([{with_current_why(arityMax(rtSententialOperator,1),ignore(\+addAdmittedArguments(arityMax(rtSententialOperator,1))))}])
- % Found positive trigger: arityMax(rtSententialOperator,1)
- % body: is_kif_clause(arityMax(rtSententialOperator,1))*->rhs([clif(arityMax(rtSententialOperator,1))])
- % Found positive trigger: arityMax(rtSententialOperator,1)
- % body: compound(arityMax(rtSententialOperator,1)),\+is_ftVar(arityMax(rtSententialOperator,1))*->rhs([{with_current_why(arityMax(rtSententialOperator,1),ignore(\+addAdmittedArguments(arityMax(rtSententialOperator,1))))}])
- % RHS-Post1: functorIsMacro(rtSententialOperator)
- % Support: functorDeclares(rtSententialOperator),pt(functorDeclares(rtSententialOperator),rhs([arityMax(rtSententialOperator,1),functorIsMacro(rtSententialOperator)]))
- % r_sane:mpred_fwc1(functorIsMacro(rtSententialOperator)).
- % Found positive trigger: functorIsMacro(rtSententialOperator)
- % body: compound(functorIsMacro(rtSententialOperator)),\+is_ftVar(functorIsMacro(rtSententialOperator))*->rhs([{with_current_why(functorIsMacro(rtSententialOperator),ignore(\+addAdmittedArguments(functorIsMacro(rtSententialOperator))))}])
- % Found positive trigger: functorIsMacro(rtSententialOperator)
- % body: is_kif_clause(functorIsMacro(rtSententialOperator))*->rhs([clif(functorIsMacro(rtSententialOperator))])
- % Found positive trigger: functorIsMacro(rtSententialOperator)
- % body: compound(functorIsMacro(rtSententialOperator)),\+is_ftVar(functorIsMacro(rtSententialOperator))*->rhs([{with_current_why(functorIsMacro(rtSententialOperator),ignore(\+addAdmittedArguments(functorIsMacro(rtSententialOperator))))}])
- % Found positive trigger: functorDeclares(rtSententialOperator)
- % body: compound(functorDeclares(rtSententialOperator)),\+is_ftVar(functorDeclares(rtSententialOperator))*->rhs([{with_current_why(functorDeclares(rtSententialOperator),ignore(\+addAdmittedArguments(functorDeclares(rtSententialOperator))))}])
- % Found positive trigger: functorDeclares(rtSententialOperator)
- % body: is_kif_clause(functorDeclares(rtSententialOperator))*->rhs([clif(functorDeclares(rtSententialOperator))])
- % Found positive trigger: functorDeclares(rtSententialOperator)
- % body: compound(functorDeclares(rtSententialOperator)),\+is_ftVar(functorDeclares(rtSententialOperator))*->rhs([{with_current_why(functorDeclares(rtSententialOperator),ignore(\+addAdmittedArguments(functorDeclares(rtSententialOperator))))}])
- % Found positive trigger: tSet(rtSententialOperator)
- % body: rhs([tCol(rtSententialOperator),\+ttExpressionType(rtSententialOperator)])
- % RHS-Post1: tCol(rtSententialOperator)
- % Support: tSet(rtSententialOperator),pt(tSet(rtSententialOperator),rhs([tCol(rtSententialOperator),\+ttExpressionType(rtSententialOperator)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(rtSententialOperator)
- % Support: tSet(rtSententialOperator),pt(tSet(rtSententialOperator),rhs([tCol(rtSententialOperator),\+ttExpressionType(rtSententialOperator)]))
- % Removing (withdraw1)
- % term: ttExpressionType(rtSententialOperator)
- % support (was): _10966,_10968
- % Couldn't retract_i: spft(ttExpressionType(rtSententialOperator),_15538,_15540).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(rtSententialOperator))).
- % Found positive trigger: tSet(rtSententialOperator)
- % body: rhs([tCol(rtSententialOperator)])
- % RHS-Post1: tCol(rtSententialOperator)
- % Support: tSet(rtSententialOperator),pt(tSet(rtSententialOperator),rhs([tCol(rtSententialOperator)]))
- % Found positive trigger: tSet(rtSententialOperator)
- % body: compound(tSet(rtSententialOperator)),\+is_ftVar(tSet(rtSententialOperator))*->rhs([{with_current_why(tSet(rtSententialOperator),ignore(\+addAdmittedArguments(tSet(rtSententialOperator))))}])
- % Found positive trigger: tSet(rtSententialOperator)
- % body: is_kif_clause(tSet(rtSententialOperator))*->rhs([clif(tSet(rtSententialOperator))])
- % Found positive trigger: tSet(rtSententialOperator)
- % body: compound(tSet(rtSententialOperator)),\+is_ftVar(tSet(rtSententialOperator))*->rhs([{with_current_why(tSet(rtSententialOperator),ignore(\+addAdmittedArguments(tSet(rtSententialOperator))))}])
- % Found positive trigger: tCol(rtSententialOperator)
- % body: is_kif_clause(tCol(rtSententialOperator))*->rhs([clif(tCol(rtSententialOperator))])
- % Found positive trigger: tCol(rtSententialOperator)
- % body: compound(tCol(rtSententialOperator)),\+is_ftVar(tCol(rtSententialOperator))*->rhs([{with_current_why(tCol(rtSententialOperator),ignore(\+addAdmittedArguments(tCol(rtSententialOperator))))}])
- % RHS-Post1: tCol(rtAvoidForwardChain)
- % Support: admittedArgument(genls,2,rtAvoidForwardChain),pt(admittedArgument(genls,2,_6600),(nonvar(_6600)*->rhs([tCol(_6600)])))
- % r_sane:mpred_fwc1(tCol(rtAvoidForwardChain)).
- % Found positive trigger: tCol(rtAvoidForwardChain)
- % body: rhs([{decl_type(rtAvoidForwardChain),kb_local(rtAvoidForwardChain/1)}])
- % Found positive trigger: tCol(rtAvoidForwardChain)
- % body: rhs([arity(rtAvoidForwardChain,1)])
- % RHS-Post1: arity(rtAvoidForwardChain,1)
- % Support: tCol(rtAvoidForwardChain),pt(tCol(rtAvoidForwardChain),rhs([arity(rtAvoidForwardChain,1)]))
- % Found positive trigger: tCol(rtAvoidForwardChain)
- % body: compound(tCol(rtAvoidForwardChain)),\+is_ftVar(tCol(rtAvoidForwardChain))*->rhs([{with_current_why(tCol(rtAvoidForwardChain),ignore(\+addAdmittedArguments(tCol(rtAvoidForwardChain))))}])
- % Found positive trigger: tCol(rtAvoidForwardChain)
- % body: \+ttExpressionType(rtAvoidForwardChain)*->rhs([tSet(rtAvoidForwardChain)])
- % RHS-Post1: tSet(rtAvoidForwardChain)
- % Support: tCol(rtAvoidForwardChain),pt(tCol(rtAvoidForwardChain),(\+ttExpressionType(rtAvoidForwardChain)*->rhs([tSet(rtAvoidForwardChain)])))
- % r_sane:mpred_fwc1(tSet(rtAvoidForwardChain)).
- % Found positive trigger: tSet(rtAvoidForwardChain)
- % body: rhs([functorDeclares(rtAvoidForwardChain)])
- % RHS-Post1: functorDeclares(rtAvoidForwardChain)
- % Support: tSet(rtAvoidForwardChain),pt(tSet(rtAvoidForwardChain),rhs([functorDeclares(rtAvoidForwardChain)]))
- % r_sane:mpred_fwc1(functorDeclares(rtAvoidForwardChain)).
- % Found positive trigger: functorDeclares(rtAvoidForwardChain)
- % body: rhs([arityMax(rtAvoidForwardChain,1),functorIsMacro(rtAvoidForwardChain)])
- % RHS-Post1: arityMax(rtAvoidForwardChain,1)
- % Support: functorDeclares(rtAvoidForwardChain),pt(functorDeclares(rtAvoidForwardChain),rhs([arityMax(rtAvoidForwardChain,1),functorIsMacro(rtAvoidForwardChain)]))
- % r_sane:mpred_fwc1(arityMax(rtAvoidForwardChain, 1)).
- % Found positive trigger: arityMax(rtAvoidForwardChain,1)
- % body: compound(arityMax(rtAvoidForwardChain,1)),\+is_ftVar(arityMax(rtAvoidForwardChain,1))*->rhs([{with_current_why(arityMax(rtAvoidForwardChain,1),ignore(\+addAdmittedArguments(arityMax(rtAvoidForwardChain,1))))}])
- % Found positive trigger: arityMax(rtAvoidForwardChain,1)
- % body: is_kif_clause(arityMax(rtAvoidForwardChain,1))*->rhs([clif(arityMax(rtAvoidForwardChain,1))])
- % Found positive trigger: arityMax(rtAvoidForwardChain,1)
- % body: compound(arityMax(rtAvoidForwardChain,1)),\+is_ftVar(arityMax(rtAvoidForwardChain,1))*->rhs([{with_current_why(arityMax(rtAvoidForwardChain,1),ignore(\+addAdmittedArguments(arityMax(rtAvoidForwardChain,1))))}])
- % RHS-Post1: functorIsMacro(rtAvoidForwardChain)
- % Support: functorDeclares(rtAvoidForwardChain),pt(functorDeclares(rtAvoidForwardChain),rhs([arityMax(rtAvoidForwardChain,1),functorIsMacro(rtAvoidForwardChain)]))
- % r_sane:mpred_fwc1(functorIsMacro(rtAvoidForwardChain)).
- % Found positive trigger: functorIsMacro(rtAvoidForwardChain)
- % body: compound(functorIsMacro(rtAvoidForwardChain)),\+is_ftVar(functorIsMacro(rtAvoidForwardChain))*->rhs([{with_current_why(functorIsMacro(rtAvoidForwardChain),ignore(\+addAdmittedArguments(functorIsMacro(rtAvoidForwardChain))))}])
- % Found positive trigger: functorIsMacro(rtAvoidForwardChain)
- % body: is_kif_clause(functorIsMacro(rtAvoidForwardChain))*->rhs([clif(functorIsMacro(rtAvoidForwardChain))])
- % Found positive trigger: functorIsMacro(rtAvoidForwardChain)
- % body: compound(functorIsMacro(rtAvoidForwardChain)),\+is_ftVar(functorIsMacro(rtAvoidForwardChain))*->rhs([{with_current_why(functorIsMacro(rtAvoidForwardChain),ignore(\+addAdmittedArguments(functorIsMacro(rtAvoidForwardChain))))}])
- % Found positive trigger: functorDeclares(rtAvoidForwardChain)
- % body: compound(functorDeclares(rtAvoidForwardChain)),\+is_ftVar(functorDeclares(rtAvoidForwardChain))*->rhs([{with_current_why(functorDeclares(rtAvoidForwardChain),ignore(\+addAdmittedArguments(functorDeclares(rtAvoidForwardChain))))}])
- % Found positive trigger: functorDeclares(rtAvoidForwardChain)
- % body: is_kif_clause(functorDeclares(rtAvoidForwardChain))*->rhs([clif(functorDeclares(rtAvoidForwardChain))])
- % Found positive trigger: functorDeclares(rtAvoidForwardChain)
- % body: compound(functorDeclares(rtAvoidForwardChain)),\+is_ftVar(functorDeclares(rtAvoidForwardChain))*->rhs([{with_current_why(functorDeclares(rtAvoidForwardChain),ignore(\+addAdmittedArguments(functorDeclares(rtAvoidForwardChain))))}])
- % Found positive trigger: tSet(rtAvoidForwardChain)
- % body: rhs([tCol(rtAvoidForwardChain),\+ttExpressionType(rtAvoidForwardChain)])
- % RHS-Post1: tCol(rtAvoidForwardChain)
- % Support: tSet(rtAvoidForwardChain),pt(tSet(rtAvoidForwardChain),rhs([tCol(rtAvoidForwardChain),\+ttExpressionType(rtAvoidForwardChain)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(rtAvoidForwardChain)
- % Support: tSet(rtAvoidForwardChain),pt(tSet(rtAvoidForwardChain),rhs([tCol(rtAvoidForwardChain),\+ttExpressionType(rtAvoidForwardChain)]))
- % Removing (withdraw1)
- % term: ttExpressionType(rtAvoidForwardChain)
- % support (was): _16992,_16994
- % Couldn't retract_i: spft(ttExpressionType(rtAvoidForwardChain),_21564,_21566).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(rtAvoidForwardChain))).
- % Found positive trigger: tSet(rtAvoidForwardChain)
- % body: rhs([tCol(rtAvoidForwardChain)])
- % RHS-Post1: tCol(rtAvoidForwardChain)
- % Support: tSet(rtAvoidForwardChain),pt(tSet(rtAvoidForwardChain),rhs([tCol(rtAvoidForwardChain)]))
- % Found positive trigger: tSet(rtAvoidForwardChain)
- % body: compound(tSet(rtAvoidForwardChain)),\+is_ftVar(tSet(rtAvoidForwardChain))*->rhs([{with_current_why(tSet(rtAvoidForwardChain),ignore(\+addAdmittedArguments(tSet(rtAvoidForwardChain))))}])
- % Found positive trigger: tSet(rtAvoidForwardChain)
- % body: is_kif_clause(tSet(rtAvoidForwardChain))*->rhs([clif(tSet(rtAvoidForwardChain))])
- % Found positive trigger: tSet(rtAvoidForwardChain)
- % body: compound(tSet(rtAvoidForwardChain)),\+is_ftVar(tSet(rtAvoidForwardChain))*->rhs([{with_current_why(tSet(rtAvoidForwardChain),ignore(\+addAdmittedArguments(tSet(rtAvoidForwardChain))))}])
- % Found positive trigger: tCol(rtAvoidForwardChain)
- % body: is_kif_clause(tCol(rtAvoidForwardChain))*->rhs([clif(tCol(rtAvoidForwardChain))])
- % Found positive trigger: tCol(rtAvoidForwardChain)
- % body: compound(tCol(rtAvoidForwardChain)),\+is_ftVar(tCol(rtAvoidForwardChain))*->rhs([{with_current_why(tCol(rtAvoidForwardChain),ignore(\+addAdmittedArguments(tCol(rtAvoidForwardChain))))}])
- % gripe_CPUTIME(true, warn(0.4704875950000016>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, (admittedArgument(genls, 2, _2666)/nonvar(_2666)==>tCol(_2666)), (argIsa(genls, 2, tCol), pt(argIsa(_3870, _3872, _3874), (nonvar(_3874), nonvar(_3870), integer(_3872)*->rhs([tCol(_3874), (admittedArgument(_3870, _3872, _3944)/nonvar(_3944)==>isa(_3944, _3874)), (poss(admittedArgument(_3870, _3872, _3944))/nonvar(_3944)==>isa(_3944, _3874))])))), none))).
- % RHS-Post1: poss(admittedArgument(genls,2,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(genls,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(genls, 2, _26862))/nonvar(_26862)==>tCol(_26862))).
- % Adding positive
- % trigger: poss(admittedArgument(genls,2,_6016))
- % body: nonvar(_6016)*->rhs([tCol(_6016)])
- % Support: (poss(admittedArgument(genls,2,_6206))/nonvar(_6206)==>tCol(_6206)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(completelyAssertedCollection)
- % Support: poss(admittedArgument(genls,2,completelyAssertedCollection)),pt(poss(admittedArgument(genls,2,_11284)),(nonvar(_11284)*->rhs([tCol(_11284)])))
- % RHS-Post1: tCol(tMicrotheory)
- % Support: poss(admittedArgument(genls,2,tMicrotheory)),pt(poss(admittedArgument(genls,2,_11284)),(nonvar(_11284)*->rhs([tCol(_11284)])))
- % RHS-Post1: tCol(tCol)
- % Support: poss(admittedArgument(genls,2,tCol)),pt(poss(admittedArgument(genls,2,_11284)),(nonvar(_11284)*->rhs([tCol(_11284)])))
- % RHS-Post1: tCol(tTemporalThing)
- % Support: poss(admittedArgument(genls,2,tTemporalThing)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(ttObjectType)
- % Support: poss(admittedArgument(genls,2,ttObjectType)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(ttSpatialType)
- % Support: poss(admittedArgument(genls,2,ttSpatialType)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(ttIndividualType)
- % Support: poss(admittedArgument(genls,2,ttIndividualType)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(tIndividual)
- % Support: poss(admittedArgument(genls,2,tIndividual)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(tRelation)
- % Support: poss(admittedArgument(genls,2,tRelation)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(tAgent)
- % Support: poss(admittedArgument(genls,2,tAgent)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(tFunction)
- % Support: poss(admittedArgument(genls,2,tFunction)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(vtValue)
- % Support: poss(admittedArgument(genls,2,vtValue)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(rtSententialOperator)
- % Support: poss(admittedArgument(genls,2,rtSententialOperator)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(rtAvoidForwardChain)
- % Support: poss(admittedArgument(genls,2,rtAvoidForwardChain)),pt(poss(admittedArgument(genls,2,_6644)),(nonvar(_6644)*->rhs([tCol(_6644)])))
- % RHS-Post1: tCol(ftAssertable)
- % Support: argIsa(<-,1,ftAssertable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(<-,1,_2666)/nonvar(_2666)==>isa(_2666,ftAssertable)
- % Support: argIsa(<-,1,ftAssertable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(<-, 1, _20468)/nonvar(_20468)==>ftAssertable(_20468))).
- % Adding positive
- % trigger: admittedArgument(<-,1,_6010)
- % body: nonvar(_6010)*->rhs([ftAssertable(_6010)])
- % Support: (admittedArgument(<-,1,_6192)/nonvar(_6192)==>ftAssertable(_6192)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(<-,1,_2666))/nonvar(_2666)==>isa(_2666,ftAssertable)
- % Support: argIsa(<-,1,ftAssertable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(<-, 1, _22240))/nonvar(_22240)==>ftAssertable(_22240))).
- % Adding positive
- % trigger: poss(admittedArgument(<-,1,_22240))
- % body: nonvar(_22240)*->rhs([ftAssertable(_22240)])
- % Support: (poss(admittedArgument(<-,1,_24922))/nonvar(_24922)==>ftAssertable(_24922)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftAskable)
- % Support: argIsa(<-,2,ftAskable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(<-,2,_2666)/nonvar(_2666)==>isa(_2666,ftAskable)
- % Support: argIsa(<-,2,ftAskable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(<-, 2, _20498)/nonvar(_20498)==>ftAskable(_20498))).
- % Adding positive
- % trigger: admittedArgument(<-,2,_6028)
- % body: nonvar(_6028)*->rhs([ftAskable(_6028)])
- % Support: (admittedArgument(<-,2,_6210)/nonvar(_6210)==>ftAskable(_6210)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(<-,2,_2666))/nonvar(_2666)==>isa(_2666,ftAskable)
- % Support: argIsa(<-,2,ftAskable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(<-, 2, _22248))/nonvar(_22248)==>ftAskable(_22248))).
- % Adding positive
- % trigger: poss(admittedArgument(<-,2,_22248))
- % body: nonvar(_22248)*->rhs([ftAskable(_22248)])
- % Support: (poss(admittedArgument(<-,2,_24930))/nonvar(_24930)==>ftAskable(_24930)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(disjointWith,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(disjointWith,1,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(disjointWith,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(disjointWith, 1, _20528)/nonvar(_20528)==>tCol(_20528))).
- % Adding positive
- % trigger: admittedArgument(disjointWith,1,_6084)
- % body: nonvar(_6084)*->rhs([tCol(_6084)])
- % Support: (admittedArgument(disjointWith,1,_6266)/nonvar(_6266)==>tCol(_6266)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(disjointWith,1,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(disjointWith,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(disjointWith, 1, _22286))/nonvar(_22286)==>tCol(_22286))).
- % Adding positive
- % trigger: poss(admittedArgument(disjointWith,1,_22286))
- % body: nonvar(_22286)*->rhs([tCol(_22286)])
- % Support: (poss(admittedArgument(disjointWith,1,_24970))/nonvar(_24970)==>tCol(_24970)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(disjointWith,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(disjointWith,2,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(disjointWith,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(disjointWith, 2, _20546)/nonvar(_20546)==>tCol(_20546))).
- % Adding positive
- % trigger: admittedArgument(disjointWith,2,_6102)
- % body: nonvar(_6102)*->rhs([tCol(_6102)])
- % Support: (admittedArgument(disjointWith,2,_6284)/nonvar(_6284)==>tCol(_6284)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttTypeType)
- % Support: admittedArgument(disjointWith,2,ttTypeType),pt(admittedArgument(disjointWith,2,_11320),(nonvar(_11320)*->rhs([tCol(_11320)])))
- % r_sane:mpred_fwc1(tCol(ttTypeType)).
- % Found positive trigger: tCol(ttTypeType)
- % body: rhs([{decl_type(ttTypeType),kb_local(ttTypeType/1)}])
- % Found positive trigger: tCol(ttTypeType)
- % body: rhs([arity(ttTypeType,1)])
- % RHS-Post1: arity(ttTypeType,1)
- % Support: tCol(ttTypeType),pt(tCol(ttTypeType),rhs([arity(ttTypeType,1)]))
- % Found positive trigger: tCol(ttTypeType)
- % body: compound(tCol(ttTypeType)),\+is_ftVar(tCol(ttTypeType))*->rhs([{with_current_why(tCol(ttTypeType),ignore(\+addAdmittedArguments(tCol(ttTypeType))))}])
- % Found positive trigger: tCol(ttTypeType)
- % body: \+ttExpressionType(ttTypeType)*->rhs([tSet(ttTypeType)])
- % RHS-Post1: tSet(ttTypeType)
- % Support: tCol(ttTypeType),pt(tCol(ttTypeType),(\+ttExpressionType(ttTypeType)*->rhs([tSet(ttTypeType)])))
- % r_sane:mpred_fwc1(tSet(ttTypeType)).
- % Found positive trigger: tSet(ttTypeType)
- % body: rhs([functorDeclares(ttTypeType)])
- % RHS-Post1: functorDeclares(ttTypeType)
- % Support: tSet(ttTypeType),pt(tSet(ttTypeType),rhs([functorDeclares(ttTypeType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttTypeType)).
- % Found positive trigger: functorDeclares(ttTypeType)
- % body: rhs([arityMax(ttTypeType,1),functorIsMacro(ttTypeType)])
- % RHS-Post1: arityMax(ttTypeType,1)
- % Support: functorDeclares(ttTypeType),pt(functorDeclares(ttTypeType),rhs([arityMax(ttTypeType,1),functorIsMacro(ttTypeType)]))
- % r_sane:mpred_fwc1(arityMax(ttTypeType, 1)).
- % Found positive trigger: arityMax(ttTypeType,1)
- % body: compound(arityMax(ttTypeType,1)),\+is_ftVar(arityMax(ttTypeType,1))*->rhs([{with_current_why(arityMax(ttTypeType,1),ignore(\+addAdmittedArguments(arityMax(ttTypeType,1))))}])
- % Found positive trigger: arityMax(ttTypeType,1)
- % body: is_kif_clause(arityMax(ttTypeType,1))*->rhs([clif(arityMax(ttTypeType,1))])
- % Found positive trigger: arityMax(ttTypeType,1)
- % body: compound(arityMax(ttTypeType,1)),\+is_ftVar(arityMax(ttTypeType,1))*->rhs([{with_current_why(arityMax(ttTypeType,1),ignore(\+addAdmittedArguments(arityMax(ttTypeType,1))))}])
- % RHS-Post1: functorIsMacro(ttTypeType)
- % Support: functorDeclares(ttTypeType),pt(functorDeclares(ttTypeType),rhs([arityMax(ttTypeType,1),functorIsMacro(ttTypeType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttTypeType)).
- % Found positive trigger: functorIsMacro(ttTypeType)
- % body: compound(functorIsMacro(ttTypeType)),\+is_ftVar(functorIsMacro(ttTypeType))*->rhs([{with_current_why(functorIsMacro(ttTypeType),ignore(\+addAdmittedArguments(functorIsMacro(ttTypeType))))}])
- % Found positive trigger: functorIsMacro(ttTypeType)
- % body: is_kif_clause(functorIsMacro(ttTypeType))*->rhs([clif(functorIsMacro(ttTypeType))])
- % Found positive trigger: functorIsMacro(ttTypeType)
- % body: compound(functorIsMacro(ttTypeType)),\+is_ftVar(functorIsMacro(ttTypeType))*->rhs([{with_current_why(functorIsMacro(ttTypeType),ignore(\+addAdmittedArguments(functorIsMacro(ttTypeType))))}])
- % Found positive trigger: functorDeclares(ttTypeType)
- % body: compound(functorDeclares(ttTypeType)),\+is_ftVar(functorDeclares(ttTypeType))*->rhs([{with_current_why(functorDeclares(ttTypeType),ignore(\+addAdmittedArguments(functorDeclares(ttTypeType))))}])
- % Found positive trigger: functorDeclares(ttTypeType)
- % body: is_kif_clause(functorDeclares(ttTypeType))*->rhs([clif(functorDeclares(ttTypeType))])
- % Found positive trigger: functorDeclares(ttTypeType)
- % body: compound(functorDeclares(ttTypeType)),\+is_ftVar(functorDeclares(ttTypeType))*->rhs([{with_current_why(functorDeclares(ttTypeType),ignore(\+addAdmittedArguments(functorDeclares(ttTypeType))))}])
- % Found positive trigger: tSet(ttTypeType)
- % body: rhs([tCol(ttTypeType),\+ttExpressionType(ttTypeType)])
- % RHS-Post1: tCol(ttTypeType)
- % Support: tSet(ttTypeType),pt(tSet(ttTypeType),rhs([tCol(ttTypeType),\+ttExpressionType(ttTypeType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttTypeType)
- % Support: tSet(ttTypeType),pt(tSet(ttTypeType),rhs([tCol(ttTypeType),\+ttExpressionType(ttTypeType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttTypeType)
- % support (was): _28306,_28308
- % Couldn't retract_i: spft(ttExpressionType(ttTypeType),_32874,_32876).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttTypeType))).
- % Found positive trigger: tSet(ttTypeType)
- % body: rhs([tCol(ttTypeType)])
- % RHS-Post1: tCol(ttTypeType)
- % Support: tSet(ttTypeType),pt(tSet(ttTypeType),rhs([tCol(ttTypeType)]))
- % Found positive trigger: tSet(ttTypeType)
- % body: compound(tSet(ttTypeType)),\+is_ftVar(tSet(ttTypeType))*->rhs([{with_current_why(tSet(ttTypeType),ignore(\+addAdmittedArguments(tSet(ttTypeType))))}])
- % Found positive trigger: tSet(ttTypeType)
- % body: is_kif_clause(tSet(ttTypeType))*->rhs([clif(tSet(ttTypeType))])
- % Found positive trigger: tSet(ttTypeType)
- % body: compound(tSet(ttTypeType)),\+is_ftVar(tSet(ttTypeType))*->rhs([{with_current_why(tSet(ttTypeType),ignore(\+addAdmittedArguments(tSet(ttTypeType))))}])
- % Found positive trigger: tCol(ttTypeType)
- % body: is_kif_clause(tCol(ttTypeType))*->rhs([clif(tCol(ttTypeType))])
- % Found positive trigger: tCol(ttTypeType)
- % body: compound(tCol(ttTypeType)),\+is_ftVar(tCol(ttTypeType))*->rhs([{with_current_why(tCol(ttTypeType),ignore(\+addAdmittedArguments(tCol(ttTypeType))))}])
- % RHS-Post1: tCol(ttValueType)
- % Support: admittedArgument(disjointWith,2,ttValueType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttValueType)).
- % Found positive trigger: tCol(ttValueType)
- % body: rhs([{decl_type(ttValueType),kb_local(ttValueType/1)}])
- % Found positive trigger: tCol(ttValueType)
- % body: rhs([arity(ttValueType,1)])
- % RHS-Post1: arity(ttValueType,1)
- % Support: tCol(ttValueType),pt(tCol(ttValueType),rhs([arity(ttValueType,1)]))
- % Found positive trigger: tCol(ttValueType)
- % body: compound(tCol(ttValueType)),\+is_ftVar(tCol(ttValueType))*->rhs([{with_current_why(tCol(ttValueType),ignore(\+addAdmittedArguments(tCol(ttValueType))))}])
- % Found positive trigger: tCol(ttValueType)
- % body: \+ttExpressionType(ttValueType)*->rhs([tSet(ttValueType)])
- % RHS-Post1: tSet(ttValueType)
- % Support: tCol(ttValueType),pt(tCol(ttValueType),(\+ttExpressionType(ttValueType)*->rhs([tSet(ttValueType)])))
- % r_sane:mpred_fwc1(tSet(ttValueType)).
- % Found positive trigger: tSet(ttValueType)
- % body: rhs([functorDeclares(ttValueType)])
- % RHS-Post1: functorDeclares(ttValueType)
- % Support: tSet(ttValueType),pt(tSet(ttValueType),rhs([functorDeclares(ttValueType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttValueType)).
- % Found positive trigger: functorDeclares(ttValueType)
- % body: rhs([arityMax(ttValueType,1),functorIsMacro(ttValueType)])
- % RHS-Post1: arityMax(ttValueType,1)
- % Support: functorDeclares(ttValueType),pt(functorDeclares(ttValueType),rhs([arityMax(ttValueType,1),functorIsMacro(ttValueType)]))
- % r_sane:mpred_fwc1(arityMax(ttValueType, 1)).
- % Found positive trigger: arityMax(ttValueType,1)
- % body: compound(arityMax(ttValueType,1)),\+is_ftVar(arityMax(ttValueType,1))*->rhs([{with_current_why(arityMax(ttValueType,1),ignore(\+addAdmittedArguments(arityMax(ttValueType,1))))}])
- % Found positive trigger: arityMax(ttValueType,1)
- % body: is_kif_clause(arityMax(ttValueType,1))*->rhs([clif(arityMax(ttValueType,1))])
- % Found positive trigger: arityMax(ttValueType,1)
- % body: compound(arityMax(ttValueType,1)),\+is_ftVar(arityMax(ttValueType,1))*->rhs([{with_current_why(arityMax(ttValueType,1),ignore(\+addAdmittedArguments(arityMax(ttValueType,1))))}])
- % RHS-Post1: functorIsMacro(ttValueType)
- % Support: functorDeclares(ttValueType),pt(functorDeclares(ttValueType),rhs([arityMax(ttValueType,1),functorIsMacro(ttValueType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttValueType)).
- % Found positive trigger: functorIsMacro(ttValueType)
- % body: compound(functorIsMacro(ttValueType)),\+is_ftVar(functorIsMacro(ttValueType))*->rhs([{with_current_why(functorIsMacro(ttValueType),ignore(\+addAdmittedArguments(functorIsMacro(ttValueType))))}])
- % Found positive trigger: functorIsMacro(ttValueType)
- % body: is_kif_clause(functorIsMacro(ttValueType))*->rhs([clif(functorIsMacro(ttValueType))])
- % Found positive trigger: functorIsMacro(ttValueType)
- % body: compound(functorIsMacro(ttValueType)),\+is_ftVar(functorIsMacro(ttValueType))*->rhs([{with_current_why(functorIsMacro(ttValueType),ignore(\+addAdmittedArguments(functorIsMacro(ttValueType))))}])
- % Found positive trigger: functorDeclares(ttValueType)
- % body: compound(functorDeclares(ttValueType)),\+is_ftVar(functorDeclares(ttValueType))*->rhs([{with_current_why(functorDeclares(ttValueType),ignore(\+addAdmittedArguments(functorDeclares(ttValueType))))}])
- % Found positive trigger: functorDeclares(ttValueType)
- % body: is_kif_clause(functorDeclares(ttValueType))*->rhs([clif(functorDeclares(ttValueType))])
- % Found positive trigger: functorDeclares(ttValueType)
- % body: compound(functorDeclares(ttValueType)),\+is_ftVar(functorDeclares(ttValueType))*->rhs([{with_current_why(functorDeclares(ttValueType),ignore(\+addAdmittedArguments(functorDeclares(ttValueType))))}])
- % Found positive trigger: tSet(ttValueType)
- % body: rhs([tCol(ttValueType),\+ttExpressionType(ttValueType)])
- % RHS-Post1: tCol(ttValueType)
- % Support: tSet(ttValueType),pt(tSet(ttValueType),rhs([tCol(ttValueType),\+ttExpressionType(ttValueType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttValueType)
- % Support: tSet(ttValueType),pt(tSet(ttValueType),rhs([tCol(ttValueType),\+ttExpressionType(ttValueType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttValueType)
- % support (was): _26476,_26478
- % Couldn't retract_i: spft(ttExpressionType(ttValueType),_31044,_31046).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttValueType))).
- % Found positive trigger: tSet(ttValueType)
- % body: rhs([tCol(ttValueType)])
- % RHS-Post1: tCol(ttValueType)
- % Support: tSet(ttValueType),pt(tSet(ttValueType),rhs([tCol(ttValueType)]))
- % Found positive trigger: tSet(ttValueType)
- % body: compound(tSet(ttValueType)),\+is_ftVar(tSet(ttValueType))*->rhs([{with_current_why(tSet(ttValueType),ignore(\+addAdmittedArguments(tSet(ttValueType))))}])
- % Found positive trigger: tSet(ttValueType)
- % body: is_kif_clause(tSet(ttValueType))*->rhs([clif(tSet(ttValueType))])
- % Found positive trigger: tSet(ttValueType)
- % body: compound(tSet(ttValueType)),\+is_ftVar(tSet(ttValueType))*->rhs([{with_current_why(tSet(ttValueType),ignore(\+addAdmittedArguments(tSet(ttValueType))))}])
- % Found positive trigger: tCol(ttValueType)
- % body: is_kif_clause(tCol(ttValueType))*->rhs([clif(tCol(ttValueType))])
- % Found positive trigger: tCol(ttValueType)
- % body: compound(tCol(ttValueType)),\+is_ftVar(tCol(ttValueType))*->rhs([{with_current_why(tCol(ttValueType),ignore(\+addAdmittedArguments(tCol(ttValueType))))}])
- % RHS-Post1: tCol(vtValue)
- % Support: admittedArgument(disjointWith,2,vtValue),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(ttAgentType)
- % Support: admittedArgument(disjointWith,2,ttAgentType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttAgentType)).
- % Found positive trigger: tCol(ttAgentType)
- % body: rhs([{decl_type(ttAgentType),kb_local(ttAgentType/1)}])
- % Found positive trigger: tCol(ttAgentType)
- % body: rhs([arity(ttAgentType,1)])
- % RHS-Post1: arity(ttAgentType,1)
- % Support: tCol(ttAgentType),pt(tCol(ttAgentType),rhs([arity(ttAgentType,1)]))
- % Found positive trigger: tCol(ttAgentType)
- % body: compound(tCol(ttAgentType)),\+is_ftVar(tCol(ttAgentType))*->rhs([{with_current_why(tCol(ttAgentType),ignore(\+addAdmittedArguments(tCol(ttAgentType))))}])
- % Found positive trigger: tCol(ttAgentType)
- % body: \+ttExpressionType(ttAgentType)*->rhs([tSet(ttAgentType)])
- % RHS-Post1: tSet(ttAgentType)
- % Support: tCol(ttAgentType),pt(tCol(ttAgentType),(\+ttExpressionType(ttAgentType)*->rhs([tSet(ttAgentType)])))
- % r_sane:mpred_fwc1(tSet(ttAgentType)).
- % Found positive trigger: tSet(ttAgentType)
- % body: rhs([functorDeclares(ttAgentType)])
- % RHS-Post1: functorDeclares(ttAgentType)
- % Support: tSet(ttAgentType),pt(tSet(ttAgentType),rhs([functorDeclares(ttAgentType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttAgentType)).
- % Found positive trigger: functorDeclares(ttAgentType)
- % body: rhs([arityMax(ttAgentType,1),functorIsMacro(ttAgentType)])
- % RHS-Post1: arityMax(ttAgentType,1)
- % Support: functorDeclares(ttAgentType),pt(functorDeclares(ttAgentType),rhs([arityMax(ttAgentType,1),functorIsMacro(ttAgentType)]))
- % r_sane:mpred_fwc1(arityMax(ttAgentType, 1)).
- % Found positive trigger: arityMax(ttAgentType,1)
- % body: compound(arityMax(ttAgentType,1)),\+is_ftVar(arityMax(ttAgentType,1))*->rhs([{with_current_why(arityMax(ttAgentType,1),ignore(\+addAdmittedArguments(arityMax(ttAgentType,1))))}])
- % Found positive trigger: arityMax(ttAgentType,1)
- % body: is_kif_clause(arityMax(ttAgentType,1))*->rhs([clif(arityMax(ttAgentType,1))])
- % Found positive trigger: arityMax(ttAgentType,1)
- % body: compound(arityMax(ttAgentType,1)),\+is_ftVar(arityMax(ttAgentType,1))*->rhs([{with_current_why(arityMax(ttAgentType,1),ignore(\+addAdmittedArguments(arityMax(ttAgentType,1))))}])
- % RHS-Post1: functorIsMacro(ttAgentType)
- % Support: functorDeclares(ttAgentType),pt(functorDeclares(ttAgentType),rhs([arityMax(ttAgentType,1),functorIsMacro(ttAgentType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttAgentType)).
- % Found positive trigger: functorIsMacro(ttAgentType)
- % body: compound(functorIsMacro(ttAgentType)),\+is_ftVar(functorIsMacro(ttAgentType))*->rhs([{with_current_why(functorIsMacro(ttAgentType),ignore(\+addAdmittedArguments(functorIsMacro(ttAgentType))))}])
- % Found positive trigger: functorIsMacro(ttAgentType)
- % body: is_kif_clause(functorIsMacro(ttAgentType))*->rhs([clif(functorIsMacro(ttAgentType))])
- % Found positive trigger: functorIsMacro(ttAgentType)
- % body: compound(functorIsMacro(ttAgentType)),\+is_ftVar(functorIsMacro(ttAgentType))*->rhs([{with_current_why(functorIsMacro(ttAgentType),ignore(\+addAdmittedArguments(functorIsMacro(ttAgentType))))}])
- % Found positive trigger: functorDeclares(ttAgentType)
- % body: compound(functorDeclares(ttAgentType)),\+is_ftVar(functorDeclares(ttAgentType))*->rhs([{with_current_why(functorDeclares(ttAgentType),ignore(\+addAdmittedArguments(functorDeclares(ttAgentType))))}])
- % Found positive trigger: functorDeclares(ttAgentType)
- % body: is_kif_clause(functorDeclares(ttAgentType))*->rhs([clif(functorDeclares(ttAgentType))])
- % Found positive trigger: functorDeclares(ttAgentType)
- % body: compound(functorDeclares(ttAgentType)),\+is_ftVar(functorDeclares(ttAgentType))*->rhs([{with_current_why(functorDeclares(ttAgentType),ignore(\+addAdmittedArguments(functorDeclares(ttAgentType))))}])
- % Found positive trigger: tSet(ttAgentType)
- % body: rhs([tCol(ttAgentType),\+ttExpressionType(ttAgentType)])
- % RHS-Post1: tCol(ttAgentType)
- % Support: tSet(ttAgentType),pt(tSet(ttAgentType),rhs([tCol(ttAgentType),\+ttExpressionType(ttAgentType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttAgentType)
- % Support: tSet(ttAgentType),pt(tSet(ttAgentType),rhs([tCol(ttAgentType),\+ttExpressionType(ttAgentType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttAgentType)
- % support (was): _26524,_26526
- % Couldn't retract_i: spft(ttExpressionType(ttAgentType),_31092,_31094).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttAgentType))).
- % Found positive trigger: tSet(ttAgentType)
- % body: rhs([tCol(ttAgentType)])
- % RHS-Post1: tCol(ttAgentType)
- % Support: tSet(ttAgentType),pt(tSet(ttAgentType),rhs([tCol(ttAgentType)]))
- % Found positive trigger: tSet(ttAgentType)
- % body: compound(tSet(ttAgentType)),\+is_ftVar(tSet(ttAgentType))*->rhs([{with_current_why(tSet(ttAgentType),ignore(\+addAdmittedArguments(tSet(ttAgentType))))}])
- % Found positive trigger: tSet(ttAgentType)
- % body: is_kif_clause(tSet(ttAgentType))*->rhs([clif(tSet(ttAgentType))])
- % Found positive trigger: tSet(ttAgentType)
- % body: compound(tSet(ttAgentType)),\+is_ftVar(tSet(ttAgentType))*->rhs([{with_current_why(tSet(ttAgentType),ignore(\+addAdmittedArguments(tSet(ttAgentType))))}])
- % Found positive trigger: tCol(ttAgentType)
- % body: is_kif_clause(tCol(ttAgentType))*->rhs([clif(tCol(ttAgentType))])
- % Found positive trigger: tCol(ttAgentType)
- % body: compound(tCol(ttAgentType)),\+is_ftVar(tCol(ttAgentType))*->rhs([{with_current_why(tCol(ttAgentType),ignore(\+addAdmittedArguments(tCol(ttAgentType))))}])
- % RHS-Post1: tCol(ttEventType)
- % Support: admittedArgument(disjointWith,2,ttEventType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttEventType)).
- % Found positive trigger: tCol(ttEventType)
- % body: rhs([{decl_type(ttEventType),kb_local(ttEventType/1)}])
- % Found positive trigger: tCol(ttEventType)
- % body: rhs([arity(ttEventType,1)])
- % RHS-Post1: arity(ttEventType,1)
- % Support: tCol(ttEventType),pt(tCol(ttEventType),rhs([arity(ttEventType,1)]))
- % Found positive trigger: tCol(ttEventType)
- % body: compound(tCol(ttEventType)),\+is_ftVar(tCol(ttEventType))*->rhs([{with_current_why(tCol(ttEventType),ignore(\+addAdmittedArguments(tCol(ttEventType))))}])
- % Found positive trigger: tCol(ttEventType)
- % body: \+ttExpressionType(ttEventType)*->rhs([tSet(ttEventType)])
- % RHS-Post1: tSet(ttEventType)
- % Support: tCol(ttEventType),pt(tCol(ttEventType),(\+ttExpressionType(ttEventType)*->rhs([tSet(ttEventType)])))
- % r_sane:mpred_fwc1(tSet(ttEventType)).
- % Found positive trigger: tSet(ttEventType)
- % body: rhs([functorDeclares(ttEventType)])
- % RHS-Post1: functorDeclares(ttEventType)
- % Support: tSet(ttEventType),pt(tSet(ttEventType),rhs([functorDeclares(ttEventType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttEventType)).
- % Found positive trigger: functorDeclares(ttEventType)
- % body: rhs([arityMax(ttEventType,1),functorIsMacro(ttEventType)])
- % RHS-Post1: arityMax(ttEventType,1)
- % Support: functorDeclares(ttEventType),pt(functorDeclares(ttEventType),rhs([arityMax(ttEventType,1),functorIsMacro(ttEventType)]))
- % r_sane:mpred_fwc1(arityMax(ttEventType, 1)).
- % Found positive trigger: arityMax(ttEventType,1)
- % body: compound(arityMax(ttEventType,1)),\+is_ftVar(arityMax(ttEventType,1))*->rhs([{with_current_why(arityMax(ttEventType,1),ignore(\+addAdmittedArguments(arityMax(ttEventType,1))))}])
- % Found positive trigger: arityMax(ttEventType,1)
- % body: is_kif_clause(arityMax(ttEventType,1))*->rhs([clif(arityMax(ttEventType,1))])
- % Found positive trigger: arityMax(ttEventType,1)
- % body: compound(arityMax(ttEventType,1)),\+is_ftVar(arityMax(ttEventType,1))*->rhs([{with_current_why(arityMax(ttEventType,1),ignore(\+addAdmittedArguments(arityMax(ttEventType,1))))}])
- % RHS-Post1: functorIsMacro(ttEventType)
- % Support: functorDeclares(ttEventType),pt(functorDeclares(ttEventType),rhs([arityMax(ttEventType,1),functorIsMacro(ttEventType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttEventType)).
- % Found positive trigger: functorIsMacro(ttEventType)
- % body: compound(functorIsMacro(ttEventType)),\+is_ftVar(functorIsMacro(ttEventType))*->rhs([{with_current_why(functorIsMacro(ttEventType),ignore(\+addAdmittedArguments(functorIsMacro(ttEventType))))}])
- % Found positive trigger: functorIsMacro(ttEventType)
- % body: is_kif_clause(functorIsMacro(ttEventType))*->rhs([clif(functorIsMacro(ttEventType))])
- % Found positive trigger: functorIsMacro(ttEventType)
- % body: compound(functorIsMacro(ttEventType)),\+is_ftVar(functorIsMacro(ttEventType))*->rhs([{with_current_why(functorIsMacro(ttEventType),ignore(\+addAdmittedArguments(functorIsMacro(ttEventType))))}])
- % Found positive trigger: functorDeclares(ttEventType)
- % body: compound(functorDeclares(ttEventType)),\+is_ftVar(functorDeclares(ttEventType))*->rhs([{with_current_why(functorDeclares(ttEventType),ignore(\+addAdmittedArguments(functorDeclares(ttEventType))))}])
- % Found positive trigger: functorDeclares(ttEventType)
- % body: is_kif_clause(functorDeclares(ttEventType))*->rhs([clif(functorDeclares(ttEventType))])
- % Found positive trigger: functorDeclares(ttEventType)
- % body: compound(functorDeclares(ttEventType)),\+is_ftVar(functorDeclares(ttEventType))*->rhs([{with_current_why(functorDeclares(ttEventType),ignore(\+addAdmittedArguments(functorDeclares(ttEventType))))}])
- % Found positive trigger: tSet(ttEventType)
- % body: rhs([tCol(ttEventType),\+ttExpressionType(ttEventType)])
- % RHS-Post1: tCol(ttEventType)
- % Support: tSet(ttEventType),pt(tSet(ttEventType),rhs([tCol(ttEventType),\+ttExpressionType(ttEventType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttEventType)
- % Support: tSet(ttEventType),pt(tSet(ttEventType),rhs([tCol(ttEventType),\+ttExpressionType(ttEventType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttEventType)
- % support (was): _26548,_26550
- % Couldn't retract_i: spft(ttExpressionType(ttEventType),_31116,_31118).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttEventType))).
- % Found positive trigger: tSet(ttEventType)
- % body: rhs([tCol(ttEventType)])
- % RHS-Post1: tCol(ttEventType)
- % Support: tSet(ttEventType),pt(tSet(ttEventType),rhs([tCol(ttEventType)]))
- % Found positive trigger: tSet(ttEventType)
- % body: compound(tSet(ttEventType)),\+is_ftVar(tSet(ttEventType))*->rhs([{with_current_why(tSet(ttEventType),ignore(\+addAdmittedArguments(tSet(ttEventType))))}])
- % Found positive trigger: tSet(ttEventType)
- % body: is_kif_clause(tSet(ttEventType))*->rhs([clif(tSet(ttEventType))])
- % Found positive trigger: tSet(ttEventType)
- % body: compound(tSet(ttEventType)),\+is_ftVar(tSet(ttEventType))*->rhs([{with_current_why(tSet(ttEventType),ignore(\+addAdmittedArguments(tSet(ttEventType))))}])
- % Found positive trigger: tCol(ttEventType)
- % body: is_kif_clause(tCol(ttEventType))*->rhs([clif(tCol(ttEventType))])
- % Found positive trigger: tCol(ttEventType)
- % body: compound(tCol(ttEventType)),\+is_ftVar(tCol(ttEventType))*->rhs([{with_current_why(tCol(ttEventType),ignore(\+addAdmittedArguments(tCol(ttEventType))))}])
- % RHS-Post1: tCol(ttExpressionType)
- % Support: admittedArgument(disjointWith,2,ttExpressionType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(ttItemType)
- % Support: admittedArgument(disjointWith,2,ttItemType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttItemType)).
- % Found positive trigger: tCol(ttItemType)
- % body: rhs([{decl_type(ttItemType),kb_local(ttItemType/1)}])
- % Found positive trigger: tCol(ttItemType)
- % body: rhs([arity(ttItemType,1)])
- % RHS-Post1: arity(ttItemType,1)
- % Support: tCol(ttItemType),pt(tCol(ttItemType),rhs([arity(ttItemType,1)]))
- % Found positive trigger: tCol(ttItemType)
- % body: compound(tCol(ttItemType)),\+is_ftVar(tCol(ttItemType))*->rhs([{with_current_why(tCol(ttItemType),ignore(\+addAdmittedArguments(tCol(ttItemType))))}])
- % Found positive trigger: tCol(ttItemType)
- % body: \+ttExpressionType(ttItemType)*->rhs([tSet(ttItemType)])
- % RHS-Post1: tSet(ttItemType)
- % Support: tCol(ttItemType),pt(tCol(ttItemType),(\+ttExpressionType(ttItemType)*->rhs([tSet(ttItemType)])))
- % r_sane:mpred_fwc1(tSet(ttItemType)).
- % Found positive trigger: tSet(ttItemType)
- % body: rhs([functorDeclares(ttItemType)])
- % RHS-Post1: functorDeclares(ttItemType)
- % Support: tSet(ttItemType),pt(tSet(ttItemType),rhs([functorDeclares(ttItemType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttItemType)).
- % Found positive trigger: functorDeclares(ttItemType)
- % body: rhs([arityMax(ttItemType,1),functorIsMacro(ttItemType)])
- % RHS-Post1: arityMax(ttItemType,1)
- % Support: functorDeclares(ttItemType),pt(functorDeclares(ttItemType),rhs([arityMax(ttItemType,1),functorIsMacro(ttItemType)]))
- % r_sane:mpred_fwc1(arityMax(ttItemType, 1)).
- % Found positive trigger: arityMax(ttItemType,1)
- % body: compound(arityMax(ttItemType,1)),\+is_ftVar(arityMax(ttItemType,1))*->rhs([{with_current_why(arityMax(ttItemType,1),ignore(\+addAdmittedArguments(arityMax(ttItemType,1))))}])
- % Found positive trigger: arityMax(ttItemType,1)
- % body: is_kif_clause(arityMax(ttItemType,1))*->rhs([clif(arityMax(ttItemType,1))])
- % Found positive trigger: arityMax(ttItemType,1)
- % body: compound(arityMax(ttItemType,1)),\+is_ftVar(arityMax(ttItemType,1))*->rhs([{with_current_why(arityMax(ttItemType,1),ignore(\+addAdmittedArguments(arityMax(ttItemType,1))))}])
- % RHS-Post1: functorIsMacro(ttItemType)
- % Support: functorDeclares(ttItemType),pt(functorDeclares(ttItemType),rhs([arityMax(ttItemType,1),functorIsMacro(ttItemType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttItemType)).
- % Found positive trigger: functorIsMacro(ttItemType)
- % body: compound(functorIsMacro(ttItemType)),\+is_ftVar(functorIsMacro(ttItemType))*->rhs([{with_current_why(functorIsMacro(ttItemType),ignore(\+addAdmittedArguments(functorIsMacro(ttItemType))))}])
- % Found positive trigger: functorIsMacro(ttItemType)
- % body: is_kif_clause(functorIsMacro(ttItemType))*->rhs([clif(functorIsMacro(ttItemType))])
- % Found positive trigger: functorIsMacro(ttItemType)
- % body: compound(functorIsMacro(ttItemType)),\+is_ftVar(functorIsMacro(ttItemType))*->rhs([{with_current_why(functorIsMacro(ttItemType),ignore(\+addAdmittedArguments(functorIsMacro(ttItemType))))}])
- % Found positive trigger: functorDeclares(ttItemType)
- % body: compound(functorDeclares(ttItemType)),\+is_ftVar(functorDeclares(ttItemType))*->rhs([{with_current_why(functorDeclares(ttItemType),ignore(\+addAdmittedArguments(functorDeclares(ttItemType))))}])
- % Found positive trigger: functorDeclares(ttItemType)
- % body: is_kif_clause(functorDeclares(ttItemType))*->rhs([clif(functorDeclares(ttItemType))])
- % Found positive trigger: functorDeclares(ttItemType)
- % body: compound(functorDeclares(ttItemType)),\+is_ftVar(functorDeclares(ttItemType))*->rhs([{with_current_why(functorDeclares(ttItemType),ignore(\+addAdmittedArguments(functorDeclares(ttItemType))))}])
- % Found positive trigger: tSet(ttItemType)
- % body: rhs([tCol(ttItemType),\+ttExpressionType(ttItemType)])
- % RHS-Post1: tCol(ttItemType)
- % Support: tSet(ttItemType),pt(tSet(ttItemType),rhs([tCol(ttItemType),\+ttExpressionType(ttItemType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttItemType)
- % Support: tSet(ttItemType),pt(tSet(ttItemType),rhs([tCol(ttItemType),\+ttExpressionType(ttItemType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttItemType)
- % support (was): _26594,_26596
- % Couldn't retract_i: spft(ttExpressionType(ttItemType),_31162,_31164).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttItemType))).
- % Found positive trigger: tSet(ttItemType)
- % body: rhs([tCol(ttItemType)])
- % RHS-Post1: tCol(ttItemType)
- % Support: tSet(ttItemType),pt(tSet(ttItemType),rhs([tCol(ttItemType)]))
- % Found positive trigger: tSet(ttItemType)
- % body: compound(tSet(ttItemType)),\+is_ftVar(tSet(ttItemType))*->rhs([{with_current_why(tSet(ttItemType),ignore(\+addAdmittedArguments(tSet(ttItemType))))}])
- % Found positive trigger: tSet(ttItemType)
- % body: is_kif_clause(tSet(ttItemType))*->rhs([clif(tSet(ttItemType))])
- % Found positive trigger: tSet(ttItemType)
- % body: compound(tSet(ttItemType)),\+is_ftVar(tSet(ttItemType))*->rhs([{with_current_why(tSet(ttItemType),ignore(\+addAdmittedArguments(tSet(ttItemType))))}])
- % Found positive trigger: tCol(ttItemType)
- % body: is_kif_clause(tCol(ttItemType))*->rhs([clif(tCol(ttItemType))])
- % Found positive trigger: tCol(ttItemType)
- % body: compound(tCol(ttItemType)),\+is_ftVar(tCol(ttItemType))*->rhs([{with_current_why(tCol(ttItemType),ignore(\+addAdmittedArguments(tCol(ttItemType))))}])
- % RHS-Post1: tCol(ttMicrotheoryType)
- % Support: admittedArgument(disjointWith,2,ttMicrotheoryType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttMicrotheoryType)).
- % Found positive trigger: tCol(ttMicrotheoryType)
- % body: rhs([{decl_type(ttMicrotheoryType),kb_local(ttMicrotheoryType/1)}])
- % Found positive trigger: tCol(ttMicrotheoryType)
- % body: rhs([arity(ttMicrotheoryType,1)])
- % RHS-Post1: arity(ttMicrotheoryType,1)
- % Support: tCol(ttMicrotheoryType),pt(tCol(ttMicrotheoryType),rhs([arity(ttMicrotheoryType,1)]))
- % Found positive trigger: tCol(ttMicrotheoryType)
- % body: compound(tCol(ttMicrotheoryType)),\+is_ftVar(tCol(ttMicrotheoryType))*->rhs([{with_current_why(tCol(ttMicrotheoryType),ignore(\+addAdmittedArguments(tCol(ttMicrotheoryType))))}])
- % Found positive trigger: tCol(ttMicrotheoryType)
- % body: \+ttExpressionType(ttMicrotheoryType)*->rhs([tSet(ttMicrotheoryType)])
- % RHS-Post1: tSet(ttMicrotheoryType)
- % Support: tCol(ttMicrotheoryType),pt(tCol(ttMicrotheoryType),(\+ttExpressionType(ttMicrotheoryType)*->rhs([tSet(ttMicrotheoryType)])))
- % r_sane:mpred_fwc1(tSet(ttMicrotheoryType)).
- % Found positive trigger: tSet(ttMicrotheoryType)
- % body: rhs([functorDeclares(ttMicrotheoryType)])
- % RHS-Post1: functorDeclares(ttMicrotheoryType)
- % Support: tSet(ttMicrotheoryType),pt(tSet(ttMicrotheoryType),rhs([functorDeclares(ttMicrotheoryType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttMicrotheoryType)).
- % Found positive trigger: functorDeclares(ttMicrotheoryType)
- % body: rhs([arityMax(ttMicrotheoryType,1),functorIsMacro(ttMicrotheoryType)])
- % RHS-Post1: arityMax(ttMicrotheoryType,1)
- % Support: functorDeclares(ttMicrotheoryType),pt(functorDeclares(ttMicrotheoryType),rhs([arityMax(ttMicrotheoryType,1),functorIsMacro(ttMicrotheoryType)]))
- % r_sane:mpred_fwc1(arityMax(ttMicrotheoryType, 1)).
- % Found positive trigger: arityMax(ttMicrotheoryType,1)
- % body: compound(arityMax(ttMicrotheoryType,1)),\+is_ftVar(arityMax(ttMicrotheoryType,1))*->rhs([{with_current_why(arityMax(ttMicrotheoryType,1),ignore(\+addAdmittedArguments(arityMax(ttMicrotheoryType,1))))}])
- % Found positive trigger: arityMax(ttMicrotheoryType,1)
- % body: is_kif_clause(arityMax(ttMicrotheoryType,1))*->rhs([clif(arityMax(ttMicrotheoryType,1))])
- % Found positive trigger: arityMax(ttMicrotheoryType,1)
- % body: compound(arityMax(ttMicrotheoryType,1)),\+is_ftVar(arityMax(ttMicrotheoryType,1))*->rhs([{with_current_why(arityMax(ttMicrotheoryType,1),ignore(\+addAdmittedArguments(arityMax(ttMicrotheoryType,1))))}])
- % RHS-Post1: functorIsMacro(ttMicrotheoryType)
- % Support: functorDeclares(ttMicrotheoryType),pt(functorDeclares(ttMicrotheoryType),rhs([arityMax(ttMicrotheoryType,1),functorIsMacro(ttMicrotheoryType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttMicrotheoryType)).
- % Found positive trigger: functorIsMacro(ttMicrotheoryType)
- % body: compound(functorIsMacro(ttMicrotheoryType)),\+is_ftVar(functorIsMacro(ttMicrotheoryType))*->rhs([{with_current_why(functorIsMacro(ttMicrotheoryType),ignore(\+addAdmittedArguments(functorIsMacro(ttMicrotheoryType))))}])
- % Found positive trigger: functorIsMacro(ttMicrotheoryType)
- % body: is_kif_clause(functorIsMacro(ttMicrotheoryType))*->rhs([clif(functorIsMacro(ttMicrotheoryType))])
- % Found positive trigger: functorIsMacro(ttMicrotheoryType)
- % body: compound(functorIsMacro(ttMicrotheoryType)),\+is_ftVar(functorIsMacro(ttMicrotheoryType))*->rhs([{with_current_why(functorIsMacro(ttMicrotheoryType),ignore(\+addAdmittedArguments(functorIsMacro(ttMicrotheoryType))))}])
- % Found positive trigger: functorDeclares(ttMicrotheoryType)
- % body: compound(functorDeclares(ttMicrotheoryType)),\+is_ftVar(functorDeclares(ttMicrotheoryType))*->rhs([{with_current_why(functorDeclares(ttMicrotheoryType),ignore(\+addAdmittedArguments(functorDeclares(ttMicrotheoryType))))}])
- % Found positive trigger: functorDeclares(ttMicrotheoryType)
- % body: is_kif_clause(functorDeclares(ttMicrotheoryType))*->rhs([clif(functorDeclares(ttMicrotheoryType))])
- % Found positive trigger: functorDeclares(ttMicrotheoryType)
- % body: compound(functorDeclares(ttMicrotheoryType)),\+is_ftVar(functorDeclares(ttMicrotheoryType))*->rhs([{with_current_why(functorDeclares(ttMicrotheoryType),ignore(\+addAdmittedArguments(functorDeclares(ttMicrotheoryType))))}])
- % Found positive trigger: tSet(ttMicrotheoryType)
- % body: rhs([tCol(ttMicrotheoryType),\+ttExpressionType(ttMicrotheoryType)])
- % RHS-Post1: tCol(ttMicrotheoryType)
- % Support: tSet(ttMicrotheoryType),pt(tSet(ttMicrotheoryType),rhs([tCol(ttMicrotheoryType),\+ttExpressionType(ttMicrotheoryType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttMicrotheoryType)
- % Support: tSet(ttMicrotheoryType),pt(tSet(ttMicrotheoryType),rhs([tCol(ttMicrotheoryType),\+ttExpressionType(ttMicrotheoryType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttMicrotheoryType)
- % support (was): _26672,_26674
- % Couldn't retract_i: spft(ttExpressionType(ttMicrotheoryType),_31244,_31246).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttMicrotheoryType))).
- % Found positive trigger: tSet(ttMicrotheoryType)
- % body: rhs([tCol(ttMicrotheoryType)])
- % RHS-Post1: tCol(ttMicrotheoryType)
- % Support: tSet(ttMicrotheoryType),pt(tSet(ttMicrotheoryType),rhs([tCol(ttMicrotheoryType)]))
- % Found positive trigger: tSet(ttMicrotheoryType)
- % body: compound(tSet(ttMicrotheoryType)),\+is_ftVar(tSet(ttMicrotheoryType))*->rhs([{with_current_why(tSet(ttMicrotheoryType),ignore(\+addAdmittedArguments(tSet(ttMicrotheoryType))))}])
- % Found positive trigger: tSet(ttMicrotheoryType)
- % body: is_kif_clause(tSet(ttMicrotheoryType))*->rhs([clif(tSet(ttMicrotheoryType))])
- % Found positive trigger: tSet(ttMicrotheoryType)
- % body: compound(tSet(ttMicrotheoryType)),\+is_ftVar(tSet(ttMicrotheoryType))*->rhs([{with_current_why(tSet(ttMicrotheoryType),ignore(\+addAdmittedArguments(tSet(ttMicrotheoryType))))}])
- % Found positive trigger: tCol(ttMicrotheoryType)
- % body: is_kif_clause(tCol(ttMicrotheoryType))*->rhs([clif(tCol(ttMicrotheoryType))])
- % Found positive trigger: tCol(ttMicrotheoryType)
- % body: compound(tCol(ttMicrotheoryType)),\+is_ftVar(tCol(ttMicrotheoryType))*->rhs([{with_current_why(tCol(ttMicrotheoryType),ignore(\+addAdmittedArguments(tCol(ttMicrotheoryType))))}])
- % RHS-Post1: tCol(ttRegionType)
- % Support: admittedArgument(disjointWith,2,ttRegionType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttRegionType)).
- % Found positive trigger: tCol(ttRegionType)
- % body: rhs([{decl_type(ttRegionType),kb_local(ttRegionType/1)}])
- % Found positive trigger: tCol(ttRegionType)
- % body: rhs([arity(ttRegionType,1)])
- % RHS-Post1: arity(ttRegionType,1)
- % Support: tCol(ttRegionType),pt(tCol(ttRegionType),rhs([arity(ttRegionType,1)]))
- % Found positive trigger: tCol(ttRegionType)
- % body: compound(tCol(ttRegionType)),\+is_ftVar(tCol(ttRegionType))*->rhs([{with_current_why(tCol(ttRegionType),ignore(\+addAdmittedArguments(tCol(ttRegionType))))}])
- % Found positive trigger: tCol(ttRegionType)
- % body: \+ttExpressionType(ttRegionType)*->rhs([tSet(ttRegionType)])
- % RHS-Post1: tSet(ttRegionType)
- % Support: tCol(ttRegionType),pt(tCol(ttRegionType),(\+ttExpressionType(ttRegionType)*->rhs([tSet(ttRegionType)])))
- % r_sane:mpred_fwc1(tSet(ttRegionType)).
- % Found positive trigger: tSet(ttRegionType)
- % body: rhs([functorDeclares(ttRegionType)])
- % RHS-Post1: functorDeclares(ttRegionType)
- % Support: tSet(ttRegionType),pt(tSet(ttRegionType),rhs([functorDeclares(ttRegionType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttRegionType)).
- % Found positive trigger: functorDeclares(ttRegionType)
- % body: rhs([arityMax(ttRegionType,1),functorIsMacro(ttRegionType)])
- % RHS-Post1: arityMax(ttRegionType,1)
- % Support: functorDeclares(ttRegionType),pt(functorDeclares(ttRegionType),rhs([arityMax(ttRegionType,1),functorIsMacro(ttRegionType)]))
- % r_sane:mpred_fwc1(arityMax(ttRegionType, 1)).
- % Found positive trigger: arityMax(ttRegionType,1)
- % body: compound(arityMax(ttRegionType,1)),\+is_ftVar(arityMax(ttRegionType,1))*->rhs([{with_current_why(arityMax(ttRegionType,1),ignore(\+addAdmittedArguments(arityMax(ttRegionType,1))))}])
- % Found positive trigger: arityMax(ttRegionType,1)
- % body: is_kif_clause(arityMax(ttRegionType,1))*->rhs([clif(arityMax(ttRegionType,1))])
- % Found positive trigger: arityMax(ttRegionType,1)
- % body: compound(arityMax(ttRegionType,1)),\+is_ftVar(arityMax(ttRegionType,1))*->rhs([{with_current_why(arityMax(ttRegionType,1),ignore(\+addAdmittedArguments(arityMax(ttRegionType,1))))}])
- % RHS-Post1: functorIsMacro(ttRegionType)
- % Support: functorDeclares(ttRegionType),pt(functorDeclares(ttRegionType),rhs([arityMax(ttRegionType,1),functorIsMacro(ttRegionType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttRegionType)).
- % Found positive trigger: functorIsMacro(ttRegionType)
- % body: compound(functorIsMacro(ttRegionType)),\+is_ftVar(functorIsMacro(ttRegionType))*->rhs([{with_current_why(functorIsMacro(ttRegionType),ignore(\+addAdmittedArguments(functorIsMacro(ttRegionType))))}])
- % Found positive trigger: functorIsMacro(ttRegionType)
- % body: is_kif_clause(functorIsMacro(ttRegionType))*->rhs([clif(functorIsMacro(ttRegionType))])
- % Found positive trigger: functorIsMacro(ttRegionType)
- % body: compound(functorIsMacro(ttRegionType)),\+is_ftVar(functorIsMacro(ttRegionType))*->rhs([{with_current_why(functorIsMacro(ttRegionType),ignore(\+addAdmittedArguments(functorIsMacro(ttRegionType))))}])
- % Found positive trigger: functorDeclares(ttRegionType)
- % body: compound(functorDeclares(ttRegionType)),\+is_ftVar(functorDeclares(ttRegionType))*->rhs([{with_current_why(functorDeclares(ttRegionType),ignore(\+addAdmittedArguments(functorDeclares(ttRegionType))))}])
- % Found positive trigger: functorDeclares(ttRegionType)
- % body: is_kif_clause(functorDeclares(ttRegionType))*->rhs([clif(functorDeclares(ttRegionType))])
- % Found positive trigger: functorDeclares(ttRegionType)
- % body: compound(functorDeclares(ttRegionType)),\+is_ftVar(functorDeclares(ttRegionType))*->rhs([{with_current_why(functorDeclares(ttRegionType),ignore(\+addAdmittedArguments(functorDeclares(ttRegionType))))}])
- % Found positive trigger: tSet(ttRegionType)
- % body: rhs([tCol(ttRegionType),\+ttExpressionType(ttRegionType)])
- % RHS-Post1: tCol(ttRegionType)
- % Support: tSet(ttRegionType),pt(tSet(ttRegionType),rhs([tCol(ttRegionType),\+ttExpressionType(ttRegionType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttRegionType)
- % Support: tSet(ttRegionType),pt(tSet(ttRegionType),rhs([tCol(ttRegionType),\+ttExpressionType(ttRegionType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttRegionType)
- % support (was): _26658,_26660
- % Couldn't retract_i: spft(ttExpressionType(ttRegionType),_31226,_31228).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttRegionType))).
- % Found positive trigger: tSet(ttRegionType)
- % body: rhs([tCol(ttRegionType)])
- % RHS-Post1: tCol(ttRegionType)
- % Support: tSet(ttRegionType),pt(tSet(ttRegionType),rhs([tCol(ttRegionType)]))
- % Found positive trigger: tSet(ttRegionType)
- % body: compound(tSet(ttRegionType)),\+is_ftVar(tSet(ttRegionType))*->rhs([{with_current_why(tSet(ttRegionType),ignore(\+addAdmittedArguments(tSet(ttRegionType))))}])
- % Found positive trigger: tSet(ttRegionType)
- % body: is_kif_clause(tSet(ttRegionType))*->rhs([clif(tSet(ttRegionType))])
- % Found positive trigger: tSet(ttRegionType)
- % body: compound(tSet(ttRegionType)),\+is_ftVar(tSet(ttRegionType))*->rhs([{with_current_why(tSet(ttRegionType),ignore(\+addAdmittedArguments(tSet(ttRegionType))))}])
- % Found positive trigger: tCol(ttRegionType)
- % body: is_kif_clause(tCol(ttRegionType))*->rhs([clif(tCol(ttRegionType))])
- % Found positive trigger: tCol(ttRegionType)
- % body: compound(tCol(ttRegionType)),\+is_ftVar(tCol(ttRegionType))*->rhs([{with_current_why(tCol(ttRegionType),ignore(\+addAdmittedArguments(tCol(ttRegionType))))}])
- % RHS-Post1: tCol(ttRelationType)
- % Support: admittedArgument(disjointWith,2,ttRelationType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttRelationType)).
- % Found positive trigger: tCol(ttRelationType)
- % body: rhs([{decl_type(ttRelationType),kb_local(ttRelationType/1)}])
- % Found positive trigger: tCol(ttRelationType)
- % body: rhs([arity(ttRelationType,1)])
- % RHS-Post1: arity(ttRelationType,1)
- % Support: tCol(ttRelationType),pt(tCol(ttRelationType),rhs([arity(ttRelationType,1)]))
- % Found positive trigger: tCol(ttRelationType)
- % body: compound(tCol(ttRelationType)),\+is_ftVar(tCol(ttRelationType))*->rhs([{with_current_why(tCol(ttRelationType),ignore(\+addAdmittedArguments(tCol(ttRelationType))))}])
- % Found positive trigger: tCol(ttRelationType)
- % body: \+ttExpressionType(ttRelationType)*->rhs([tSet(ttRelationType)])
- % RHS-Post1: tSet(ttRelationType)
- % Support: tCol(ttRelationType),pt(tCol(ttRelationType),(\+ttExpressionType(ttRelationType)*->rhs([tSet(ttRelationType)])))
- % r_sane:mpred_fwc1(tSet(ttRelationType)).
- % Found positive trigger: tSet(ttRelationType)
- % body: rhs([functorDeclares(ttRelationType)])
- % RHS-Post1: functorDeclares(ttRelationType)
- % Support: tSet(ttRelationType),pt(tSet(ttRelationType),rhs([functorDeclares(ttRelationType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttRelationType)).
- % Found positive trigger: functorDeclares(ttRelationType)
- % body: rhs([arityMax(ttRelationType,1),functorIsMacro(ttRelationType)])
- % RHS-Post1: arityMax(ttRelationType,1)
- % Support: functorDeclares(ttRelationType),pt(functorDeclares(ttRelationType),rhs([arityMax(ttRelationType,1),functorIsMacro(ttRelationType)]))
- % r_sane:mpred_fwc1(arityMax(ttRelationType, 1)).
- % Found positive trigger: arityMax(ttRelationType,1)
- % body: compound(arityMax(ttRelationType,1)),\+is_ftVar(arityMax(ttRelationType,1))*->rhs([{with_current_why(arityMax(ttRelationType,1),ignore(\+addAdmittedArguments(arityMax(ttRelationType,1))))}])
- % Found positive trigger: arityMax(ttRelationType,1)
- % body: is_kif_clause(arityMax(ttRelationType,1))*->rhs([clif(arityMax(ttRelationType,1))])
- % Found positive trigger: arityMax(ttRelationType,1)
- % body: compound(arityMax(ttRelationType,1)),\+is_ftVar(arityMax(ttRelationType,1))*->rhs([{with_current_why(arityMax(ttRelationType,1),ignore(\+addAdmittedArguments(arityMax(ttRelationType,1))))}])
- % RHS-Post1: functorIsMacro(ttRelationType)
- % Support: functorDeclares(ttRelationType),pt(functorDeclares(ttRelationType),rhs([arityMax(ttRelationType,1),functorIsMacro(ttRelationType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttRelationType)).
- % Found positive trigger: functorIsMacro(ttRelationType)
- % body: compound(functorIsMacro(ttRelationType)),\+is_ftVar(functorIsMacro(ttRelationType))*->rhs([{with_current_why(functorIsMacro(ttRelationType),ignore(\+addAdmittedArguments(functorIsMacro(ttRelationType))))}])
- % Found positive trigger: functorIsMacro(ttRelationType)
- % body: is_kif_clause(functorIsMacro(ttRelationType))*->rhs([clif(functorIsMacro(ttRelationType))])
- % Found positive trigger: functorIsMacro(ttRelationType)
- % body: compound(functorIsMacro(ttRelationType)),\+is_ftVar(functorIsMacro(ttRelationType))*->rhs([{with_current_why(functorIsMacro(ttRelationType),ignore(\+addAdmittedArguments(functorIsMacro(ttRelationType))))}])
- % Found positive trigger: functorDeclares(ttRelationType)
- % body: compound(functorDeclares(ttRelationType)),\+is_ftVar(functorDeclares(ttRelationType))*->rhs([{with_current_why(functorDeclares(ttRelationType),ignore(\+addAdmittedArguments(functorDeclares(ttRelationType))))}])
- % Found positive trigger: functorDeclares(ttRelationType)
- % body: is_kif_clause(functorDeclares(ttRelationType))*->rhs([clif(functorDeclares(ttRelationType))])
- % Found positive trigger: functorDeclares(ttRelationType)
- % body: compound(functorDeclares(ttRelationType)),\+is_ftVar(functorDeclares(ttRelationType))*->rhs([{with_current_why(functorDeclares(ttRelationType),ignore(\+addAdmittedArguments(functorDeclares(ttRelationType))))}])
- % Found positive trigger: tSet(ttRelationType)
- % body: rhs([tCol(ttRelationType),\+ttExpressionType(ttRelationType)])
- % RHS-Post1: tCol(ttRelationType)
- % Support: tSet(ttRelationType),pt(tSet(ttRelationType),rhs([tCol(ttRelationType),\+ttExpressionType(ttRelationType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttRelationType)
- % Support: tSet(ttRelationType),pt(tSet(ttRelationType),rhs([tCol(ttRelationType),\+ttExpressionType(ttRelationType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttRelationType)
- % support (was): _28560,_28562
- % Couldn't retract_i: spft(ttExpressionType(ttRelationType),_33130,_33132).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttRelationType))).
- % Found positive trigger: tSet(ttRelationType)
- % body: rhs([tCol(ttRelationType)])
- % RHS-Post1: tCol(ttRelationType)
- % Support: tSet(ttRelationType),pt(tSet(ttRelationType),rhs([tCol(ttRelationType)]))
- % Found positive trigger: tSet(ttRelationType)
- % body: compound(tSet(ttRelationType)),\+is_ftVar(tSet(ttRelationType))*->rhs([{with_current_why(tSet(ttRelationType),ignore(\+addAdmittedArguments(tSet(ttRelationType))))}])
- % Found positive trigger: tSet(ttRelationType)
- % body: is_kif_clause(tSet(ttRelationType))*->rhs([clif(tSet(ttRelationType))])
- % Found positive trigger: tSet(ttRelationType)
- % body: compound(tSet(ttRelationType)),\+is_ftVar(tSet(ttRelationType))*->rhs([{with_current_why(tSet(ttRelationType),ignore(\+addAdmittedArguments(tSet(ttRelationType))))}])
- % Found positive trigger: tCol(ttRelationType)
- % body: is_kif_clause(tCol(ttRelationType))*->rhs([clif(tCol(ttRelationType))])
- % Found positive trigger: tCol(ttRelationType)
- % body: compound(tCol(ttRelationType)),\+is_ftVar(tCol(ttRelationType))*->rhs([{with_current_why(tCol(ttRelationType),ignore(\+addAdmittedArguments(tCol(ttRelationType))))}])
- % RHS-Post1: tCol(ttSituationType)
- % Support: admittedArgument(disjointWith,2,ttSituationType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttSituationType)).
- % Found positive trigger: tCol(ttSituationType)
- % body: rhs([{decl_type(ttSituationType),kb_local(ttSituationType/1)}])
- % Found positive trigger: tCol(ttSituationType)
- % body: rhs([arity(ttSituationType,1)])
- % RHS-Post1: arity(ttSituationType,1)
- % Support: tCol(ttSituationType),pt(tCol(ttSituationType),rhs([arity(ttSituationType,1)]))
- % Found positive trigger: tCol(ttSituationType)
- % body: compound(tCol(ttSituationType)),\+is_ftVar(tCol(ttSituationType))*->rhs([{with_current_why(tCol(ttSituationType),ignore(\+addAdmittedArguments(tCol(ttSituationType))))}])
- % Found positive trigger: tCol(ttSituationType)
- % body: \+ttExpressionType(ttSituationType)*->rhs([tSet(ttSituationType)])
- % RHS-Post1: tSet(ttSituationType)
- % Support: tCol(ttSituationType),pt(tCol(ttSituationType),(\+ttExpressionType(ttSituationType)*->rhs([tSet(ttSituationType)])))
- % r_sane:mpred_fwc1(tSet(ttSituationType)).
- % Found positive trigger: tSet(ttSituationType)
- % body: rhs([functorDeclares(ttSituationType)])
- % RHS-Post1: functorDeclares(ttSituationType)
- % Support: tSet(ttSituationType),pt(tSet(ttSituationType),rhs([functorDeclares(ttSituationType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttSituationType)).
- % Found positive trigger: functorDeclares(ttSituationType)
- % body: rhs([arityMax(ttSituationType,1),functorIsMacro(ttSituationType)])
- % RHS-Post1: arityMax(ttSituationType,1)
- % Support: functorDeclares(ttSituationType),pt(functorDeclares(ttSituationType),rhs([arityMax(ttSituationType,1),functorIsMacro(ttSituationType)]))
- % r_sane:mpred_fwc1(arityMax(ttSituationType, 1)).
- % Found positive trigger: arityMax(ttSituationType,1)
- % body: compound(arityMax(ttSituationType,1)),\+is_ftVar(arityMax(ttSituationType,1))*->rhs([{with_current_why(arityMax(ttSituationType,1),ignore(\+addAdmittedArguments(arityMax(ttSituationType,1))))}])
- % Found positive trigger: arityMax(ttSituationType,1)
- % body: is_kif_clause(arityMax(ttSituationType,1))*->rhs([clif(arityMax(ttSituationType,1))])
- % Found positive trigger: arityMax(ttSituationType,1)
- % body: compound(arityMax(ttSituationType,1)),\+is_ftVar(arityMax(ttSituationType,1))*->rhs([{with_current_why(arityMax(ttSituationType,1),ignore(\+addAdmittedArguments(arityMax(ttSituationType,1))))}])
- % RHS-Post1: functorIsMacro(ttSituationType)
- % Support: functorDeclares(ttSituationType),pt(functorDeclares(ttSituationType),rhs([arityMax(ttSituationType,1),functorIsMacro(ttSituationType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttSituationType)).
- % Found positive trigger: functorIsMacro(ttSituationType)
- % body: compound(functorIsMacro(ttSituationType)),\+is_ftVar(functorIsMacro(ttSituationType))*->rhs([{with_current_why(functorIsMacro(ttSituationType),ignore(\+addAdmittedArguments(functorIsMacro(ttSituationType))))}])
- % Found positive trigger: functorIsMacro(ttSituationType)
- % body: is_kif_clause(functorIsMacro(ttSituationType))*->rhs([clif(functorIsMacro(ttSituationType))])
- % Found positive trigger: functorIsMacro(ttSituationType)
- % body: compound(functorIsMacro(ttSituationType)),\+is_ftVar(functorIsMacro(ttSituationType))*->rhs([{with_current_why(functorIsMacro(ttSituationType),ignore(\+addAdmittedArguments(functorIsMacro(ttSituationType))))}])
- % Found positive trigger: functorDeclares(ttSituationType)
- % body: compound(functorDeclares(ttSituationType)),\+is_ftVar(functorDeclares(ttSituationType))*->rhs([{with_current_why(functorDeclares(ttSituationType),ignore(\+addAdmittedArguments(functorDeclares(ttSituationType))))}])
- % Found positive trigger: functorDeclares(ttSituationType)
- % body: is_kif_clause(functorDeclares(ttSituationType))*->rhs([clif(functorDeclares(ttSituationType))])
- % Found positive trigger: functorDeclares(ttSituationType)
- % body: compound(functorDeclares(ttSituationType)),\+is_ftVar(functorDeclares(ttSituationType))*->rhs([{with_current_why(functorDeclares(ttSituationType),ignore(\+addAdmittedArguments(functorDeclares(ttSituationType))))}])
- % Found positive trigger: tSet(ttSituationType)
- % body: rhs([tCol(ttSituationType),\+ttExpressionType(ttSituationType)])
- % RHS-Post1: tCol(ttSituationType)
- % Support: tSet(ttSituationType),pt(tSet(ttSituationType),rhs([tCol(ttSituationType),\+ttExpressionType(ttSituationType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttSituationType)
- % Support: tSet(ttSituationType),pt(tSet(ttSituationType),rhs([tCol(ttSituationType),\+ttExpressionType(ttSituationType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttSituationType)
- % support (was): _26728,_26730
- % Couldn't retract_i: spft(ttExpressionType(ttSituationType),_31298,_31300).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttSituationType))).
- % Found positive trigger: tSet(ttSituationType)
- % body: rhs([tCol(ttSituationType)])
- % RHS-Post1: tCol(ttSituationType)
- % Support: tSet(ttSituationType),pt(tSet(ttSituationType),rhs([tCol(ttSituationType)]))
- % Found positive trigger: tSet(ttSituationType)
- % body: compound(tSet(ttSituationType)),\+is_ftVar(tSet(ttSituationType))*->rhs([{with_current_why(tSet(ttSituationType),ignore(\+addAdmittedArguments(tSet(ttSituationType))))}])
- % Found positive trigger: tSet(ttSituationType)
- % body: is_kif_clause(tSet(ttSituationType))*->rhs([clif(tSet(ttSituationType))])
- % Found positive trigger: tSet(ttSituationType)
- % body: compound(tSet(ttSituationType)),\+is_ftVar(tSet(ttSituationType))*->rhs([{with_current_why(tSet(ttSituationType),ignore(\+addAdmittedArguments(tSet(ttSituationType))))}])
- % Found positive trigger: tCol(ttSituationType)
- % body: is_kif_clause(tCol(ttSituationType))*->rhs([clif(tCol(ttSituationType))])
- % Found positive trigger: tCol(ttSituationType)
- % body: compound(tCol(ttSituationType)),\+is_ftVar(tCol(ttSituationType))*->rhs([{with_current_why(tCol(ttSituationType),ignore(\+addAdmittedArguments(tCol(ttSituationType))))}])
- % RHS-Post1: tCol(ttTopicType)
- % Support: admittedArgument(disjointWith,2,ttTopicType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttTopicType)).
- % Found positive trigger: tCol(ttTopicType)
- % body: rhs([{decl_type(ttTopicType),kb_local(ttTopicType/1)}])
- % Found positive trigger: tCol(ttTopicType)
- % body: rhs([arity(ttTopicType,1)])
- % RHS-Post1: arity(ttTopicType,1)
- % Support: tCol(ttTopicType),pt(tCol(ttTopicType),rhs([arity(ttTopicType,1)]))
- % Found positive trigger: tCol(ttTopicType)
- % body: compound(tCol(ttTopicType)),\+is_ftVar(tCol(ttTopicType))*->rhs([{with_current_why(tCol(ttTopicType),ignore(\+addAdmittedArguments(tCol(ttTopicType))))}])
- % Found positive trigger: tCol(ttTopicType)
- % body: \+ttExpressionType(ttTopicType)*->rhs([tSet(ttTopicType)])
- % RHS-Post1: tSet(ttTopicType)
- % Support: tCol(ttTopicType),pt(tCol(ttTopicType),(\+ttExpressionType(ttTopicType)*->rhs([tSet(ttTopicType)])))
- % r_sane:mpred_fwc1(tSet(ttTopicType)).
- % Found positive trigger: tSet(ttTopicType)
- % body: rhs([functorDeclares(ttTopicType)])
- % RHS-Post1: functorDeclares(ttTopicType)
- % Support: tSet(ttTopicType),pt(tSet(ttTopicType),rhs([functorDeclares(ttTopicType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttTopicType)).
- % Found positive trigger: functorDeclares(ttTopicType)
- % body: rhs([arityMax(ttTopicType,1),functorIsMacro(ttTopicType)])
- % RHS-Post1: arityMax(ttTopicType,1)
- % Support: functorDeclares(ttTopicType),pt(functorDeclares(ttTopicType),rhs([arityMax(ttTopicType,1),functorIsMacro(ttTopicType)]))
- % r_sane:mpred_fwc1(arityMax(ttTopicType, 1)).
- % Found positive trigger: arityMax(ttTopicType,1)
- % body: compound(arityMax(ttTopicType,1)),\+is_ftVar(arityMax(ttTopicType,1))*->rhs([{with_current_why(arityMax(ttTopicType,1),ignore(\+addAdmittedArguments(arityMax(ttTopicType,1))))}])
- % Found positive trigger: arityMax(ttTopicType,1)
- % body: is_kif_clause(arityMax(ttTopicType,1))*->rhs([clif(arityMax(ttTopicType,1))])
- % Found positive trigger: arityMax(ttTopicType,1)
- % body: compound(arityMax(ttTopicType,1)),\+is_ftVar(arityMax(ttTopicType,1))*->rhs([{with_current_why(arityMax(ttTopicType,1),ignore(\+addAdmittedArguments(arityMax(ttTopicType,1))))}])
- % RHS-Post1: functorIsMacro(ttTopicType)
- % Support: functorDeclares(ttTopicType),pt(functorDeclares(ttTopicType),rhs([arityMax(ttTopicType,1),functorIsMacro(ttTopicType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttTopicType)).
- % Found positive trigger: functorIsMacro(ttTopicType)
- % body: compound(functorIsMacro(ttTopicType)),\+is_ftVar(functorIsMacro(ttTopicType))*->rhs([{with_current_why(functorIsMacro(ttTopicType),ignore(\+addAdmittedArguments(functorIsMacro(ttTopicType))))}])
- % Found positive trigger: functorIsMacro(ttTopicType)
- % body: is_kif_clause(functorIsMacro(ttTopicType))*->rhs([clif(functorIsMacro(ttTopicType))])
- % Found positive trigger: functorIsMacro(ttTopicType)
- % body: compound(functorIsMacro(ttTopicType)),\+is_ftVar(functorIsMacro(ttTopicType))*->rhs([{with_current_why(functorIsMacro(ttTopicType),ignore(\+addAdmittedArguments(functorIsMacro(ttTopicType))))}])
- % Found positive trigger: functorDeclares(ttTopicType)
- % body: compound(functorDeclares(ttTopicType)),\+is_ftVar(functorDeclares(ttTopicType))*->rhs([{with_current_why(functorDeclares(ttTopicType),ignore(\+addAdmittedArguments(functorDeclares(ttTopicType))))}])
- % Found positive trigger: functorDeclares(ttTopicType)
- % body: is_kif_clause(functorDeclares(ttTopicType))*->rhs([clif(functorDeclares(ttTopicType))])
- % Found positive trigger: functorDeclares(ttTopicType)
- % body: compound(functorDeclares(ttTopicType)),\+is_ftVar(functorDeclares(ttTopicType))*->rhs([{with_current_why(functorDeclares(ttTopicType),ignore(\+addAdmittedArguments(functorDeclares(ttTopicType))))}])
- % Found positive trigger: tSet(ttTopicType)
- % body: rhs([tCol(ttTopicType),\+ttExpressionType(ttTopicType)])
- % RHS-Post1: tCol(ttTopicType)
- % Support: tSet(ttTopicType),pt(tSet(ttTopicType),rhs([tCol(ttTopicType),\+ttExpressionType(ttTopicType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttTopicType)
- % Support: tSet(ttTopicType),pt(tSet(ttTopicType),rhs([tCol(ttTopicType),\+ttExpressionType(ttTopicType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttTopicType)
- % support (was): _26716,_26718
- % Couldn't retract_i: spft(ttExpressionType(ttTopicType),_31284,_31286).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttTopicType))).
- % Found positive trigger: tSet(ttTopicType)
- % body: rhs([tCol(ttTopicType)])
- % RHS-Post1: tCol(ttTopicType)
- % Support: tSet(ttTopicType),pt(tSet(ttTopicType),rhs([tCol(ttTopicType)]))
- % Found positive trigger: tSet(ttTopicType)
- % body: compound(tSet(ttTopicType)),\+is_ftVar(tSet(ttTopicType))*->rhs([{with_current_why(tSet(ttTopicType),ignore(\+addAdmittedArguments(tSet(ttTopicType))))}])
- % Found positive trigger: tSet(ttTopicType)
- % body: is_kif_clause(tSet(ttTopicType))*->rhs([clif(tSet(ttTopicType))])
- % Found positive trigger: tSet(ttTopicType)
- % body: compound(tSet(ttTopicType)),\+is_ftVar(tSet(ttTopicType))*->rhs([{with_current_why(tSet(ttTopicType),ignore(\+addAdmittedArguments(tSet(ttTopicType))))}])
- % Found positive trigger: tCol(ttTopicType)
- % body: is_kif_clause(tCol(ttTopicType))*->rhs([clif(tCol(ttTopicType))])
- % Found positive trigger: tCol(ttTopicType)
- % body: compound(tCol(ttTopicType)),\+is_ftVar(tCol(ttTopicType))*->rhs([{with_current_why(tCol(ttTopicType),ignore(\+addAdmittedArguments(tCol(ttTopicType))))}])
- % RHS-Post1: tCol(tItem)
- % Support: admittedArgument(disjointWith,2,tItem),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(tItem)).
- % Found positive trigger: tCol(tItem)
- % body: rhs([{decl_type(tItem),kb_local(tItem/1)}])
- % Found positive trigger: tCol(tItem)
- % body: rhs([arity(tItem,1)])
- % RHS-Post1: arity(tItem,1)
- % Support: tCol(tItem),pt(tCol(tItem),rhs([arity(tItem,1)]))
- % Found positive trigger: tCol(tItem)
- % body: compound(tCol(tItem)),\+is_ftVar(tCol(tItem))*->rhs([{with_current_why(tCol(tItem),ignore(\+addAdmittedArguments(tCol(tItem))))}])
- % Found positive trigger: tCol(tItem)
- % body: \+ttExpressionType(tItem)*->rhs([tSet(tItem)])
- % RHS-Post1: tSet(tItem)
- % Support: tCol(tItem),pt(tCol(tItem),(\+ttExpressionType(tItem)*->rhs([tSet(tItem)])))
- % r_sane:mpred_fwc1(tSet(tItem)).
- % Found positive trigger: tSet(tItem)
- % body: rhs([functorDeclares(tItem)])
- % RHS-Post1: functorDeclares(tItem)
- % Support: tSet(tItem),pt(tSet(tItem),rhs([functorDeclares(tItem)]))
- % r_sane:mpred_fwc1(functorDeclares(tItem)).
- % Found positive trigger: functorDeclares(tItem)
- % body: rhs([arityMax(tItem,1),functorIsMacro(tItem)])
- % RHS-Post1: arityMax(tItem,1)
- % Support: functorDeclares(tItem),pt(functorDeclares(tItem),rhs([arityMax(tItem,1),functorIsMacro(tItem)]))
- % r_sane:mpred_fwc1(arityMax(tItem, 1)).
- % Found positive trigger: arityMax(tItem,1)
- % body: compound(arityMax(tItem,1)),\+is_ftVar(arityMax(tItem,1))*->rhs([{with_current_why(arityMax(tItem,1),ignore(\+addAdmittedArguments(arityMax(tItem,1))))}])
- % Found positive trigger: arityMax(tItem,1)
- % body: is_kif_clause(arityMax(tItem,1))*->rhs([clif(arityMax(tItem,1))])
- % Found positive trigger: arityMax(tItem,1)
- % body: compound(arityMax(tItem,1)),\+is_ftVar(arityMax(tItem,1))*->rhs([{with_current_why(arityMax(tItem,1),ignore(\+addAdmittedArguments(arityMax(tItem,1))))}])
- % RHS-Post1: functorIsMacro(tItem)
- % Support: functorDeclares(tItem),pt(functorDeclares(tItem),rhs([arityMax(tItem,1),functorIsMacro(tItem)]))
- % r_sane:mpred_fwc1(functorIsMacro(tItem)).
- % Found positive trigger: functorIsMacro(tItem)
- % body: compound(functorIsMacro(tItem)),\+is_ftVar(functorIsMacro(tItem))*->rhs([{with_current_why(functorIsMacro(tItem),ignore(\+addAdmittedArguments(functorIsMacro(tItem))))}])
- % Found positive trigger: functorIsMacro(tItem)
- % body: is_kif_clause(functorIsMacro(tItem))*->rhs([clif(functorIsMacro(tItem))])
- % Found positive trigger: functorIsMacro(tItem)
- % body: compound(functorIsMacro(tItem)),\+is_ftVar(functorIsMacro(tItem))*->rhs([{with_current_why(functorIsMacro(tItem),ignore(\+addAdmittedArguments(functorIsMacro(tItem))))}])
- % Found positive trigger: functorDeclares(tItem)
- % body: compound(functorDeclares(tItem)),\+is_ftVar(functorDeclares(tItem))*->rhs([{with_current_why(functorDeclares(tItem),ignore(\+addAdmittedArguments(functorDeclares(tItem))))}])
- % Found positive trigger: functorDeclares(tItem)
- % body: is_kif_clause(functorDeclares(tItem))*->rhs([clif(functorDeclares(tItem))])
- % Found positive trigger: functorDeclares(tItem)
- % body: compound(functorDeclares(tItem)),\+is_ftVar(functorDeclares(tItem))*->rhs([{with_current_why(functorDeclares(tItem),ignore(\+addAdmittedArguments(functorDeclares(tItem))))}])
- % Found positive trigger: tSet(tItem)
- % body: rhs([tCol(tItem),\+ttExpressionType(tItem)])
- % RHS-Post1: tCol(tItem)
- % Support: tSet(tItem),pt(tSet(tItem),rhs([tCol(tItem),\+ttExpressionType(tItem)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(tItem)
- % Support: tSet(tItem),pt(tSet(tItem),rhs([tCol(tItem),\+ttExpressionType(tItem)]))
- % Removing (withdraw1)
- % term: ttExpressionType(tItem)
- % support (was): _26698,_26700
- % Couldn't retract_i: spft(ttExpressionType(tItem),_31262,_31264).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(tItem))).
- % Found positive trigger: tSet(tItem)
- % body: rhs([tCol(tItem)])
- % RHS-Post1: tCol(tItem)
- % Support: tSet(tItem),pt(tSet(tItem),rhs([tCol(tItem)]))
- % Found positive trigger: tSet(tItem)
- % body: compound(tSet(tItem)),\+is_ftVar(tSet(tItem))*->rhs([{with_current_why(tSet(tItem),ignore(\+addAdmittedArguments(tSet(tItem))))}])
- % Found positive trigger: tSet(tItem)
- % body: is_kif_clause(tSet(tItem))*->rhs([clif(tSet(tItem))])
- % Found positive trigger: tSet(tItem)
- % body: compound(tSet(tItem)),\+is_ftVar(tSet(tItem))*->rhs([{with_current_why(tSet(tItem),ignore(\+addAdmittedArguments(tSet(tItem))))}])
- % Found positive trigger: tCol(tItem)
- % body: is_kif_clause(tCol(tItem))*->rhs([clif(tCol(tItem))])
- % Found positive trigger: tCol(tItem)
- % body: compound(tCol(tItem)),\+is_ftVar(tCol(tItem))*->rhs([{with_current_why(tCol(tItem),ignore(\+addAdmittedArguments(tCol(tItem))))}])
- % RHS-Post1: tCol(tRegion)
- % Support: admittedArgument(disjointWith,2,tRegion),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(tRelation)
- % Support: admittedArgument(disjointWith,2,tRelation),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(tPred)
- % Support: admittedArgument(disjointWith,2,tPred),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(ttTemporalType)
- % Support: admittedArgument(disjointWith,2,ttTemporalType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttTemporalType)).
- % Found positive trigger: tCol(ttTemporalType)
- % body: rhs([{decl_type(ttTemporalType),kb_local(ttTemporalType/1)}])
- % Found positive trigger: tCol(ttTemporalType)
- % body: rhs([arity(ttTemporalType,1)])
- % RHS-Post1: arity(ttTemporalType,1)
- % Support: tCol(ttTemporalType),pt(tCol(ttTemporalType),rhs([arity(ttTemporalType,1)]))
- % Found positive trigger: tCol(ttTemporalType)
- % body: compound(tCol(ttTemporalType)),\+is_ftVar(tCol(ttTemporalType))*->rhs([{with_current_why(tCol(ttTemporalType),ignore(\+addAdmittedArguments(tCol(ttTemporalType))))}])
- % Found positive trigger: tCol(ttTemporalType)
- % body: \+ttExpressionType(ttTemporalType)*->rhs([tSet(ttTemporalType)])
- % RHS-Post1: tSet(ttTemporalType)
- % Support: tCol(ttTemporalType),pt(tCol(ttTemporalType),(\+ttExpressionType(ttTemporalType)*->rhs([tSet(ttTemporalType)])))
- % r_sane:mpred_fwc1(tSet(ttTemporalType)).
- % Found positive trigger: tSet(ttTemporalType)
- % body: rhs([functorDeclares(ttTemporalType)])
- % RHS-Post1: functorDeclares(ttTemporalType)
- % Support: tSet(ttTemporalType),pt(tSet(ttTemporalType),rhs([functorDeclares(ttTemporalType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttTemporalType)).
- % Found positive trigger: functorDeclares(ttTemporalType)
- % body: rhs([arityMax(ttTemporalType,1),functorIsMacro(ttTemporalType)])
- % RHS-Post1: arityMax(ttTemporalType,1)
- % Support: functorDeclares(ttTemporalType),pt(functorDeclares(ttTemporalType),rhs([arityMax(ttTemporalType,1),functorIsMacro(ttTemporalType)]))
- % r_sane:mpred_fwc1(arityMax(ttTemporalType, 1)).
- % Found positive trigger: arityMax(ttTemporalType,1)
- % body: compound(arityMax(ttTemporalType,1)),\+is_ftVar(arityMax(ttTemporalType,1))*->rhs([{with_current_why(arityMax(ttTemporalType,1),ignore(\+addAdmittedArguments(arityMax(ttTemporalType,1))))}])
- % Found positive trigger: arityMax(ttTemporalType,1)
- % body: is_kif_clause(arityMax(ttTemporalType,1))*->rhs([clif(arityMax(ttTemporalType,1))])
- % Found positive trigger: arityMax(ttTemporalType,1)
- % body: compound(arityMax(ttTemporalType,1)),\+is_ftVar(arityMax(ttTemporalType,1))*->rhs([{with_current_why(arityMax(ttTemporalType,1),ignore(\+addAdmittedArguments(arityMax(ttTemporalType,1))))}])
- % RHS-Post1: functorIsMacro(ttTemporalType)
- % Support: functorDeclares(ttTemporalType),pt(functorDeclares(ttTemporalType),rhs([arityMax(ttTemporalType,1),functorIsMacro(ttTemporalType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttTemporalType)).
- % Found positive trigger: functorIsMacro(ttTemporalType)
- % body: compound(functorIsMacro(ttTemporalType)),\+is_ftVar(functorIsMacro(ttTemporalType))*->rhs([{with_current_why(functorIsMacro(ttTemporalType),ignore(\+addAdmittedArguments(functorIsMacro(ttTemporalType))))}])
- % Found positive trigger: functorIsMacro(ttTemporalType)
- % body: is_kif_clause(functorIsMacro(ttTemporalType))*->rhs([clif(functorIsMacro(ttTemporalType))])
- % Found positive trigger: functorIsMacro(ttTemporalType)
- % body: compound(functorIsMacro(ttTemporalType)),\+is_ftVar(functorIsMacro(ttTemporalType))*->rhs([{with_current_why(functorIsMacro(ttTemporalType),ignore(\+addAdmittedArguments(functorIsMacro(ttTemporalType))))}])
- % Found positive trigger: functorDeclares(ttTemporalType)
- % body: compound(functorDeclares(ttTemporalType)),\+is_ftVar(functorDeclares(ttTemporalType))*->rhs([{with_current_why(functorDeclares(ttTemporalType),ignore(\+addAdmittedArguments(functorDeclares(ttTemporalType))))}])
- % Found positive trigger: functorDeclares(ttTemporalType)
- % body: is_kif_clause(functorDeclares(ttTemporalType))*->rhs([clif(functorDeclares(ttTemporalType))])
- % Found positive trigger: functorDeclares(ttTemporalType)
- % body: compound(functorDeclares(ttTemporalType)),\+is_ftVar(functorDeclares(ttTemporalType))*->rhs([{with_current_why(functorDeclares(ttTemporalType),ignore(\+addAdmittedArguments(functorDeclares(ttTemporalType))))}])
- % Found positive trigger: tSet(ttTemporalType)
- % body: rhs([tCol(ttTemporalType),\+ttExpressionType(ttTemporalType)])
- % RHS-Post1: tCol(ttTemporalType)
- % Support: tSet(ttTemporalType),pt(tSet(ttTemporalType),rhs([tCol(ttTemporalType),\+ttExpressionType(ttTemporalType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttTemporalType)
- % Support: tSet(ttTemporalType),pt(tSet(ttTemporalType),rhs([tCol(ttTemporalType),\+ttExpressionType(ttTemporalType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttTemporalType)
- % support (was): _28728,_28730
- % Couldn't retract_i: spft(ttExpressionType(ttTemporalType),_33298,_33300).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttTemporalType))).
- % Found positive trigger: tSet(ttTemporalType)
- % body: rhs([tCol(ttTemporalType)])
- % RHS-Post1: tCol(ttTemporalType)
- % Support: tSet(ttTemporalType),pt(tSet(ttTemporalType),rhs([tCol(ttTemporalType)]))
- % Found positive trigger: tSet(ttTemporalType)
- % body: compound(tSet(ttTemporalType)),\+is_ftVar(tSet(ttTemporalType))*->rhs([{with_current_why(tSet(ttTemporalType),ignore(\+addAdmittedArguments(tSet(ttTemporalType))))}])
- % Found positive trigger: tSet(ttTemporalType)
- % body: is_kif_clause(tSet(ttTemporalType))*->rhs([clif(tSet(ttTemporalType))])
- % Found positive trigger: tSet(ttTemporalType)
- % body: compound(tSet(ttTemporalType)),\+is_ftVar(tSet(ttTemporalType))*->rhs([{with_current_why(tSet(ttTemporalType),ignore(\+addAdmittedArguments(tSet(ttTemporalType))))}])
- % Found positive trigger: tCol(ttTemporalType)
- % body: is_kif_clause(tCol(ttTemporalType))*->rhs([clif(tCol(ttTemporalType))])
- % Found positive trigger: tCol(ttTemporalType)
- % body: compound(tCol(ttTemporalType)),\+is_ftVar(tCol(ttTemporalType))*->rhs([{with_current_why(tCol(ttTemporalType),ignore(\+addAdmittedArguments(tCol(ttTemporalType))))}])
- % RHS-Post1: tCol(ttIndividualType)
- % Support: admittedArgument(disjointWith,2,ttIndividualType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(ttTypeFacet)
- % Support: admittedArgument(disjointWith,2,ttTypeFacet),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttTypeFacet)).
- % Found positive trigger: tCol(ttTypeFacet)
- % body: rhs([{decl_type(ttTypeFacet),kb_local(ttTypeFacet/1)}])
- % Found positive trigger: tCol(ttTypeFacet)
- % body: rhs([arity(ttTypeFacet,1)])
- % RHS-Post1: arity(ttTypeFacet,1)
- % Support: tCol(ttTypeFacet),pt(tCol(ttTypeFacet),rhs([arity(ttTypeFacet,1)]))
- % Found positive trigger: tCol(ttTypeFacet)
- % body: compound(tCol(ttTypeFacet)),\+is_ftVar(tCol(ttTypeFacet))*->rhs([{with_current_why(tCol(ttTypeFacet),ignore(\+addAdmittedArguments(tCol(ttTypeFacet))))}])
- % Found positive trigger: tCol(ttTypeFacet)
- % body: \+ttExpressionType(ttTypeFacet)*->rhs([tSet(ttTypeFacet)])
- % RHS-Post1: tSet(ttTypeFacet)
- % Support: tCol(ttTypeFacet),pt(tCol(ttTypeFacet),(\+ttExpressionType(ttTypeFacet)*->rhs([tSet(ttTypeFacet)])))
- % r_sane:mpred_fwc1(tSet(ttTypeFacet)).
- % Found positive trigger: tSet(ttTypeFacet)
- % body: rhs([functorDeclares(ttTypeFacet)])
- % RHS-Post1: functorDeclares(ttTypeFacet)
- % Support: tSet(ttTypeFacet),pt(tSet(ttTypeFacet),rhs([functorDeclares(ttTypeFacet)]))
- % r_sane:mpred_fwc1(functorDeclares(ttTypeFacet)).
- % Found positive trigger: functorDeclares(ttTypeFacet)
- % body: rhs([arityMax(ttTypeFacet,1),functorIsMacro(ttTypeFacet)])
- % RHS-Post1: arityMax(ttTypeFacet,1)
- % Support: functorDeclares(ttTypeFacet),pt(functorDeclares(ttTypeFacet),rhs([arityMax(ttTypeFacet,1),functorIsMacro(ttTypeFacet)]))
- % r_sane:mpred_fwc1(arityMax(ttTypeFacet, 1)).
- % Found positive trigger: arityMax(ttTypeFacet,1)
- % body: compound(arityMax(ttTypeFacet,1)),\+is_ftVar(arityMax(ttTypeFacet,1))*->rhs([{with_current_why(arityMax(ttTypeFacet,1),ignore(\+addAdmittedArguments(arityMax(ttTypeFacet,1))))}])
- % Found positive trigger: arityMax(ttTypeFacet,1)
- % body: is_kif_clause(arityMax(ttTypeFacet,1))*->rhs([clif(arityMax(ttTypeFacet,1))])
- % Found positive trigger: arityMax(ttTypeFacet,1)
- % body: compound(arityMax(ttTypeFacet,1)),\+is_ftVar(arityMax(ttTypeFacet,1))*->rhs([{with_current_why(arityMax(ttTypeFacet,1),ignore(\+addAdmittedArguments(arityMax(ttTypeFacet,1))))}])
- % RHS-Post1: functorIsMacro(ttTypeFacet)
- % Support: functorDeclares(ttTypeFacet),pt(functorDeclares(ttTypeFacet),rhs([arityMax(ttTypeFacet,1),functorIsMacro(ttTypeFacet)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttTypeFacet)).
- % Found positive trigger: functorIsMacro(ttTypeFacet)
- % body: compound(functorIsMacro(ttTypeFacet)),\+is_ftVar(functorIsMacro(ttTypeFacet))*->rhs([{with_current_why(functorIsMacro(ttTypeFacet),ignore(\+addAdmittedArguments(functorIsMacro(ttTypeFacet))))}])
- % Found positive trigger: functorIsMacro(ttTypeFacet)
- % body: is_kif_clause(functorIsMacro(ttTypeFacet))*->rhs([clif(functorIsMacro(ttTypeFacet))])
- % Found positive trigger: functorIsMacro(ttTypeFacet)
- % body: compound(functorIsMacro(ttTypeFacet)),\+is_ftVar(functorIsMacro(ttTypeFacet))*->rhs([{with_current_why(functorIsMacro(ttTypeFacet),ignore(\+addAdmittedArguments(functorIsMacro(ttTypeFacet))))}])
- % Found positive trigger: functorDeclares(ttTypeFacet)
- % body: compound(functorDeclares(ttTypeFacet)),\+is_ftVar(functorDeclares(ttTypeFacet))*->rhs([{with_current_why(functorDeclares(ttTypeFacet),ignore(\+addAdmittedArguments(functorDeclares(ttTypeFacet))))}])
- % Found positive trigger: functorDeclares(ttTypeFacet)
- % body: is_kif_clause(functorDeclares(ttTypeFacet))*->rhs([clif(functorDeclares(ttTypeFacet))])
- % Found positive trigger: functorDeclares(ttTypeFacet)
- % body: compound(functorDeclares(ttTypeFacet)),\+is_ftVar(functorDeclares(ttTypeFacet))*->rhs([{with_current_why(functorDeclares(ttTypeFacet),ignore(\+addAdmittedArguments(functorDeclares(ttTypeFacet))))}])
- % Found positive trigger: tSet(ttTypeFacet)
- % body: rhs([tCol(ttTypeFacet),\+ttExpressionType(ttTypeFacet)])
- % RHS-Post1: tCol(ttTypeFacet)
- % Support: tSet(ttTypeFacet),pt(tSet(ttTypeFacet),rhs([tCol(ttTypeFacet),\+ttExpressionType(ttTypeFacet)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttTypeFacet)
- % Support: tSet(ttTypeFacet),pt(tSet(ttTypeFacet),rhs([tCol(ttTypeFacet),\+ttExpressionType(ttTypeFacet)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttTypeFacet)
- % support (was): _26846,_26848
- % Couldn't retract_i: spft(ttExpressionType(ttTypeFacet),_31414,_31416).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttTypeFacet))).
- % Found positive trigger: tSet(ttTypeFacet)
- % body: rhs([tCol(ttTypeFacet)])
- % RHS-Post1: tCol(ttTypeFacet)
- % Support: tSet(ttTypeFacet),pt(tSet(ttTypeFacet),rhs([tCol(ttTypeFacet)]))
- % Found positive trigger: tSet(ttTypeFacet)
- % body: compound(tSet(ttTypeFacet)),\+is_ftVar(tSet(ttTypeFacet))*->rhs([{with_current_why(tSet(ttTypeFacet),ignore(\+addAdmittedArguments(tSet(ttTypeFacet))))}])
- % Found positive trigger: tSet(ttTypeFacet)
- % body: is_kif_clause(tSet(ttTypeFacet))*->rhs([clif(tSet(ttTypeFacet))])
- % Found positive trigger: tSet(ttTypeFacet)
- % body: compound(tSet(ttTypeFacet)),\+is_ftVar(tSet(ttTypeFacet))*->rhs([{with_current_why(tSet(ttTypeFacet),ignore(\+addAdmittedArguments(tSet(ttTypeFacet))))}])
- % Found positive trigger: tCol(ttTypeFacet)
- % body: is_kif_clause(tCol(ttTypeFacet))*->rhs([clif(tCol(ttTypeFacet))])
- % Found positive trigger: tCol(ttTypeFacet)
- % body: compound(tCol(ttTypeFacet)),\+is_ftVar(tCol(ttTypeFacet))*->rhs([{with_current_why(tCol(ttTypeFacet),ignore(\+addAdmittedArguments(tCol(ttTypeFacet))))}])
- % RHS-Post1: tCol(tCol)
- % Support: admittedArgument(disjointWith,2,tCol),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(tIndividual)
- % Support: admittedArgument(disjointWith,2,tIndividual),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(actAction)
- % Support: admittedArgument(disjointWith,2,actAction),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(actAction)).
- % Found positive trigger: tCol(actAction)
- % body: rhs([{decl_type(actAction),kb_local(actAction/1)}])
- % Found positive trigger: tCol(actAction)
- % body: rhs([arity(actAction,1)])
- % RHS-Post1: arity(actAction,1)
- % Support: tCol(actAction),pt(tCol(actAction),rhs([arity(actAction,1)]))
- % Found positive trigger: tCol(actAction)
- % body: compound(tCol(actAction)),\+is_ftVar(tCol(actAction))*->rhs([{with_current_why(tCol(actAction),ignore(\+addAdmittedArguments(tCol(actAction))))}])
- % Found positive trigger: tCol(actAction)
- % body: \+ttExpressionType(actAction)*->rhs([tSet(actAction)])
- % RHS-Post1: tSet(actAction)
- % Support: tCol(actAction),pt(tCol(actAction),(\+ttExpressionType(actAction)*->rhs([tSet(actAction)])))
- % r_sane:mpred_fwc1(tSet(actAction)).
- % Found positive trigger: tSet(actAction)
- % body: rhs([functorDeclares(actAction)])
- % RHS-Post1: functorDeclares(actAction)
- % Support: tSet(actAction),pt(tSet(actAction),rhs([functorDeclares(actAction)]))
- % r_sane:mpred_fwc1(functorDeclares(actAction)).
- % Found positive trigger: functorDeclares(actAction)
- % body: rhs([arityMax(actAction,1),functorIsMacro(actAction)])
- % RHS-Post1: arityMax(actAction,1)
- % Support: functorDeclares(actAction),pt(functorDeclares(actAction),rhs([arityMax(actAction,1),functorIsMacro(actAction)]))
- % r_sane:mpred_fwc1(arityMax(actAction, 1)).
- % Found positive trigger: arityMax(actAction,1)
- % body: compound(arityMax(actAction,1)),\+is_ftVar(arityMax(actAction,1))*->rhs([{with_current_why(arityMax(actAction,1),ignore(\+addAdmittedArguments(arityMax(actAction,1))))}])
- % Found positive trigger: arityMax(actAction,1)
- % body: is_kif_clause(arityMax(actAction,1))*->rhs([clif(arityMax(actAction,1))])
- % Found positive trigger: arityMax(actAction,1)
- % body: compound(arityMax(actAction,1)),\+is_ftVar(arityMax(actAction,1))*->rhs([{with_current_why(arityMax(actAction,1),ignore(\+addAdmittedArguments(arityMax(actAction,1))))}])
- % RHS-Post1: functorIsMacro(actAction)
- % Support: functorDeclares(actAction),pt(functorDeclares(actAction),rhs([arityMax(actAction,1),functorIsMacro(actAction)]))
- % r_sane:mpred_fwc1(functorIsMacro(actAction)).
- % Found positive trigger: functorIsMacro(actAction)
- % body: compound(functorIsMacro(actAction)),\+is_ftVar(functorIsMacro(actAction))*->rhs([{with_current_why(functorIsMacro(actAction),ignore(\+addAdmittedArguments(functorIsMacro(actAction))))}])
- % Found positive trigger: functorIsMacro(actAction)
- % body: is_kif_clause(functorIsMacro(actAction))*->rhs([clif(functorIsMacro(actAction))])
- % Found positive trigger: functorIsMacro(actAction)
- % body: compound(functorIsMacro(actAction)),\+is_ftVar(functorIsMacro(actAction))*->rhs([{with_current_why(functorIsMacro(actAction),ignore(\+addAdmittedArguments(functorIsMacro(actAction))))}])
- % Found positive trigger: functorDeclares(actAction)
- % body: compound(functorDeclares(actAction)),\+is_ftVar(functorDeclares(actAction))*->rhs([{with_current_why(functorDeclares(actAction),ignore(\+addAdmittedArguments(functorDeclares(actAction))))}])
- % Found positive trigger: functorDeclares(actAction)
- % body: is_kif_clause(functorDeclares(actAction))*->rhs([clif(functorDeclares(actAction))])
- % Found positive trigger: functorDeclares(actAction)
- % body: compound(functorDeclares(actAction)),\+is_ftVar(functorDeclares(actAction))*->rhs([{with_current_why(functorDeclares(actAction),ignore(\+addAdmittedArguments(functorDeclares(actAction))))}])
- % Found positive trigger: tSet(actAction)
- % body: rhs([tCol(actAction),\+ttExpressionType(actAction)])
- % RHS-Post1: tCol(actAction)
- % Support: tSet(actAction),pt(tSet(actAction),rhs([tCol(actAction),\+ttExpressionType(actAction)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(actAction)
- % Support: tSet(actAction),pt(tSet(actAction),rhs([tCol(actAction),\+ttExpressionType(actAction)]))
- % Removing (withdraw1)
- % term: ttExpressionType(actAction)
- % support (was): _11250,_11252
- % Couldn't retract_i: spft(ttExpressionType(actAction),_15818,_15820).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(actAction))).
- % Found positive trigger: tSet(actAction)
- % body: rhs([tCol(actAction)])
- % RHS-Post1: tCol(actAction)
- % Support: tSet(actAction),pt(tSet(actAction),rhs([tCol(actAction)]))
- % Found positive trigger: tSet(actAction)
- % body: compound(tSet(actAction)),\+is_ftVar(tSet(actAction))*->rhs([{with_current_why(tSet(actAction),ignore(\+addAdmittedArguments(tSet(actAction))))}])
- % Found positive trigger: tSet(actAction)
- % body: is_kif_clause(tSet(actAction))*->rhs([clif(tSet(actAction))])
- % Found positive trigger: tSet(actAction)
- % body: compound(tSet(actAction)),\+is_ftVar(tSet(actAction))*->rhs([{with_current_why(tSet(actAction),ignore(\+addAdmittedArguments(tSet(actAction))))}])
- % Found positive trigger: tCol(actAction)
- % body: is_kif_clause(tCol(actAction))*->rhs([clif(tCol(actAction))])
- % Found positive trigger: tCol(actAction)
- % body: compound(tCol(actAction)),\+is_ftVar(tCol(actAction))*->rhs([{with_current_why(tCol(actAction),ignore(\+addAdmittedArguments(tCol(actAction))))}])
- % RHS-Post1: tCol(tAgent)
- % Support: admittedArgument(disjointWith,2,tAgent),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(eventEvent)
- % Support: admittedArgument(disjointWith,2,eventEvent),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(eventEvent)).
- % Found positive trigger: tCol(eventEvent)
- % body: rhs([{decl_type(eventEvent),kb_local(eventEvent/1)}])
- % Found positive trigger: tCol(eventEvent)
- % body: rhs([arity(eventEvent,1)])
- % RHS-Post1: arity(eventEvent,1)
- % Support: tCol(eventEvent),pt(tCol(eventEvent),rhs([arity(eventEvent,1)]))
- % Found positive trigger: tCol(eventEvent)
- % body: compound(tCol(eventEvent)),\+is_ftVar(tCol(eventEvent))*->rhs([{with_current_why(tCol(eventEvent),ignore(\+addAdmittedArguments(tCol(eventEvent))))}])
- % Found positive trigger: tCol(eventEvent)
- % body: \+ttExpressionType(eventEvent)*->rhs([tSet(eventEvent)])
- % RHS-Post1: tSet(eventEvent)
- % Support: tCol(eventEvent),pt(tCol(eventEvent),(\+ttExpressionType(eventEvent)*->rhs([tSet(eventEvent)])))
- % r_sane:mpred_fwc1(tSet(eventEvent)).
- % Found positive trigger: tSet(eventEvent)
- % body: rhs([functorDeclares(eventEvent)])
- % RHS-Post1: functorDeclares(eventEvent)
- % Support: tSet(eventEvent),pt(tSet(eventEvent),rhs([functorDeclares(eventEvent)]))
- % r_sane:mpred_fwc1(functorDeclares(eventEvent)).
- % Found positive trigger: functorDeclares(eventEvent)
- % body: rhs([arityMax(eventEvent,1),functorIsMacro(eventEvent)])
- % RHS-Post1: arityMax(eventEvent,1)
- % Support: functorDeclares(eventEvent),pt(functorDeclares(eventEvent),rhs([arityMax(eventEvent,1),functorIsMacro(eventEvent)]))
- % r_sane:mpred_fwc1(arityMax(eventEvent, 1)).
- % Found positive trigger: arityMax(eventEvent,1)
- % body: compound(arityMax(eventEvent,1)),\+is_ftVar(arityMax(eventEvent,1))*->rhs([{with_current_why(arityMax(eventEvent,1),ignore(\+addAdmittedArguments(arityMax(eventEvent,1))))}])
- % Found positive trigger: arityMax(eventEvent,1)
- % body: is_kif_clause(arityMax(eventEvent,1))*->rhs([clif(arityMax(eventEvent,1))])
- % Found positive trigger: arityMax(eventEvent,1)
- % body: compound(arityMax(eventEvent,1)),\+is_ftVar(arityMax(eventEvent,1))*->rhs([{with_current_why(arityMax(eventEvent,1),ignore(\+addAdmittedArguments(arityMax(eventEvent,1))))}])
- % RHS-Post1: functorIsMacro(eventEvent)
- % Support: functorDeclares(eventEvent),pt(functorDeclares(eventEvent),rhs([arityMax(eventEvent,1),functorIsMacro(eventEvent)]))
- % r_sane:mpred_fwc1(functorIsMacro(eventEvent)).
- % Found positive trigger: functorIsMacro(eventEvent)
- % body: compound(functorIsMacro(eventEvent)),\+is_ftVar(functorIsMacro(eventEvent))*->rhs([{with_current_why(functorIsMacro(eventEvent),ignore(\+addAdmittedArguments(functorIsMacro(eventEvent))))}])
- % Found positive trigger: functorIsMacro(eventEvent)
- % body: is_kif_clause(functorIsMacro(eventEvent))*->rhs([clif(functorIsMacro(eventEvent))])
- % Found positive trigger: functorIsMacro(eventEvent)
- % body: compound(functorIsMacro(eventEvent)),\+is_ftVar(functorIsMacro(eventEvent))*->rhs([{with_current_why(functorIsMacro(eventEvent),ignore(\+addAdmittedArguments(functorIsMacro(eventEvent))))}])
- % Found positive trigger: functorDeclares(eventEvent)
- % body: compound(functorDeclares(eventEvent)),\+is_ftVar(functorDeclares(eventEvent))*->rhs([{with_current_why(functorDeclares(eventEvent),ignore(\+addAdmittedArguments(functorDeclares(eventEvent))))}])
- % Found positive trigger: functorDeclares(eventEvent)
- % body: is_kif_clause(functorDeclares(eventEvent))*->rhs([clif(functorDeclares(eventEvent))])
- % Found positive trigger: functorDeclares(eventEvent)
- % body: compound(functorDeclares(eventEvent)),\+is_ftVar(functorDeclares(eventEvent))*->rhs([{with_current_why(functorDeclares(eventEvent),ignore(\+addAdmittedArguments(functorDeclares(eventEvent))))}])
- % Found positive trigger: tSet(eventEvent)
- % body: rhs([tCol(eventEvent),\+ttExpressionType(eventEvent)])
- % RHS-Post1: tCol(eventEvent)
- % Support: tSet(eventEvent),pt(tSet(eventEvent),rhs([tCol(eventEvent),\+ttExpressionType(eventEvent)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(eventEvent)
- % Support: tSet(eventEvent),pt(tSet(eventEvent),rhs([tCol(eventEvent),\+ttExpressionType(eventEvent)]))
- % Removing (withdraw1)
- % term: ttExpressionType(eventEvent)
- % support (was): _26968,_26970
- % Couldn't retract_i: spft(ttExpressionType(eventEvent),_31536,_31538).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(eventEvent))).
- % Found positive trigger: tSet(eventEvent)
- % body: rhs([tCol(eventEvent)])
- % RHS-Post1: tCol(eventEvent)
- % Support: tSet(eventEvent),pt(tSet(eventEvent),rhs([tCol(eventEvent)]))
- % Found positive trigger: tSet(eventEvent)
- % body: compound(tSet(eventEvent)),\+is_ftVar(tSet(eventEvent))*->rhs([{with_current_why(tSet(eventEvent),ignore(\+addAdmittedArguments(tSet(eventEvent))))}])
- % Found positive trigger: tSet(eventEvent)
- % body: is_kif_clause(tSet(eventEvent))*->rhs([clif(tSet(eventEvent))])
- % Found positive trigger: tSet(eventEvent)
- % body: compound(tSet(eventEvent)),\+is_ftVar(tSet(eventEvent))*->rhs([{with_current_why(tSet(eventEvent),ignore(\+addAdmittedArguments(tSet(eventEvent))))}])
- % Found positive trigger: tCol(eventEvent)
- % body: is_kif_clause(tCol(eventEvent))*->rhs([clif(tCol(eventEvent))])
- % Found positive trigger: tCol(eventEvent)
- % body: compound(tCol(eventEvent)),\+is_ftVar(tCol(eventEvent))*->rhs([{with_current_why(tCol(eventEvent),ignore(\+addAdmittedArguments(tCol(eventEvent))))}])
- % RHS-Post1: tCol(ttModuleType)
- % Support: admittedArgument(disjointWith,2,ttModuleType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttModuleType)).
- % Found positive trigger: tCol(ttModuleType)
- % body: rhs([{decl_type(ttModuleType),kb_local(ttModuleType/1)}])
- % Found positive trigger: tCol(ttModuleType)
- % body: rhs([arity(ttModuleType,1)])
- % RHS-Post1: arity(ttModuleType,1)
- % Support: tCol(ttModuleType),pt(tCol(ttModuleType),rhs([arity(ttModuleType,1)]))
- % Found positive trigger: tCol(ttModuleType)
- % body: compound(tCol(ttModuleType)),\+is_ftVar(tCol(ttModuleType))*->rhs([{with_current_why(tCol(ttModuleType),ignore(\+addAdmittedArguments(tCol(ttModuleType))))}])
- % Found positive trigger: tCol(ttModuleType)
- % body: \+ttExpressionType(ttModuleType)*->rhs([tSet(ttModuleType)])
- % RHS-Post1: tSet(ttModuleType)
- % Support: tCol(ttModuleType),pt(tCol(ttModuleType),(\+ttExpressionType(ttModuleType)*->rhs([tSet(ttModuleType)])))
- % r_sane:mpred_fwc1(tSet(ttModuleType)).
- % Found positive trigger: tSet(ttModuleType)
- % body: rhs([functorDeclares(ttModuleType)])
- % RHS-Post1: functorDeclares(ttModuleType)
- % Support: tSet(ttModuleType),pt(tSet(ttModuleType),rhs([functorDeclares(ttModuleType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttModuleType)).
- % Found positive trigger: functorDeclares(ttModuleType)
- % body: rhs([arityMax(ttModuleType,1),functorIsMacro(ttModuleType)])
- % RHS-Post1: arityMax(ttModuleType,1)
- % Support: functorDeclares(ttModuleType),pt(functorDeclares(ttModuleType),rhs([arityMax(ttModuleType,1),functorIsMacro(ttModuleType)]))
- % r_sane:mpred_fwc1(arityMax(ttModuleType, 1)).
- % Found positive trigger: arityMax(ttModuleType,1)
- % body: compound(arityMax(ttModuleType,1)),\+is_ftVar(arityMax(ttModuleType,1))*->rhs([{with_current_why(arityMax(ttModuleType,1),ignore(\+addAdmittedArguments(arityMax(ttModuleType,1))))}])
- % Found positive trigger: arityMax(ttModuleType,1)
- % body: is_kif_clause(arityMax(ttModuleType,1))*->rhs([clif(arityMax(ttModuleType,1))])
- % Found positive trigger: arityMax(ttModuleType,1)
- % body: compound(arityMax(ttModuleType,1)),\+is_ftVar(arityMax(ttModuleType,1))*->rhs([{with_current_why(arityMax(ttModuleType,1),ignore(\+addAdmittedArguments(arityMax(ttModuleType,1))))}])
- % RHS-Post1: functorIsMacro(ttModuleType)
- % Support: functorDeclares(ttModuleType),pt(functorDeclares(ttModuleType),rhs([arityMax(ttModuleType,1),functorIsMacro(ttModuleType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttModuleType)).
- % Found positive trigger: functorIsMacro(ttModuleType)
- % body: compound(functorIsMacro(ttModuleType)),\+is_ftVar(functorIsMacro(ttModuleType))*->rhs([{with_current_why(functorIsMacro(ttModuleType),ignore(\+addAdmittedArguments(functorIsMacro(ttModuleType))))}])
- % Found positive trigger: functorIsMacro(ttModuleType)
- % body: is_kif_clause(functorIsMacro(ttModuleType))*->rhs([clif(functorIsMacro(ttModuleType))])
- % Found positive trigger: functorIsMacro(ttModuleType)
- % body: compound(functorIsMacro(ttModuleType)),\+is_ftVar(functorIsMacro(ttModuleType))*->rhs([{with_current_why(functorIsMacro(ttModuleType),ignore(\+addAdmittedArguments(functorIsMacro(ttModuleType))))}])
- % Found positive trigger: functorDeclares(ttModuleType)
- % body: compound(functorDeclares(ttModuleType)),\+is_ftVar(functorDeclares(ttModuleType))*->rhs([{with_current_why(functorDeclares(ttModuleType),ignore(\+addAdmittedArguments(functorDeclares(ttModuleType))))}])
- % Found positive trigger: functorDeclares(ttModuleType)
- % body: is_kif_clause(functorDeclares(ttModuleType))*->rhs([clif(functorDeclares(ttModuleType))])
- % Found positive trigger: functorDeclares(ttModuleType)
- % body: compound(functorDeclares(ttModuleType)),\+is_ftVar(functorDeclares(ttModuleType))*->rhs([{with_current_why(functorDeclares(ttModuleType),ignore(\+addAdmittedArguments(functorDeclares(ttModuleType))))}])
- % Found positive trigger: tSet(ttModuleType)
- % body: rhs([tCol(ttModuleType),\+ttExpressionType(ttModuleType)])
- % RHS-Post1: tCol(ttModuleType)
- % Support: tSet(ttModuleType),pt(tSet(ttModuleType),rhs([tCol(ttModuleType),\+ttExpressionType(ttModuleType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttModuleType)
- % Support: tSet(ttModuleType),pt(tSet(ttModuleType),rhs([tCol(ttModuleType),\+ttExpressionType(ttModuleType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttModuleType)
- % support (was): _28910,_28912
- % Couldn't retract_i: spft(ttExpressionType(ttModuleType),_33478,_33480).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttModuleType))).
- % Found positive trigger: tSet(ttModuleType)
- % body: rhs([tCol(ttModuleType)])
- % RHS-Post1: tCol(ttModuleType)
- % Support: tSet(ttModuleType),pt(tSet(ttModuleType),rhs([tCol(ttModuleType)]))
- % Found positive trigger: tSet(ttModuleType)
- % body: compound(tSet(ttModuleType)),\+is_ftVar(tSet(ttModuleType))*->rhs([{with_current_why(tSet(ttModuleType),ignore(\+addAdmittedArguments(tSet(ttModuleType))))}])
- % Found positive trigger: tSet(ttModuleType)
- % body: is_kif_clause(tSet(ttModuleType))*->rhs([clif(tSet(ttModuleType))])
- % Found positive trigger: tSet(ttModuleType)
- % body: compound(tSet(ttModuleType)),\+is_ftVar(tSet(ttModuleType))*->rhs([{with_current_why(tSet(ttModuleType),ignore(\+addAdmittedArguments(tSet(ttModuleType))))}])
- % Found positive trigger: tCol(ttModuleType)
- % body: is_kif_clause(tCol(ttModuleType))*->rhs([clif(tCol(ttModuleType))])
- % Found positive trigger: tCol(ttModuleType)
- % body: compound(tCol(ttModuleType)),\+is_ftVar(tCol(ttModuleType))*->rhs([{with_current_why(tCol(ttModuleType),ignore(\+addAdmittedArguments(tCol(ttModuleType))))}])
- % RHS-Post1: tCol(tMicrotheory)
- % Support: admittedArgument(disjointWith,2,tMicrotheory),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % RHS-Post1: tCol(ttActionType)
- % Support: admittedArgument(disjointWith,2,ttActionType),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(ttActionType)).
- % Found positive trigger: tCol(ttActionType)
- % body: rhs([{decl_type(ttActionType),kb_local(ttActionType/1)}])
- % Found positive trigger: tCol(ttActionType)
- % body: rhs([arity(ttActionType,1)])
- % RHS-Post1: arity(ttActionType,1)
- % Support: tCol(ttActionType),pt(tCol(ttActionType),rhs([arity(ttActionType,1)]))
- % Found positive trigger: tCol(ttActionType)
- % body: compound(tCol(ttActionType)),\+is_ftVar(tCol(ttActionType))*->rhs([{with_current_why(tCol(ttActionType),ignore(\+addAdmittedArguments(tCol(ttActionType))))}])
- % Found positive trigger: tCol(ttActionType)
- % body: \+ttExpressionType(ttActionType)*->rhs([tSet(ttActionType)])
- % RHS-Post1: tSet(ttActionType)
- % Support: tCol(ttActionType),pt(tCol(ttActionType),(\+ttExpressionType(ttActionType)*->rhs([tSet(ttActionType)])))
- % r_sane:mpred_fwc1(tSet(ttActionType)).
- % Found positive trigger: tSet(ttActionType)
- % body: rhs([functorDeclares(ttActionType)])
- % RHS-Post1: functorDeclares(ttActionType)
- % Support: tSet(ttActionType),pt(tSet(ttActionType),rhs([functorDeclares(ttActionType)]))
- % r_sane:mpred_fwc1(functorDeclares(ttActionType)).
- % Found positive trigger: functorDeclares(ttActionType)
- % body: rhs([arityMax(ttActionType,1),functorIsMacro(ttActionType)])
- % RHS-Post1: arityMax(ttActionType,1)
- % Support: functorDeclares(ttActionType),pt(functorDeclares(ttActionType),rhs([arityMax(ttActionType,1),functorIsMacro(ttActionType)]))
- % r_sane:mpred_fwc1(arityMax(ttActionType, 1)).
- % Found positive trigger: arityMax(ttActionType,1)
- % body: compound(arityMax(ttActionType,1)),\+is_ftVar(arityMax(ttActionType,1))*->rhs([{with_current_why(arityMax(ttActionType,1),ignore(\+addAdmittedArguments(arityMax(ttActionType,1))))}])
- % Found positive trigger: arityMax(ttActionType,1)
- % body: is_kif_clause(arityMax(ttActionType,1))*->rhs([clif(arityMax(ttActionType,1))])
- % Found positive trigger: arityMax(ttActionType,1)
- % body: compound(arityMax(ttActionType,1)),\+is_ftVar(arityMax(ttActionType,1))*->rhs([{with_current_why(arityMax(ttActionType,1),ignore(\+addAdmittedArguments(arityMax(ttActionType,1))))}])
- % RHS-Post1: functorIsMacro(ttActionType)
- % Support: functorDeclares(ttActionType),pt(functorDeclares(ttActionType),rhs([arityMax(ttActionType,1),functorIsMacro(ttActionType)]))
- % r_sane:mpred_fwc1(functorIsMacro(ttActionType)).
- % Found positive trigger: functorIsMacro(ttActionType)
- % body: compound(functorIsMacro(ttActionType)),\+is_ftVar(functorIsMacro(ttActionType))*->rhs([{with_current_why(functorIsMacro(ttActionType),ignore(\+addAdmittedArguments(functorIsMacro(ttActionType))))}])
- % Found positive trigger: functorIsMacro(ttActionType)
- % body: is_kif_clause(functorIsMacro(ttActionType))*->rhs([clif(functorIsMacro(ttActionType))])
- % Found positive trigger: functorIsMacro(ttActionType)
- % body: compound(functorIsMacro(ttActionType)),\+is_ftVar(functorIsMacro(ttActionType))*->rhs([{with_current_why(functorIsMacro(ttActionType),ignore(\+addAdmittedArguments(functorIsMacro(ttActionType))))}])
- % Found positive trigger: functorDeclares(ttActionType)
- % body: compound(functorDeclares(ttActionType)),\+is_ftVar(functorDeclares(ttActionType))*->rhs([{with_current_why(functorDeclares(ttActionType),ignore(\+addAdmittedArguments(functorDeclares(ttActionType))))}])
- % Found positive trigger: functorDeclares(ttActionType)
- % body: is_kif_clause(functorDeclares(ttActionType))*->rhs([clif(functorDeclares(ttActionType))])
- % Found positive trigger: functorDeclares(ttActionType)
- % body: compound(functorDeclares(ttActionType)),\+is_ftVar(functorDeclares(ttActionType))*->rhs([{with_current_why(functorDeclares(ttActionType),ignore(\+addAdmittedArguments(functorDeclares(ttActionType))))}])
- % Found positive trigger: tSet(ttActionType)
- % body: rhs([tCol(ttActionType),\+ttExpressionType(ttActionType)])
- % RHS-Post1: tCol(ttActionType)
- % Support: tSet(ttActionType),pt(tSet(ttActionType),rhs([tCol(ttActionType),\+ttExpressionType(ttActionType)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(ttActionType)
- % Support: tSet(ttActionType),pt(tSet(ttActionType),rhs([tCol(ttActionType),\+ttExpressionType(ttActionType)]))
- % Removing (withdraw1)
- % term: ttExpressionType(ttActionType)
- % support (was): _27096,_27098
- % Couldn't retract_i: spft(ttExpressionType(ttActionType),_31664,_31666).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(ttActionType))).
- % Found positive trigger: tSet(ttActionType)
- % body: rhs([tCol(ttActionType)])
- % RHS-Post1: tCol(ttActionType)
- % Support: tSet(ttActionType),pt(tSet(ttActionType),rhs([tCol(ttActionType)]))
- % Found positive trigger: tSet(ttActionType)
- % body: compound(tSet(ttActionType)),\+is_ftVar(tSet(ttActionType))*->rhs([{with_current_why(tSet(ttActionType),ignore(\+addAdmittedArguments(tSet(ttActionType))))}])
- % Found positive trigger: tSet(ttActionType)
- % body: is_kif_clause(tSet(ttActionType))*->rhs([clif(tSet(ttActionType))])
- % Found positive trigger: tSet(ttActionType)
- % body: compound(tSet(ttActionType)),\+is_ftVar(tSet(ttActionType))*->rhs([{with_current_why(tSet(ttActionType),ignore(\+addAdmittedArguments(tSet(ttActionType))))}])
- % Found positive trigger: tCol(ttActionType)
- % body: is_kif_clause(tCol(ttActionType))*->rhs([clif(tCol(ttActionType))])
- % Found positive trigger: tCol(ttActionType)
- % body: compound(tCol(ttActionType)),\+is_ftVar(tCol(ttActionType))*->rhs([{with_current_why(tCol(ttActionType),ignore(\+addAdmittedArguments(tCol(ttActionType))))}])
- % RHS-Post1: tCol(stateSituation)
- % Support: admittedArgument(disjointWith,2,stateSituation),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(stateSituation)).
- % Found positive trigger: tCol(stateSituation)
- % body: rhs([{decl_type(stateSituation),kb_local(stateSituation/1)}])
- % Found positive trigger: tCol(stateSituation)
- % body: rhs([arity(stateSituation,1)])
- % RHS-Post1: arity(stateSituation,1)
- % Support: tCol(stateSituation),pt(tCol(stateSituation),rhs([arity(stateSituation,1)]))
- % Found positive trigger: tCol(stateSituation)
- % body: compound(tCol(stateSituation)),\+is_ftVar(tCol(stateSituation))*->rhs([{with_current_why(tCol(stateSituation),ignore(\+addAdmittedArguments(tCol(stateSituation))))}])
- % Found positive trigger: tCol(stateSituation)
- % body: \+ttExpressionType(stateSituation)*->rhs([tSet(stateSituation)])
- % RHS-Post1: tSet(stateSituation)
- % Support: tCol(stateSituation),pt(tCol(stateSituation),(\+ttExpressionType(stateSituation)*->rhs([tSet(stateSituation)])))
- % r_sane:mpred_fwc1(tSet(stateSituation)).
- % Found positive trigger: tSet(stateSituation)
- % body: rhs([functorDeclares(stateSituation)])
- % RHS-Post1: functorDeclares(stateSituation)
- % Support: tSet(stateSituation),pt(tSet(stateSituation),rhs([functorDeclares(stateSituation)]))
- % r_sane:mpred_fwc1(functorDeclares(stateSituation)).
- % Found positive trigger: functorDeclares(stateSituation)
- % body: rhs([arityMax(stateSituation,1),functorIsMacro(stateSituation)])
- % RHS-Post1: arityMax(stateSituation,1)
- % Support: functorDeclares(stateSituation),pt(functorDeclares(stateSituation),rhs([arityMax(stateSituation,1),functorIsMacro(stateSituation)]))
- % r_sane:mpred_fwc1(arityMax(stateSituation, 1)).
- % Found positive trigger: arityMax(stateSituation,1)
- % body: compound(arityMax(stateSituation,1)),\+is_ftVar(arityMax(stateSituation,1))*->rhs([{with_current_why(arityMax(stateSituation,1),ignore(\+addAdmittedArguments(arityMax(stateSituation,1))))}])
- % Found positive trigger: arityMax(stateSituation,1)
- % body: is_kif_clause(arityMax(stateSituation,1))*->rhs([clif(arityMax(stateSituation,1))])
- % Found positive trigger: arityMax(stateSituation,1)
- % body: compound(arityMax(stateSituation,1)),\+is_ftVar(arityMax(stateSituation,1))*->rhs([{with_current_why(arityMax(stateSituation,1),ignore(\+addAdmittedArguments(arityMax(stateSituation,1))))}])
- % RHS-Post1: functorIsMacro(stateSituation)
- % Support: functorDeclares(stateSituation),pt(functorDeclares(stateSituation),rhs([arityMax(stateSituation,1),functorIsMacro(stateSituation)]))
- % r_sane:mpred_fwc1(functorIsMacro(stateSituation)).
- % Found positive trigger: functorIsMacro(stateSituation)
- % body: compound(functorIsMacro(stateSituation)),\+is_ftVar(functorIsMacro(stateSituation))*->rhs([{with_current_why(functorIsMacro(stateSituation),ignore(\+addAdmittedArguments(functorIsMacro(stateSituation))))}])
- % Found positive trigger: functorIsMacro(stateSituation)
- % body: is_kif_clause(functorIsMacro(stateSituation))*->rhs([clif(functorIsMacro(stateSituation))])
- % Found positive trigger: functorIsMacro(stateSituation)
- % body: compound(functorIsMacro(stateSituation)),\+is_ftVar(functorIsMacro(stateSituation))*->rhs([{with_current_why(functorIsMacro(stateSituation),ignore(\+addAdmittedArguments(functorIsMacro(stateSituation))))}])
- % Found positive trigger: functorDeclares(stateSituation)
- % body: compound(functorDeclares(stateSituation)),\+is_ftVar(functorDeclares(stateSituation))*->rhs([{with_current_why(functorDeclares(stateSituation),ignore(\+addAdmittedArguments(functorDeclares(stateSituation))))}])
- % Found positive trigger: functorDeclares(stateSituation)
- % body: is_kif_clause(functorDeclares(stateSituation))*->rhs([clif(functorDeclares(stateSituation))])
- % Found positive trigger: functorDeclares(stateSituation)
- % body: compound(functorDeclares(stateSituation)),\+is_ftVar(functorDeclares(stateSituation))*->rhs([{with_current_why(functorDeclares(stateSituation),ignore(\+addAdmittedArguments(functorDeclares(stateSituation))))}])
- % Found positive trigger: tSet(stateSituation)
- % body: rhs([tCol(stateSituation),\+ttExpressionType(stateSituation)])
- % RHS-Post1: tCol(stateSituation)
- % Support: tSet(stateSituation),pt(tSet(stateSituation),rhs([tCol(stateSituation),\+ttExpressionType(stateSituation)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(stateSituation)
- % Support: tSet(stateSituation),pt(tSet(stateSituation),rhs([tCol(stateSituation),\+ttExpressionType(stateSituation)]))
- % Removing (withdraw1)
- % term: ttExpressionType(stateSituation)
- % support (was): _27078,_27080
- % Couldn't retract_i: spft(ttExpressionType(stateSituation),_31648,_31650).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(stateSituation))).
- % Found positive trigger: tSet(stateSituation)
- % body: rhs([tCol(stateSituation)])
- % RHS-Post1: tCol(stateSituation)
- % Support: tSet(stateSituation),pt(tSet(stateSituation),rhs([tCol(stateSituation)]))
- % Found positive trigger: tSet(stateSituation)
- % body: compound(tSet(stateSituation)),\+is_ftVar(tSet(stateSituation))*->rhs([{with_current_why(tSet(stateSituation),ignore(\+addAdmittedArguments(tSet(stateSituation))))}])
- % Found positive trigger: tSet(stateSituation)
- % body: is_kif_clause(tSet(stateSituation))*->rhs([clif(tSet(stateSituation))])
- % Found positive trigger: tSet(stateSituation)
- % body: compound(tSet(stateSituation)),\+is_ftVar(tSet(stateSituation))*->rhs([{with_current_why(tSet(stateSituation),ignore(\+addAdmittedArguments(tSet(stateSituation))))}])
- % Found positive trigger: tCol(stateSituation)
- % body: is_kif_clause(tCol(stateSituation))*->rhs([clif(tCol(stateSituation))])
- % Found positive trigger: tCol(stateSituation)
- % body: compound(tCol(stateSituation)),\+is_ftVar(tCol(stateSituation))*->rhs([{with_current_why(tCol(stateSituation),ignore(\+addAdmittedArguments(tCol(stateSituation))))}])
- % RHS-Post1: tCol(uitype_Topic)
- % Support: admittedArgument(disjointWith,2,uitype_Topic),pt(admittedArgument(disjointWith,2,_6696),(nonvar(_6696)*->rhs([tCol(_6696)])))
- % r_sane:mpred_fwc1(tCol(uitype_Topic)).
- % Found positive trigger: tCol(uitype_Topic)
- % body: rhs([{decl_type(uitype_Topic),kb_local(uitype_Topic/1)}])
- % Found positive trigger: tCol(uitype_Topic)
- % body: rhs([arity(uitype_Topic,1)])
- % RHS-Post1: arity(uitype_Topic,1)
- % Support: tCol(uitype_Topic),pt(tCol(uitype_Topic),rhs([arity(uitype_Topic,1)]))
- % Found positive trigger: tCol(uitype_Topic)
- % body: compound(tCol(uitype_Topic)),\+is_ftVar(tCol(uitype_Topic))*->rhs([{with_current_why(tCol(uitype_Topic),ignore(\+addAdmittedArguments(tCol(uitype_Topic))))}])
- % Found positive trigger: tCol(uitype_Topic)
- % body: \+ttExpressionType(uitype_Topic)*->rhs([tSet(uitype_Topic)])
- % RHS-Post1: tSet(uitype_Topic)
- % Support: tCol(uitype_Topic),pt(tCol(uitype_Topic),(\+ttExpressionType(uitype_Topic)*->rhs([tSet(uitype_Topic)])))
- % r_sane:mpred_fwc1(tSet(uitype_Topic)).
- % Found positive trigger: tSet(uitype_Topic)
- % body: rhs([functorDeclares(uitype_Topic)])
- % RHS-Post1: functorDeclares(uitype_Topic)
- % Support: tSet(uitype_Topic),pt(tSet(uitype_Topic),rhs([functorDeclares(uitype_Topic)]))
- % r_sane:mpred_fwc1(functorDeclares(uitype_Topic)).
- % Found positive trigger: functorDeclares(uitype_Topic)
- % body: rhs([arityMax(uitype_Topic,1),functorIsMacro(uitype_Topic)])
- % RHS-Post1: arityMax(uitype_Topic,1)
- % Support: functorDeclares(uitype_Topic),pt(functorDeclares(uitype_Topic),rhs([arityMax(uitype_Topic,1),functorIsMacro(uitype_Topic)]))
- % r_sane:mpred_fwc1(arityMax(uitype_Topic, 1)).
- % Found positive trigger: arityMax(uitype_Topic,1)
- % body: compound(arityMax(uitype_Topic,1)),\+is_ftVar(arityMax(uitype_Topic,1))*->rhs([{with_current_why(arityMax(uitype_Topic,1),ignore(\+addAdmittedArguments(arityMax(uitype_Topic,1))))}])
- % Found positive trigger: arityMax(uitype_Topic,1)
- % body: is_kif_clause(arityMax(uitype_Topic,1))*->rhs([clif(arityMax(uitype_Topic,1))])
- % Found positive trigger: arityMax(uitype_Topic,1)
- % body: compound(arityMax(uitype_Topic,1)),\+is_ftVar(arityMax(uitype_Topic,1))*->rhs([{with_current_why(arityMax(uitype_Topic,1),ignore(\+addAdmittedArguments(arityMax(uitype_Topic,1))))}])
- % RHS-Post1: functorIsMacro(uitype_Topic)
- % Support: functorDeclares(uitype_Topic),pt(functorDeclares(uitype_Topic),rhs([arityMax(uitype_Topic,1),functorIsMacro(uitype_Topic)]))
- % r_sane:mpred_fwc1(functorIsMacro(uitype_Topic)).
- % Found positive trigger: functorIsMacro(uitype_Topic)
- % body: compound(functorIsMacro(uitype_Topic)),\+is_ftVar(functorIsMacro(uitype_Topic))*->rhs([{with_current_why(functorIsMacro(uitype_Topic),ignore(\+addAdmittedArguments(functorIsMacro(uitype_Topic))))}])
- % Found positive trigger: functorIsMacro(uitype_Topic)
- % body: is_kif_clause(functorIsMacro(uitype_Topic))*->rhs([clif(functorIsMacro(uitype_Topic))])
- % Found positive trigger: functorIsMacro(uitype_Topic)
- % body: compound(functorIsMacro(uitype_Topic)),\+is_ftVar(functorIsMacro(uitype_Topic))*->rhs([{with_current_why(functorIsMacro(uitype_Topic),ignore(\+addAdmittedArguments(functorIsMacro(uitype_Topic))))}])
- % Found positive trigger: functorDeclares(uitype_Topic)
- % body: compound(functorDeclares(uitype_Topic)),\+is_ftVar(functorDeclares(uitype_Topic))*->rhs([{with_current_why(functorDeclares(uitype_Topic),ignore(\+addAdmittedArguments(functorDeclares(uitype_Topic))))}])
- % Found positive trigger: functorDeclares(uitype_Topic)
- % body: is_kif_clause(functorDeclares(uitype_Topic))*->rhs([clif(functorDeclares(uitype_Topic))])
- % Found positive trigger: functorDeclares(uitype_Topic)
- % body: compound(functorDeclares(uitype_Topic)),\+is_ftVar(functorDeclares(uitype_Topic))*->rhs([{with_current_why(functorDeclares(uitype_Topic),ignore(\+addAdmittedArguments(functorDeclares(uitype_Topic))))}])
- % Found positive trigger: tSet(uitype_Topic)
- % body: rhs([tCol(uitype_Topic),\+ttExpressionType(uitype_Topic)])
- % RHS-Post1: tCol(uitype_Topic)
- % Support: tSet(uitype_Topic),pt(tSet(uitype_Topic),rhs([tCol(uitype_Topic),\+ttExpressionType(uitype_Topic)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(uitype_Topic)
- % Support: tSet(uitype_Topic),pt(tSet(uitype_Topic),rhs([tCol(uitype_Topic),\+ttExpressionType(uitype_Topic)]))
- % Removing (withdraw1)
- % term: ttExpressionType(uitype_Topic)
- % support (was): _26380,_26382
- % Couldn't retract_i: spft(ttExpressionType(uitype_Topic),_30948,_30950).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(uitype_Topic))).
- % Found positive trigger: tSet(uitype_Topic)
- % body: rhs([tCol(uitype_Topic)])
- % RHS-Post1: tCol(uitype_Topic)
- % Support: tSet(uitype_Topic),pt(tSet(uitype_Topic),rhs([tCol(uitype_Topic)]))
- % Found positive trigger: tSet(uitype_Topic)
- % body: compound(tSet(uitype_Topic)),\+is_ftVar(tSet(uitype_Topic))*->rhs([{with_current_why(tSet(uitype_Topic),ignore(\+addAdmittedArguments(tSet(uitype_Topic))))}])
- % Found positive trigger: tSet(uitype_Topic)
- % body: is_kif_clause(tSet(uitype_Topic))*->rhs([clif(tSet(uitype_Topic))])
- % Found positive trigger: tSet(uitype_Topic)
- % body: compound(tSet(uitype_Topic)),\+is_ftVar(tSet(uitype_Topic))*->rhs([{with_current_why(tSet(uitype_Topic),ignore(\+addAdmittedArguments(tSet(uitype_Topic))))}])
- % Found positive trigger: tCol(uitype_Topic)
- % body: is_kif_clause(tCol(uitype_Topic))*->rhs([clif(tCol(uitype_Topic))])
- % Found positive trigger: tCol(uitype_Topic)
- % body: compound(tCol(uitype_Topic)),\+is_ftVar(tCol(uitype_Topic))*->rhs([{with_current_why(tCol(uitype_Topic),ignore(\+addAdmittedArguments(tCol(uitype_Topic))))}])
- % gripe_CPUTIME(true, warn(0.876204474000005>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, (admittedArgument(disjointWith, 2, _2666)/nonvar(_2666)==>tCol(_2666)), (argIsa(disjointWith, 2, tCol), pt(argIsa(_3870, _3872, _3874), (nonvar(_3874), nonvar(_3870), integer(_3872)*->rhs([tCol(_3874), (admittedArgument(_3870, _3872, _3944)/nonvar(_3944)==>isa(_3944, _3874)), (poss(admittedArgument(_3870, _3872, _3944))/nonvar(_3944)==>isa(_3944, _3874))])))), none))).
- % RHS-Post1: poss(admittedArgument(disjointWith,2,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(disjointWith,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(disjointWith, 2, _32330))/nonvar(_32330)==>tCol(_32330))).
- % Adding positive
- % trigger: poss(admittedArgument(disjointWith,2,_6112))
- % body: nonvar(_6112)*->rhs([tCol(_6112)])
- % Support: (poss(admittedArgument(disjointWith,2,_6302))/nonvar(_6302)==>tCol(_6302)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttTypeType)
- % Support: poss(admittedArgument(disjointWith,2,ttTypeType)),pt(poss(admittedArgument(disjointWith,2,_11384)),(nonvar(_11384)*->rhs([tCol(_11384)])))
- % RHS-Post1: tCol(ttValueType)
- % Support: poss(admittedArgument(disjointWith,2,ttValueType)),pt(poss(admittedArgument(disjointWith,2,_11384)),(nonvar(_11384)*->rhs([tCol(_11384)])))
- % RHS-Post1: tCol(vtValue)
- % Support: poss(admittedArgument(disjointWith,2,vtValue)),pt(poss(admittedArgument(disjointWith,2,_11384)),(nonvar(_11384)*->rhs([tCol(_11384)])))
- % RHS-Post1: tCol(ttAgentType)
- % Support: poss(admittedArgument(disjointWith,2,ttAgentType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttEventType)
- % Support: poss(admittedArgument(disjointWith,2,ttEventType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttExpressionType)
- % Support: poss(admittedArgument(disjointWith,2,ttExpressionType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttItemType)
- % Support: poss(admittedArgument(disjointWith,2,ttItemType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttMicrotheoryType)
- % Support: poss(admittedArgument(disjointWith,2,ttMicrotheoryType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttRegionType)
- % Support: poss(admittedArgument(disjointWith,2,ttRegionType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttRelationType)
- % Support: poss(admittedArgument(disjointWith,2,ttRelationType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttSituationType)
- % Support: poss(admittedArgument(disjointWith,2,ttSituationType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttTopicType)
- % Support: poss(admittedArgument(disjointWith,2,ttTopicType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tItem)
- % Support: poss(admittedArgument(disjointWith,2,tItem)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tRegion)
- % Support: poss(admittedArgument(disjointWith,2,tRegion)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tRelation)
- % Support: poss(admittedArgument(disjointWith,2,tRelation)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tPred)
- % Support: poss(admittedArgument(disjointWith,2,tPred)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttTemporalType)
- % Support: poss(admittedArgument(disjointWith,2,ttTemporalType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttIndividualType)
- % Support: poss(admittedArgument(disjointWith,2,ttIndividualType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttTypeFacet)
- % Support: poss(admittedArgument(disjointWith,2,ttTypeFacet)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tCol)
- % Support: poss(admittedArgument(disjointWith,2,tCol)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tIndividual)
- % Support: poss(admittedArgument(disjointWith,2,tIndividual)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(actAction)
- % Support: poss(admittedArgument(disjointWith,2,actAction)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tAgent)
- % Support: poss(admittedArgument(disjointWith,2,tAgent)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(eventEvent)
- % Support: poss(admittedArgument(disjointWith,2,eventEvent)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttModuleType)
- % Support: poss(admittedArgument(disjointWith,2,ttModuleType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tMicrotheory)
- % Support: poss(admittedArgument(disjointWith,2,tMicrotheory)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(ttActionType)
- % Support: poss(admittedArgument(disjointWith,2,ttActionType)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(stateSituation)
- % Support: poss(admittedArgument(disjointWith,2,stateSituation)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(uitype_Topic)
- % Support: poss(admittedArgument(disjointWith,2,uitype_Topic)),pt(poss(admittedArgument(disjointWith,2,_6740)),(nonvar(_6740)*->rhs([tCol(_6740)])))
- % RHS-Post1: tCol(tRelation)
- % Support: argIsa(argQuotedIsa,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(argQuotedIsa,1,_2666)/nonvar(_2666)==>isa(_2666,tRelation)
- % Support: argIsa(argQuotedIsa,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(argQuotedIsa, 1, _20570)/nonvar(_20570)==>tRelation(_20570))).
- % Adding positive
- % trigger: admittedArgument(argQuotedIsa,1,_6126)
- % body: nonvar(_6126)*->rhs([tRelation(_6126)])
- % Support: (admittedArgument(argQuotedIsa,1,_6308)/nonvar(_6308)==>tRelation(_6308)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(argQuotedIsa,1,_2666))/nonvar(_2666)==>isa(_2666,tRelation)
- % Support: argIsa(argQuotedIsa,1,tRelation),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(argQuotedIsa, 1, _22330))/nonvar(_22330)==>tRelation(_22330))).
- % Adding positive
- % trigger: poss(admittedArgument(argQuotedIsa,1,_22330))
- % body: nonvar(_22330)*->rhs([tRelation(_22330)])
- % Support: (poss(admittedArgument(argQuotedIsa,1,_25016))/nonvar(_25016)==>tRelation(_25016)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(argQuotedIsa,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(argQuotedIsa,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(argQuotedIsa,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(argQuotedIsa, 2, _20566)/nonvar(_20566)==>ftInt(_20566))).
- % Adding positive
- % trigger: admittedArgument(argQuotedIsa,2,_6150)
- % body: nonvar(_6150)*->rhs([ftInt(_6150)])
- % Support: (admittedArgument(argQuotedIsa,2,_6332)/nonvar(_6332)==>ftInt(_6332)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(argQuotedIsa,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(argQuotedIsa,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(argQuotedIsa, 2, _22354))/nonvar(_22354)==>ftInt(_22354))).
- % Adding positive
- % trigger: poss(admittedArgument(argQuotedIsa,2,_22354))
- % body: nonvar(_22354)*->rhs([ftInt(_22354)])
- % Support: (poss(admittedArgument(argQuotedIsa,2,_25038))/nonvar(_25038)==>ftInt(_25038)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttExpressionType)
- % Support: argIsa(argQuotedIsa,3,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(argQuotedIsa,3,_2666)/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(argQuotedIsa,3,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(argQuotedIsa, 3, _20624)/nonvar(_20624)==>ttExpressionType(_20624))).
- % Adding positive
- % trigger: admittedArgument(argQuotedIsa,3,_6168)
- % body: nonvar(_6168)*->rhs([ttExpressionType(_6168)])
- % Support: (admittedArgument(argQuotedIsa,3,_6350)/nonvar(_6350)==>ttExpressionType(_6350)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(argQuotedIsa,3,_2666))/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(argQuotedIsa,3,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(argQuotedIsa, 3, _22382))/nonvar(_22382)==>ttExpressionType(_22382))).
- % Adding positive
- % trigger: poss(admittedArgument(argQuotedIsa,3,_22382))
- % body: nonvar(_22382)*->rhs([ttExpressionType(_22382)])
- % Support: (poss(admittedArgument(argQuotedIsa,3,_25072))/nonvar(_25072)==>ttExpressionType(_25072)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(typeProps,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(typeProps,1,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(typeProps,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(typeProps, 1, _20632)/nonvar(_20632)==>tCol(_20632))).
- % Adding positive
- % trigger: admittedArgument(typeProps,1,_6198)
- % body: nonvar(_6198)*->rhs([tCol(_6198)])
- % Support: (admittedArgument(typeProps,1,_6380)/nonvar(_6380)==>tCol(_6380)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(typeProps,1,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(typeProps,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(typeProps, 1, _22390))/nonvar(_22390)==>tCol(_22390))).
- % Adding positive
- % trigger: poss(admittedArgument(typeProps,1,_22390))
- % body: nonvar(_22390)*->rhs([tCol(_22390)])
- % Support: (poss(admittedArgument(typeProps,1,_25072))/nonvar(_25072)==>tCol(_25072)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftVoprop)
- % Support: argIsa(typeProps,2,ftVoprop),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(typeProps,2,_2666)/nonvar(_2666)==>isa(_2666,ftVoprop)
- % Support: argIsa(typeProps,2,ftVoprop),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(typeProps, 2, _20656)/nonvar(_20656)==>ftVoprop(_20656))).
- % Adding positive
- % trigger: admittedArgument(typeProps,2,_6196)
- % body: nonvar(_6196)*->rhs([ftVoprop(_6196)])
- % Support: (admittedArgument(typeProps,2,_6378)/nonvar(_6378)==>ftVoprop(_6378)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(typeProps,2,_2666))/nonvar(_2666)==>isa(_2666,ftVoprop)
- % Support: argIsa(typeProps,2,ftVoprop),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(typeProps, 2, _22432))/nonvar(_22432)==>ftVoprop(_22432))).
- % Adding positive
- % trigger: poss(admittedArgument(typeProps,2,_22432))
- % body: nonvar(_22432)*->rhs([ftVoprop(_22432)])
- % Support: (poss(admittedArgument(typeProps,2,_25116))/nonvar(_25116)==>ftVoprop(_25116)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(genlInverse,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(genlInverse,1,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(genlInverse,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(genlInverse, 1, _20696)/nonvar(_20696)==>tPred(_20696))).
- % Adding positive
- % trigger: admittedArgument(genlInverse,1,_6252)
- % body: nonvar(_6252)*->rhs([tPred(_6252)])
- % Support: (admittedArgument(genlInverse,1,_6434)/nonvar(_6434)==>tPred(_6434)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(genlInverse,1,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(genlInverse,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(genlInverse, 1, _22442))/nonvar(_22442)==>tPred(_22442))).
- % Adding positive
- % trigger: poss(admittedArgument(genlInverse,1,_22442))
- % body: nonvar(_22442)*->rhs([tPred(_22442)])
- % Support: (poss(admittedArgument(genlInverse,1,_25126))/nonvar(_25126)==>tPred(_25126)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(genlInverse,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(genlInverse,2,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(genlInverse,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(genlInverse, 2, _20714)/nonvar(_20714)==>tPred(_20714))).
- % Adding positive
- % trigger: admittedArgument(genlInverse,2,_6270)
- % body: nonvar(_6270)*->rhs([tPred(_6270)])
- % Support: (admittedArgument(genlInverse,2,_6452)/nonvar(_6452)==>tPred(_6452)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(genlInverse,2,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(genlInverse,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(genlInverse, 2, _22466))/nonvar(_22466)==>tPred(_22466))).
- % Adding positive
- % trigger: poss(admittedArgument(genlInverse,2,_22466))
- % body: nonvar(_22466)*->rhs([tPred(_22466)])
- % Support: (poss(admittedArgument(genlInverse,2,_25150))/nonvar(_25150)==>tPred(_25150)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(predProxyAssert,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyAssert,1,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyAssert,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyAssert, 1, _20738)/nonvar(_20738)==>tPred(_20738))).
- % Adding positive
- % trigger: admittedArgument(predProxyAssert,1,_6300)
- % body: nonvar(_6300)*->rhs([tPred(_6300)])
- % Support: (admittedArgument(predProxyAssert,1,_6482)/nonvar(_6482)==>tPred(_6482)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyAssert,1,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyAssert,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyAssert, 1, _22508))/nonvar(_22508)==>tPred(_22508))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyAssert,1,_22508))
- % body: nonvar(_22508)*->rhs([tPred(_22508)])
- % Support: (poss(admittedArgument(predProxyAssert,1,_25194))/nonvar(_25194)==>tPred(_25194)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(prologMultiValued)
- % Support: argIsa(predProxyAssert,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyAssert,1,_2666)/nonvar(_2666)==>isa(_2666,prologMultiValued)
- % Support: argIsa(predProxyAssert,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyAssert, 1, _20786)/nonvar(_20786)==>prologMultiValued(_20786))).
- % Adding positive
- % trigger: admittedArgument(predProxyAssert,1,_6324)
- % body: nonvar(_6324)*->rhs([prologMultiValued(_6324)])
- % Support: (admittedArgument(predProxyAssert,1,_6506)/nonvar(_6506)==>prologMultiValued(_6506)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyAssert,1,_2666))/nonvar(_2666)==>isa(_2666,prologMultiValued)
- % Support: argIsa(predProxyAssert,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyAssert, 1, _22550))/nonvar(_22550)==>prologMultiValued(_22550))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyAssert,1,_22550))
- % body: nonvar(_22550)*->rhs([prologMultiValued(_22550)])
- % Support: (poss(admittedArgument(predProxyAssert,1,_25242))/nonvar(_25242)==>prologMultiValued(_25242)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(predProxyAssert,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyAssert,2,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyAssert,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyAssert, 2, _20798)/nonvar(_20798)==>tPred(_20798))).
- % Adding positive
- % trigger: admittedArgument(predProxyAssert,2,_6342)
- % body: nonvar(_6342)*->rhs([tPred(_6342)])
- % Support: (admittedArgument(predProxyAssert,2,_6524)/nonvar(_6524)==>tPred(_6524)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyAssert,2,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyAssert,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyAssert, 2, _22544))/nonvar(_22544)==>tPred(_22544))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyAssert,2,_22544))
- % body: nonvar(_22544)*->rhs([tPred(_22544)])
- % Support: (poss(admittedArgument(predProxyAssert,2,_25230))/nonvar(_25230)==>tPred(_25230)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(predProxyAssert,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyAssert,2,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(predProxyAssert,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyAssert, 2, _20804)/nonvar(_20804)==>ftTerm(_20804))).
- % Adding positive
- % trigger: admittedArgument(predProxyAssert,2,_6366)
- % body: nonvar(_6366)*->rhs([ftTerm(_6366)])
- % Support: (admittedArgument(predProxyAssert,2,_6548)/nonvar(_6548)==>ftTerm(_6548)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyAssert,2,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(predProxyAssert,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyAssert, 2, _22576))/nonvar(_22576)==>ftTerm(_22576))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyAssert,2,_22576))
- % body: nonvar(_22576)*->rhs([ftTerm(_22576)])
- % Support: (poss(admittedArgument(predProxyAssert,2,_25262))/nonvar(_25262)==>ftTerm(_25262)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(predProxyQuery,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyQuery,1,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyQuery,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyQuery, 1, _20838)/nonvar(_20838)==>tPred(_20838))).
- % Adding positive
- % trigger: admittedArgument(predProxyQuery,1,_6396)
- % body: nonvar(_6396)*->rhs([tPred(_6396)])
- % Support: (admittedArgument(predProxyQuery,1,_6578)/nonvar(_6578)==>tPred(_6578)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyQuery,1,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyQuery,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyQuery, 1, _22602))/nonvar(_22602)==>tPred(_22602))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyQuery,1,_22602))
- % body: nonvar(_22602)*->rhs([tPred(_22602)])
- % Support: (poss(admittedArgument(predProxyQuery,1,_25288))/nonvar(_25288)==>tPred(_25288)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(prologMultiValued)
- % Support: argIsa(predProxyQuery,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyQuery,1,_2666)/nonvar(_2666)==>isa(_2666,prologMultiValued)
- % Support: argIsa(predProxyQuery,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyQuery, 1, _20880)/nonvar(_20880)==>prologMultiValued(_20880))).
- % Adding positive
- % trigger: admittedArgument(predProxyQuery,1,_6420)
- % body: nonvar(_6420)*->rhs([prologMultiValued(_6420)])
- % Support: (admittedArgument(predProxyQuery,1,_6602)/nonvar(_6602)==>prologMultiValued(_6602)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyQuery,1,_2666))/nonvar(_2666)==>isa(_2666,prologMultiValued)
- % Support: argIsa(predProxyQuery,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyQuery, 1, _22644))/nonvar(_22644)==>prologMultiValued(_22644))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyQuery,1,_22644))
- % body: nonvar(_22644)*->rhs([prologMultiValued(_22644)])
- % Support: (poss(admittedArgument(predProxyQuery,1,_25336))/nonvar(_25336)==>prologMultiValued(_25336)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(predProxyQuery,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyQuery,2,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyQuery,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyQuery, 2, _20886)/nonvar(_20886)==>tPred(_20886))).
- % Adding positive
- % trigger: admittedArgument(predProxyQuery,2,_6438)
- % body: nonvar(_6438)*->rhs([tPred(_6438)])
- % Support: (admittedArgument(predProxyQuery,2,_6620)/nonvar(_6620)==>tPred(_6620)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyQuery,2,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyQuery,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyQuery, 2, _22644))/nonvar(_22644)==>tPred(_22644))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyQuery,2,_22644))
- % body: nonvar(_22644)*->rhs([tPred(_22644)])
- % Support: (poss(admittedArgument(predProxyQuery,2,_25330))/nonvar(_25330)==>tPred(_25330)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(predProxyQuery,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyQuery,2,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(predProxyQuery,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyQuery, 2, _20912)/nonvar(_20912)==>ftTerm(_20912))).
- % Adding positive
- % trigger: admittedArgument(predProxyQuery,2,_20912)
- % body: nonvar(_20912)*->rhs([ftTerm(_20912)])
- % Support: (admittedArgument(predProxyQuery,2,_23546)/nonvar(_23546)==>ftTerm(_23546)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyQuery,2,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(predProxyQuery,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyQuery, 2, _14280))/nonvar(_14280)==>ftTerm(_14280))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyQuery,2,_14280))
- % body: nonvar(_14280)*->rhs([ftTerm(_14280)])
- % Support: (poss(admittedArgument(predProxyQuery,2,_16966))/nonvar(_16966)==>ftTerm(_16966)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(predProxyRetract,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyRetract,1,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyRetract,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyRetract, 1, _20942)/nonvar(_20942)==>tPred(_20942))).
- % Adding positive
- % trigger: admittedArgument(predProxyRetract,1,_20942)
- % body: nonvar(_20942)*->rhs([tPred(_20942)])
- % Support: (admittedArgument(predProxyRetract,1,_23578)/nonvar(_23578)==>tPred(_23578)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyRetract,1,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyRetract,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyRetract, 1, _14312))/nonvar(_14312)==>tPred(_14312))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyRetract,1,_14312))
- % body: nonvar(_14312)*->rhs([tPred(_14312)])
- % Support: (poss(admittedArgument(predProxyRetract,1,_16998))/nonvar(_16998)==>tPred(_16998)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(predProxyRetract,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predProxyRetract,2,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyRetract,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predProxyRetract, 2, _20966)/nonvar(_20966)==>tPred(_20966))).
- % Adding positive
- % trigger: admittedArgument(predProxyRetract,2,_20966)
- % body: nonvar(_20966)*->rhs([tPred(_20966)])
- % Support: (admittedArgument(predProxyRetract,2,_23602)/nonvar(_23602)==>tPred(_23602)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predProxyRetract,2,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predProxyRetract,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predProxyRetract, 2, _14324))/nonvar(_14324)==>tPred(_14324))).
- % Adding positive
- % trigger: poss(admittedArgument(predProxyRetract,2,_14324))
- % body: nonvar(_14324)*->rhs([tPred(_14324)])
- % Support: (poss(admittedArgument(predProxyRetract,2,_17010))/nonvar(_17010)==>tPred(_17010)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftID)
- % Support: argIsa(instTypeProps,1,ftID),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(instTypeProps,1,_2666)/nonvar(_2666)==>isa(_2666,ftID)
- % Support: argIsa(instTypeProps,1,ftID),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(instTypeProps, 1, _20962)/nonvar(_20962)==>ftID(_20962))).
- % Adding positive
- % trigger: admittedArgument(instTypeProps,1,_6514)
- % body: nonvar(_6514)*->rhs([ftID(_6514)])
- % Support: (admittedArgument(instTypeProps,1,_6696)/nonvar(_6696)==>ftID(_6696)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(instTypeProps,1,_2666))/nonvar(_2666)==>isa(_2666,ftID)
- % Support: argIsa(instTypeProps,1,ftID),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(instTypeProps, 1, _22750))/nonvar(_22750)==>ftID(_22750))).
- % Adding positive
- % trigger: poss(admittedArgument(instTypeProps,1,_22750))
- % body: nonvar(_22750)*->rhs([ftID(_22750)])
- % Support: (poss(admittedArgument(instTypeProps,1,_25434))/nonvar(_25434)==>ftID(_25434)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(instTypeProps,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(instTypeProps,2,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(instTypeProps,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(instTypeProps, 2, _21008)/nonvar(_21008)==>tCol(_21008))).
- % Adding positive
- % trigger: admittedArgument(instTypeProps,2,_21008)
- % body: nonvar(_21008)*->rhs([tCol(_21008)])
- % Support: (admittedArgument(instTypeProps,2,_23642)/nonvar(_23642)==>tCol(_23642)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(instTypeProps,2,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(instTypeProps,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(instTypeProps, 2, _14382))/nonvar(_14382)==>tCol(_14382))).
- % Adding positive
- % trigger: poss(admittedArgument(instTypeProps,2,_14382))
- % body: nonvar(_14382)*->rhs([tCol(_14382)])
- % Support: (poss(admittedArgument(instTypeProps,2,_17066))/nonvar(_17066)==>tCol(_17066)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftRest(ftVoprop))
- % Support: argIsa(instTypeProps,3,ftRest(ftVoprop)),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % moving(inherit_above(header_sane, tCol(_13246))).
- % r_sane:mpred_fwc1(tCol(ftRest)).
- % Found positive trigger: tCol(ftRest)
- % body: rhs([{decl_type(ftRest),kb_local(ftRest/1)}])
- % Found positive trigger: tCol(ftRest)
- % body: rhs([arity(ftRest,1)])
- % RHS-Post1: arity(ftRest,1)
- % Support: tCol(ftRest),pt(tCol(ftRest),rhs([arity(ftRest,1)]))
- % Found positive trigger: tCol(ftRest)
- % body: compound(tCol(ftRest)),\+is_ftVar(tCol(ftRest))*->rhs([{with_current_why(tCol(ftRest),ignore(\+addAdmittedArguments(tCol(ftRest))))}])
- % Found positive trigger: tCol(ftRest)
- % body: \+ttExpressionType(ftRest)*->rhs([tSet(ftRest)])
- % Found positive trigger: tCol(ftRest)
- % body: is_kif_clause(tCol(ftRest))*->rhs([clif(tCol(ftRest))])
- % Found positive trigger: tCol(ftRest)
- % body: compound(tCol(ftRest)),\+is_ftVar(tCol(ftRest))*->rhs([{with_current_why(tCol(ftRest),ignore(\+addAdmittedArguments(tCol(ftRest))))}])
- % RHS-Post1: admittedArgument(instTypeProps,3,_2666)/nonvar(_2666)==>isa(_2666,ftRest(ftVoprop))
- % Support: argIsa(instTypeProps,3,ftRest(ftVoprop)),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(instTypeProps, 3, _14092)/nonvar(_14092)==>isa(_14092, ftRest(ftVoprop)))).
- % Adding positive
- % trigger: admittedArgument(instTypeProps,3,_14092)
- % body: nonvar(_14092)*->rhs([isa(_14092,ftRest(ftVoprop))])
- % Support: (admittedArgument(instTypeProps,3,_16792)/nonvar(_16792)==>isa(_16792,ftRest(ftVoprop))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(instTypeProps,3,_2666))/nonvar(_2666)==>isa(_2666,ftRest(ftVoprop))
- % Support: argIsa(instTypeProps,3,ftRest(ftVoprop)),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(instTypeProps, 3, _35658))/nonvar(_35658)==>isa(_35658, ftRest(ftVoprop)))).
- % Adding positive
- % trigger: poss(admittedArgument(instTypeProps,3,_6612))
- % body: nonvar(_6612)*->rhs([isa(_6612,ftRest(ftVoprop))])
- % Support: (poss(admittedArgument(instTypeProps,3,_6806))/nonvar(_6806)==>isa(_6806,ftRest(ftVoprop))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(predTypeMax,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predTypeMax,1,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predTypeMax,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predTypeMax, 1, _14336)/nonvar(_14336)==>tPred(_14336))).
- % Adding positive
- % trigger: admittedArgument(predTypeMax,1,_14336)
- % body: nonvar(_14336)*->rhs([tPred(_14336)])
- % Support: (admittedArgument(predTypeMax,1,_16968)/nonvar(_16968)==>tPred(_16968)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predTypeMax,1,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predTypeMax,1,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predTypeMax, 1, _14414))/nonvar(_14414)==>tPred(_14414))).
- % Adding positive
- % trigger: poss(admittedArgument(predTypeMax,1,_14414))
- % body: nonvar(_14414)*->rhs([tPred(_14414)])
- % Support: (poss(admittedArgument(predTypeMax,1,_17098))/nonvar(_17098)==>tPred(_17098)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(prologSingleValued)
- % Support: argIsa(predTypeMax,1,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predTypeMax,1,_2666)/nonvar(_2666)==>isa(_2666,prologSingleValued)
- % Support: argIsa(predTypeMax,1,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predTypeMax, 1, _21086)/nonvar(_21086)==>prologSingleValued(_21086))).
- % Adding positive
- % trigger: admittedArgument(predTypeMax,1,_21086)
- % body: nonvar(_21086)*->rhs([prologSingleValued(_21086)])
- % Support: (admittedArgument(predTypeMax,1,_23726)/nonvar(_23726)==>prologSingleValued(_23726)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predTypeMax,1,_2666))/nonvar(_2666)==>isa(_2666,prologSingleValued)
- % Support: argIsa(predTypeMax,1,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predTypeMax, 1, _14458))/nonvar(_14458)==>prologSingleValued(_14458))).
- % Adding positive
- % trigger: poss(admittedArgument(predTypeMax,1,_14458))
- % body: nonvar(_14458)*->rhs([prologSingleValued(_14458)])
- % Support: (poss(admittedArgument(predTypeMax,1,_17148))/nonvar(_17148)==>prologSingleValued(_17148)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(predTypeMax,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predTypeMax,2,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(predTypeMax,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predTypeMax, 2, _21100)/nonvar(_21100)==>tCol(_21100))).
- % Adding positive
- % trigger: admittedArgument(predTypeMax,2,_21100)
- % body: nonvar(_21100)*->rhs([tCol(_21100)])
- % Support: (admittedArgument(predTypeMax,2,_23732)/nonvar(_23732)==>tCol(_23732)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predTypeMax,2,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(predTypeMax,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predTypeMax, 2, _14468))/nonvar(_14468)==>tCol(_14468))).
- % Adding positive
- % trigger: poss(admittedArgument(predTypeMax,2,_14468))
- % body: nonvar(_14468)*->rhs([tCol(_14468)])
- % Support: (poss(admittedArgument(predTypeMax,2,_17152))/nonvar(_17152)==>tCol(_17152)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(predTypeMax,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predTypeMax,3,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(predTypeMax,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predTypeMax, 3, _21092)/nonvar(_21092)==>ftInt(_21092))).
- % Adding positive
- % trigger: admittedArgument(predTypeMax,3,_21092)
- % body: nonvar(_21092)*->rhs([ftInt(_21092)])
- % Support: (admittedArgument(predTypeMax,3,_23724)/nonvar(_23724)==>ftInt(_23724)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predTypeMax,3,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(predTypeMax,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predTypeMax, 3, _14492))/nonvar(_14492)==>ftInt(_14492))).
- % Adding positive
- % trigger: poss(admittedArgument(predTypeMax,3,_14492))
- % body: nonvar(_14492)*->rhs([ftInt(_14492)])
- % Support: (poss(admittedArgument(predTypeMax,3,_17176))/nonvar(_17176)==>ftInt(_17176)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(resultIsa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(resultIsa,2,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(resultIsa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(resultIsa, 2, _21146)/nonvar(_21146)==>tCol(_21146))).
- % Adding positive
- % trigger: admittedArgument(resultIsa,2,_21146)
- % body: nonvar(_21146)*->rhs([tCol(_21146)])
- % Support: (admittedArgument(resultIsa,2,_23778)/nonvar(_23778)==>tCol(_23778)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(vtVerb)
- % Support: admittedArgument(resultIsa,2,vtVerb),pt(admittedArgument(resultIsa,2,_7314),(nonvar(_7314)*->rhs([tCol(_7314)])))
- % r_sane:mpred_fwc1(tCol(vtVerb)).
- % Found positive trigger: tCol(vtVerb)
- % body: rhs([{decl_type(vtVerb),kb_local(vtVerb/1)}])
- % Found positive trigger: tCol(vtVerb)
- % body: rhs([arity(vtVerb,1)])
- % RHS-Post1: arity(vtVerb,1)
- % Support: tCol(vtVerb),pt(tCol(vtVerb),rhs([arity(vtVerb,1)]))
- % Found positive trigger: tCol(vtVerb)
- % body: compound(tCol(vtVerb)),\+is_ftVar(tCol(vtVerb))*->rhs([{with_current_why(tCol(vtVerb),ignore(\+addAdmittedArguments(tCol(vtVerb))))}])
- % Found positive trigger: tCol(vtVerb)
- % body: \+ttExpressionType(vtVerb)*->rhs([tSet(vtVerb)])
- % RHS-Post1: tSet(vtVerb)
- % Support: tCol(vtVerb),pt(tCol(vtVerb),(\+ttExpressionType(vtVerb)*->rhs([tSet(vtVerb)])))
- % r_sane:mpred_fwc1(tSet(vtVerb)).
- % Found positive trigger: tSet(vtVerb)
- % body: rhs([functorDeclares(vtVerb)])
- % RHS-Post1: functorDeclares(vtVerb)
- % Support: tSet(vtVerb),pt(tSet(vtVerb),rhs([functorDeclares(vtVerb)]))
- % r_sane:mpred_fwc1(functorDeclares(vtVerb)).
- % Found positive trigger: functorDeclares(vtVerb)
- % body: rhs([arityMax(vtVerb,1),functorIsMacro(vtVerb)])
- % RHS-Post1: arityMax(vtVerb,1)
- % Support: functorDeclares(vtVerb),pt(functorDeclares(vtVerb),rhs([arityMax(vtVerb,1),functorIsMacro(vtVerb)]))
- % r_sane:mpred_fwc1(arityMax(vtVerb, 1)).
- % Found positive trigger: arityMax(vtVerb,1)
- % body: compound(arityMax(vtVerb,1)),\+is_ftVar(arityMax(vtVerb,1))*->rhs([{with_current_why(arityMax(vtVerb,1),ignore(\+addAdmittedArguments(arityMax(vtVerb,1))))}])
- % Found positive trigger: arityMax(vtVerb,1)
- % body: is_kif_clause(arityMax(vtVerb,1))*->rhs([clif(arityMax(vtVerb,1))])
- % Found positive trigger: arityMax(vtVerb,1)
- % body: compound(arityMax(vtVerb,1)),\+is_ftVar(arityMax(vtVerb,1))*->rhs([{with_current_why(arityMax(vtVerb,1),ignore(\+addAdmittedArguments(arityMax(vtVerb,1))))}])
- % RHS-Post1: functorIsMacro(vtVerb)
- % Support: functorDeclares(vtVerb),pt(functorDeclares(vtVerb),rhs([arityMax(vtVerb,1),functorIsMacro(vtVerb)]))
- % r_sane:mpred_fwc1(functorIsMacro(vtVerb)).
- % Found positive trigger: functorIsMacro(vtVerb)
- % body: compound(functorIsMacro(vtVerb)),\+is_ftVar(functorIsMacro(vtVerb))*->rhs([{with_current_why(functorIsMacro(vtVerb),ignore(\+addAdmittedArguments(functorIsMacro(vtVerb))))}])
- % Found positive trigger: functorIsMacro(vtVerb)
- % body: is_kif_clause(functorIsMacro(vtVerb))*->rhs([clif(functorIsMacro(vtVerb))])
- % Found positive trigger: functorIsMacro(vtVerb)
- % body: compound(functorIsMacro(vtVerb)),\+is_ftVar(functorIsMacro(vtVerb))*->rhs([{with_current_why(functorIsMacro(vtVerb),ignore(\+addAdmittedArguments(functorIsMacro(vtVerb))))}])
- % Found positive trigger: functorDeclares(vtVerb)
- % body: compound(functorDeclares(vtVerb)),\+is_ftVar(functorDeclares(vtVerb))*->rhs([{with_current_why(functorDeclares(vtVerb),ignore(\+addAdmittedArguments(functorDeclares(vtVerb))))}])
- % Found positive trigger: functorDeclares(vtVerb)
- % body: is_kif_clause(functorDeclares(vtVerb))*->rhs([clif(functorDeclares(vtVerb))])
- % Found positive trigger: functorDeclares(vtVerb)
- % body: compound(functorDeclares(vtVerb)),\+is_ftVar(functorDeclares(vtVerb))*->rhs([{with_current_why(functorDeclares(vtVerb),ignore(\+addAdmittedArguments(functorDeclares(vtVerb))))}])
- % Found positive trigger: tSet(vtVerb)
- % body: rhs([tCol(vtVerb),\+ttExpressionType(vtVerb)])
- % RHS-Post1: tCol(vtVerb)
- % Support: tSet(vtVerb),pt(tSet(vtVerb),rhs([tCol(vtVerb),\+ttExpressionType(vtVerb)]))
- % RHS-Withdrawing-Negation: \+ttExpressionType(vtVerb)
- % Support: tSet(vtVerb),pt(tSet(vtVerb),rhs([tCol(vtVerb),\+ttExpressionType(vtVerb)]))
- % Removing (withdraw1)
- % term: ttExpressionType(vtVerb)
- % support (was): _11320,_11322
- % Couldn't retract_i: spft(ttExpressionType(vtVerb),_15886,_15888).
- % show_failure(mpred_undo1, retract_u(ttExpressionType(vtVerb))).
- % Found positive trigger: tSet(vtVerb)
- % body: rhs([tCol(vtVerb)])
- % RHS-Post1: tCol(vtVerb)
- % Support: tSet(vtVerb),pt(tSet(vtVerb),rhs([tCol(vtVerb)]))
- % Found positive trigger: tSet(vtVerb)
- % body: compound(tSet(vtVerb)),\+is_ftVar(tSet(vtVerb))*->rhs([{with_current_why(tSet(vtVerb),ignore(\+addAdmittedArguments(tSet(vtVerb))))}])
- % Found positive trigger: tSet(vtVerb)
- % body: is_kif_clause(tSet(vtVerb))*->rhs([clif(tSet(vtVerb))])
- % Found positive trigger: tSet(vtVerb)
- % body: compound(tSet(vtVerb)),\+is_ftVar(tSet(vtVerb))*->rhs([{with_current_why(tSet(vtVerb),ignore(\+addAdmittedArguments(tSet(vtVerb))))}])
- % Found positive trigger: tCol(vtVerb)
- % body: is_kif_clause(tCol(vtVerb))*->rhs([clif(tCol(vtVerb))])
- % Found positive trigger: tCol(vtVerb)
- % body: compound(tCol(vtVerb)),\+is_ftVar(tCol(vtVerb))*->rhs([{with_current_why(tCol(vtVerb),ignore(\+addAdmittedArguments(tCol(vtVerb))))}])
- % RHS-Post1: tCol(ftSpec)
- % Support: admittedArgument(resultIsa,2,ftSpec),pt(admittedArgument(resultIsa,2,_7294),(nonvar(_7294)*->rhs([tCol(_7294)])))
- % RHS-Post1: tCol(ftText)
- % Support: admittedArgument(resultIsa,2,ftText),pt(admittedArgument(resultIsa,2,_7294),(nonvar(_7294)*->rhs([tCol(_7294)])))
- % r_sane:mpred_fwc1(tCol(ftText)).
- % Found positive trigger: tCol(ftText)
- % body: rhs([{decl_type(ftText),kb_local(ftText/1)}])
- % warn(trace_or_throw(already_decl(kb_global, (baseKB->header_sane), ftText, 1))).
- % Found positive trigger: tCol(ftText)
- % body: rhs([arity(ftText,1)])
- % RHS-Post1: arity(ftText,1)
- % Support: tCol(ftText),pt(tCol(ftText),rhs([arity(ftText,1)]))
- % Found positive trigger: tCol(ftText)
- % body: compound(tCol(ftText)),\+is_ftVar(tCol(ftText))*->rhs([{with_current_why(tCol(ftText),ignore(\+addAdmittedArguments(tCol(ftText))))}])
- % Found positive trigger: tCol(ftText)
- % body: \+ttExpressionType(ftText)*->rhs([tSet(ftText)])
- % Found positive trigger: tCol(ftText)
- % body: is_kif_clause(tCol(ftText))*->rhs([clif(tCol(ftText))])
- % Found positive trigger: tCol(ftText)
- % body: compound(tCol(ftText)),\+is_ftVar(tCol(ftText))*->rhs([{with_current_why(tCol(ftText),ignore(\+addAdmittedArguments(tCol(ftText))))}])
- % RHS-Post1: tCol(ftInt)
- % Support: admittedArgument(resultIsa,2,ftInt),pt(admittedArgument(resultIsa,2,_7294),(nonvar(_7294)*->rhs([tCol(_7294)])))
- % RHS-Post1: poss(admittedArgument(resultIsa,2,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(resultIsa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(resultIsa, 2, _14516))/nonvar(_14516)==>tCol(_14516))).
- % Adding positive
- % trigger: poss(admittedArgument(resultIsa,2,_14516))
- % body: nonvar(_14516)*->rhs([tCol(_14516)])
- % Support: (poss(admittedArgument(resultIsa,2,_17198))/nonvar(_17198)==>tCol(_17198)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(vtVerb)
- % Support: poss(admittedArgument(resultIsa,2,vtVerb)),pt(poss(admittedArgument(resultIsa,2,_25490)),(nonvar(_25490)*->rhs([tCol(_25490)])))
- % RHS-Post1: tCol(ftSpec)
- % Support: poss(admittedArgument(resultIsa,2,ftSpec)),pt(poss(admittedArgument(resultIsa,2,_7344)),(nonvar(_7344)*->rhs([tCol(_7344)])))
- % RHS-Post1: tCol(ftText)
- % Support: poss(admittedArgument(resultIsa,2,ftText)),pt(poss(admittedArgument(resultIsa,2,_7344)),(nonvar(_7344)*->rhs([tCol(_7344)])))
- % RHS-Post1: tCol(ftInt)
- % Support: poss(admittedArgument(resultIsa,2,ftInt)),pt(poss(admittedArgument(resultIsa,2,_7344)),(nonvar(_7344)*->rhs([tCol(_7344)])))
- % RHS-Post1: tCol(ttExpressionType)
- % Support: argIsa(formatted_resultIsa,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(formatted_resultIsa,1,_2666)/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(formatted_resultIsa,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(formatted_resultIsa, 1, _21194)/nonvar(_21194)==>ttExpressionType(_21194))).
- % Adding positive
- % trigger: admittedArgument(formatted_resultIsa,1,_21194)
- % body: nonvar(_21194)*->rhs([ttExpressionType(_21194)])
- % Support: (admittedArgument(formatted_resultIsa,1,_23836)/nonvar(_23836)==>ttExpressionType(_23836)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(formatted_resultIsa,1,_2666))/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(formatted_resultIsa,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(formatted_resultIsa, 1, _14556))/nonvar(_14556)==>ttExpressionType(_14556))).
- % Adding positive
- % trigger: poss(admittedArgument(formatted_resultIsa,1,_14556))
- % body: nonvar(_14556)*->rhs([ttExpressionType(_14556)])
- % Support: (poss(admittedArgument(formatted_resultIsa,1,_17250))/nonvar(_17250)==>ttExpressionType(_17250)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(formatted_resultIsa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(formatted_resultIsa,2,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(formatted_resultIsa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(formatted_resultIsa, 2, _21194)/nonvar(_21194)==>tCol(_21194))).
- % Adding positive
- % trigger: admittedArgument(formatted_resultIsa,2,_21194)
- % body: nonvar(_21194)*->rhs([tCol(_21194)])
- % Support: (admittedArgument(formatted_resultIsa,2,_23830)/nonvar(_23830)==>tCol(_23830)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(formatted_resultIsa,2,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(formatted_resultIsa,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(formatted_resultIsa, 2, _14568))/nonvar(_14568)==>tCol(_14568))).
- % Adding positive
- % trigger: poss(admittedArgument(formatted_resultIsa,2,_14568))
- % body: nonvar(_14568)*->rhs([tCol(_14568)])
- % Support: (poss(admittedArgument(formatted_resultIsa,2,_17256))/nonvar(_17256)==>tCol(_17256)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tObj)
- % Support: argIsa(localityOfObject,1,tObj),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(localityOfObject,1,_2666)/nonvar(_2666)==>isa(_2666,tObj)
- % Support: argIsa(localityOfObject,1,tObj),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(localityOfObject, 1, _21216)/nonvar(_21216)==>tObj(_21216))).
- % Adding positive
- % trigger: admittedArgument(localityOfObject,1,_6758)
- % body: nonvar(_6758)*->rhs([tObj(_6758)])
- % Support: (admittedArgument(localityOfObject,1,_6940)/nonvar(_6940)==>tObj(_6940)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(localityOfObject,1,_2666))/nonvar(_2666)==>isa(_2666,tObj)
- % Support: argIsa(localityOfObject,1,tObj),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(localityOfObject, 1, _22992))/nonvar(_22992)==>tObj(_22992))).
- % Adding positive
- % trigger: poss(admittedArgument(localityOfObject,1,_22992))
- % body: nonvar(_22992)*->rhs([tObj(_22992)])
- % Support: (poss(admittedArgument(localityOfObject,1,_25678))/nonvar(_25678)==>tObj(_25678)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tSpatialThing)
- % Support: argIsa(localityOfObject,2,tSpatialThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(localityOfObject,2,_2666)/nonvar(_2666)==>isa(_2666,tSpatialThing)
- % Support: argIsa(localityOfObject,2,tSpatialThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(localityOfObject, 2, _21276)/nonvar(_21276)==>tSpatialThing(_21276))).
- % Adding positive
- % trigger: admittedArgument(localityOfObject,2,_6776)
- % body: nonvar(_6776)*->rhs([tSpatialThing(_6776)])
- % Support: (admittedArgument(localityOfObject,2,_6958)/nonvar(_6958)==>tSpatialThing(_6958)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(localityOfObject,2,_2666))/nonvar(_2666)==>isa(_2666,tSpatialThing)
- % Support: argIsa(localityOfObject,2,tSpatialThing),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(localityOfObject, 2, _23030))/nonvar(_23030)==>tSpatialThing(_23030))).
- % Adding positive
- % trigger: poss(admittedArgument(localityOfObject,2,_23030))
- % body: nonvar(_23030)*->rhs([tSpatialThing(_23030)])
- % Support: (poss(admittedArgument(localityOfObject,2,_25720))/nonvar(_25720)==>tSpatialThing(_25720)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttExpressionType)
- % Support: argIsa(subFormat,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(subFormat,1,_2666)/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(subFormat,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(subFormat, 1, _21290)/nonvar(_21290)==>ttExpressionType(_21290))).
- % Adding positive
- % trigger: admittedArgument(subFormat,1,_21290)
- % body: nonvar(_21290)*->rhs([ttExpressionType(_21290)])
- % Support: (admittedArgument(subFormat,1,_23928)/nonvar(_23928)==>ttExpressionType(_23928)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(subFormat,1,_2666))/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(subFormat,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(subFormat, 1, _14654))/nonvar(_14654)==>ttExpressionType(_14654))).
- % Adding positive
- % trigger: poss(admittedArgument(subFormat,1,_14654))
- % body: nonvar(_14654)*->rhs([ttExpressionType(_14654)])
- % Support: (poss(admittedArgument(subFormat,1,_17342))/nonvar(_17342)==>ttExpressionType(_17342)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttExpressionType)
- % Support: argIsa(subFormat,2,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(subFormat,2,_2666)/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(subFormat,2,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(subFormat, 2, _21314)/nonvar(_21314)==>ttExpressionType(_21314))).
- % Adding positive
- % trigger: admittedArgument(subFormat,2,_21314)
- % body: nonvar(_21314)*->rhs([ttExpressionType(_21314)])
- % Support: (admittedArgument(subFormat,2,_23952)/nonvar(_23952)==>ttExpressionType(_23952)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: ttExpressionType(ftSpec)
- % Support: admittedArgument(subFormat,2,ftSpec),pt(admittedArgument(subFormat,2,_7464),(nonvar(_7464)*->rhs([ttExpressionType(_7464)])))
- % r_sane:mpred_fwc1(ttExpressionType(ftSpec)).
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: rhs([tCol(ftSpec),\+tSet(ftSpec)])
- % RHS-Post1: tCol(ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([tCol(ftSpec),\+tSet(ftSpec)]))
- % RHS-Withdrawing-Negation: \+tSet(ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([tCol(ftSpec),\+tSet(ftSpec)]))
- % Removing (withdraw1)
- % term: tSet(ftSpec)
- % support (was): _29130,_29132
- % Couldn't retract_i: spft(tSet(ftSpec),_8796,_8798).
- % show_failure(mpred_undo1, retract_u(tSet(ftSpec))).
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: rhs([tCol(ftSpec)])
- % RHS-Post1: tCol(ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([tCol(ftSpec)]))
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: rhs([\+completelyAssertedCollection(ftSpec)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([\+completelyAssertedCollection(ftSpec)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftSpec)
- % support (was): _32750,_32752
- % Couldn't retract_i: spft(completelyAssertedCollection(ftSpec),_8786,_8788).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftSpec))).
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: rhs([\+completelyAssertedCollection(ftSpec),~tSet(ftSpec),tCol(ftSpec)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([\+completelyAssertedCollection(ftSpec),~tSet(ftSpec),tCol(ftSpec)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftSpec)
- % support (was): _23498,_23500
- % Couldn't retract_i: spft(completelyAssertedCollection(ftSpec),_27710,_27712).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftSpec))).
- % RHS-Post1: ~tSet(ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([\+completelyAssertedCollection(ftSpec),~tSet(ftSpec),tCol(ftSpec)]))
- % r_sane:mpred_fwc1(~tSet(ftSpec)).
- % Found positive trigger: ~tSet(ftSpec)
- % body: compound(~tSet(ftSpec)),\+is_ftVar(~tSet(ftSpec))*->rhs([{with_current_why(~tSet(ftSpec),ignore(\+addAdmittedArguments(~tSet(ftSpec))))}])
- % Found positive trigger: ~tSet(ftSpec)
- % body: is_kif_clause(~tSet(ftSpec))*->rhs([clif(~tSet(ftSpec))])
- % Found positive trigger: ~tSet(ftSpec)
- % body: compound(~tSet(ftSpec)),\+is_ftVar(~tSet(ftSpec))*->rhs([{with_current_why(~tSet(ftSpec),ignore(\+addAdmittedArguments(~tSet(ftSpec))))}])
- % RHS-Post1: tCol(ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([\+completelyAssertedCollection(ftSpec),~tSet(ftSpec),tCol(ftSpec)]))
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: is_ftCompound(ftSpec)*->rhs([meta_argtypes(ftSpec)])
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: compound(ttExpressionType(ftSpec)),\+is_ftVar(ttExpressionType(ftSpec))*->rhs([{with_current_why(ttExpressionType(ftSpec),ignore(\+addAdmittedArguments(ttExpressionType(ftSpec))))}])
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: rhs([(argIsa(_22372,_22374,ftSpec),{number(_22374)}==>argQuotedIsa(_22372,_22374,ftSpec))])
- % RHS-Post1: argIsa(_22372,_22374,ftSpec),{number(_22374)}==>argQuotedIsa(_22372,_22374,ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([(argIsa(_22372,_22374,ftSpec),{number(_22374)}==>argQuotedIsa(_22372,_22374,ftSpec))]))
- % r_sane:mpred_fwc1((argIsa(_36594, _36596, ftSpec), {number(_36596)}==>argQuotedIsa(_36594, _36596, ftSpec))).
- % Adding positive
- % trigger: argIsa(_9314,_9316,ftSpec)
- % body: number(_9316)*->rhs([argQuotedIsa(_9314,_9316,ftSpec)])
- % Support: (argIsa(_9516,_9518,ftSpec),{number(_9518)}==>argQuotedIsa(_9516,_9518,ftSpec)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: argQuotedIsa(isOptional,1,ftSpec)
- % Support: argIsa(isOptional,1,ftSpec),pt(argIsa(_15572,_15574,ftSpec),(number(_15574)*->rhs([argQuotedIsa(_15572,_15574,ftSpec)])))
- % r_sane:mpred_fwc1(argQuotedIsa(isOptional, 1, ftSpec)).
- % Found positive trigger: argQuotedIsa(isOptional,1,ftSpec)
- % body: compound(argQuotedIsa(isOptional,1,ftSpec)),\+is_ftVar(argQuotedIsa(isOptional,1,ftSpec))*->rhs([{with_current_why(argQuotedIsa(isOptional,1,ftSpec),ignore(\+addAdmittedArguments(argQuotedIsa(isOptional,1,ftSpec))))}])
- % Found positive trigger: argQuotedIsa(isOptional,1,ftSpec)
- % body: is_kif_clause(argQuotedIsa(isOptional,1,ftSpec))*->rhs([clif(argQuotedIsa(isOptional,1,ftSpec))])
- % Found positive trigger: argQuotedIsa(isOptional,1,ftSpec)
- % body: compound(argQuotedIsa(isOptional,1,ftSpec)),\+is_ftVar(argQuotedIsa(isOptional,1,ftSpec))*->rhs([{with_current_why(argQuotedIsa(isOptional,1,ftSpec),ignore(\+addAdmittedArguments(argQuotedIsa(isOptional,1,ftSpec))))}])
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: append_term(ftSpec,_17728,_17730)*->rhs([{_17748=(_17730:-!,term_is_ft(_17728,ftSpec))},_17748])
- % RHS-Post1: ftSpec(_17728):-!,term_is_ft(_17728,ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),(append_term(ftSpec,_17728,ftSpec(_17728))*->rhs([{(ftSpec(_17728):-!,term_is_ft(_17728,ftSpec))=(ftSpec(_17728):-!,term_is_ft(_17728,ftSpec))},(ftSpec(_17728):-!,term_is_ft(_17728,ftSpec))])))
- % r_sane:mpred_fwc1((ftSpec(_34190):-!, term_is_ft(_34190, ftSpec))).
- % Found positive trigger: ftSpec(_37266):-!,term_is_ft(_37266,ftSpec)
- % body: compound((ftSpec(_37266):-!,term_is_ft(_37266,ftSpec))),\+is_ftVar((ftSpec(_37266):-!,term_is_ft(_37266,ftSpec)))*->rhs([{with_current_why((ftSpec(_37266):-!,term_is_ft(_37266,ftSpec)),ignore(\+addAdmittedArguments((ftSpec(_37266):-!,term_is_ft(_37266,ftSpec)))))}])
- % Found positive trigger: ftSpec(_9552):-!,term_is_ft(_9552,ftSpec)
- % body: is_kif_clause((ftSpec(_9552):-!,term_is_ft(_9552,ftSpec)))*->rhs([clif((ftSpec(_9552):-!,term_is_ft(_9552,ftSpec)))])
- % Found positive trigger: ftSpec(_9552):-!,term_is_ft(_9552,ftSpec)
- % body: compound((ftSpec(_9552):-!,term_is_ft(_9552,ftSpec))),\+is_ftVar((ftSpec(_9552):-!,term_is_ft(_9552,ftSpec)))*->rhs([{with_current_why((ftSpec(_9552):-!,term_is_ft(_9552,ftSpec)),ignore(\+addAdmittedArguments((ftSpec(_9552):-!,term_is_ft(_9552,ftSpec)))))}])
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: rhs([rtAvoidForwardChain(ftSpec)])
- % RHS-Post1: rtAvoidForwardChain(ftSpec)
- % Support: ttExpressionType(ftSpec),pt(ttExpressionType(ftSpec),rhs([rtAvoidForwardChain(ftSpec)]))
- % r_sane:mpred_fwc1(rtAvoidForwardChain(ftSpec)).
- % Found positive trigger: rtAvoidForwardChain(ftSpec)
- % body: rhs([tRelation(ftSpec)])
- % RHS-Post1: tRelation(ftSpec)
- % Support: rtAvoidForwardChain(ftSpec),pt(rtAvoidForwardChain(ftSpec),rhs([tRelation(ftSpec)]))
- % r_sane:mpred_fwc1(tRelation(ftSpec)).
- % Found positive trigger: tRelation(ftSpec)
- % body: nt(tFunction(ftSpec),call_u_no_bc(tFunction(ftSpec)),rhs([tPred(ftSpec)]))
- % Adding negative
- % trigger: tFunction(ftSpec)
- % test: call_u_no_bc(tFunction(ftSpec))
- % body: rhs([tPred(ftSpec)])
- % Support: tRelation(ftSpec),pt(tRelation(ftSpec),nt(tFunction(ftSpec),call_u_no_bc(tFunction(ftSpec)),rhs([tPred(ftSpec)])))
- % RHS-Post1: tPred(ftSpec)
- % Support: \+tFunction(ftSpec),nt(tFunction(ftSpec),call_u_no_bc(tFunction(ftSpec)),rhs([tPred(ftSpec)]))
- % r_sane:mpred_fwc1(tPred(ftSpec)).
- % Found positive trigger: tPred(ftSpec)
- % body: rhs([tRelation(ftSpec)])
- % RHS-Post1: tRelation(ftSpec)
- % Support: tPred(ftSpec),pt(tPred(ftSpec),rhs([tRelation(ftSpec)]))
- % Found positive trigger: tPred(ftSpec)
- % body: compound(tPred(ftSpec)),\+is_ftVar(tPred(ftSpec))*->rhs([{with_current_why(tPred(ftSpec),ignore(\+addAdmittedArguments(tPred(ftSpec))))}])
- % Found positive trigger: tPred(ftSpec)
- % body: arity(ftSpec,2)*->rhs([rtBinaryPredicate(ftSpec)])
- % Found positive trigger: tPred(ftSpec)
- % body: is_kif_clause(tPred(ftSpec))*->rhs([clif(tPred(ftSpec))])
- % Found positive trigger: tPred(ftSpec)
- % body: compound(tPred(ftSpec)),\+is_ftVar(tPred(ftSpec))*->rhs([{with_current_why(tPred(ftSpec),ignore(\+addAdmittedArguments(tPred(ftSpec))))}])
- % Found positive trigger: tRelation(ftSpec)
- % body: compound(tRelation(ftSpec)),\+is_ftVar(tRelation(ftSpec))*->rhs([{with_current_why(tRelation(ftSpec),ignore(\+addAdmittedArguments(tRelation(ftSpec))))}])
- % Found positive trigger: tRelation(ftSpec)
- % body: is_kif_clause(tRelation(ftSpec))*->rhs([clif(tRelation(ftSpec))])
- % Found positive trigger: tRelation(ftSpec)
- % body: compound(tRelation(ftSpec)),\+is_ftVar(tRelation(ftSpec))*->rhs([{with_current_why(tRelation(ftSpec),ignore(\+addAdmittedArguments(tRelation(ftSpec))))}])
- % Found positive trigger: rtAvoidForwardChain(ftSpec)
- % body: compound(rtAvoidForwardChain(ftSpec)),\+is_ftVar(rtAvoidForwardChain(ftSpec))*->rhs([{with_current_why(rtAvoidForwardChain(ftSpec),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftSpec))))}])
- % Found positive trigger: rtAvoidForwardChain(ftSpec)
- % body: is_kif_clause(rtAvoidForwardChain(ftSpec))*->rhs([clif(rtAvoidForwardChain(ftSpec))])
- % Found positive trigger: rtAvoidForwardChain(ftSpec)
- % body: compound(rtAvoidForwardChain(ftSpec)),\+is_ftVar(rtAvoidForwardChain(ftSpec))*->rhs([{with_current_why(rtAvoidForwardChain(ftSpec),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftSpec))))}])
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: is_kif_clause(ttExpressionType(ftSpec))*->rhs([clif(ttExpressionType(ftSpec))])
- % Found positive trigger: ttExpressionType(ftSpec)
- % body: compound(ttExpressionType(ftSpec)),\+is_ftVar(ttExpressionType(ftSpec))*->rhs([{with_current_why(ttExpressionType(ftSpec),ignore(\+addAdmittedArguments(ttExpressionType(ftSpec))))}])
- % RHS-Post1: ttExpressionType(ftTerm)
- % Support: admittedArgument(subFormat,2,ftTerm),pt(admittedArgument(subFormat,2,_7438),(nonvar(_7438)*->rhs([ttExpressionType(_7438)])))
- % r_sane:mpred_fwc1(ttExpressionType(ftTerm)).
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: rhs([tCol(ftTerm),\+tSet(ftTerm)])
- % RHS-Post1: tCol(ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([tCol(ftTerm),\+tSet(ftTerm)]))
- % RHS-Withdrawing-Negation: \+tSet(ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([tCol(ftTerm),\+tSet(ftTerm)]))
- % Removing (withdraw1)
- % term: tSet(ftTerm)
- % support (was): tCol(ftTerm),pt(tCol(ftTerm),(\+ttExpressionType(ftTerm)*->rhs([tSet(ftTerm)])))
- % SUCCESS: retract_u(spft(tSet(ftTerm),tCol(ftTerm),pt(tCol(ftTerm),(\+ttExpressionType(ftTerm)*->rhs([tSet(ftTerm)])))))
- % SUCCESS: retract_u(spft(functorDeclares(ftTerm),tSet(ftTerm),pt(tSet(ftTerm),rhs([functorDeclares(ftTerm)]))))
- % SUCCESS: retract_u(spft(arityMax(ftTerm,1),functorDeclares(ftTerm),pt(functorDeclares(ftTerm),rhs([arityMax(ftTerm,1),functorIsMacro(ftTerm)]))))
- % SUCCESS: retract_u(spft(functorIsMacro(ftTerm),functorDeclares(ftTerm),pt(functorDeclares(ftTerm),rhs([arityMax(ftTerm,1),functorIsMacro(ftTerm)]))))
- % SUCCESS: retract_u(spft(tCol(ftTerm),tSet(ftTerm),pt(tSet(ftTerm),rhs([tCol(ftTerm),\+ttExpressionType(ftTerm)]))))
- % still_supported(tCol(ftTerm))
- % SUCCESS: retract_u(spft(tCol(ftTerm),tSet(ftTerm),pt(tSet(ftTerm),rhs([tCol(ftTerm)]))))
- % still_supported(tCol(ftTerm))
- % Couldn't retract_i: spft(tSet(ftTerm),_27676,_27678).
- % show_failure(mpred_undo1, retract_u(tSet(ftTerm))).
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: rhs([tCol(ftTerm)])
- % RHS-Post1: tCol(ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([tCol(ftTerm)]))
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: rhs([\+completelyAssertedCollection(ftTerm)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([\+completelyAssertedCollection(ftTerm)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftTerm)
- % support (was): _23696,_23698
- % Couldn't retract_i: spft(completelyAssertedCollection(ftTerm),_27908,_27910).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftTerm))).
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: rhs([\+completelyAssertedCollection(ftTerm),~tSet(ftTerm),tCol(ftTerm)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([\+completelyAssertedCollection(ftTerm),~tSet(ftTerm),tCol(ftTerm)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftTerm)
- % support (was): _14268,_14270
- % Couldn't retract_i: spft(completelyAssertedCollection(ftTerm),_18480,_18482).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftTerm))).
- % RHS-Post1: ~tSet(ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([\+completelyAssertedCollection(ftTerm),~tSet(ftTerm),tCol(ftTerm)]))
- % r_sane:mpred_fwc1(~tSet(ftTerm)).
- % Found positive trigger: ~tSet(ftTerm)
- % body: compound(~tSet(ftTerm)),\+is_ftVar(~tSet(ftTerm))*->rhs([{with_current_why(~tSet(ftTerm),ignore(\+addAdmittedArguments(~tSet(ftTerm))))}])
- % Found positive trigger: ~tSet(ftTerm)
- % body: is_kif_clause(~tSet(ftTerm))*->rhs([clif(~tSet(ftTerm))])
- % Found positive trigger: ~tSet(ftTerm)
- % body: compound(~tSet(ftTerm)),\+is_ftVar(~tSet(ftTerm))*->rhs([{with_current_why(~tSet(ftTerm),ignore(\+addAdmittedArguments(~tSet(ftTerm))))}])
- % RHS-Post1: tCol(ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([\+completelyAssertedCollection(ftTerm),~tSet(ftTerm),tCol(ftTerm)]))
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: is_ftCompound(ftTerm)*->rhs([meta_argtypes(ftTerm)])
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: compound(ttExpressionType(ftTerm)),\+is_ftVar(ttExpressionType(ftTerm))*->rhs([{with_current_why(ttExpressionType(ftTerm),ignore(\+addAdmittedArguments(ttExpressionType(ftTerm))))}])
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: rhs([(argIsa(_8510,_8512,ftTerm),{number(_8512)}==>argQuotedIsa(_8510,_8512,ftTerm))])
- % RHS-Post1: argIsa(_8510,_8512,ftTerm),{number(_8512)}==>argQuotedIsa(_8510,_8512,ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([(argIsa(_8510,_8512,ftTerm),{number(_8512)}==>argQuotedIsa(_8510,_8512,ftTerm))]))
- % r_sane:mpred_fwc1((argIsa(_21322, _21324, ftTerm), {number(_21324)}==>argQuotedIsa(_21322, _21324, ftTerm))).
- % Adding positive
- % trigger: argIsa(_21322,_21324,ftTerm)
- % body: number(_21324)*->rhs([argQuotedIsa(_21322,_21324,ftTerm)])
- % Support: (argIsa(_24596,_24598,ftTerm),{number(_24598)}==>argQuotedIsa(_24596,_24598,ftTerm)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: argQuotedIsa(singleValuedInArgDefault,3,ftTerm)
- % Support: argIsa(singleValuedInArgDefault,3,ftTerm),pt(argIsa(_10024,_10026,ftTerm),(number(_10026)*->rhs([argQuotedIsa(_10024,_10026,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(singleValuedInArgDefault, 3, ftTerm)).
- % Found positive trigger: argQuotedIsa(singleValuedInArgDefault,3,ftTerm)
- % body: compound(argQuotedIsa(singleValuedInArgDefault,3,ftTerm)),\+is_ftVar(argQuotedIsa(singleValuedInArgDefault,3,ftTerm))*->rhs([{with_current_why(argQuotedIsa(singleValuedInArgDefault,3,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(singleValuedInArgDefault,3,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(singleValuedInArgDefault,3,ftTerm)
- % body: is_kif_clause(argQuotedIsa(singleValuedInArgDefault,3,ftTerm))*->rhs([clif(argQuotedIsa(singleValuedInArgDefault,3,ftTerm))])
- % Found positive trigger: argQuotedIsa(singleValuedInArgDefault,3,ftTerm)
- % body: compound(argQuotedIsa(singleValuedInArgDefault,3,ftTerm)),\+is_ftVar(argQuotedIsa(singleValuedInArgDefault,3,ftTerm))*->rhs([{with_current_why(argQuotedIsa(singleValuedInArgDefault,3,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(singleValuedInArgDefault,3,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(isa,1,ftTerm)
- % Support: argIsa(isa,1,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(isa, 1, ftTerm)).
- % Found positive trigger: argQuotedIsa(isa,1,ftTerm)
- % body: compound(argQuotedIsa(isa,1,ftTerm)),\+is_ftVar(argQuotedIsa(isa,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(isa,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(isa,1,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(isa,1,ftTerm)
- % body: is_kif_clause(argQuotedIsa(isa,1,ftTerm))*->rhs([clif(argQuotedIsa(isa,1,ftTerm))])
- % Found positive trigger: argQuotedIsa(isa,1,ftTerm)
- % body: compound(argQuotedIsa(isa,1,ftTerm)),\+is_ftVar(argQuotedIsa(isa,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(isa,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(isa,1,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(mudToCyc,1,ftTerm)
- % Support: argIsa(mudToCyc,1,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(mudToCyc, 1, ftTerm)).
- % Found positive trigger: argQuotedIsa(mudToCyc,1,ftTerm)
- % body: compound(argQuotedIsa(mudToCyc,1,ftTerm)),\+is_ftVar(argQuotedIsa(mudToCyc,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(mudToCyc,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(mudToCyc,1,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(mudToCyc,1,ftTerm)
- % body: is_kif_clause(argQuotedIsa(mudToCyc,1,ftTerm))*->rhs([clif(argQuotedIsa(mudToCyc,1,ftTerm))])
- % Found positive trigger: argQuotedIsa(mudToCyc,1,ftTerm)
- % body: compound(argQuotedIsa(mudToCyc,1,ftTerm)),\+is_ftVar(argQuotedIsa(mudToCyc,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(mudToCyc,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(mudToCyc,1,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(mudToCyc,2,ftTerm)
- % Support: argIsa(mudToCyc,2,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(mudToCyc, 2, ftTerm)).
- % Found positive trigger: argQuotedIsa(mudToCyc,2,ftTerm)
- % body: compound(argQuotedIsa(mudToCyc,2,ftTerm)),\+is_ftVar(argQuotedIsa(mudToCyc,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(mudToCyc,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(mudToCyc,2,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(mudToCyc,2,ftTerm)
- % body: is_kif_clause(argQuotedIsa(mudToCyc,2,ftTerm))*->rhs([clif(argQuotedIsa(mudToCyc,2,ftTerm))])
- % Found positive trigger: argQuotedIsa(mudToCyc,2,ftTerm)
- % body: compound(argQuotedIsa(mudToCyc,2,ftTerm)),\+is_ftVar(argQuotedIsa(mudToCyc,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(mudToCyc,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(mudToCyc,2,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(pddlSomethingIsa,1,ftTerm)
- % Support: argIsa(pddlSomethingIsa,1,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(pddlSomethingIsa, 1, ftTerm)).
- % Found positive trigger: argQuotedIsa(pddlSomethingIsa,1,ftTerm)
- % body: compound(argQuotedIsa(pddlSomethingIsa,1,ftTerm)),\+is_ftVar(argQuotedIsa(pddlSomethingIsa,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(pddlSomethingIsa,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(pddlSomethingIsa,1,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(pddlSomethingIsa,1,ftTerm)
- % body: is_kif_clause(argQuotedIsa(pddlSomethingIsa,1,ftTerm))*->rhs([clif(argQuotedIsa(pddlSomethingIsa,1,ftTerm))])
- % Found positive trigger: argQuotedIsa(pddlSomethingIsa,1,ftTerm)
- % body: compound(argQuotedIsa(pddlSomethingIsa,1,ftTerm)),\+is_ftVar(argQuotedIsa(pddlSomethingIsa,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(pddlSomethingIsa,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(pddlSomethingIsa,1,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(quotedIsa,1,ftTerm)
- % Support: argIsa(quotedIsa,1,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(quotedIsa, 1, ftTerm)).
- % Found positive trigger: argQuotedIsa(quotedIsa,1,ftTerm)
- % body: compound(argQuotedIsa(quotedIsa,1,ftTerm)),\+is_ftVar(argQuotedIsa(quotedIsa,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(quotedIsa,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(quotedIsa,1,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(quotedIsa,1,ftTerm)
- % body: is_kif_clause(argQuotedIsa(quotedIsa,1,ftTerm))*->rhs([clif(argQuotedIsa(quotedIsa,1,ftTerm))])
- % Found positive trigger: argQuotedIsa(quotedIsa,1,ftTerm)
- % body: compound(argQuotedIsa(quotedIsa,1,ftTerm)),\+is_ftVar(argQuotedIsa(quotedIsa,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(quotedIsa,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(quotedIsa,1,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(predProxyAssert,2,ftTerm)
- % Support: argIsa(predProxyAssert,2,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(predProxyAssert, 2, ftTerm)).
- % Found positive trigger: argQuotedIsa(predProxyAssert,2,ftTerm)
- % body: compound(argQuotedIsa(predProxyAssert,2,ftTerm)),\+is_ftVar(argQuotedIsa(predProxyAssert,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(predProxyAssert,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(predProxyAssert,2,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(predProxyAssert,2,ftTerm)
- % body: is_kif_clause(argQuotedIsa(predProxyAssert,2,ftTerm))*->rhs([clif(argQuotedIsa(predProxyAssert,2,ftTerm))])
- % Found positive trigger: argQuotedIsa(predProxyAssert,2,ftTerm)
- % body: compound(argQuotedIsa(predProxyAssert,2,ftTerm)),\+is_ftVar(argQuotedIsa(predProxyAssert,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(predProxyAssert,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(predProxyAssert,2,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(predProxyQuery,2,ftTerm)
- % Support: argIsa(predProxyQuery,2,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(predProxyQuery, 2, ftTerm)).
- % Found positive trigger: argQuotedIsa(predProxyQuery,2,ftTerm)
- % body: compound(argQuotedIsa(predProxyQuery,2,ftTerm)),\+is_ftVar(argQuotedIsa(predProxyQuery,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(predProxyQuery,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(predProxyQuery,2,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(predProxyQuery,2,ftTerm)
- % body: is_kif_clause(argQuotedIsa(predProxyQuery,2,ftTerm))*->rhs([clif(argQuotedIsa(predProxyQuery,2,ftTerm))])
- % Found positive trigger: argQuotedIsa(predProxyQuery,2,ftTerm)
- % body: compound(argQuotedIsa(predProxyQuery,2,ftTerm)),\+is_ftVar(argQuotedIsa(predProxyQuery,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(predProxyQuery,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(predProxyQuery,2,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(isOptional,2,ftTerm)
- % Support: argIsa(isOptional,2,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(isOptional, 2, ftTerm)).
- % Found positive trigger: argQuotedIsa(isOptional,2,ftTerm)
- % body: compound(argQuotedIsa(isOptional,2,ftTerm)),\+is_ftVar(argQuotedIsa(isOptional,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(isOptional,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(isOptional,2,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(isOptional,2,ftTerm)
- % body: is_kif_clause(argQuotedIsa(isOptional,2,ftTerm))*->rhs([clif(argQuotedIsa(isOptional,2,ftTerm))])
- % Found positive trigger: argQuotedIsa(isOptional,2,ftTerm)
- % body: compound(argQuotedIsa(isOptional,2,ftTerm)),\+is_ftVar(argQuotedIsa(isOptional,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(isOptional,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(isOptional,2,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(quotedDefnIff,2,ftTerm)
- % Support: argIsa(quotedDefnIff,2,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(quotedDefnIff, 2, ftTerm)).
- % Found positive trigger: argQuotedIsa(quotedDefnIff,2,ftTerm)
- % body: compound(argQuotedIsa(quotedDefnIff,2,ftTerm)),\+is_ftVar(argQuotedIsa(quotedDefnIff,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(quotedDefnIff,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(quotedDefnIff,2,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(quotedDefnIff,2,ftTerm)
- % body: is_kif_clause(argQuotedIsa(quotedDefnIff,2,ftTerm))*->rhs([clif(argQuotedIsa(quotedDefnIff,2,ftTerm))])
- % Found positive trigger: argQuotedIsa(quotedDefnIff,2,ftTerm)
- % body: compound(argQuotedIsa(quotedDefnIff,2,ftTerm)),\+is_ftVar(argQuotedIsa(quotedDefnIff,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(quotedDefnIff,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(quotedDefnIff,2,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(defnNecessary,2,ftTerm)
- % Support: argIsa(defnNecessary,2,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(defnNecessary, 2, ftTerm)).
- % Found positive trigger: argQuotedIsa(defnNecessary,2,ftTerm)
- % body: compound(argQuotedIsa(defnNecessary,2,ftTerm)),\+is_ftVar(argQuotedIsa(defnNecessary,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(defnNecessary,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(defnNecessary,2,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(defnNecessary,2,ftTerm)
- % body: is_kif_clause(argQuotedIsa(defnNecessary,2,ftTerm))*->rhs([clif(argQuotedIsa(defnNecessary,2,ftTerm))])
- % Found positive trigger: argQuotedIsa(defnNecessary,2,ftTerm)
- % body: compound(argQuotedIsa(defnNecessary,2,ftTerm)),\+is_ftVar(argQuotedIsa(defnNecessary,2,ftTerm))*->rhs([{with_current_why(argQuotedIsa(defnNecessary,2,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(defnNecessary,2,ftTerm))))}])
- % RHS-Post1: argQuotedIsa(comment,1,ftTerm)
- % Support: argIsa(comment,1,ftTerm),pt(argIsa(_10000,_10002,ftTerm),(number(_10002)*->rhs([argQuotedIsa(_10000,_10002,ftTerm)])))
- % r_sane:mpred_fwc1(argQuotedIsa(comment, 1, ftTerm)).
- % Found positive trigger: argQuotedIsa(comment,1,ftTerm)
- % body: compound(argQuotedIsa(comment,1,ftTerm)),\+is_ftVar(argQuotedIsa(comment,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(comment,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(comment,1,ftTerm))))}])
- % Found positive trigger: argQuotedIsa(comment,1,ftTerm)
- % body: is_kif_clause(argQuotedIsa(comment,1,ftTerm))*->rhs([clif(argQuotedIsa(comment,1,ftTerm))])
- % Found positive trigger: argQuotedIsa(comment,1,ftTerm)
- % body: compound(argQuotedIsa(comment,1,ftTerm)),\+is_ftVar(argQuotedIsa(comment,1,ftTerm))*->rhs([{with_current_why(argQuotedIsa(comment,1,ftTerm),ignore(\+addAdmittedArguments(argQuotedIsa(comment,1,ftTerm))))}])
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: append_term(ftTerm,_8500,_8502)*->rhs([{_8520=(_8502:-!,term_is_ft(_8500,ftTerm))},_8520])
- % RHS-Post1: ftTerm(_8500):-!,term_is_ft(_8500,ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),(append_term(ftTerm,_8500,ftTerm(_8500))*->rhs([{(ftTerm(_8500):-!,term_is_ft(_8500,ftTerm))=(ftTerm(_8500):-!,term_is_ft(_8500,ftTerm))},(ftTerm(_8500):-!,term_is_ft(_8500,ftTerm))])))
- % r_sane:mpred_fwc1((ftTerm(_23496):-!, term_is_ft(_23496, ftTerm))).
- % Found positive trigger: ftTerm(_26572):-!,term_is_ft(_26572,ftTerm)
- % body: compound((ftTerm(_26572):-!,term_is_ft(_26572,ftTerm))),\+is_ftVar((ftTerm(_26572):-!,term_is_ft(_26572,ftTerm)))*->rhs([{with_current_why((ftTerm(_26572):-!,term_is_ft(_26572,ftTerm)),ignore(\+addAdmittedArguments((ftTerm(_26572):-!,term_is_ft(_26572,ftTerm)))))}])
- % Found positive trigger: ftTerm(_9584):-!,term_is_ft(_9584,ftTerm)
- % body: is_kif_clause((ftTerm(_9584):-!,term_is_ft(_9584,ftTerm)))*->rhs([clif((ftTerm(_9584):-!,term_is_ft(_9584,ftTerm)))])
- % Found positive trigger: ftTerm(_9584):-!,term_is_ft(_9584,ftTerm)
- % body: compound((ftTerm(_9584):-!,term_is_ft(_9584,ftTerm))),\+is_ftVar((ftTerm(_9584):-!,term_is_ft(_9584,ftTerm)))*->rhs([{with_current_why((ftTerm(_9584):-!,term_is_ft(_9584,ftTerm)),ignore(\+addAdmittedArguments((ftTerm(_9584):-!,term_is_ft(_9584,ftTerm)))))}])
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: rhs([rtAvoidForwardChain(ftTerm)])
- % RHS-Post1: rtAvoidForwardChain(ftTerm)
- % Support: ttExpressionType(ftTerm),pt(ttExpressionType(ftTerm),rhs([rtAvoidForwardChain(ftTerm)]))
- % r_sane:mpred_fwc1(rtAvoidForwardChain(ftTerm)).
- % Found positive trigger: rtAvoidForwardChain(ftTerm)
- % body: rhs([tRelation(ftTerm)])
- % RHS-Post1: tRelation(ftTerm)
- % Support: rtAvoidForwardChain(ftTerm),pt(rtAvoidForwardChain(ftTerm),rhs([tRelation(ftTerm)]))
- % r_sane:mpred_fwc1(tRelation(ftTerm)).
- % Found positive trigger: tRelation(ftTerm)
- % body: nt(tFunction(ftTerm),call_u_no_bc(tFunction(ftTerm)),rhs([tPred(ftTerm)]))
- % Adding negative
- % trigger: tFunction(ftTerm)
- % test: call_u_no_bc(tFunction(ftTerm))
- % body: rhs([tPred(ftTerm)])
- % Support: tRelation(ftTerm),pt(tRelation(ftTerm),nt(tFunction(ftTerm),call_u_no_bc(tFunction(ftTerm)),rhs([tPred(ftTerm)])))
- % RHS-Post1: tPred(ftTerm)
- % Support: \+tFunction(ftTerm),nt(tFunction(ftTerm),call_u_no_bc(tFunction(ftTerm)),rhs([tPred(ftTerm)]))
- % r_sane:mpred_fwc1(tPred(ftTerm)).
- % Found positive trigger: tPred(ftTerm)
- % body: rhs([tRelation(ftTerm)])
- % RHS-Post1: tRelation(ftTerm)
- % Support: tPred(ftTerm),pt(tPred(ftTerm),rhs([tRelation(ftTerm)]))
- % Found positive trigger: tPred(ftTerm)
- % body: compound(tPred(ftTerm)),\+is_ftVar(tPred(ftTerm))*->rhs([{with_current_why(tPred(ftTerm),ignore(\+addAdmittedArguments(tPred(ftTerm))))}])
- % Found positive trigger: tPred(ftTerm)
- % body: arity(ftTerm,2)*->rhs([rtBinaryPredicate(ftTerm)])
- % Found positive trigger: tPred(ftTerm)
- % body: is_kif_clause(tPred(ftTerm))*->rhs([clif(tPred(ftTerm))])
- % Found positive trigger: tPred(ftTerm)
- % body: compound(tPred(ftTerm)),\+is_ftVar(tPred(ftTerm))*->rhs([{with_current_why(tPred(ftTerm),ignore(\+addAdmittedArguments(tPred(ftTerm))))}])
- % Found positive trigger: tRelation(ftTerm)
- % body: compound(tRelation(ftTerm)),\+is_ftVar(tRelation(ftTerm))*->rhs([{with_current_why(tRelation(ftTerm),ignore(\+addAdmittedArguments(tRelation(ftTerm))))}])
- % Found positive trigger: tRelation(ftTerm)
- % body: is_kif_clause(tRelation(ftTerm))*->rhs([clif(tRelation(ftTerm))])
- % Found positive trigger: tRelation(ftTerm)
- % body: compound(tRelation(ftTerm)),\+is_ftVar(tRelation(ftTerm))*->rhs([{with_current_why(tRelation(ftTerm),ignore(\+addAdmittedArguments(tRelation(ftTerm))))}])
- % Found positive trigger: rtAvoidForwardChain(ftTerm)
- % body: compound(rtAvoidForwardChain(ftTerm)),\+is_ftVar(rtAvoidForwardChain(ftTerm))*->rhs([{with_current_why(rtAvoidForwardChain(ftTerm),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftTerm))))}])
- % Found positive trigger: rtAvoidForwardChain(ftTerm)
- % body: is_kif_clause(rtAvoidForwardChain(ftTerm))*->rhs([clif(rtAvoidForwardChain(ftTerm))])
- % Found positive trigger: rtAvoidForwardChain(ftTerm)
- % body: compound(rtAvoidForwardChain(ftTerm)),\+is_ftVar(rtAvoidForwardChain(ftTerm))*->rhs([{with_current_why(rtAvoidForwardChain(ftTerm),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftTerm))))}])
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: is_kif_clause(ttExpressionType(ftTerm))*->rhs([clif(ttExpressionType(ftTerm))])
- % Found positive trigger: ttExpressionType(ftTerm)
- % body: compound(ttExpressionType(ftTerm)),\+is_ftVar(ttExpressionType(ftTerm))*->rhs([{with_current_why(ttExpressionType(ftTerm),ignore(\+addAdmittedArguments(ttExpressionType(ftTerm))))}])
- % RHS-Post1: ttExpressionType(ftProlog)
- % Support: admittedArgument(subFormat,2,ftProlog),pt(admittedArgument(subFormat,2,_7438),(nonvar(_7438)*->rhs([ttExpressionType(_7438)])))
- % r_sane:mpred_fwc1(ttExpressionType(ftProlog)).
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: rhs([tCol(ftProlog),\+tSet(ftProlog)])
- % RHS-Post1: tCol(ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([tCol(ftProlog),\+tSet(ftProlog)]))
- % r_sane:mpred_fwc1(tCol(ftProlog)).
- % Found positive trigger: tCol(ftProlog)
- % body: rhs([{decl_type(ftProlog),kb_local(ftProlog/1)}])
- % Found positive trigger: tCol(ftProlog)
- % body: rhs([arity(ftProlog,1)])
- % RHS-Post1: arity(ftProlog,1)
- % Support: tCol(ftProlog),pt(tCol(ftProlog),rhs([arity(ftProlog,1)]))
- % Found positive trigger: tCol(ftProlog)
- % body: compound(tCol(ftProlog)),\+is_ftVar(tCol(ftProlog))*->rhs([{with_current_why(tCol(ftProlog),ignore(\+addAdmittedArguments(tCol(ftProlog))))}])
- % Found positive trigger: tCol(ftProlog)
- % body: \+ttExpressionType(ftProlog)*->rhs([tSet(ftProlog)])
- % moving(inherit_above(header_sane, ttExpressionType(_16912))).
- % Found positive trigger: tCol(ftProlog)
- % body: is_kif_clause(tCol(ftProlog))*->rhs([clif(tCol(ftProlog))])
- % Found positive trigger: tCol(ftProlog)
- % body: compound(tCol(ftProlog)),\+is_ftVar(tCol(ftProlog))*->rhs([{with_current_why(tCol(ftProlog),ignore(\+addAdmittedArguments(tCol(ftProlog))))}])
- % RHS-Withdrawing-Negation: \+tSet(ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([tCol(ftProlog),\+tSet(ftProlog)]))
- % Removing (withdraw1)
- % term: tSet(ftProlog)
- % support (was): _34200,_34202
- % Couldn't retract_i: spft(tSet(ftProlog),_8800,_8802).
- % show_failure(mpred_undo1, retract_u(tSet(ftProlog))).
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: rhs([tCol(ftProlog)])
- % RHS-Post1: tCol(ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([tCol(ftProlog)]))
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: rhs([\+completelyAssertedCollection(ftProlog)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([\+completelyAssertedCollection(ftProlog)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftProlog)
- % support (was): _32774,_32776
- % Couldn't retract_i: spft(completelyAssertedCollection(ftProlog),_8788,_8790).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftProlog))).
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: rhs([\+completelyAssertedCollection(ftProlog),~tSet(ftProlog),tCol(ftProlog)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([\+completelyAssertedCollection(ftProlog),~tSet(ftProlog),tCol(ftProlog)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftProlog)
- % support (was): _23508,_23510
- % Couldn't retract_i: spft(completelyAssertedCollection(ftProlog),_27720,_27722).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftProlog))).
- % RHS-Post1: ~tSet(ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([\+completelyAssertedCollection(ftProlog),~tSet(ftProlog),tCol(ftProlog)]))
- % r_sane:mpred_fwc1(~tSet(ftProlog)).
- % Found positive trigger: ~tSet(ftProlog)
- % body: compound(~tSet(ftProlog)),\+is_ftVar(~tSet(ftProlog))*->rhs([{with_current_why(~tSet(ftProlog),ignore(\+addAdmittedArguments(~tSet(ftProlog))))}])
- % Found positive trigger: ~tSet(ftProlog)
- % body: is_kif_clause(~tSet(ftProlog))*->rhs([clif(~tSet(ftProlog))])
- % Found positive trigger: ~tSet(ftProlog)
- % body: compound(~tSet(ftProlog)),\+is_ftVar(~tSet(ftProlog))*->rhs([{with_current_why(~tSet(ftProlog),ignore(\+addAdmittedArguments(~tSet(ftProlog))))}])
- % RHS-Post1: tCol(ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([\+completelyAssertedCollection(ftProlog),~tSet(ftProlog),tCol(ftProlog)]))
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: is_ftCompound(ftProlog)*->rhs([meta_argtypes(ftProlog)])
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: compound(ttExpressionType(ftProlog)),\+is_ftVar(ttExpressionType(ftProlog))*->rhs([{with_current_why(ttExpressionType(ftProlog),ignore(\+addAdmittedArguments(ttExpressionType(ftProlog))))}])
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: rhs([(argIsa(_22378,_22380,ftProlog),{number(_22380)}==>argQuotedIsa(_22378,_22380,ftProlog))])
- % RHS-Post1: argIsa(_22378,_22380,ftProlog),{number(_22380)}==>argQuotedIsa(_22378,_22380,ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([(argIsa(_22378,_22380,ftProlog),{number(_22380)}==>argQuotedIsa(_22378,_22380,ftProlog))]))
- % r_sane:mpred_fwc1((argIsa(_38500, _38502, ftProlog), {number(_38502)}==>argQuotedIsa(_38500, _38502, ftProlog))).
- % Adding positive
- % trigger: argIsa(_9386,_9388,ftProlog)
- % body: number(_9388)*->rhs([argQuotedIsa(_9386,_9388,ftProlog)])
- % Support: (argIsa(_9588,_9590,ftProlog),{number(_9590)}==>argQuotedIsa(_9588,_9590,ftProlog)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: append_term(ftProlog,_16618,_16620)*->rhs([{_16638=(_16620:-!,term_is_ft(_16618,ftProlog))},_16638])
- % RHS-Post1: ftProlog(_16618):-!,term_is_ft(_16618,ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),(append_term(ftProlog,_16618,ftProlog(_16618))*->rhs([{(ftProlog(_16618):-!,term_is_ft(_16618,ftProlog))=(ftProlog(_16618):-!,term_is_ft(_16618,ftProlog))},(ftProlog(_16618):-!,term_is_ft(_16618,ftProlog))])))
- % r_sane:mpred_fwc1((ftProlog(_33096):-!, term_is_ft(_33096, ftProlog))).
- % Found positive trigger: ftProlog(_36174):-!,term_is_ft(_36174,ftProlog)
- % body: compound((ftProlog(_36174):-!,term_is_ft(_36174,ftProlog))),\+is_ftVar((ftProlog(_36174):-!,term_is_ft(_36174,ftProlog)))*->rhs([{with_current_why((ftProlog(_36174):-!,term_is_ft(_36174,ftProlog)),ignore(\+addAdmittedArguments((ftProlog(_36174):-!,term_is_ft(_36174,ftProlog)))))}])
- % Found positive trigger: ftProlog(_9550):-!,term_is_ft(_9550,ftProlog)
- % body: is_kif_clause((ftProlog(_9550):-!,term_is_ft(_9550,ftProlog)))*->rhs([clif((ftProlog(_9550):-!,term_is_ft(_9550,ftProlog)))])
- % Found positive trigger: ftProlog(_9550):-!,term_is_ft(_9550,ftProlog)
- % body: compound((ftProlog(_9550):-!,term_is_ft(_9550,ftProlog))),\+is_ftVar((ftProlog(_9550):-!,term_is_ft(_9550,ftProlog)))*->rhs([{with_current_why((ftProlog(_9550):-!,term_is_ft(_9550,ftProlog)),ignore(\+addAdmittedArguments((ftProlog(_9550):-!,term_is_ft(_9550,ftProlog)))))}])
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: rhs([rtAvoidForwardChain(ftProlog)])
- % RHS-Post1: rtAvoidForwardChain(ftProlog)
- % Support: ttExpressionType(ftProlog),pt(ttExpressionType(ftProlog),rhs([rtAvoidForwardChain(ftProlog)]))
- % r_sane:mpred_fwc1(rtAvoidForwardChain(ftProlog)).
- % Found positive trigger: rtAvoidForwardChain(ftProlog)
- % body: rhs([tRelation(ftProlog)])
- % RHS-Post1: tRelation(ftProlog)
- % Support: rtAvoidForwardChain(ftProlog),pt(rtAvoidForwardChain(ftProlog),rhs([tRelation(ftProlog)]))
- % r_sane:mpred_fwc1(tRelation(ftProlog)).
- % Found positive trigger: tRelation(ftProlog)
- % body: nt(tFunction(ftProlog),call_u_no_bc(tFunction(ftProlog)),rhs([tPred(ftProlog)]))
- % Adding negative
- % trigger: tFunction(ftProlog)
- % test: call_u_no_bc(tFunction(ftProlog))
- % body: rhs([tPred(ftProlog)])
- % Support: tRelation(ftProlog),pt(tRelation(ftProlog),nt(tFunction(ftProlog),call_u_no_bc(tFunction(ftProlog)),rhs([tPred(ftProlog)])))
- % RHS-Post1: tPred(ftProlog)
- % Support: \+tFunction(ftProlog),nt(tFunction(ftProlog),call_u_no_bc(tFunction(ftProlog)),rhs([tPred(ftProlog)]))
- % r_sane:mpred_fwc1(tPred(ftProlog)).
- % Found positive trigger: tPred(ftProlog)
- % body: rhs([tRelation(ftProlog)])
- % RHS-Post1: tRelation(ftProlog)
- % Support: tPred(ftProlog),pt(tPred(ftProlog),rhs([tRelation(ftProlog)]))
- % Found positive trigger: tPred(ftProlog)
- % body: compound(tPred(ftProlog)),\+is_ftVar(tPred(ftProlog))*->rhs([{with_current_why(tPred(ftProlog),ignore(\+addAdmittedArguments(tPred(ftProlog))))}])
- % Found positive trigger: tPred(ftProlog)
- % body: arity(ftProlog,2)*->rhs([rtBinaryPredicate(ftProlog)])
- % Found positive trigger: tPred(ftProlog)
- % body: is_kif_clause(tPred(ftProlog))*->rhs([clif(tPred(ftProlog))])
- % Found positive trigger: tPred(ftProlog)
- % body: compound(tPred(ftProlog)),\+is_ftVar(tPred(ftProlog))*->rhs([{with_current_why(tPred(ftProlog),ignore(\+addAdmittedArguments(tPred(ftProlog))))}])
- % Found positive trigger: tRelation(ftProlog)
- % body: compound(tRelation(ftProlog)),\+is_ftVar(tRelation(ftProlog))*->rhs([{with_current_why(tRelation(ftProlog),ignore(\+addAdmittedArguments(tRelation(ftProlog))))}])
- % Found positive trigger: tRelation(ftProlog)
- % body: is_kif_clause(tRelation(ftProlog))*->rhs([clif(tRelation(ftProlog))])
- % Found positive trigger: tRelation(ftProlog)
- % body: compound(tRelation(ftProlog)),\+is_ftVar(tRelation(ftProlog))*->rhs([{with_current_why(tRelation(ftProlog),ignore(\+addAdmittedArguments(tRelation(ftProlog))))}])
- % Found positive trigger: rtAvoidForwardChain(ftProlog)
- % body: compound(rtAvoidForwardChain(ftProlog)),\+is_ftVar(rtAvoidForwardChain(ftProlog))*->rhs([{with_current_why(rtAvoidForwardChain(ftProlog),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftProlog))))}])
- % Found positive trigger: rtAvoidForwardChain(ftProlog)
- % body: is_kif_clause(rtAvoidForwardChain(ftProlog))*->rhs([clif(rtAvoidForwardChain(ftProlog))])
- % Found positive trigger: rtAvoidForwardChain(ftProlog)
- % body: compound(rtAvoidForwardChain(ftProlog)),\+is_ftVar(rtAvoidForwardChain(ftProlog))*->rhs([{with_current_why(rtAvoidForwardChain(ftProlog),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftProlog))))}])
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: is_kif_clause(ttExpressionType(ftProlog))*->rhs([clif(ttExpressionType(ftProlog))])
- % Found positive trigger: ttExpressionType(ftProlog)
- % body: compound(ttExpressionType(ftProlog)),\+is_ftVar(ttExpressionType(ftProlog))*->rhs([{with_current_why(ttExpressionType(ftProlog),ignore(\+addAdmittedArguments(ttExpressionType(ftProlog))))}])
- % RHS-Post1: ttExpressionType(ftNumber)
- % Support: admittedArgument(subFormat,2,ftNumber),pt(admittedArgument(subFormat,2,_7438),(nonvar(_7438)*->rhs([ttExpressionType(_7438)])))
- % r_sane:mpred_fwc1(ttExpressionType(ftNumber)).
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: rhs([tCol(ftNumber),\+tSet(ftNumber)])
- % RHS-Post1: tCol(ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([tCol(ftNumber),\+tSet(ftNumber)]))
- % r_sane:mpred_fwc1(tCol(ftNumber)).
- % Found positive trigger: tCol(ftNumber)
- % body: rhs([{decl_type(ftNumber),kb_local(ftNumber/1)}])
- % Found positive trigger: tCol(ftNumber)
- % body: rhs([arity(ftNumber,1)])
- % RHS-Post1: arity(ftNumber,1)
- % Support: tCol(ftNumber),pt(tCol(ftNumber),rhs([arity(ftNumber,1)]))
- % Found positive trigger: tCol(ftNumber)
- % body: compound(tCol(ftNumber)),\+is_ftVar(tCol(ftNumber))*->rhs([{with_current_why(tCol(ftNumber),ignore(\+addAdmittedArguments(tCol(ftNumber))))}])
- % Found positive trigger: tCol(ftNumber)
- % body: \+ttExpressionType(ftNumber)*->rhs([tSet(ftNumber)])
- % moving(inherit_above(header_sane, ttExpressionType(_11976))).
- % Found positive trigger: tCol(ftNumber)
- % body: is_kif_clause(tCol(ftNumber))*->rhs([clif(tCol(ftNumber))])
- % Found positive trigger: tCol(ftNumber)
- % body: compound(tCol(ftNumber)),\+is_ftVar(tCol(ftNumber))*->rhs([{with_current_why(tCol(ftNumber),ignore(\+addAdmittedArguments(tCol(ftNumber))))}])
- % RHS-Withdrawing-Negation: \+tSet(ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([tCol(ftNumber),\+tSet(ftNumber)]))
- % Removing (withdraw1)
- % term: tSet(ftNumber)
- % support (was): _29264,_29266
- % Couldn't retract_i: spft(tSet(ftNumber),_33464,_33466).
- % show_failure(mpred_undo1, retract_u(tSet(ftNumber))).
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: rhs([tCol(ftNumber)])
- % RHS-Post1: tCol(ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([tCol(ftNumber)]))
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: rhs([\+completelyAssertedCollection(ftNumber)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([\+completelyAssertedCollection(ftNumber)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftNumber)
- % support (was): _23688,_23690
- % Couldn't retract_i: spft(completelyAssertedCollection(ftNumber),_27900,_27902).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftNumber))).
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: rhs([\+completelyAssertedCollection(ftNumber),~tSet(ftNumber),tCol(ftNumber)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([\+completelyAssertedCollection(ftNumber),~tSet(ftNumber),tCol(ftNumber)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftNumber)
- % support (was): _14268,_14270
- % Couldn't retract_i: spft(completelyAssertedCollection(ftNumber),_18480,_18482).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftNumber))).
- % RHS-Post1: ~tSet(ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([\+completelyAssertedCollection(ftNumber),~tSet(ftNumber),tCol(ftNumber)]))
- % r_sane:mpred_fwc1(~tSet(ftNumber)).
- % Found positive trigger: ~tSet(ftNumber)
- % body: compound(~tSet(ftNumber)),\+is_ftVar(~tSet(ftNumber))*->rhs([{with_current_why(~tSet(ftNumber),ignore(\+addAdmittedArguments(~tSet(ftNumber))))}])
- % Found positive trigger: ~tSet(ftNumber)
- % body: is_kif_clause(~tSet(ftNumber))*->rhs([clif(~tSet(ftNumber))])
- % Found positive trigger: ~tSet(ftNumber)
- % body: compound(~tSet(ftNumber)),\+is_ftVar(~tSet(ftNumber))*->rhs([{with_current_why(~tSet(ftNumber),ignore(\+addAdmittedArguments(~tSet(ftNumber))))}])
- % RHS-Post1: tCol(ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([\+completelyAssertedCollection(ftNumber),~tSet(ftNumber),tCol(ftNumber)]))
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: is_ftCompound(ftNumber)*->rhs([meta_argtypes(ftNumber)])
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: compound(ttExpressionType(ftNumber)),\+is_ftVar(ttExpressionType(ftNumber))*->rhs([{with_current_why(ttExpressionType(ftNumber),ignore(\+addAdmittedArguments(ttExpressionType(ftNumber))))}])
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: rhs([(argIsa(_8504,_8506,ftNumber),{number(_8506)}==>argQuotedIsa(_8504,_8506,ftNumber))])
- % RHS-Post1: argIsa(_8504,_8506,ftNumber),{number(_8506)}==>argQuotedIsa(_8504,_8506,ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([(argIsa(_8504,_8506,ftNumber),{number(_8506)}==>argQuotedIsa(_8504,_8506,ftNumber))]))
- % r_sane:mpred_fwc1((argIsa(_21330, _21332, ftNumber), {number(_21332)}==>argQuotedIsa(_21330, _21332, ftNumber))).
- % Adding positive
- % trigger: argIsa(_21330,_21332,ftNumber)
- % body: number(_21332)*->rhs([argQuotedIsa(_21330,_21332,ftNumber)])
- % Support: (argIsa(_24606,_24608,ftNumber),{number(_24608)}==>argQuotedIsa(_24606,_24608,ftNumber)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: append_term(ftNumber,_8490,_8492)*->rhs([{_8510=(_8492:-!,term_is_ft(_8490,ftNumber))},_8510])
- % RHS-Post1: ftNumber(_8490):-!,term_is_ft(_8490,ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),(append_term(ftNumber,_8490,ftNumber(_8490))*->rhs([{(ftNumber(_8490):-!,term_is_ft(_8490,ftNumber))=(ftNumber(_8490):-!,term_is_ft(_8490,ftNumber))},(ftNumber(_8490):-!,term_is_ft(_8490,ftNumber))])))
- % r_sane:mpred_fwc1((ftNumber(_23494):-!, term_is_ft(_23494, ftNumber))).
- % Found positive trigger: ftNumber(_26572):-!,term_is_ft(_26572,ftNumber)
- % body: compound((ftNumber(_26572):-!,term_is_ft(_26572,ftNumber))),\+is_ftVar((ftNumber(_26572):-!,term_is_ft(_26572,ftNumber)))*->rhs([{with_current_why((ftNumber(_26572):-!,term_is_ft(_26572,ftNumber)),ignore(\+addAdmittedArguments((ftNumber(_26572):-!,term_is_ft(_26572,ftNumber)))))}])
- % Found positive trigger: ftNumber(_9574):-!,term_is_ft(_9574,ftNumber)
- % body: is_kif_clause((ftNumber(_9574):-!,term_is_ft(_9574,ftNumber)))*->rhs([clif((ftNumber(_9574):-!,term_is_ft(_9574,ftNumber)))])
- % Found positive trigger: ftNumber(_9574):-!,term_is_ft(_9574,ftNumber)
- % body: compound((ftNumber(_9574):-!,term_is_ft(_9574,ftNumber))),\+is_ftVar((ftNumber(_9574):-!,term_is_ft(_9574,ftNumber)))*->rhs([{with_current_why((ftNumber(_9574):-!,term_is_ft(_9574,ftNumber)),ignore(\+addAdmittedArguments((ftNumber(_9574):-!,term_is_ft(_9574,ftNumber)))))}])
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: rhs([rtAvoidForwardChain(ftNumber)])
- % RHS-Post1: rtAvoidForwardChain(ftNumber)
- % Support: ttExpressionType(ftNumber),pt(ttExpressionType(ftNumber),rhs([rtAvoidForwardChain(ftNumber)]))
- % r_sane:mpred_fwc1(rtAvoidForwardChain(ftNumber)).
- % Found positive trigger: rtAvoidForwardChain(ftNumber)
- % body: rhs([tRelation(ftNumber)])
- % RHS-Post1: tRelation(ftNumber)
- % Support: rtAvoidForwardChain(ftNumber),pt(rtAvoidForwardChain(ftNumber),rhs([tRelation(ftNumber)]))
- % r_sane:mpred_fwc1(tRelation(ftNumber)).
- % Found positive trigger: tRelation(ftNumber)
- % body: nt(tFunction(ftNumber),call_u_no_bc(tFunction(ftNumber)),rhs([tPred(ftNumber)]))
- % Adding negative
- % trigger: tFunction(ftNumber)
- % test: call_u_no_bc(tFunction(ftNumber))
- % body: rhs([tPred(ftNumber)])
- % Support: tRelation(ftNumber),pt(tRelation(ftNumber),nt(tFunction(ftNumber),call_u_no_bc(tFunction(ftNumber)),rhs([tPred(ftNumber)])))
- % RHS-Post1: tPred(ftNumber)
- % Support: \+tFunction(ftNumber),nt(tFunction(ftNumber),call_u_no_bc(tFunction(ftNumber)),rhs([tPred(ftNumber)]))
- % r_sane:mpred_fwc1(tPred(ftNumber)).
- % Found positive trigger: tPred(ftNumber)
- % body: rhs([tRelation(ftNumber)])
- % RHS-Post1: tRelation(ftNumber)
- % Support: tPred(ftNumber),pt(tPred(ftNumber),rhs([tRelation(ftNumber)]))
- % Found positive trigger: tPred(ftNumber)
- % body: compound(tPred(ftNumber)),\+is_ftVar(tPred(ftNumber))*->rhs([{with_current_why(tPred(ftNumber),ignore(\+addAdmittedArguments(tPred(ftNumber))))}])
- % Found positive trigger: tPred(ftNumber)
- % body: arity(ftNumber,2)*->rhs([rtBinaryPredicate(ftNumber)])
- % Found positive trigger: tPred(ftNumber)
- % body: is_kif_clause(tPred(ftNumber))*->rhs([clif(tPred(ftNumber))])
- % Found positive trigger: tPred(ftNumber)
- % body: compound(tPred(ftNumber)),\+is_ftVar(tPred(ftNumber))*->rhs([{with_current_why(tPred(ftNumber),ignore(\+addAdmittedArguments(tPred(ftNumber))))}])
- % Found positive trigger: tRelation(ftNumber)
- % body: compound(tRelation(ftNumber)),\+is_ftVar(tRelation(ftNumber))*->rhs([{with_current_why(tRelation(ftNumber),ignore(\+addAdmittedArguments(tRelation(ftNumber))))}])
- % Found positive trigger: tRelation(ftNumber)
- % body: is_kif_clause(tRelation(ftNumber))*->rhs([clif(tRelation(ftNumber))])
- % Found positive trigger: tRelation(ftNumber)
- % body: compound(tRelation(ftNumber)),\+is_ftVar(tRelation(ftNumber))*->rhs([{with_current_why(tRelation(ftNumber),ignore(\+addAdmittedArguments(tRelation(ftNumber))))}])
- % Found positive trigger: rtAvoidForwardChain(ftNumber)
- % body: compound(rtAvoidForwardChain(ftNumber)),\+is_ftVar(rtAvoidForwardChain(ftNumber))*->rhs([{with_current_why(rtAvoidForwardChain(ftNumber),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftNumber))))}])
- % Found positive trigger: rtAvoidForwardChain(ftNumber)
- % body: is_kif_clause(rtAvoidForwardChain(ftNumber))*->rhs([clif(rtAvoidForwardChain(ftNumber))])
- % Found positive trigger: rtAvoidForwardChain(ftNumber)
- % body: compound(rtAvoidForwardChain(ftNumber)),\+is_ftVar(rtAvoidForwardChain(ftNumber))*->rhs([{with_current_why(rtAvoidForwardChain(ftNumber),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftNumber))))}])
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: is_kif_clause(ttExpressionType(ftNumber))*->rhs([clif(ttExpressionType(ftNumber))])
- % Found positive trigger: ttExpressionType(ftNumber)
- % body: compound(ttExpressionType(ftNumber)),\+is_ftVar(ttExpressionType(ftNumber))*->rhs([{with_current_why(ttExpressionType(ftNumber),ignore(\+addAdmittedArguments(ttExpressionType(ftNumber))))}])
- % RHS-Post1: ttExpressionType(ftPercent)
- % Support: admittedArgument(subFormat,2,ftPercent),pt(admittedArgument(subFormat,2,_7438),(nonvar(_7438)*->rhs([ttExpressionType(_7438)])))
- % r_sane:mpred_fwc1(ttExpressionType(ftPercent)).
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: rhs([tCol(ftPercent),\+tSet(ftPercent)])
- % RHS-Post1: tCol(ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([tCol(ftPercent),\+tSet(ftPercent)]))
- % r_sane:mpred_fwc1(tCol(ftPercent)).
- % Found positive trigger: tCol(ftPercent)
- % body: rhs([{decl_type(ftPercent),kb_local(ftPercent/1)}])
- % Found positive trigger: tCol(ftPercent)
- % body: rhs([arity(ftPercent,1)])
- % RHS-Post1: arity(ftPercent,1)
- % Support: tCol(ftPercent),pt(tCol(ftPercent),rhs([arity(ftPercent,1)]))
- % Found positive trigger: tCol(ftPercent)
- % body: compound(tCol(ftPercent)),\+is_ftVar(tCol(ftPercent))*->rhs([{with_current_why(tCol(ftPercent),ignore(\+addAdmittedArguments(tCol(ftPercent))))}])
- % Found positive trigger: tCol(ftPercent)
- % body: \+ttExpressionType(ftPercent)*->rhs([tSet(ftPercent)])
- % moving(inherit_above(header_sane, ttExpressionType(_12002))).
- % Found positive trigger: tCol(ftPercent)
- % body: is_kif_clause(tCol(ftPercent))*->rhs([clif(tCol(ftPercent))])
- % Found positive trigger: tCol(ftPercent)
- % body: compound(tCol(ftPercent)),\+is_ftVar(tCol(ftPercent))*->rhs([{with_current_why(tCol(ftPercent),ignore(\+addAdmittedArguments(tCol(ftPercent))))}])
- % RHS-Withdrawing-Negation: \+tSet(ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([tCol(ftPercent),\+tSet(ftPercent)]))
- % Removing (withdraw1)
- % term: tSet(ftPercent)
- % support (was): _29298,_29300
- % Couldn't retract_i: spft(tSet(ftPercent),_33498,_33500).
- % show_failure(mpred_undo1, retract_u(tSet(ftPercent))).
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: rhs([tCol(ftPercent)])
- % RHS-Post1: tCol(ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([tCol(ftPercent)]))
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: rhs([\+completelyAssertedCollection(ftPercent)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([\+completelyAssertedCollection(ftPercent)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftPercent)
- % support (was): _23718,_23720
- % Couldn't retract_i: spft(completelyAssertedCollection(ftPercent),_27930,_27932).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftPercent))).
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: rhs([\+completelyAssertedCollection(ftPercent),~tSet(ftPercent),tCol(ftPercent)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([\+completelyAssertedCollection(ftPercent),~tSet(ftPercent),tCol(ftPercent)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftPercent)
- % support (was): _14298,_14300
- % Couldn't retract_i: spft(completelyAssertedCollection(ftPercent),_18510,_18512).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftPercent))).
- % RHS-Post1: ~tSet(ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([\+completelyAssertedCollection(ftPercent),~tSet(ftPercent),tCol(ftPercent)]))
- % r_sane:mpred_fwc1(~tSet(ftPercent)).
- % Found positive trigger: ~tSet(ftPercent)
- % body: compound(~tSet(ftPercent)),\+is_ftVar(~tSet(ftPercent))*->rhs([{with_current_why(~tSet(ftPercent),ignore(\+addAdmittedArguments(~tSet(ftPercent))))}])
- % Found positive trigger: ~tSet(ftPercent)
- % body: is_kif_clause(~tSet(ftPercent))*->rhs([clif(~tSet(ftPercent))])
- % Found positive trigger: ~tSet(ftPercent)
- % body: compound(~tSet(ftPercent)),\+is_ftVar(~tSet(ftPercent))*->rhs([{with_current_why(~tSet(ftPercent),ignore(\+addAdmittedArguments(~tSet(ftPercent))))}])
- % RHS-Post1: tCol(ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([\+completelyAssertedCollection(ftPercent),~tSet(ftPercent),tCol(ftPercent)]))
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: is_ftCompound(ftPercent)*->rhs([meta_argtypes(ftPercent)])
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: compound(ttExpressionType(ftPercent)),\+is_ftVar(ttExpressionType(ftPercent))*->rhs([{with_current_why(ttExpressionType(ftPercent),ignore(\+addAdmittedArguments(ttExpressionType(ftPercent))))}])
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: rhs([(argIsa(_8528,_8530,ftPercent),{number(_8530)}==>argQuotedIsa(_8528,_8530,ftPercent))])
- % RHS-Post1: argIsa(_8528,_8530,ftPercent),{number(_8530)}==>argQuotedIsa(_8528,_8530,ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([(argIsa(_8528,_8530,ftPercent),{number(_8530)}==>argQuotedIsa(_8528,_8530,ftPercent))]))
- % r_sane:mpred_fwc1((argIsa(_23238, _23240, ftPercent), {number(_23240)}==>argQuotedIsa(_23238, _23240, ftPercent))).
- % Adding positive
- % trigger: argIsa(_23238,_23240,ftPercent)
- % body: number(_23240)*->rhs([argQuotedIsa(_23238,_23240,ftPercent)])
- % Support: (argIsa(_26514,_26516,ftPercent),{number(_26516)}==>argQuotedIsa(_26514,_26516,ftPercent)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: append_term(ftPercent,_8514,_8516)*->rhs([{_8534=(_8516:-!,term_is_ft(_8514,ftPercent))},_8534])
- % RHS-Post1: ftPercent(_8514):-!,term_is_ft(_8514,ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),(append_term(ftPercent,_8514,ftPercent(_8514))*->rhs([{(ftPercent(_8514):-!,term_is_ft(_8514,ftPercent))=(ftPercent(_8514):-!,term_is_ft(_8514,ftPercent))},(ftPercent(_8514):-!,term_is_ft(_8514,ftPercent))])))
- % r_sane:mpred_fwc1((ftPercent(_23520):-!, term_is_ft(_23520, ftPercent))).
- % Found positive trigger: ftPercent(_26598):-!,term_is_ft(_26598,ftPercent)
- % body: compound((ftPercent(_26598):-!,term_is_ft(_26598,ftPercent))),\+is_ftVar((ftPercent(_26598):-!,term_is_ft(_26598,ftPercent)))*->rhs([{with_current_why((ftPercent(_26598):-!,term_is_ft(_26598,ftPercent)),ignore(\+addAdmittedArguments((ftPercent(_26598):-!,term_is_ft(_26598,ftPercent)))))}])
- % Found positive trigger: ftPercent(_9598):-!,term_is_ft(_9598,ftPercent)
- % body: is_kif_clause((ftPercent(_9598):-!,term_is_ft(_9598,ftPercent)))*->rhs([clif((ftPercent(_9598):-!,term_is_ft(_9598,ftPercent)))])
- % Found positive trigger: ftPercent(_9598):-!,term_is_ft(_9598,ftPercent)
- % body: compound((ftPercent(_9598):-!,term_is_ft(_9598,ftPercent))),\+is_ftVar((ftPercent(_9598):-!,term_is_ft(_9598,ftPercent)))*->rhs([{with_current_why((ftPercent(_9598):-!,term_is_ft(_9598,ftPercent)),ignore(\+addAdmittedArguments((ftPercent(_9598):-!,term_is_ft(_9598,ftPercent)))))}])
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: rhs([rtAvoidForwardChain(ftPercent)])
- % RHS-Post1: rtAvoidForwardChain(ftPercent)
- % Support: ttExpressionType(ftPercent),pt(ttExpressionType(ftPercent),rhs([rtAvoidForwardChain(ftPercent)]))
- % r_sane:mpred_fwc1(rtAvoidForwardChain(ftPercent)).
- % Found positive trigger: rtAvoidForwardChain(ftPercent)
- % body: rhs([tRelation(ftPercent)])
- % RHS-Post1: tRelation(ftPercent)
- % Support: rtAvoidForwardChain(ftPercent),pt(rtAvoidForwardChain(ftPercent),rhs([tRelation(ftPercent)]))
- % r_sane:mpred_fwc1(tRelation(ftPercent)).
- % Found positive trigger: tRelation(ftPercent)
- % body: nt(tFunction(ftPercent),call_u_no_bc(tFunction(ftPercent)),rhs([tPred(ftPercent)]))
- % Adding negative
- % trigger: tFunction(ftPercent)
- % test: call_u_no_bc(tFunction(ftPercent))
- % body: rhs([tPred(ftPercent)])
- % Support: tRelation(ftPercent),pt(tRelation(ftPercent),nt(tFunction(ftPercent),call_u_no_bc(tFunction(ftPercent)),rhs([tPred(ftPercent)])))
- % RHS-Post1: tPred(ftPercent)
- % Support: \+tFunction(ftPercent),nt(tFunction(ftPercent),call_u_no_bc(tFunction(ftPercent)),rhs([tPred(ftPercent)]))
- % r_sane:mpred_fwc1(tPred(ftPercent)).
- % Found positive trigger: tPred(ftPercent)
- % body: rhs([tRelation(ftPercent)])
- % RHS-Post1: tRelation(ftPercent)
- % Support: tPred(ftPercent),pt(tPred(ftPercent),rhs([tRelation(ftPercent)]))
- % Found positive trigger: tPred(ftPercent)
- % body: compound(tPred(ftPercent)),\+is_ftVar(tPred(ftPercent))*->rhs([{with_current_why(tPred(ftPercent),ignore(\+addAdmittedArguments(tPred(ftPercent))))}])
- % Found positive trigger: tPred(ftPercent)
- % body: arity(ftPercent,2)*->rhs([rtBinaryPredicate(ftPercent)])
- % Found positive trigger: tPred(ftPercent)
- % body: is_kif_clause(tPred(ftPercent))*->rhs([clif(tPred(ftPercent))])
- % Found positive trigger: tPred(ftPercent)
- % body: compound(tPred(ftPercent)),\+is_ftVar(tPred(ftPercent))*->rhs([{with_current_why(tPred(ftPercent),ignore(\+addAdmittedArguments(tPred(ftPercent))))}])
- % Found positive trigger: tRelation(ftPercent)
- % body: compound(tRelation(ftPercent)),\+is_ftVar(tRelation(ftPercent))*->rhs([{with_current_why(tRelation(ftPercent),ignore(\+addAdmittedArguments(tRelation(ftPercent))))}])
- % Found positive trigger: tRelation(ftPercent)
- % body: is_kif_clause(tRelation(ftPercent))*->rhs([clif(tRelation(ftPercent))])
- % Found positive trigger: tRelation(ftPercent)
- % body: compound(tRelation(ftPercent)),\+is_ftVar(tRelation(ftPercent))*->rhs([{with_current_why(tRelation(ftPercent),ignore(\+addAdmittedArguments(tRelation(ftPercent))))}])
- % Found positive trigger: rtAvoidForwardChain(ftPercent)
- % body: compound(rtAvoidForwardChain(ftPercent)),\+is_ftVar(rtAvoidForwardChain(ftPercent))*->rhs([{with_current_why(rtAvoidForwardChain(ftPercent),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftPercent))))}])
- % Found positive trigger: rtAvoidForwardChain(ftPercent)
- % body: is_kif_clause(rtAvoidForwardChain(ftPercent))*->rhs([clif(rtAvoidForwardChain(ftPercent))])
- % Found positive trigger: rtAvoidForwardChain(ftPercent)
- % body: compound(rtAvoidForwardChain(ftPercent)),\+is_ftVar(rtAvoidForwardChain(ftPercent))*->rhs([{with_current_why(rtAvoidForwardChain(ftPercent),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftPercent))))}])
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: is_kif_clause(ttExpressionType(ftPercent))*->rhs([clif(ttExpressionType(ftPercent))])
- % Found positive trigger: ttExpressionType(ftPercent)
- % body: compound(ttExpressionType(ftPercent)),\+is_ftVar(ttExpressionType(ftPercent))*->rhs([{with_current_why(ttExpressionType(ftPercent),ignore(\+addAdmittedArguments(ttExpressionType(ftPercent))))}])
- % RHS-Post1: ttExpressionType(ftText)
- % Support: admittedArgument(subFormat,2,ftText),pt(admittedArgument(subFormat,2,_7438),(nonvar(_7438)*->rhs([ttExpressionType(_7438)])))
- % r_sane:mpred_fwc1(ttExpressionType(ftText)).
- % Found positive trigger: ttExpressionType(ftText)
- % body: rhs([tCol(ftText),\+tSet(ftText)])
- % RHS-Post1: tCol(ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([tCol(ftText),\+tSet(ftText)]))
- % RHS-Withdrawing-Negation: \+tSet(ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([tCol(ftText),\+tSet(ftText)]))
- % Removing (withdraw1)
- % term: tSet(ftText)
- % support (was): _14772,_14774
- % Couldn't retract_i: spft(tSet(ftText),_18972,_18974).
- % show_failure(mpred_undo1, retract_u(tSet(ftText))).
- % Found positive trigger: ttExpressionType(ftText)
- % body: rhs([tCol(ftText)])
- % RHS-Post1: tCol(ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([tCol(ftText)]))
- % Found positive trigger: ttExpressionType(ftText)
- % body: rhs([\+completelyAssertedCollection(ftText)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([\+completelyAssertedCollection(ftText)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftText)
- % support (was): _13996,_13998
- % Couldn't retract_i: spft(completelyAssertedCollection(ftText),_18208,_18210).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftText))).
- % Found positive trigger: ttExpressionType(ftText)
- % body: rhs([\+completelyAssertedCollection(ftText),~tSet(ftText),tCol(ftText)])
- % RHS-Withdrawing-Negation: \+completelyAssertedCollection(ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([\+completelyAssertedCollection(ftText),~tSet(ftText),tCol(ftText)]))
- % Removing (withdraw1)
- % term: completelyAssertedCollection(ftText)
- % support (was): _8668,_8670
- % Couldn't retract_i: spft(completelyAssertedCollection(ftText),_11734,_11736).
- % show_failure(mpred_undo1, retract_u(completelyAssertedCollection(ftText))).
- % RHS-Post1: ~tSet(ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([\+completelyAssertedCollection(ftText),~tSet(ftText),tCol(ftText)]))
- % r_sane:mpred_fwc1(~tSet(ftText)).
- % Found positive trigger: ~tSet(ftText)
- % body: compound(~tSet(ftText)),\+is_ftVar(~tSet(ftText))*->rhs([{with_current_why(~tSet(ftText),ignore(\+addAdmittedArguments(~tSet(ftText))))}])
- % Found positive trigger: ~tSet(ftText)
- % body: is_kif_clause(~tSet(ftText))*->rhs([clif(~tSet(ftText))])
- % Found positive trigger: ~tSet(ftText)
- % body: compound(~tSet(ftText)),\+is_ftVar(~tSet(ftText))*->rhs([{with_current_why(~tSet(ftText),ignore(\+addAdmittedArguments(~tSet(ftText))))}])
- % RHS-Post1: tCol(ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([\+completelyAssertedCollection(ftText),~tSet(ftText),tCol(ftText)]))
- % Found positive trigger: ttExpressionType(ftText)
- % body: is_ftCompound(ftText)*->rhs([meta_argtypes(ftText)])
- % Found positive trigger: ttExpressionType(ftText)
- % body: compound(ttExpressionType(ftText)),\+is_ftVar(ttExpressionType(ftText))*->rhs([{with_current_why(ttExpressionType(ftText),ignore(\+addAdmittedArguments(ttExpressionType(ftText))))}])
- % Found positive trigger: ttExpressionType(ftText)
- % body: rhs([(argIsa(_8438,_8440,ftText),{number(_8440)}==>argQuotedIsa(_8438,_8440,ftText))])
- % RHS-Post1: argIsa(_8438,_8440,ftText),{number(_8440)}==>argQuotedIsa(_8438,_8440,ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([(argIsa(_8438,_8440,ftText),{number(_8440)}==>argQuotedIsa(_8438,_8440,ftText))]))
- % r_sane:mpred_fwc1((argIsa(_21256, _21258, ftText), {number(_21258)}==>argQuotedIsa(_21256, _21258, ftText))).
- % Adding positive
- % trigger: argIsa(_21256,_21258,ftText)
- % body: number(_21258)*->rhs([argQuotedIsa(_21256,_21258,ftText)])
- % Support: (argIsa(_24530,_24532,ftText),{number(_24532)}==>argQuotedIsa(_24530,_24532,ftText)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % Found positive trigger: ttExpressionType(ftText)
- % body: append_term(ftText,_8424,_8426)*->rhs([{_8444=(_8426:-!,term_is_ft(_8424,ftText))},_8444])
- % RHS-Post1: ftText(_8424):-!,term_is_ft(_8424,ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),(append_term(ftText,_8424,ftText(_8424))*->rhs([{(ftText(_8424):-!,term_is_ft(_8424,ftText))=(ftText(_8424):-!,term_is_ft(_8424,ftText))},(ftText(_8424):-!,term_is_ft(_8424,ftText))])))
- % Found positive trigger: ttExpressionType(ftText)
- % body: rhs([rtAvoidForwardChain(ftText)])
- % RHS-Post1: rtAvoidForwardChain(ftText)
- % Support: ttExpressionType(ftText),pt(ttExpressionType(ftText),rhs([rtAvoidForwardChain(ftText)]))
- % r_sane:mpred_fwc1(rtAvoidForwardChain(ftText)).
- % Found positive trigger: rtAvoidForwardChain(ftText)
- % body: rhs([tRelation(ftText)])
- % RHS-Post1: tRelation(ftText)
- % Support: rtAvoidForwardChain(ftText),pt(rtAvoidForwardChain(ftText),rhs([tRelation(ftText)]))
- % r_sane:mpred_fwc1(tRelation(ftText)).
- % Found positive trigger: tRelation(ftText)
- % body: nt(tFunction(ftText),call_u_no_bc(tFunction(ftText)),rhs([tPred(ftText)]))
- % Adding negative
- % trigger: tFunction(ftText)
- % test: call_u_no_bc(tFunction(ftText))
- % body: rhs([tPred(ftText)])
- % Support: tRelation(ftText),pt(tRelation(ftText),nt(tFunction(ftText),call_u_no_bc(tFunction(ftText)),rhs([tPred(ftText)])))
- % RHS-Post1: tPred(ftText)
- % Support: \+tFunction(ftText),nt(tFunction(ftText),call_u_no_bc(tFunction(ftText)),rhs([tPred(ftText)]))
- % r_sane:mpred_fwc1(tPred(ftText)).
- % Found positive trigger: tPred(ftText)
- % body: rhs([tRelation(ftText)])
- % RHS-Post1: tRelation(ftText)
- % Support: tPred(ftText),pt(tPred(ftText),rhs([tRelation(ftText)]))
- % Found positive trigger: tPred(ftText)
- % body: compound(tPred(ftText)),\+is_ftVar(tPred(ftText))*->rhs([{with_current_why(tPred(ftText),ignore(\+addAdmittedArguments(tPred(ftText))))}])
- % Found positive trigger: tPred(ftText)
- % body: arity(ftText,2)*->rhs([rtBinaryPredicate(ftText)])
- % Found positive trigger: tPred(ftText)
- % body: is_kif_clause(tPred(ftText))*->rhs([clif(tPred(ftText))])
- % Found positive trigger: tPred(ftText)
- % body: compound(tPred(ftText)),\+is_ftVar(tPred(ftText))*->rhs([{with_current_why(tPred(ftText),ignore(\+addAdmittedArguments(tPred(ftText))))}])
- % Found positive trigger: tRelation(ftText)
- % body: compound(tRelation(ftText)),\+is_ftVar(tRelation(ftText))*->rhs([{with_current_why(tRelation(ftText),ignore(\+addAdmittedArguments(tRelation(ftText))))}])
- % Found positive trigger: tRelation(ftText)
- % body: is_kif_clause(tRelation(ftText))*->rhs([clif(tRelation(ftText))])
- % Found positive trigger: tRelation(ftText)
- % body: compound(tRelation(ftText)),\+is_ftVar(tRelation(ftText))*->rhs([{with_current_why(tRelation(ftText),ignore(\+addAdmittedArguments(tRelation(ftText))))}])
- % Found positive trigger: rtAvoidForwardChain(ftText)
- % body: compound(rtAvoidForwardChain(ftText)),\+is_ftVar(rtAvoidForwardChain(ftText))*->rhs([{with_current_why(rtAvoidForwardChain(ftText),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftText))))}])
- % Found positive trigger: rtAvoidForwardChain(ftText)
- % body: is_kif_clause(rtAvoidForwardChain(ftText))*->rhs([clif(rtAvoidForwardChain(ftText))])
- % Found positive trigger: rtAvoidForwardChain(ftText)
- % body: compound(rtAvoidForwardChain(ftText)),\+is_ftVar(rtAvoidForwardChain(ftText))*->rhs([{with_current_why(rtAvoidForwardChain(ftText),ignore(\+addAdmittedArguments(rtAvoidForwardChain(ftText))))}])
- % Found positive trigger: ttExpressionType(ftText)
- % body: is_kif_clause(ttExpressionType(ftText))*->rhs([clif(ttExpressionType(ftText))])
- % Found positive trigger: ttExpressionType(ftText)
- % body: compound(ttExpressionType(ftText)),\+is_ftVar(ttExpressionType(ftText))*->rhs([{with_current_why(ttExpressionType(ftText),ignore(\+addAdmittedArguments(ttExpressionType(ftText))))}])
- % gripe_CPUTIME(true, warn(0.6998504170000004>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, (admittedArgument(subFormat, 2, _2666)/nonvar(_2666)==>ttExpressionType(_2666)), (argIsa(subFormat, 2, ttExpressionType), pt(argIsa(_3870, _3872, _3874), (nonvar(_3874), nonvar(_3870), integer(_3872)*->rhs([tCol(_3874), (admittedArgument(_3870, _3872, _3944)/nonvar(_3944)==>isa(_3944, _3874)), (poss(admittedArgument(_3870, _3872, _3944))/nonvar(_3944)==>isa(_3944, _3874))])))), none))).
- % RHS-Post1: poss(admittedArgument(subFormat,2,_2666))/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(subFormat,2,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(subFormat, 2, _19104))/nonvar(_19104)==>ttExpressionType(_19104))).
- % Adding positive
- % trigger: poss(admittedArgument(subFormat,2,_19104))
- % body: nonvar(_19104)*->rhs([ttExpressionType(_19104)])
- % Support: (poss(admittedArgument(subFormat,2,_21792))/nonvar(_21792)==>ttExpressionType(_21792)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: ttExpressionType(ftSpec)
- % Support: poss(admittedArgument(subFormat,2,ftSpec)),pt(poss(admittedArgument(subFormat,2,_7498)),(nonvar(_7498)*->rhs([ttExpressionType(_7498)])))
- % RHS-Post1: ttExpressionType(ftTerm)
- % Support: poss(admittedArgument(subFormat,2,ftTerm)),pt(poss(admittedArgument(subFormat,2,_7498)),(nonvar(_7498)*->rhs([ttExpressionType(_7498)])))
- % RHS-Post1: ttExpressionType(ftProlog)
- % Support: poss(admittedArgument(subFormat,2,ftProlog)),pt(poss(admittedArgument(subFormat,2,_7498)),(nonvar(_7498)*->rhs([ttExpressionType(_7498)])))
- % RHS-Post1: ttExpressionType(ftNumber)
- % Support: poss(admittedArgument(subFormat,2,ftNumber)),pt(poss(admittedArgument(subFormat,2,_7498)),(nonvar(_7498)*->rhs([ttExpressionType(_7498)])))
- % RHS-Post1: ttExpressionType(ftPercent)
- % Support: poss(admittedArgument(subFormat,2,ftPercent)),pt(poss(admittedArgument(subFormat,2,_7488)),(nonvar(_7488)*->rhs([ttExpressionType(_7488)])))
- % RHS-Post1: ttExpressionType(ftText)
- % Support: poss(admittedArgument(subFormat,2,ftText)),pt(poss(admittedArgument(subFormat,2,_7488)),(nonvar(_7488)*->rhs([ttExpressionType(_7488)])))
- % moving(inherit_above(header_sane, ~_19776)).
- % RHS-Post1: tCol(ftSpec)
- % Support: argIsa(isOptional,1,ftSpec),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(isOptional,1,_2666)/nonvar(_2666)==>isa(_2666,ftSpec)
- % Support: argIsa(isOptional,1,ftSpec),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(isOptional, 1, _21318)/nonvar(_21318)==>ftSpec(_21318))).
- % Adding positive
- % trigger: admittedArgument(isOptional,1,_6854)
- % body: nonvar(_6854)*->rhs([ftSpec(_6854)])
- % Support: (admittedArgument(isOptional,1,_7036)/nonvar(_7036)==>ftSpec(_7036)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(isOptional,1,_2666))/nonvar(_2666)==>isa(_2666,ftSpec)
- % Support: argIsa(isOptional,1,ftSpec),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(isOptional, 1, _23076))/nonvar(_23076)==>ftSpec(_23076))).
- % Adding positive
- % trigger: poss(admittedArgument(isOptional,1,_23076))
- % body: nonvar(_23076)*->rhs([ftSpec(_23076)])
- % Support: (poss(admittedArgument(isOptional,1,_25760))/nonvar(_25760)==>ftSpec(_25760)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(isOptional,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(isOptional,2,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(isOptional,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(isOptional, 2, _21342)/nonvar(_21342)==>ftTerm(_21342))).
- % Adding positive
- % trigger: admittedArgument(isOptional,2,_21342)
- % body: nonvar(_21342)*->rhs([ftTerm(_21342)])
- % Support: (admittedArgument(isOptional,2,_23974)/nonvar(_23974)==>ftTerm(_23974)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(isOptional,2,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(isOptional,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(isOptional, 2, _14714))/nonvar(_14714)==>ftTerm(_14714))).
- % Adding positive
- % trigger: poss(admittedArgument(isOptional,2,_14714))
- % body: nonvar(_14714)*->rhs([ftTerm(_14714)])
- % Support: (poss(admittedArgument(isOptional,2,_17398))/nonvar(_17398)==>ftTerm(_17398)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttExpressionType)
- % Support: argIsa(quotedDefnIff,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(quotedDefnIff,1,_2666)/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(quotedDefnIff,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(quotedDefnIff, 1, _21390)/nonvar(_21390)==>ttExpressionType(_21390))).
- % Adding positive
- % trigger: admittedArgument(quotedDefnIff,1,_21390)
- % body: nonvar(_21390)*->rhs([ttExpressionType(_21390)])
- % Support: (admittedArgument(quotedDefnIff,1,_24030)/nonvar(_24030)==>ttExpressionType(_24030)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(quotedDefnIff,1,_2666))/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(quotedDefnIff,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(quotedDefnIff, 1, _14752))/nonvar(_14752)==>ttExpressionType(_14752))).
- % Adding positive
- % trigger: poss(admittedArgument(quotedDefnIff,1,_14752))
- % body: nonvar(_14752)*->rhs([ttExpressionType(_14752)])
- % Support: (poss(admittedArgument(quotedDefnIff,1,_17442))/nonvar(_17442)==>ttExpressionType(_17442)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(quotedDefnIff,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(quotedDefnIff,2,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(quotedDefnIff,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(quotedDefnIff, 2, _21400)/nonvar(_21400)==>ftTerm(_21400))).
- % Adding positive
- % trigger: admittedArgument(quotedDefnIff,2,_21400)
- % body: nonvar(_21400)*->rhs([ftTerm(_21400)])
- % Support: (admittedArgument(quotedDefnIff,2,_24034)/nonvar(_24034)==>ftTerm(_24034)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: ftTerm(integer)
- % Support: admittedArgument(quotedDefnIff,2,integer),pt(admittedArgument(quotedDefnIff,2,_7560),(nonvar(_7560)*->rhs([ftTerm(_7560)])))
- % r_sane:mpred_fwc1(ftTerm(integer)).
- % Found positive trigger: ftTerm(integer)
- % body: compound(ftTerm(integer)),\+is_ftVar(ftTerm(integer))*->rhs([{with_current_why(ftTerm(integer),ignore(\+addAdmittedArguments(ftTerm(integer))))}])
- % Found positive trigger: ftTerm(integer)
- % body: is_kif_clause(ftTerm(integer))*->rhs([clif(ftTerm(integer))])
- % Found positive trigger: ftTerm(integer)
- % body: compound(ftTerm(integer)),\+is_ftVar(ftTerm(integer))*->rhs([{with_current_why(ftTerm(integer),ignore(\+addAdmittedArguments(ftTerm(integer))))}])
- % RHS-Post1: ftTerm(float)
- % Support: admittedArgument(quotedDefnIff,2,float),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(float)).
- % Found positive trigger: ftTerm(float)
- % body: compound(ftTerm(float)),\+is_ftVar(ftTerm(float))*->rhs([{with_current_why(ftTerm(float),ignore(\+addAdmittedArguments(ftTerm(float))))}])
- % Found positive trigger: ftTerm(float)
- % body: is_kif_clause(ftTerm(float))*->rhs([clif(ftTerm(float))])
- % Found positive trigger: ftTerm(float)
- % body: compound(ftTerm(float)),\+is_ftVar(ftTerm(float))*->rhs([{with_current_why(ftTerm(float),ignore(\+addAdmittedArguments(ftTerm(float))))}])
- % RHS-Post1: ftTerm(atom)
- % Support: admittedArgument(quotedDefnIff,2,atom),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(atom)).
- % Found positive trigger: ftTerm(atom)
- % body: compound(ftTerm(atom)),\+is_ftVar(ftTerm(atom))*->rhs([{with_current_why(ftTerm(atom),ignore(\+addAdmittedArguments(ftTerm(atom))))}])
- % Found positive trigger: ftTerm(atom)
- % body: is_kif_clause(ftTerm(atom))*->rhs([clif(ftTerm(atom))])
- % Found positive trigger: ftTerm(atom)
- % body: compound(ftTerm(atom)),\+is_ftVar(ftTerm(atom))*->rhs([{with_current_why(ftTerm(atom),ignore(\+addAdmittedArguments(ftTerm(atom))))}])
- % RHS-Post1: ftTerm(is_ftString2)
- % Support: admittedArgument(quotedDefnIff,2,is_ftString2),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_ftString2)).
- % Found positive trigger: ftTerm(is_ftString2)
- % body: compound(ftTerm(is_ftString2)),\+is_ftVar(ftTerm(is_ftString2))*->rhs([{with_current_why(ftTerm(is_ftString2),ignore(\+addAdmittedArguments(ftTerm(is_ftString2))))}])
- % Found positive trigger: ftTerm(is_ftString2)
- % body: is_kif_clause(ftTerm(is_ftString2))*->rhs([clif(ftTerm(is_ftString2))])
- % Found positive trigger: ftTerm(is_ftString2)
- % body: compound(ftTerm(is_ftString2)),\+is_ftVar(ftTerm(is_ftString2))*->rhs([{with_current_why(ftTerm(is_ftString2),ignore(\+addAdmittedArguments(ftTerm(is_ftString2))))}])
- % RHS-Post1: ftTerm(string)
- % Support: admittedArgument(quotedDefnIff,2,string),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(string)).
- % Found positive trigger: ftTerm(string)
- % body: compound(ftTerm(string)),\+is_ftVar(ftTerm(string))*->rhs([{with_current_why(ftTerm(string),ignore(\+addAdmittedArguments(ftTerm(string))))}])
- % Found positive trigger: ftTerm(string)
- % body: is_kif_clause(ftTerm(string))*->rhs([clif(ftTerm(string))])
- % Found positive trigger: ftTerm(string)
- % body: compound(ftTerm(string)),\+is_ftVar(ftTerm(string))*->rhs([{with_current_why(ftTerm(string),ignore(\+addAdmittedArguments(ftTerm(string))))}])
- % RHS-Post1: ftTerm(is_callable)
- % Support: admittedArgument(quotedDefnIff,2,is_callable),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_callable)).
- % Found positive trigger: ftTerm(is_callable)
- % body: compound(ftTerm(is_callable)),\+is_ftVar(ftTerm(is_callable))*->rhs([{with_current_why(ftTerm(is_callable),ignore(\+addAdmittedArguments(ftTerm(is_callable))))}])
- % Found positive trigger: ftTerm(is_callable)
- % body: is_kif_clause(ftTerm(is_callable))*->rhs([clif(ftTerm(is_callable))])
- % Found positive trigger: ftTerm(is_callable)
- % body: compound(ftTerm(is_callable)),\+is_ftVar(ftTerm(is_callable))*->rhs([{with_current_why(ftTerm(is_callable),ignore(\+addAdmittedArguments(ftTerm(is_callable))))}])
- % RHS-Post1: ftTerm(is_ftCompound)
- % Support: admittedArgument(quotedDefnIff,2,is_ftCompound),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_ftCompound)).
- % Found positive trigger: ftTerm(is_ftCompound)
- % body: compound(ftTerm(is_ftCompound)),\+is_ftVar(ftTerm(is_ftCompound))*->rhs([{with_current_why(ftTerm(is_ftCompound),ignore(\+addAdmittedArguments(ftTerm(is_ftCompound))))}])
- % Found positive trigger: ftTerm(is_ftCompound)
- % body: is_kif_clause(ftTerm(is_ftCompound))*->rhs([clif(ftTerm(is_ftCompound))])
- % Found positive trigger: ftTerm(is_ftCompound)
- % body: compound(ftTerm(is_ftCompound)),\+is_ftVar(ftTerm(is_ftCompound))*->rhs([{with_current_why(ftTerm(is_ftCompound),ignore(\+addAdmittedArguments(ftTerm(is_ftCompound))))}])
- % RHS-Post1: ftTerm(ground)
- % Support: admittedArgument(quotedDefnIff,2,ground),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(ground)).
- % Found positive trigger: ftTerm(ground)
- % body: compound(ftTerm(ground)),\+is_ftVar(ftTerm(ground))*->rhs([{with_current_why(ftTerm(ground),ignore(\+addAdmittedArguments(ftTerm(ground))))}])
- % Found positive trigger: ftTerm(ground)
- % body: is_kif_clause(ftTerm(ground))*->rhs([clif(ftTerm(ground))])
- % Found positive trigger: ftTerm(ground)
- % body: compound(ftTerm(ground)),\+is_ftVar(ftTerm(ground))*->rhs([{with_current_why(ftTerm(ground),ignore(\+addAdmittedArguments(ftTerm(ground))))}])
- % RHS-Post1: ftTerm(is_id)
- % Support: admittedArgument(quotedDefnIff,2,is_id),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_id)).
- % Found positive trigger: ftTerm(is_id)
- % body: compound(ftTerm(is_id)),\+is_ftVar(ftTerm(is_id))*->rhs([{with_current_why(ftTerm(is_id),ignore(\+addAdmittedArguments(ftTerm(is_id))))}])
- % Found positive trigger: ftTerm(is_id)
- % body: is_kif_clause(ftTerm(is_id))*->rhs([clif(ftTerm(is_id))])
- % Found positive trigger: ftTerm(is_id)
- % body: compound(ftTerm(is_id)),\+is_ftVar(ftTerm(is_id))*->rhs([{with_current_why(ftTerm(is_id),ignore(\+addAdmittedArguments(ftTerm(is_id))))}])
- % RHS-Post1: ftTerm(is_ftNonvar)
- % Support: admittedArgument(quotedDefnIff,2,is_ftNonvar),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_ftNonvar)).
- % Found positive trigger: ftTerm(is_ftNonvar)
- % body: compound(ftTerm(is_ftNonvar)),\+is_ftVar(ftTerm(is_ftNonvar))*->rhs([{with_current_why(ftTerm(is_ftNonvar),ignore(\+addAdmittedArguments(ftTerm(is_ftNonvar))))}])
- % Found positive trigger: ftTerm(is_ftNonvar)
- % body: is_kif_clause(ftTerm(is_ftNonvar))*->rhs([clif(ftTerm(is_ftNonvar))])
- % Found positive trigger: ftTerm(is_ftNonvar)
- % body: compound(ftTerm(is_ftNonvar)),\+is_ftVar(ftTerm(is_ftNonvar))*->rhs([{with_current_why(ftTerm(is_ftNonvar),ignore(\+addAdmittedArguments(ftTerm(is_ftNonvar))))}])
- % RHS-Post1: ftTerm(is_ftVar)
- % Support: admittedArgument(quotedDefnIff,2,is_ftVar),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_ftVar)).
- % Found positive trigger: ftTerm(is_ftVar)
- % body: compound(ftTerm(is_ftVar)),\+is_ftVar(ftTerm(is_ftVar))*->rhs([{with_current_why(ftTerm(is_ftVar),ignore(\+addAdmittedArguments(ftTerm(is_ftVar))))}])
- % Found positive trigger: ftTerm(is_ftVar)
- % body: is_kif_clause(ftTerm(is_ftVar))*->rhs([clif(ftTerm(is_ftVar))])
- % Found positive trigger: ftTerm(is_ftVar)
- % body: compound(ftTerm(is_ftVar)),\+is_ftVar(ftTerm(is_ftVar))*->rhs([{with_current_why(ftTerm(is_ftVar),ignore(\+addAdmittedArguments(ftTerm(is_ftVar))))}])
- % RHS-Post1: ftTerm(number)
- % Support: admittedArgument(quotedDefnIff,2,number),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(number)).
- % Found positive trigger: ftTerm(number)
- % body: compound(ftTerm(number)),\+is_ftVar(ftTerm(number))*->rhs([{with_current_why(ftTerm(number),ignore(\+addAdmittedArguments(ftTerm(number))))}])
- % Found positive trigger: ftTerm(number)
- % body: is_kif_clause(ftTerm(number))*->rhs([clif(ftTerm(number))])
- % Found positive trigger: ftTerm(number)
- % body: compound(ftTerm(number)),\+is_ftVar(ftTerm(number))*->rhs([{with_current_why(ftTerm(number),ignore(\+addAdmittedArguments(ftTerm(number))))}])
- % RHS-Post1: ftTerm(is_list)
- % Support: admittedArgument(quotedDefnIff,2,is_list),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_list)).
- % Found positive trigger: ftTerm(is_list)
- % body: compound(ftTerm(is_list)),\+is_ftVar(ftTerm(is_list))*->rhs([{with_current_why(ftTerm(is_list),ignore(\+addAdmittedArguments(ftTerm(is_list))))}])
- % Found positive trigger: ftTerm(is_list)
- % body: is_kif_clause(ftTerm(is_list))*->rhs([clif(ftTerm(is_list))])
- % Found positive trigger: ftTerm(is_list)
- % body: compound(ftTerm(is_list)),\+is_ftVar(ftTerm(is_list))*->rhs([{with_current_why(ftTerm(is_list),ignore(\+addAdmittedArguments(ftTerm(is_list))))}])
- % RHS-Post1: ftTerm(is_boolean)
- % Support: admittedArgument(quotedDefnIff,2,is_boolean),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_boolean)).
- % Found positive trigger: ftTerm(is_boolean)
- % body: compound(ftTerm(is_boolean)),\+is_ftVar(ftTerm(is_boolean))*->rhs([{with_current_why(ftTerm(is_boolean),ignore(\+addAdmittedArguments(ftTerm(is_boolean))))}])
- % Found positive trigger: ftTerm(is_boolean)
- % body: is_kif_clause(ftTerm(is_boolean))*->rhs([clif(ftTerm(is_boolean))])
- % Found positive trigger: ftTerm(is_boolean)
- % body: compound(ftTerm(is_boolean)),\+is_ftVar(ftTerm(is_boolean))*->rhs([{with_current_why(ftTerm(is_boolean),ignore(\+addAdmittedArguments(ftTerm(is_boolean))))}])
- % RHS-Post1: ftTerm(is_ftText)
- % Support: admittedArgument(quotedDefnIff,2,is_ftText),pt(admittedArgument(quotedDefnIff,2,_7534),(nonvar(_7534)*->rhs([ftTerm(_7534)])))
- % r_sane:mpred_fwc1(ftTerm(is_ftText)).
- % Found positive trigger: ftTerm(is_ftText)
- % body: compound(ftTerm(is_ftText)),\+is_ftVar(ftTerm(is_ftText))*->rhs([{with_current_why(ftTerm(is_ftText),ignore(\+addAdmittedArguments(ftTerm(is_ftText))))}])
- % Found positive trigger: ftTerm(is_ftText)
- % body: is_kif_clause(ftTerm(is_ftText))*->rhs([clif(ftTerm(is_ftText))])
- % Found positive trigger: ftTerm(is_ftText)
- % body: compound(ftTerm(is_ftText)),\+is_ftVar(ftTerm(is_ftText))*->rhs([{with_current_why(ftTerm(is_ftText),ignore(\+addAdmittedArguments(ftTerm(is_ftText))))}])
- % RHS-Post1: poss(admittedArgument(quotedDefnIff,2,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(quotedDefnIff,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(quotedDefnIff, 2, _14758))/nonvar(_14758)==>ftTerm(_14758))).
- % Adding positive
- % trigger: poss(admittedArgument(quotedDefnIff,2,_14758))
- % body: nonvar(_14758)*->rhs([ftTerm(_14758)])
- % Support: (poss(admittedArgument(quotedDefnIff,2,_17444))/nonvar(_17444)==>ftTerm(_17444)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: ftTerm(integer)
- % Support: poss(admittedArgument(quotedDefnIff,2,integer)),pt(poss(admittedArgument(quotedDefnIff,2,_25742)),(nonvar(_25742)*->rhs([ftTerm(_25742)])))
- % RHS-Post1: ftTerm(float)
- % Support: poss(admittedArgument(quotedDefnIff,2,float)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(atom)
- % Support: poss(admittedArgument(quotedDefnIff,2,atom)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_ftString2)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_ftString2)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(string)
- % Support: poss(admittedArgument(quotedDefnIff,2,string)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_callable)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_callable)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_ftCompound)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_ftCompound)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(ground)
- % Support: poss(admittedArgument(quotedDefnIff,2,ground)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_id)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_id)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_ftNonvar)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_ftNonvar)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_ftVar)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_ftVar)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(number)
- % Support: poss(admittedArgument(quotedDefnIff,2,number)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_list)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_list)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_boolean)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_boolean)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: ftTerm(is_ftText)
- % Support: poss(admittedArgument(quotedDefnIff,2,is_ftText)),pt(poss(admittedArgument(quotedDefnIff,2,_7584)),(nonvar(_7584)*->rhs([ftTerm(_7584)])))
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(ftDiceFn,1,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(ftDiceFn,1,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(ftDiceFn,1,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(ftDiceFn, 1, _14688)/nonvar(_14688)==>ftInt(_14688))).
- % Adding positive
- % trigger: admittedArgument(ftDiceFn,1,_14688)
- % body: nonvar(_14688)*->rhs([ftInt(_14688)])
- % Support: (admittedArgument(ftDiceFn,1,_17320)/nonvar(_17320)==>ftInt(_17320)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(ftDiceFn,1,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(ftDiceFn,1,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(ftDiceFn, 1, _36472))/nonvar(_36472)==>ftInt(_36472))).
- % Adding positive
- % trigger: poss(admittedArgument(ftDiceFn,1,_6986))
- % body: nonvar(_6986)*->rhs([ftInt(_6986)])
- % Support: (poss(admittedArgument(ftDiceFn,1,_7176))/nonvar(_7176)==>ftInt(_7176)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(ftDiceFn,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(ftDiceFn,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(ftDiceFn,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(ftDiceFn, 2, _40368)/nonvar(_40368)==>ftInt(_40368))).
- % Adding positive
- % trigger: admittedArgument(ftDiceFn,2,_7002)
- % body: nonvar(_7002)*->rhs([ftInt(_7002)])
- % Support: (admittedArgument(ftDiceFn,2,_7184)/nonvar(_7184)==>ftInt(_7184)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(ftDiceFn,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(ftDiceFn,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(ftDiceFn, 2, _23194))/nonvar(_23194)==>ftInt(_23194))).
- % Adding positive
- % trigger: poss(admittedArgument(ftDiceFn,2,_23194))
- % body: nonvar(_23194)*->rhs([ftInt(_23194)])
- % Support: (poss(admittedArgument(ftDiceFn,2,_25876))/nonvar(_25876)==>ftInt(_25876)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(ftDiceFn,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(ftDiceFn,3,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(ftDiceFn,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(ftDiceFn, 3, _21418)/nonvar(_21418)==>ftInt(_21418))).
- % Adding positive
- % trigger: admittedArgument(ftDiceFn,3,_21418)
- % body: nonvar(_21418)*->rhs([ftInt(_21418)])
- % Support: (admittedArgument(ftDiceFn,3,_24050)/nonvar(_24050)==>ftInt(_24050)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(ftDiceFn,3,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(ftDiceFn,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(ftDiceFn, 3, _14828))/nonvar(_14828)==>ftInt(_14828))).
- % Adding positive
- % trigger: poss(admittedArgument(ftDiceFn,3,_14828))
- % body: nonvar(_14828)*->rhs([ftInt(_14828)])
- % Support: (poss(admittedArgument(ftDiceFn,3,_17510))/nonvar(_17510)==>ftInt(_17510)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttExpressionType)
- % Support: argIsa(defnNecessary,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(defnNecessary,1,_2666)/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(defnNecessary,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(defnNecessary, 1, _21498)/nonvar(_21498)==>ttExpressionType(_21498))).
- % Adding positive
- % trigger: admittedArgument(defnNecessary,1,_21498)
- % body: nonvar(_21498)*->rhs([ttExpressionType(_21498)])
- % Support: (admittedArgument(defnNecessary,1,_24138)/nonvar(_24138)==>ttExpressionType(_24138)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(defnNecessary,1,_2666))/nonvar(_2666)==>isa(_2666,ttExpressionType)
- % Support: argIsa(defnNecessary,1,ttExpressionType),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(defnNecessary, 1, _14860))/nonvar(_14860)==>ttExpressionType(_14860))).
- % Adding positive
- % trigger: poss(admittedArgument(defnNecessary,1,_14860))
- % body: nonvar(_14860)*->rhs([ttExpressionType(_14860)])
- % Support: (poss(admittedArgument(defnNecessary,1,_17550))/nonvar(_17550)==>ttExpressionType(_17550)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(defnNecessary,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(defnNecessary,2,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(defnNecessary,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(defnNecessary, 2, _21508)/nonvar(_21508)==>ftTerm(_21508))).
- % Adding positive
- % trigger: admittedArgument(defnNecessary,2,_21508)
- % body: nonvar(_21508)*->rhs([ftTerm(_21508)])
- % Support: (admittedArgument(defnNecessary,2,_24142)/nonvar(_24142)==>ftTerm(_24142)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(defnNecessary,2,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(defnNecessary,2,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(defnNecessary, 2, _14872))/nonvar(_14872)==>ftTerm(_14872))).
- % Adding positive
- % trigger: poss(admittedArgument(defnNecessary,2,_14872))
- % body: nonvar(_14872)*->rhs([ftTerm(_14872)])
- % Support: (poss(admittedArgument(defnNecessary,2,_17558))/nonvar(_17558)==>ftTerm(_17558)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftAskable)
- % Support: argIsa(==>,1,ftAskable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(==>,1,_2666)/nonvar(_2666)==>isa(_2666,ftAskable)
- % Support: argIsa(==>,1,ftAskable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(==>, 1, _21524)/nonvar(_21524)==>ftAskable(_21524))).
- % Adding positive
- % trigger: admittedArgument(==>,1,_21524)
- % body: nonvar(_21524)*->rhs([ftAskable(_21524)])
- % Support: (admittedArgument(==>,1,_24154)/nonvar(_24154)==>ftAskable(_24154)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(==>,1,_2666))/nonvar(_2666)==>isa(_2666,ftAskable)
- % Support: argIsa(==>,1,ftAskable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(==>, 1, _14898))/nonvar(_14898)==>ftAskable(_14898))).
- % Adding positive
- % trigger: poss(admittedArgument(==>,1,_14898))
- % body: nonvar(_14898)*->rhs([ftAskable(_14898)])
- % Support: (poss(admittedArgument(==>,1,_17580))/nonvar(_17580)==>ftAskable(_17580)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftAssertable)
- % Support: argIsa(==>,2,ftAssertable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(==>,2,_2666)/nonvar(_2666)==>isa(_2666,ftAssertable)
- % Support: argIsa(==>,2,ftAssertable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(==>, 2, _21552)/nonvar(_21552)==>ftAssertable(_21552))).
- % Adding positive
- % trigger: admittedArgument(==>,2,_21552)
- % body: nonvar(_21552)*->rhs([ftAssertable(_21552)])
- % Support: (admittedArgument(==>,2,_24184)/nonvar(_24184)==>ftAssertable(_24184)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(==>,2,_2666))/nonvar(_2666)==>isa(_2666,ftAssertable)
- % Support: argIsa(==>,2,ftAssertable),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(==>, 2, _14924))/nonvar(_14924)==>ftAssertable(_14924))).
- % Adding positive
- % trigger: poss(admittedArgument(==>,2,_14924))
- % body: nonvar(_14924)*->rhs([ftAssertable(_14924)])
- % Support: (poss(admittedArgument(==>,2,_17608))/nonvar(_17608)==>ftAssertable(_17608)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftTerm)
- % Support: argIsa(comment,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(comment,1,_2666)/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(comment,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(comment, 1, _21572)/nonvar(_21572)==>ftTerm(_21572))).
- % Adding positive
- % trigger: admittedArgument(comment,1,_21572)
- % body: nonvar(_21572)*->rhs([ftTerm(_21572)])
- % Support: (admittedArgument(comment,1,_24204)/nonvar(_24204)==>ftTerm(_24204)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(comment,1,_2666))/nonvar(_2666)==>isa(_2666,ftTerm)
- % Support: argIsa(comment,1,ftTerm),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(comment, 1, _14948))/nonvar(_14948)==>ftTerm(_14948))).
- % Adding positive
- % trigger: poss(admittedArgument(comment,1,_14948))
- % body: nonvar(_14948)*->rhs([ftTerm(_14948)])
- % Support: (poss(admittedArgument(comment,1,_17630))/nonvar(_17630)==>ftTerm(_17630)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftString)
- % Support: argIsa(comment,2,ftString),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(comment,2,_2666)/nonvar(_2666)==>isa(_2666,ftString)
- % Support: argIsa(comment,2,ftString),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(comment, 2, _21606)/nonvar(_21606)==>ftString(_21606))).
- % Adding positive
- % trigger: admittedArgument(comment,2,_7136)
- % body: nonvar(_7136)*->rhs([ftString(_7136)])
- % Support: (admittedArgument(comment,2,_7318)/nonvar(_7318)==>ftString(_7318)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(comment,2,_2666))/nonvar(_2666)==>isa(_2666,ftString)
- % Support: argIsa(comment,2,ftString),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(comment, 2, _23368))/nonvar(_23368)==>ftString(_23368))).
- % Adding positive
- % trigger: poss(admittedArgument(comment,2,_23368))
- % body: nonvar(_23368)*->rhs([ftString(_23368)])
- % Support: (poss(admittedArgument(comment,2,_26052))/nonvar(_26052)==>ftString(_26052)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(prologMultiValued)
- % Support: argIsa(predArgMulti,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predArgMulti,1,_2666)/nonvar(_2666)==>isa(_2666,prologMultiValued)
- % Support: argIsa(predArgMulti,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predArgMulti, 1, _21660)/nonvar(_21660)==>prologMultiValued(_21660))).
- % Adding positive
- % trigger: admittedArgument(predArgMulti,1,_21660)
- % body: nonvar(_21660)*->rhs([prologMultiValued(_21660)])
- % Support: (admittedArgument(predArgMulti,1,_24300)/nonvar(_24300)==>prologMultiValued(_24300)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predArgMulti,1,_2666))/nonvar(_2666)==>isa(_2666,prologMultiValued)
- % Support: argIsa(predArgMulti,1,prologMultiValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predArgMulti, 1, _15004))/nonvar(_15004)==>prologMultiValued(_15004))).
- % Adding positive
- % trigger: poss(admittedArgument(predArgMulti,1,_15004))
- % body: nonvar(_15004)*->rhs([prologMultiValued(_15004)])
- % Support: (poss(admittedArgument(predArgMulti,1,_17694))/nonvar(_17694)==>prologMultiValued(_17694)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(predArgMulti,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predArgMulti,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(predArgMulti,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predArgMulti, 2, _21620)/nonvar(_21620)==>ftInt(_21620))).
- % Adding positive
- % trigger: admittedArgument(predArgMulti,2,_21620)
- % body: nonvar(_21620)*->rhs([ftInt(_21620)])
- % Support: (admittedArgument(predArgMulti,2,_24254)/nonvar(_24254)==>ftInt(_24254)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predArgMulti,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(predArgMulti,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predArgMulti, 2, _15028))/nonvar(_15028)==>ftInt(_15028))).
- % Adding positive
- % trigger: poss(admittedArgument(predArgMulti,2,_15028))
- % body: nonvar(_15028)*->rhs([ftInt(_15028)])
- % Support: (poss(admittedArgument(predArgMulti,2,_17712))/nonvar(_17712)==>ftInt(_17712)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tObj)
- % Support: argIsa(predInstMax,1,tObj),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predInstMax,1,_2666)/nonvar(_2666)==>isa(_2666,tObj)
- % Support: argIsa(predInstMax,1,tObj),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predInstMax, 1, _21676)/nonvar(_21676)==>tObj(_21676))).
- % Adding positive
- % trigger: admittedArgument(predInstMax,1,_21676)
- % body: nonvar(_21676)*->rhs([tObj(_21676)])
- % Support: (admittedArgument(predInstMax,1,_24308)/nonvar(_24308)==>tObj(_24308)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predInstMax,1,_2666))/nonvar(_2666)==>isa(_2666,tObj)
- % Support: argIsa(predInstMax,1,tObj),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predInstMax, 1, _15050))/nonvar(_15050)==>tObj(_15050))).
- % Adding positive
- % trigger: poss(admittedArgument(predInstMax,1,_15050))
- % body: nonvar(_15050)*->rhs([tObj(_15050)])
- % Support: (poss(admittedArgument(predInstMax,1,_17734))/nonvar(_17734)==>tObj(_17734)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftID)
- % Support: argIsa(predInstMax,1,ftID),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predInstMax,1,_2666)/nonvar(_2666)==>isa(_2666,ftID)
- % Support: argIsa(predInstMax,1,ftID),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predInstMax, 1, _21678)/nonvar(_21678)==>ftID(_21678))).
- % Adding positive
- % trigger: admittedArgument(predInstMax,1,_21678)
- % body: nonvar(_21678)*->rhs([ftID(_21678)])
- % Support: (admittedArgument(predInstMax,1,_24310)/nonvar(_24310)==>ftID(_24310)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predInstMax,1,_2666))/nonvar(_2666)==>isa(_2666,ftID)
- % Support: argIsa(predInstMax,1,ftID),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predInstMax, 1, _15074))/nonvar(_15074)==>ftID(_15074))).
- % Adding positive
- % trigger: poss(admittedArgument(predInstMax,1,_15074))
- % body: nonvar(_15074)*->rhs([ftID(_15074)])
- % Support: (poss(admittedArgument(predInstMax,1,_17758))/nonvar(_17758)==>ftID(_17758)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tPred)
- % Support: argIsa(predInstMax,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predInstMax,2,_2666)/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predInstMax,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predInstMax, 2, _21738)/nonvar(_21738)==>tPred(_21738))).
- % Adding positive
- % trigger: admittedArgument(predInstMax,2,_21738)
- % body: nonvar(_21738)*->rhs([tPred(_21738)])
- % Support: (admittedArgument(predInstMax,2,_24370)/nonvar(_24370)==>tPred(_24370)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predInstMax,2,_2666))/nonvar(_2666)==>isa(_2666,tPred)
- % Support: argIsa(predInstMax,2,tPred),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predInstMax, 2, _15104))/nonvar(_15104)==>tPred(_15104))).
- % Adding positive
- % trigger: poss(admittedArgument(predInstMax,2,_15104))
- % body: nonvar(_15104)*->rhs([tPred(_15104)])
- % Support: (poss(admittedArgument(predInstMax,2,_17788))/nonvar(_17788)==>tPred(_17788)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(prologSingleValued)
- % Support: argIsa(predInstMax,2,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predInstMax,2,_2666)/nonvar(_2666)==>isa(_2666,prologSingleValued)
- % Support: argIsa(predInstMax,2,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predInstMax, 2, _21782)/nonvar(_21782)==>prologSingleValued(_21782))).
- % Adding positive
- % trigger: admittedArgument(predInstMax,2,_21782)
- % body: nonvar(_21782)*->rhs([prologSingleValued(_21782)])
- % Support: (admittedArgument(predInstMax,2,_24422)/nonvar(_24422)==>prologSingleValued(_24422)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predInstMax,2,_2666))/nonvar(_2666)==>isa(_2666,prologSingleValued)
- % Support: argIsa(predInstMax,2,prologSingleValued),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predInstMax, 2, _15130))/nonvar(_15130)==>prologSingleValued(_15130))).
- % Adding positive
- % trigger: poss(admittedArgument(predInstMax,2,_15130))
- % body: nonvar(_15130)*->rhs([prologSingleValued(_15130)])
- % Support: (poss(admittedArgument(predInstMax,2,_17820))/nonvar(_17820)==>prologSingleValued(_17820)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(predInstMax,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(predInstMax,3,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(predInstMax,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(predInstMax, 3, _21746)/nonvar(_21746)==>ftInt(_21746))).
- % Adding positive
- % trigger: admittedArgument(predInstMax,3,_21746)
- % body: nonvar(_21746)*->rhs([ftInt(_21746)])
- % Support: (admittedArgument(predInstMax,3,_24378)/nonvar(_24378)==>ftInt(_24378)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(predInstMax,3,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(predInstMax,3,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(predInstMax, 3, _15146))/nonvar(_15146)==>ftInt(_15146))).
- % Adding positive
- % trigger: poss(admittedArgument(predInstMax,3,_15146))
- % body: nonvar(_15146)*->rhs([ftInt(_15146)])
- % Support: (poss(admittedArgument(predInstMax,3,_17830))/nonvar(_17830)==>ftInt(_17830)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(dividesBetween,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(dividesBetween,1,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(dividesBetween,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(dividesBetween, 1, _21812)/nonvar(_21812)==>tCol(_21812))).
- % Adding positive
- % trigger: admittedArgument(dividesBetween,1,_21812)
- % body: nonvar(_21812)*->rhs([tCol(_21812)])
- % Support: (admittedArgument(dividesBetween,1,_24446)/nonvar(_24446)==>tCol(_24446)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(dividesBetween,1,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(dividesBetween,1,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(dividesBetween, 1, _15178))/nonvar(_15178)==>tCol(_15178))).
- % Adding positive
- % trigger: poss(admittedArgument(dividesBetween,1,_15178))
- % body: nonvar(_15178)*->rhs([tCol(_15178)])
- % Support: (poss(admittedArgument(dividesBetween,1,_17862))/nonvar(_17862)==>tCol(_17862)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(dividesBetween,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(dividesBetween,2,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(dividesBetween,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(dividesBetween, 2, _21818)/nonvar(_21818)==>tCol(_21818))).
- % Adding positive
- % trigger: admittedArgument(dividesBetween,2,_21818)
- % body: nonvar(_21818)*->rhs([tCol(_21818)])
- % Support: (admittedArgument(dividesBetween,2,_24452)/nonvar(_24452)==>tCol(_24452)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(dividesBetween,2,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(dividesBetween,2,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(dividesBetween, 2, _15190))/nonvar(_15190)==>tCol(_15190))).
- % Adding positive
- % trigger: poss(admittedArgument(dividesBetween,2,_15190))
- % body: nonvar(_15190)*->rhs([tCol(_15190)])
- % Support: (poss(admittedArgument(dividesBetween,2,_17874))/nonvar(_17874)==>tCol(_17874)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(tCol)
- % Support: argIsa(dividesBetween,3,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(dividesBetween,3,_2666)/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(dividesBetween,3,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(dividesBetween, 3, _21842)/nonvar(_21842)==>tCol(_21842))).
- % Adding positive
- % trigger: admittedArgument(dividesBetween,3,_21842)
- % body: nonvar(_21842)*->rhs([tCol(_21842)])
- % Support: (admittedArgument(dividesBetween,3,_24476)/nonvar(_24476)==>tCol(_24476)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(dividesBetween,3,_2666))/nonvar(_2666)==>isa(_2666,tCol)
- % Support: argIsa(dividesBetween,3,tCol),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(dividesBetween, 3, _15220))/nonvar(_15220)==>tCol(_15220))).
- % Adding positive
- % trigger: poss(admittedArgument(dividesBetween,3,_15220))
- % body: nonvar(_15220)*->rhs([tCol(_15220)])
- % Support: (poss(admittedArgument(dividesBetween,3,_17904))/nonvar(_17904)==>tCol(_17904)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ftInt)
- % Support: argIsa(arity,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(arity,2,_2666)/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(arity,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(arity, 2, _21830)/nonvar(_21830)==>ftInt(_21830))).
- % Adding positive
- % trigger: admittedArgument(arity,2,_21830)
- % body: nonvar(_21830)*->rhs([ftInt(_21830)])
- % Support: (admittedArgument(arity,2,_24460)/nonvar(_24460)==>ftInt(_24460)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(arity,2,_2666))/nonvar(_2666)==>isa(_2666,ftInt)
- % Support: argIsa(arity,2,ftInt),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(arity, 2, _15234))/nonvar(_15234)==>ftInt(_15234))).
- % Adding positive
- % trigger: poss(admittedArgument(arity,2,_15234))
- % body: nonvar(_15234)*->rhs([ftInt(_15234)])
- % Support: (poss(admittedArgument(arity,2,_17914))/nonvar(_17914)==>ftInt(_17914)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(mobEmbodiedAgent)
- % Support: argIsa(anatomicallyCapableOf,1,mobEmbodiedAgent),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(anatomicallyCapableOf,1,_2666)/nonvar(_2666)==>isa(_2666,mobEmbodiedAgent)
- % Support: argIsa(anatomicallyCapableOf,1,mobEmbodiedAgent),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(anatomicallyCapableOf, 1, _21898)/nonvar(_21898)==>mobEmbodiedAgent(_21898))).
- % Adding positive
- % trigger: admittedArgument(anatomicallyCapableOf,1,_7430)
- % body: nonvar(_7430)*->rhs([mobEmbodiedAgent(_7430)])
- % Support: (admittedArgument(anatomicallyCapableOf,1,_7612)/nonvar(_7612)==>mobEmbodiedAgent(_7612)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(anatomicallyCapableOf,1,_2666))/nonvar(_2666)==>isa(_2666,mobEmbodiedAgent)
- % Support: argIsa(anatomicallyCapableOf,1,mobEmbodiedAgent),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(anatomicallyCapableOf, 1, _23690))/nonvar(_23690)==>mobEmbodiedAgent(_23690))).
- % Adding positive
- % trigger: poss(admittedArgument(anatomicallyCapableOf,1,_23690))
- % body: nonvar(_23690)*->rhs([mobEmbodiedAgent(_23690)])
- % Support: (poss(admittedArgument(anatomicallyCapableOf,1,_26384))/nonvar(_26384)==>mobEmbodiedAgent(_26384)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(ttFirstOrderCollection)
- % Support: argIsa(anatomicallyCapableOf,2,ttFirstOrderCollection),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(anatomicallyCapableOf,2,_2666)/nonvar(_2666)==>isa(_2666,ttFirstOrderCollection)
- % Support: argIsa(anatomicallyCapableOf,2,ttFirstOrderCollection),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(anatomicallyCapableOf, 2, _21932)/nonvar(_21932)==>ttFirstOrderCollection(_21932))).
- % Adding positive
- % trigger: admittedArgument(anatomicallyCapableOf,2,_7454)
- % body: nonvar(_7454)*->rhs([ttFirstOrderCollection(_7454)])
- % Support: (admittedArgument(anatomicallyCapableOf,2,_7636)/nonvar(_7636)==>ttFirstOrderCollection(_7636)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(anatomicallyCapableOf,2,_2666))/nonvar(_2666)==>isa(_2666,ttFirstOrderCollection)
- % Support: argIsa(anatomicallyCapableOf,2,ttFirstOrderCollection),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(anatomicallyCapableOf, 2, _23722))/nonvar(_23722)==>ttFirstOrderCollection(_23722))).
- % Adding positive
- % trigger: poss(admittedArgument(anatomicallyCapableOf,2,_23722))
- % body: nonvar(_23722)*->rhs([ttFirstOrderCollection(_23722)])
- % Support: (poss(admittedArgument(anatomicallyCapableOf,2,_26420))/nonvar(_26420)==>ttFirstOrderCollection(_26420)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: tCol(rtBinaryRolePredicate)
- % Support: argIsa(anatomicallyCapableOf,3,rtBinaryRolePredicate),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % RHS-Post1: admittedArgument(anatomicallyCapableOf,3,_2666)/nonvar(_2666)==>isa(_2666,rtBinaryRolePredicate)
- % Support: argIsa(anatomicallyCapableOf,3,rtBinaryRolePredicate),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((admittedArgument(anatomicallyCapableOf, 3, _21956)/nonvar(_21956)==>rtBinaryRolePredicate(_21956))).
- % Adding positive
- % trigger: admittedArgument(anatomicallyCapableOf,3,_7472)
- % body: nonvar(_7472)*->rhs([rtBinaryRolePredicate(_7472)])
- % Support: (admittedArgument(anatomicallyCapableOf,3,_7654)/nonvar(_7654)==>rtBinaryRolePredicate(_7654)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % RHS-Post1: poss(admittedArgument(anatomicallyCapableOf,3,_2666))/nonvar(_2666)==>isa(_2666,rtBinaryRolePredicate)
- % Support: argIsa(anatomicallyCapableOf,3,rtBinaryRolePredicate),pt(argIsa(_3870,_3872,_3874),(nonvar(_3874),nonvar(_3870),integer(_3872)*->rhs([tCol(_3874),(admittedArgument(_3870,_3872,_3944)/nonvar(_3944)==>isa(_3944,_3874)),(poss(admittedArgument(_3870,_3872,_3944))/nonvar(_3944)==>isa(_3944,_3874))])))
- % r_sane:mpred_fwc1((poss(admittedArgument(anatomicallyCapableOf, 3, _23738))/nonvar(_23738)==>rtBinaryRolePredicate(_23738))).
- % Adding positive
- % trigger: poss(admittedArgument(anatomicallyCapableOf,3,_23738))
- % body: nonvar(_23738)*->rhs([rtBinaryRolePredicate(_23738)])
- % Support: (poss(admittedArgument(anatomicallyCapableOf,3,_26434))/nonvar(_26434)==>rtBinaryRolePredicate(_26434)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',28)
- % gripe_CPUTIME(true, warn(5.650469983000001>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, (argIsa(_1222, _1224, _1226)/(nonvar(_1226), nonvar(_1222), integer(_1224))==>tCol(_1226), (admittedArgument(_1222, _1224, _1286)/nonvar(_1286)==>isa(_1286, _1226)), (poss(admittedArgument(_1222, _1224, _1286))/nonvar(_1286)==>isa(_1286, _1226))), (feature_setting(make_wff, true), pt(feature_setting(make_wff, true), rhs([(argIsa(_1222, _1224, _1226)/(nonvar(_1226), nonvar(_1222), integer(_1224))==>tCol(_1226), (admittedArgument(_1222, _1224, _1286)/nonvar(_1286)==>isa(_1286, _1226)), (poss(admittedArgument(_1222, _1224, _1286))/nonvar(_1286)==>isa(_1286, _1226)))]))), none))).
- % Found positive trigger: feature_setting(make_wff,true)
- % body: compound(feature_setting(make_wff,true)),\+is_ftVar(feature_setting(make_wff,true))*->rhs([{with_current_why(feature_setting(make_wff,true),ignore(\+addAdmittedArguments(feature_setting(make_wff,true))))}])
- % Found positive trigger: feature_setting(make_wff,true)
- % body: is_kif_clause(feature_setting(make_wff,true))*->rhs([clif(feature_setting(make_wff,true))])
- % gripe_CPUTIME(true, warn(7.140493034000002>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, feature_setting(make_wff, true), (mfl(header_sane, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc', 28), ax), none))).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:33
- % r_sane:mpred_fwc1(feature_setting(tms_mode, remove_conflicting)).
- % Found positive trigger: feature_setting(tms_mode,remove_conflicting)
- % body: feature_setting(tms_mode,_1246),_1246\==remove_conflicting*->rhs([\+feature_setting(tms_mode,_1246)])
- % Found positive trigger: feature_setting(tms_mode,remove_conflicting)
- % body: compound(feature_setting(tms_mode,remove_conflicting)),\+is_ftVar(feature_setting(tms_mode,remove_conflicting))*->rhs([{with_current_why(feature_setting(tms_mode,remove_conflicting),ignore(\+addAdmittedArguments(feature_setting(tms_mode,remove_conflicting))))}])
- % r_sane:mpred_fwc1(admittedArgument(feature_setting, 2, remove_conflicting)).
- % Found positive trigger: admittedArgument(feature_setting,2,remove_conflicting)
- % body: compound(admittedArgument(feature_setting,2,remove_conflicting)),\+is_ftVar(admittedArgument(feature_setting,2,remove_conflicting))*->rhs([{with_current_why(admittedArgument(feature_setting,2,remove_conflicting),ignore(\+addAdmittedArguments(admittedArgument(feature_setting,2,remove_conflicting))))}])
- % Found positive trigger: admittedArgument(feature_setting,2,remove_conflicting)
- % body: is_kif_clause(admittedArgument(feature_setting,2,remove_conflicting))*->rhs([clif(admittedArgument(feature_setting,2,remove_conflicting))])
- % Found positive trigger: admittedArgument(feature_setting,2,remove_conflicting)
- % body: compound(admittedArgument(feature_setting,2,remove_conflicting)),\+is_ftVar(admittedArgument(feature_setting,2,remove_conflicting))*->rhs([{with_current_why(admittedArgument(feature_setting,2,remove_conflicting),ignore(\+addAdmittedArguments(admittedArgument(feature_setting,2,remove_conflicting))))}])
- % Found positive trigger: feature_setting(tms_mode,remove_conflicting)
- % body: is_kif_clause(feature_setting(tms_mode,remove_conflicting))*->rhs([clif(feature_setting(tms_mode,remove_conflicting))])
- % Found positive trigger: feature_setting(tms_mode,remove_conflicting)
- % body: compound(feature_setting(tms_mode,remove_conflicting)),\+is_ftVar(feature_setting(tms_mode,remove_conflicting))*->rhs([{with_current_why(feature_setting(tms_mode,remove_conflicting),ignore(\+addAdmittedArguments(feature_setting(tms_mode,remove_conflicting))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:40
- % r_sane:mpred_fwc1(compile_clif).
- % Found positive trigger: compile_clif
- % body: compound(compile_clif),\+is_ftVar(compile_clif)*->rhs([{with_current_why(compile_clif,ignore(\+addAdmittedArguments(compile_clif)))}])
- % Found positive trigger: compile_clif
- % body: is_kif_clause(compile_clif)*->rhs([clif(compile_clif)])
- % Found positive trigger: compile_clif
- % body: compound(compile_clif),\+is_ftVar(compile_clif)*->rhs([{with_current_why(compile_clif,ignore(\+addAdmittedArguments(compile_clif)))}])
- % r_sane:mpred_fwc1(compile_boxlog).
- % Found positive trigger: compile_boxlog
- % body: compound(compile_boxlog),\+is_ftVar(compile_boxlog)*->rhs([{with_current_why(compile_boxlog,ignore(\+addAdmittedArguments(compile_boxlog)))}])
- % Found positive trigger: compile_boxlog
- % body: is_kif_clause(compile_boxlog)*->rhs([clif(compile_boxlog)])
- % Found positive trigger: compile_boxlog
- % body: compound(compile_boxlog),\+is_ftVar(compile_boxlog)*->rhs([{with_current_why(compile_boxlog,ignore(\+addAdmittedArguments(compile_boxlog)))}])
- % r_sane:mpred_fwc1(compile_pfclog).
- % Found positive trigger: compile_pfclog
- % body: compound(compile_pfclog),\+is_ftVar(compile_pfclog)*->rhs([{with_current_why(compile_pfclog,ignore(\+addAdmittedArguments(compile_pfclog)))}])
- % Found positive trigger: compile_pfclog
- % body: is_kif_clause(compile_pfclog)*->rhs([clif(compile_pfclog)])
- % Found positive trigger: compile_pfclog
- % body: compound(compile_pfclog),\+is_ftVar(compile_pfclog)*->rhs([{with_current_why(compile_pfclog,ignore(\+addAdmittedArguments(compile_pfclog)))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:48
- % r_sane:mpred_fwc1(exists(_57378, glythed(_57378, "1"))).
- % Found positive trigger: exists(_1228,glythed(_1228,"1"))
- % body: compound(exists(_1228,glythed(_1228,"1"))),\+is_ftVar(exists(_1228,glythed(_1228,"1")))*->rhs([{with_current_why(exists(_1228,glythed(_1228,"1")),ignore(\+addAdmittedArguments(exists(_1228,glythed(_1228,"1")))))}])
- % Found positive trigger: exists(_1228,glythed(_1228,"1"))
- % body: is_kif_clause(exists(_1228,glythed(_1228,"1")))*->rhs([clif(exists(_1228,glythed(_1228,"1")))])
- % RHS-Post1: clif(exists(_1228,glythed(_1228,"1")))
- % Support: exists(_1092,glythed(_1092,"1")),pt(exists(_1228,glythed(_1228,"1")),(is_kif_clause(exists(_1228,glythed(_1228,"1")))*->rhs([clif(exists(_1228,glythed(_1228,"1")))])))
- % r_sane:mpred_fwc1(clif(exists(_14392, glythed(_14392, "1")))).
- % Found positive trigger: clif(exists(_2292,glythed(_2292,"1")))
- % body: compound(clif(exists(_2292,glythed(_2292,"1")))),\+is_ftVar(clif(exists(_2292,glythed(_2292,"1"))))*->rhs([{with_current_why(clif(exists(_2292,glythed(_2292,"1"))),ignore(\+addAdmittedArguments(clif(exists(_2292,glythed(_2292,"1"))))))}])
- % Found positive trigger: clif(exists(_2292,glythed(_2292,"1")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2292,glythed(_2292,"1")))}])
- % =clif=
- % exists(_2292, glythed(_2292, "1")).
- % Found positive trigger: clif(exists(_2292,glythed(_2292,"1")))
- % body: is_kif_clause(clif(exists(_2292,glythed(_2292,"1"))))*->rhs([clif(clif(exists(_2292,glythed(_2292,"1"))))])
- % Found positive trigger: clif(exists(_2292,glythed(_2292,"1")))
- % body: \+is_kif_clause(exists(_2292,glythed(_2292,"1")))*->rhs([{delistify_last_arg(exists(_2292,glythed(_2292,"1")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % Found positive trigger: clif(exists(_2292,glythed(_2292,"1")))
- % body: is_kif_clause(exists(_2292,glythed(_2292,"1")))*->rhs([{delistify_last_arg(exists(_2292,glythed(_2292,"1")),kif_to_boxlog,_4676)},boxlog(_4676)])
- % kif :-
- % exists(_2292, glythed(_2292, "1")).
- % qualify_nesc :-
- % exists(_2292, nesc(glythed(_2292, "1"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2292, nesc(b_d(KB, nesc, poss), glythed(_2292, "1"))), v(nesc(b_d(KB, nesc, poss), glythed(_2292, "1")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_0FnSk, "1")), ~skolem(_2292, skExistsGlythed_0FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2292, "1")), v(nesc(glythed(skExistsGlythed_0FnSk, "1")), ~skolem(_2292, skExistsGlythed_0FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2292, "1"))
- % ; tru(glythed(skExistsGlythed_0FnSk, "1"))
- % ; neg(skolem(_2292, skExistsGlythed_0FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2292, "1"))), n(tru(glythed(skExistsGlythed_0FnSk, "1"))), n(neg(skolem(_2292, skExistsGlythed_0FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2292,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_2292,"1"))))
- % Support: clif(exists(_2148,glythed(_2148,"1"))),pt(clif(exists(_2292,glythed(_2292,"1"))),(is_kif_clause(exists(_2292,glythed(_2292,"1")))*->rhs([{delistify_last_arg(exists(_2292,glythed(_2292,"1")),kif_to_boxlog,(proven_neg(skolem(_2292,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_2292,"1"))))},boxlog((proven_neg(skolem(_2292,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_2292,"1"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12786, skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk, "1")), proven_neg(glythed(_12786, "1"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15618,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_15618,"1"))))
- % body: compound(boxlog((proven_neg(skolem(_15618,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_15618,"1"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15618,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_15618,"1")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15618,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_15618,"1")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15618,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_15618,"1")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_0FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_0FnSk, "1")),
- % proven_neg(glythed(_4078, "1")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_4078,"1"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_0FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_3894,"1")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1"))),boxlog_to_pfc,(~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_4078,"1"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_0FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_4078,"1"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_0FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_4078,"1"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_0FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_0FnSk, "1"), ~glythed(_16068, "1"), {is_unit(_16068)}==>proven_neg(skolem(_16068, skExistsGlythed_0FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_19314,"1"),{is_unit(_19314)}==>proven_neg(skolem(_19314,skExistsGlythed_0FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_19314,"1"),{is_unit(_19314)}==>proven_neg(skolem(_19314,skExistsGlythed_0FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_19314,"1"),{is_unit(_19314)}==>proven_neg(skolem(_19314,skExistsGlythed_0FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_19314,"1"),{is_unit(_19314)}==>proven_neg(skolem(_19314,skExistsGlythed_0FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_19314,"1"),{is_unit(_19314)}==>proven_neg(skolem(_19314,skExistsGlythed_0FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_0FnSk, "1"), ~glythed(_5658, "1"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_0FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5446,"1"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_0FnSk)))),pt(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk)))),rhs([(~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_0FnSk, "1"), ~glythed(_39434, "1"), {is_unit(_39434)}==>proven_neg(skolem(_39434, skExistsGlythed_0FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_0FnSk,"1")
- % body: pt(~glythed(_6914,"1"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_0FnSk))])))
- % Support: (~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_7134,"1"),{is_unit(_7134)}==>proven_neg(skolem(_7134,skExistsGlythed_0FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',48)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_0FnSk,"1"),~glythed(_5658,"1"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_0FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_0FnSk)):-proven_neg(glythed(skExistsGlythed_0FnSk,"1")),proven_neg(glythed(_4078,"1")))))))}])
- % RHS-Post1: boxlog((glythed(_2292,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_2292=skExistsGlythed_0FnSk}))
- % Support: clif(exists(_2148,glythed(_2148,"1"))),pt(clif(exists(_2292,glythed(_2292,"1"))),(is_kif_clause(exists(_2292,glythed(_2292,"1")))*->rhs([{delistify_last_arg(exists(_2292,glythed(_2292,"1")),kif_to_boxlog,(glythed(_2292,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_2292=skExistsGlythed_0FnSk}))},boxlog((glythed(_2292,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_2292=skExistsGlythed_0FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12458, "1"):- \+glythed(skExistsGlythed_0FnSk, "1"), {_12458=skExistsGlythed_0FnSk}))).
- % Found positive trigger: boxlog((glythed(_15222,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_15222=skExistsGlythed_0FnSk}))
- % body: compound(boxlog((glythed(_15222,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_15222=skExistsGlythed_0FnSk}))),\+is_ftVar(boxlog((glythed(_15222,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_15222=skExistsGlythed_0FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15222,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_15222=skExistsGlythed_0FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15222,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_15222=skExistsGlythed_0FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk}))}])
- % =boxlog=
- % glythed(_4126, "1") :-
- % \+ glythed(skExistsGlythed_0FnSk, "1"),
- % { _4126=skExistsGlythed_0FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk})))*->rhs([clif(boxlog((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk})))])
- % Found positive trigger: boxlog((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk}))
- % body: delistify_last_arg((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk}),boxlog_to_pfc,_15296),must_be_unqualified(_15296)*->rhs([pfclog(_15296)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk},{is_unit(_4126)}==>glythed(_4126,"1")))
- % Support: boxlog((glythed(_3950,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_3950=skExistsGlythed_0FnSk})),pt(boxlog((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk})),(delistify_last_arg((glythed(_4126,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk},{is_unit(_4126)}==>glythed(_4126,"1"))),must_be_unqualified((\+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk},{is_unit(_4126)}==>glythed(_4126,"1")))*->rhs([pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_4126=skExistsGlythed_0FnSk},{is_unit(_4126)}==>glythed(_4126,"1")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_0FnSk, "1"), {_15778=skExistsGlythed_0FnSk}, {is_unit(_15778)}==>glythed(_15778, "1")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_18966=skExistsGlythed_0FnSk},{is_unit(_18966)}==>glythed(_18966,"1")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_18966=skExistsGlythed_0FnSk},{is_unit(_18966)}==>glythed(_18966,"1")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_18966=skExistsGlythed_0FnSk},{is_unit(_18966)}==>glythed(_18966,"1"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_18966=skExistsGlythed_0FnSk},{is_unit(_18966)}==>glythed(_18966,"1"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_18966=skExistsGlythed_0FnSk},{is_unit(_18966)}==>glythed(_18966,"1"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_0FnSk, "1"), {_5654=skExistsGlythed_0FnSk}, {is_unit(_5654)}==>glythed(_5654, "1").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1")))
- % body: rhs([(\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1"))])
- % RHS-Post1: \+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1")
- % Support: pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5450=skExistsGlythed_0FnSk},{is_unit(_5450)}==>glythed(_5450,"1"))),pt(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1"))),rhs([(\+glythed(skExistsGlythed_0FnSk,"1"),{_5654=skExistsGlythed_0FnSk},{is_unit(_5654)}==>glythed(_5654,"1"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_0FnSk, "1"), {_39084=skExistsGlythed_0FnSk}, {is_unit(_39084)}==>glythed(_39084, "1"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_0FnSk,"1")
- % test: call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1"))
- % body: _6838=skExistsGlythed_0FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"1")])
- % Support: (\+glythed(skExistsGlythed_0FnSk,"1"),{_7048=skExistsGlythed_0FnSk},{is_unit(_7048)}==>glythed(_7048,"1")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',48)
- % uses_predicate(header_sane, baseKB, glythed, 2).
- % RHS-Post1: glythed(skExistsGlythed_0FnSk,"1")
- % Support: \+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_0FnSk,"1")
- % cond: call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1"))
- % action: skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_0FnSk,"1"),(\+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_0FnSk, "1")).
- % Found positive trigger: glythed(skExistsGlythed_0FnSk,"1")
- % body: compound(glythed(skExistsGlythed_0FnSk,"1")),\+is_ftVar(glythed(skExistsGlythed_0FnSk,"1"))*->rhs([{with_current_why(glythed(skExistsGlythed_0FnSk,"1"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_0FnSk,"1"))))}])
- % Found positive trigger: glythed(skExistsGlythed_0FnSk,"1")
- % body: is_kif_clause(glythed(skExistsGlythed_0FnSk,"1"))*->rhs([clif(glythed(skExistsGlythed_0FnSk,"1"))])
- % Found positive trigger: glythed(skExistsGlythed_0FnSk,"1")
- % body: compound(glythed(skExistsGlythed_0FnSk,"1")),\+is_ftVar(glythed(skExistsGlythed_0FnSk,"1"))*->rhs([{with_current_why(glythed(skExistsGlythed_0FnSk,"1"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_0FnSk,"1"))))}])
- % Found negative trigger: glythed(skExistsGlythed_0FnSk,"1")
- % cond: call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1"))
- % body: skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])
- % Support: spft(glythed(skExistsGlythed_0FnSk,"1"),\+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_0FnSk,"1")
- % support (was): \+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_0FnSk,"1"),\+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_0FnSk,"1"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_0FnSk, "1"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5622=skExistsGlythed_0FnSk},{is_unit(_5622)}==>glythed(_5622,"1")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5622=skExistsGlythed_0FnSk},{is_unit(_5622)}==>glythed(_5622,"1")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5622=skExistsGlythed_0FnSk},{is_unit(_5622)}==>glythed(_5622,"1"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5622=skExistsGlythed_0FnSk},{is_unit(_5622)}==>glythed(_5622,"1"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_0FnSk,"1"),{_5622=skExistsGlythed_0FnSk},{is_unit(_5622)}==>glythed(_5622,"1"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4094=skExistsGlythed_0FnSk}))
- % body: compound(boxlog((glythed(_4094,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4094=skExistsGlythed_0FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4094=skExistsGlythed_0FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4094=skExistsGlythed_0FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"1"):- \+glythed(skExistsGlythed_0FnSk,"1"),{_4094=skExistsGlythed_0FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_2292,"1")))
- % Support: clif(exists(_2148,glythed(_2148,"1"))),pt(clif(exists(_2292,glythed(_2292,"1"))),(is_kif_clause(exists(_2292,glythed(_2292,"1")))*->rhs([{delistify_last_arg(exists(_2292,glythed(_2292,"1")),kif_to_boxlog,(glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_2292,"1")))},boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_2292,"1")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_0FnSk, "1"):- \+glythed(_19156, "1")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1")))
- % body: compound(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1")))}])
- % =boxlog=
- % glythed(skExistsGlythed_0FnSk, "1") :-
- % \+ glythed(_3832, "1").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1")))
- % body: delistify_last_arg((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"1")==>glythed(skExistsGlythed_0FnSk,"1")))
- % Support: boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3680,"1"))),pt(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1"))),(delistify_last_arg((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3832,"1")),boxlog_to_pfc,(\+glythed(_3832,"1")==>glythed(skExistsGlythed_0FnSk,"1"))),must_be_unqualified((\+glythed(_3832,"1")==>glythed(skExistsGlythed_0FnSk,"1")))*->rhs([pfclog((\+glythed(_3832,"1")==>glythed(skExistsGlythed_0FnSk,"1")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13716, "1")==>glythed(skExistsGlythed_0FnSk, "1")))).
- % Found positive trigger: pfclog((\+glythed(_16546,"1")==>glythed(skExistsGlythed_0FnSk,"1")))
- % body: compound(pfclog((\+glythed(_16546,"1")==>glythed(skExistsGlythed_0FnSk,"1")))),\+is_ftVar(pfclog((\+glythed(_16546,"1")==>glythed(skExistsGlythed_0FnSk,"1"))))*->rhs([{with_current_why(pfclog((\+glythed(_16546,"1")==>glythed(skExistsGlythed_0FnSk,"1"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16546,"1")==>glythed(skExistsGlythed_0FnSk,"1"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1")))}])
- % =pfclog=
- % \+glythed(_5070, "1")==>glythed(skExistsGlythed_0FnSk, "1").
- % Found positive trigger: pfclog((\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1"))))*->rhs([clif(pfclog((\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1")))
- % body: rhs([(\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1"))])
- % RHS-Post1: \+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1")
- % Support: pfclog((\+glythed(_4918,"1")==>glythed(skExistsGlythed_0FnSk,"1"))),pt(pfclog((\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1"))),rhs([(\+glythed(_5070,"1")==>glythed(skExistsGlythed_0FnSk,"1"))]))
- % r_sane:mpred_fwc1((\+glythed(_31986, "1")==>glythed(skExistsGlythed_0FnSk, "1"))).
- % Adding negative
- % trigger: glythed(_6022,"1")
- % test: call_u_no_bc(glythed(_6022,"1"))
- % body: rhs([glythed(skExistsGlythed_0FnSk,"1")])
- % Support: (\+glythed(_6180,"1")==>glythed(skExistsGlythed_0FnSk,"1")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',48)
- % RHS-Post1: glythed(skExistsGlythed_0FnSk,"1")
- % Support: \+glythed(_6022,"1"),nt(glythed(_6540,"1"),call_u_no_bc(glythed(_6022,"1")),rhs([glythed(skExistsGlythed_0FnSk,"1")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"1")
- % cond: call_u_no_bc(glythed(_6022,"1"))
- % action: rhs([glythed(skExistsGlythed_0FnSk,"1")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_0FnSk,"1"),(\+glythed(_6022,"1"),nt(glythed(_6540,"1"),call_u_no_bc(glythed(_6022,"1")),rhs([glythed(skExistsGlythed_0FnSk,"1")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_0FnSk, "1")).
- % Found positive trigger: glythed(skExistsGlythed_0FnSk,"1")
- % body: compound(glythed(skExistsGlythed_0FnSk,"1")),\+is_ftVar(glythed(skExistsGlythed_0FnSk,"1"))*->rhs([{with_current_why(glythed(skExistsGlythed_0FnSk,"1"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_0FnSk,"1"))))}])
- % Found positive trigger: glythed(skExistsGlythed_0FnSk,"1")
- % body: is_kif_clause(glythed(skExistsGlythed_0FnSk,"1"))*->rhs([clif(glythed(skExistsGlythed_0FnSk,"1"))])
- % Found positive trigger: glythed(skExistsGlythed_0FnSk,"1")
- % body: compound(glythed(skExistsGlythed_0FnSk,"1")),\+is_ftVar(glythed(skExistsGlythed_0FnSk,"1"))*->rhs([{with_current_why(glythed(skExistsGlythed_0FnSk,"1"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_0FnSk,"1"))))}])
- % Found negative trigger: glythed(skExistsGlythed_0FnSk,"1")
- % cond: call_u_no_bc(glythed(_23310,"1"))
- % body: rhs([glythed(skExistsGlythed_0FnSk,"1")])
- % Support: spft(glythed(skExistsGlythed_0FnSk,"1"),\+glythed(_23310,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(_23310,"1")),rhs([glythed(skExistsGlythed_0FnSk,"1")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_0FnSk,"1")
- % support (was): \+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),rhs([glythed(skExistsGlythed_0FnSk,"1")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_0FnSk,"1"),\+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),rhs([glythed(skExistsGlythed_0FnSk,"1")]))))
- % RHS-Post1: glythed(skExistsGlythed_0FnSk,"1")
- % Support: \+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_0FnSk,"1")
- % cond: call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1"))
- % action: skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_0FnSk,"1"),(\+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))))
- % moving(inherit_above(header_sane, glythed(_29070, _29072))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_0FnSk,"1"),\+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))))
- % RHS-Post1: glythed(skExistsGlythed_0FnSk,"1")
- % Support: \+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_0FnSk,"1")
- % cond: call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1"))
- % action: skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_0FnSk,"1"),(\+glythed(skExistsGlythed_0FnSk,"1"),nt(glythed(skExistsGlythed_0FnSk,"1"),call_u_no_bc(glythed(skExistsGlythed_0FnSk,"1")),(skExistsGlythed_0FnSk=skExistsGlythed_0FnSk*->is_unit(skExistsGlythed_0FnSk)*->rhs([glythed(skExistsGlythed_0FnSk,"1")])))))
- % moving(inherit_above(header_sane, glythed(_29254, _29256))).
- % Found positive trigger: pfclog((\+glythed(_5040,"1")==>glythed(skExistsGlythed_0FnSk,"1")))
- % body: compound(pfclog((\+glythed(_5040,"1")==>glythed(skExistsGlythed_0FnSk,"1")))),\+is_ftVar(pfclog((\+glythed(_5040,"1")==>glythed(skExistsGlythed_0FnSk,"1"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"1")==>glythed(skExistsGlythed_0FnSk,"1"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"1")==>glythed(skExistsGlythed_0FnSk,"1"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3802,"1")))
- % body: compound(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3802,"1")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3802,"1"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3802,"1"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_0FnSk,"1"):- \+glythed(_3802,"1"))))))}])
- % Found positive trigger: clif(exists(_2292,glythed(_2292,"1")))
- % body: compound(clif(exists(_2292,glythed(_2292,"1")))),\+is_ftVar(clif(exists(_2292,glythed(_2292,"1"))))*->rhs([{with_current_why(clif(exists(_2292,glythed(_2292,"1"))),ignore(\+addAdmittedArguments(clif(exists(_2292,glythed(_2292,"1"))))))}])
- % Found positive trigger: exists(_1220,glythed(_1220,"1"))
- % body: compound(exists(_1220,glythed(_1220,"1"))),\+is_ftVar(exists(_1220,glythed(_1220,"1")))*->rhs([{with_current_why(exists(_1220,glythed(_1220,"1")),ignore(\+addAdmittedArguments(exists(_1220,glythed(_1220,"1")))))}])
- % r_sane:mpred_fwc1(exists(_31346, glythed(_31346, "2"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"2"))
- % body: compound(exists(_1236,glythed(_1236,"2"))),\+is_ftVar(exists(_1236,glythed(_1236,"2")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"2")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"2")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"2"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"2")))*->rhs([clif(exists(_1236,glythed(_1236,"2")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"2")))
- % Support: exists(_1100,glythed(_1100,"2")),pt(exists(_1236,glythed(_1236,"2")),(is_kif_clause(exists(_1236,glythed(_1236,"2")))*->rhs([clif(exists(_1236,glythed(_1236,"2")))])))
- % r_sane:mpred_fwc1(clif(exists(_15378, glythed(_15378, "2")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"2")))
- % body: compound(clif(exists(_2296,glythed(_2296,"2")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"2"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"2"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"2"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"2")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"2")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "2")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"2")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"2"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"2"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"2")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"2")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"2")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"2")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"2")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"2")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "2")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "2"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "2"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "2")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_1FnSk, "2")), ~skolem(_2296, skExistsGlythed_1FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "2")), v(nesc(glythed(skExistsGlythed_1FnSk, "2")), ~skolem(_2296, skExistsGlythed_1FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "2"))
- % ; tru(glythed(skExistsGlythed_1FnSk, "2"))
- % ; neg(skolem(_2296, skExistsGlythed_1FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "2"))), n(tru(glythed(skExistsGlythed_1FnSk, "2"))), n(neg(skolem(_2296, skExistsGlythed_1FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_2296,"2"))))
- % Support: clif(exists(_2152,glythed(_2152,"2"))),pt(clif(exists(_2296,glythed(_2296,"2"))),(is_kif_clause(exists(_2296,glythed(_2296,"2")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"2")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_2296,"2"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_2296,"2"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12782, skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk, "2")), proven_neg(glythed(_12782, "2"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15614,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_15614,"2"))))
- % body: compound(boxlog((proven_neg(skolem(_15614,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_15614,"2"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15614,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_15614,"2")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15614,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_15614,"2")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15614,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_15614,"2")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_1FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_1FnSk, "2")),
- % proven_neg(glythed(_4078, "2")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_4078,"2"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_1FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_3894,"2")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2"))),boxlog_to_pfc,(~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_4078,"2"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_1FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_4078,"2"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_1FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_4078,"2"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_1FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_1FnSk, "2"), ~glythed(_16056, "2"), {is_unit(_16056)}==>proven_neg(skolem(_16056, skExistsGlythed_1FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_19302,"2"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_1FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_19302,"2"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_1FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_19302,"2"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_1FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_19302,"2"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_1FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_19302,"2"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_1FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_1FnSk, "2"), ~glythed(_5658, "2"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_1FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5446,"2"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_1FnSk)))),pt(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk)))),rhs([(~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_1FnSk, "2"), ~glythed(_39182, "2"), {is_unit(_39182)}==>proven_neg(skolem(_39182, skExistsGlythed_1FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_1FnSk,"2")
- % body: pt(~glythed(_6914,"2"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_1FnSk))])))
- % Support: (~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_7132,"2"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_1FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',48)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_1FnSk,"2"),~glythed(_5658,"2"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_1FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_1FnSk)):-proven_neg(glythed(skExistsGlythed_1FnSk,"2")),proven_neg(glythed(_4078,"2")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_2296=skExistsGlythed_1FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"2"))),pt(clif(exists(_2296,glythed(_2296,"2"))),(is_kif_clause(exists(_2296,glythed(_2296,"2")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"2")),kif_to_boxlog,(glythed(_2296,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_2296=skExistsGlythed_1FnSk}))},boxlog((glythed(_2296,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_2296=skExistsGlythed_1FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12426, "2"):- \+glythed(skExistsGlythed_1FnSk, "2"), {_12426=skExistsGlythed_1FnSk}))).
- % Found positive trigger: boxlog((glythed(_15190,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_15190=skExistsGlythed_1FnSk}))
- % body: compound(boxlog((glythed(_15190,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_15190=skExistsGlythed_1FnSk}))),\+is_ftVar(boxlog((glythed(_15190,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_15190=skExistsGlythed_1FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15190,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_15190=skExistsGlythed_1FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15190,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_15190=skExistsGlythed_1FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk}))}])
- % =boxlog=
- % glythed(_4094, "2") :-
- % \+ glythed(skExistsGlythed_1FnSk, "2"),
- % { _4094=skExistsGlythed_1FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk})))*->rhs([clif(boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk}))
- % body: delistify_last_arg((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk},{is_unit(_4094)}==>glythed(_4094,"2")))
- % Support: boxlog((glythed(_3918,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_3918=skExistsGlythed_1FnSk})),pt(boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk})),(delistify_last_arg((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk},{is_unit(_4094)}==>glythed(_4094,"2"))),must_be_unqualified((\+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk},{is_unit(_4094)}==>glythed(_4094,"2")))*->rhs([pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk},{is_unit(_4094)}==>glythed(_4094,"2")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_1FnSk, "2"), {_15752=skExistsGlythed_1FnSk}, {is_unit(_15752)}==>glythed(_15752, "2")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_18940=skExistsGlythed_1FnSk},{is_unit(_18940)}==>glythed(_18940,"2")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_18940=skExistsGlythed_1FnSk},{is_unit(_18940)}==>glythed(_18940,"2")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_18940=skExistsGlythed_1FnSk},{is_unit(_18940)}==>glythed(_18940,"2"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_18940=skExistsGlythed_1FnSk},{is_unit(_18940)}==>glythed(_18940,"2"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_18940=skExistsGlythed_1FnSk},{is_unit(_18940)}==>glythed(_18940,"2"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_1FnSk, "2"), {_5622=skExistsGlythed_1FnSk}, {is_unit(_5622)}==>glythed(_5622, "2").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2")))
- % body: rhs([(\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2"))])
- % RHS-Post1: \+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2")
- % Support: pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5418=skExistsGlythed_1FnSk},{is_unit(_5418)}==>glythed(_5418,"2"))),pt(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2"))),rhs([(\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_1FnSk, "2"), {_39052=skExistsGlythed_1FnSk}, {is_unit(_39052)}==>glythed(_39052, "2"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_1FnSk,"2")
- % test: call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2"))
- % body: _6838=skExistsGlythed_1FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"2")])
- % Support: (\+glythed(skExistsGlythed_1FnSk,"2"),{_7048=skExistsGlythed_1FnSk},{is_unit(_7048)}==>glythed(_7048,"2")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',48)
- % RHS-Post1: glythed(skExistsGlythed_1FnSk,"2")
- % Support: \+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_1FnSk,"2")
- % cond: call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2"))
- % action: skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_1FnSk,"2"),(\+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_1FnSk, "2")).
- % Found positive trigger: glythed(skExistsGlythed_1FnSk,"2")
- % body: compound(glythed(skExistsGlythed_1FnSk,"2")),\+is_ftVar(glythed(skExistsGlythed_1FnSk,"2"))*->rhs([{with_current_why(glythed(skExistsGlythed_1FnSk,"2"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_1FnSk,"2"))))}])
- % Found positive trigger: glythed(skExistsGlythed_1FnSk,"2")
- % body: is_kif_clause(glythed(skExistsGlythed_1FnSk,"2"))*->rhs([clif(glythed(skExistsGlythed_1FnSk,"2"))])
- % Found positive trigger: glythed(skExistsGlythed_1FnSk,"2")
- % body: compound(glythed(skExistsGlythed_1FnSk,"2")),\+is_ftVar(glythed(skExistsGlythed_1FnSk,"2"))*->rhs([{with_current_why(glythed(skExistsGlythed_1FnSk,"2"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_1FnSk,"2"))))}])
- % Found negative trigger: glythed(skExistsGlythed_1FnSk,"2")
- % cond: call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2"))
- % body: skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])
- % Support: spft(glythed(skExistsGlythed_1FnSk,"2"),\+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_1FnSk,"2")
- % support (was): \+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_1FnSk,"2"),\+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_1FnSk,"2"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_1FnSk, "2"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_1FnSk,"2"),{_5622=skExistsGlythed_1FnSk},{is_unit(_5622)}==>glythed(_5622,"2"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk}))
- % body: compound(boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"2"):- \+glythed(skExistsGlythed_1FnSk,"2"),{_4094=skExistsGlythed_1FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_2296,"2")))
- % Support: clif(exists(_2152,glythed(_2152,"2"))),pt(clif(exists(_2296,glythed(_2296,"2"))),(is_kif_clause(exists(_2296,glythed(_2296,"2")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"2")),kif_to_boxlog,(glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_2296,"2")))},boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_2296,"2")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_1FnSk, "2"):- \+glythed(_19162, "2")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2")))
- % body: compound(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2")))}])
- % =boxlog=
- % glythed(skExistsGlythed_1FnSk, "2") :-
- % \+ glythed(_3832, "2").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2")))
- % body: delistify_last_arg((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"2")==>glythed(skExistsGlythed_1FnSk,"2")))
- % Support: boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3680,"2"))),pt(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2"))),(delistify_last_arg((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3832,"2")),boxlog_to_pfc,(\+glythed(_3832,"2")==>glythed(skExistsGlythed_1FnSk,"2"))),must_be_unqualified((\+glythed(_3832,"2")==>glythed(skExistsGlythed_1FnSk,"2")))*->rhs([pfclog((\+glythed(_3832,"2")==>glythed(skExistsGlythed_1FnSk,"2")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13722, "2")==>glythed(skExistsGlythed_1FnSk, "2")))).
- % Found positive trigger: pfclog((\+glythed(_16552,"2")==>glythed(skExistsGlythed_1FnSk,"2")))
- % body: compound(pfclog((\+glythed(_16552,"2")==>glythed(skExistsGlythed_1FnSk,"2")))),\+is_ftVar(pfclog((\+glythed(_16552,"2")==>glythed(skExistsGlythed_1FnSk,"2"))))*->rhs([{with_current_why(pfclog((\+glythed(_16552,"2")==>glythed(skExistsGlythed_1FnSk,"2"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16552,"2")==>glythed(skExistsGlythed_1FnSk,"2"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2")))}])
- % =pfclog=
- % \+glythed(_5070, "2")==>glythed(skExistsGlythed_1FnSk, "2").
- % Found positive trigger: pfclog((\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2"))))*->rhs([clif(pfclog((\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2")))
- % body: rhs([(\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2"))])
- % RHS-Post1: \+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2")
- % Support: pfclog((\+glythed(_4918,"2")==>glythed(skExistsGlythed_1FnSk,"2"))),pt(pfclog((\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2"))),rhs([(\+glythed(_5070,"2")==>glythed(skExistsGlythed_1FnSk,"2"))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "2")==>glythed(skExistsGlythed_1FnSk, "2"))).
- % Adding negative
- % trigger: glythed(_6022,"2")
- % test: call_u_no_bc(glythed(_6022,"2"))
- % body: rhs([glythed(skExistsGlythed_1FnSk,"2")])
- % Support: (\+glythed(_6180,"2")==>glythed(skExistsGlythed_1FnSk,"2")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',48)
- % RHS-Post1: glythed(skExistsGlythed_1FnSk,"2")
- % Support: \+glythed(_6022,"2"),nt(glythed(_6540,"2"),call_u_no_bc(glythed(_6022,"2")),rhs([glythed(skExistsGlythed_1FnSk,"2")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"2")
- % cond: call_u_no_bc(glythed(_6022,"2"))
- % action: rhs([glythed(skExistsGlythed_1FnSk,"2")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_1FnSk,"2"),(\+glythed(_6022,"2"),nt(glythed(_6540,"2"),call_u_no_bc(glythed(_6022,"2")),rhs([glythed(skExistsGlythed_1FnSk,"2")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_1FnSk, "2")).
- % Found positive trigger: glythed(skExistsGlythed_1FnSk,"2")
- % body: compound(glythed(skExistsGlythed_1FnSk,"2")),\+is_ftVar(glythed(skExistsGlythed_1FnSk,"2"))*->rhs([{with_current_why(glythed(skExistsGlythed_1FnSk,"2"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_1FnSk,"2"))))}])
- % Found positive trigger: glythed(skExistsGlythed_1FnSk,"2")
- % body: is_kif_clause(glythed(skExistsGlythed_1FnSk,"2"))*->rhs([clif(glythed(skExistsGlythed_1FnSk,"2"))])
- % Found positive trigger: glythed(skExistsGlythed_1FnSk,"2")
- % body: compound(glythed(skExistsGlythed_1FnSk,"2")),\+is_ftVar(glythed(skExistsGlythed_1FnSk,"2"))*->rhs([{with_current_why(glythed(skExistsGlythed_1FnSk,"2"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_1FnSk,"2"))))}])
- % Found negative trigger: glythed(skExistsGlythed_1FnSk,"2")
- % cond: call_u_no_bc(glythed(_23310,"2"))
- % body: rhs([glythed(skExistsGlythed_1FnSk,"2")])
- % Support: spft(glythed(skExistsGlythed_1FnSk,"2"),\+glythed(_23310,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(_23310,"2")),rhs([glythed(skExistsGlythed_1FnSk,"2")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_1FnSk,"2")
- % support (was): \+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),rhs([glythed(skExistsGlythed_1FnSk,"2")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_1FnSk,"2"),\+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),rhs([glythed(skExistsGlythed_1FnSk,"2")]))))
- % RHS-Post1: glythed(skExistsGlythed_1FnSk,"2")
- % Support: \+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_1FnSk,"2")
- % cond: call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2"))
- % action: skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_1FnSk,"2"),(\+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))))
- % moving(inherit_above(header_sane, glythed(_29070, _29072))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_1FnSk,"2"),\+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))))
- % RHS-Post1: glythed(skExistsGlythed_1FnSk,"2")
- % Support: \+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_1FnSk,"2")
- % cond: call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2"))
- % action: skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_1FnSk,"2"),(\+glythed(skExistsGlythed_1FnSk,"2"),nt(glythed(skExistsGlythed_1FnSk,"2"),call_u_no_bc(glythed(skExistsGlythed_1FnSk,"2")),(skExistsGlythed_1FnSk=skExistsGlythed_1FnSk*->is_unit(skExistsGlythed_1FnSk)*->rhs([glythed(skExistsGlythed_1FnSk,"2")])))))
- % moving(inherit_above(header_sane, glythed(_29254, _29256))).
- % Found positive trigger: pfclog((\+glythed(_5040,"2")==>glythed(skExistsGlythed_1FnSk,"2")))
- % body: compound(pfclog((\+glythed(_5040,"2")==>glythed(skExistsGlythed_1FnSk,"2")))),\+is_ftVar(pfclog((\+glythed(_5040,"2")==>glythed(skExistsGlythed_1FnSk,"2"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"2")==>glythed(skExistsGlythed_1FnSk,"2"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"2")==>glythed(skExistsGlythed_1FnSk,"2"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3802,"2")))
- % body: compound(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3802,"2")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3802,"2"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3802,"2"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_1FnSk,"2"):- \+glythed(_3802,"2"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"2")))
- % body: compound(clif(exists(_2296,glythed(_2296,"2")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"2"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"2"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"2"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"2"))
- % body: compound(exists(_1224,glythed(_1224,"2"))),\+is_ftVar(exists(_1224,glythed(_1224,"2")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"2")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"2")))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:49
- % r_sane:mpred_fwc1(exists(_31340, glythed(_31340, "3"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"3"))
- % body: compound(exists(_1236,glythed(_1236,"3"))),\+is_ftVar(exists(_1236,glythed(_1236,"3")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"3")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"3")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"3"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"3")))*->rhs([clif(exists(_1236,glythed(_1236,"3")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"3")))
- % Support: exists(_1100,glythed(_1100,"3")),pt(exists(_1236,glythed(_1236,"3")),(is_kif_clause(exists(_1236,glythed(_1236,"3")))*->rhs([clif(exists(_1236,glythed(_1236,"3")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "3")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"3")))
- % body: compound(clif(exists(_2296,glythed(_2296,"3")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"3"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"3"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"3"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"3")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"3")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "3")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"3")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"3"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"3"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"3")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"3")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"3")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"3")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"3")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"3")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "3")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "3"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "3"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "3")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_2FnSk, "3")), ~skolem(_2296, skExistsGlythed_2FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "3")), v(nesc(glythed(skExistsGlythed_2FnSk, "3")), ~skolem(_2296, skExistsGlythed_2FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "3"))
- % ; tru(glythed(skExistsGlythed_2FnSk, "3"))
- % ; neg(skolem(_2296, skExistsGlythed_2FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "3"))), n(tru(glythed(skExistsGlythed_2FnSk, "3"))), n(neg(skolem(_2296, skExistsGlythed_2FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_2296,"3"))))
- % Support: clif(exists(_2152,glythed(_2152,"3"))),pt(clif(exists(_2296,glythed(_2296,"3"))),(is_kif_clause(exists(_2296,glythed(_2296,"3")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"3")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_2296,"3"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_2296,"3"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12776, skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk, "3")), proven_neg(glythed(_12776, "3"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15608,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_15608,"3"))))
- % body: compound(boxlog((proven_neg(skolem(_15608,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_15608,"3"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15608,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_15608,"3")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15608,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_15608,"3")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15608,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_15608,"3")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_2FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_2FnSk, "3")),
- % proven_neg(glythed(_4078, "3")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_4078,"3"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_2FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_3894,"3")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3"))),boxlog_to_pfc,(~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_4078,"3"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_2FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_4078,"3"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_2FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_4078,"3"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_2FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_2FnSk, "3"), ~glythed(_16056, "3"), {is_unit(_16056)}==>proven_neg(skolem(_16056, skExistsGlythed_2FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_19302,"3"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_2FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_19302,"3"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_2FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_19302,"3"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_2FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_19302,"3"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_2FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_19302,"3"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_2FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_2FnSk, "3"), ~glythed(_5658, "3"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_2FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5446,"3"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_2FnSk)))),pt(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk)))),rhs([(~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_2FnSk, "3"), ~glythed(_39176, "3"), {is_unit(_39176)}==>proven_neg(skolem(_39176, skExistsGlythed_2FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_2FnSk,"3")
- % body: pt(~glythed(_6914,"3"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_2FnSk))])))
- % Support: (~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_7132,"3"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_2FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',49)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_2FnSk,"3"),~glythed(_5658,"3"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_2FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_2FnSk)):-proven_neg(glythed(skExistsGlythed_2FnSk,"3")),proven_neg(glythed(_4078,"3")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_2296=skExistsGlythed_2FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"3"))),pt(clif(exists(_2296,glythed(_2296,"3"))),(is_kif_clause(exists(_2296,glythed(_2296,"3")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"3")),kif_to_boxlog,(glythed(_2296,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_2296=skExistsGlythed_2FnSk}))},boxlog((glythed(_2296,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_2296=skExistsGlythed_2FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12426, "3"):- \+glythed(skExistsGlythed_2FnSk, "3"), {_12426=skExistsGlythed_2FnSk}))).
- % Found positive trigger: boxlog((glythed(_15190,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_15190=skExistsGlythed_2FnSk}))
- % body: compound(boxlog((glythed(_15190,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_15190=skExistsGlythed_2FnSk}))),\+is_ftVar(boxlog((glythed(_15190,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_15190=skExistsGlythed_2FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15190,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_15190=skExistsGlythed_2FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15190,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_15190=skExistsGlythed_2FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk}))}])
- % =boxlog=
- % glythed(_4094, "3") :-
- % \+ glythed(skExistsGlythed_2FnSk, "3"),
- % { _4094=skExistsGlythed_2FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk})))*->rhs([clif(boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk}))
- % body: delistify_last_arg((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk},{is_unit(_4094)}==>glythed(_4094,"3")))
- % Support: boxlog((glythed(_3918,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_3918=skExistsGlythed_2FnSk})),pt(boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk})),(delistify_last_arg((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk},{is_unit(_4094)}==>glythed(_4094,"3"))),must_be_unqualified((\+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk},{is_unit(_4094)}==>glythed(_4094,"3")))*->rhs([pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk},{is_unit(_4094)}==>glythed(_4094,"3")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_2FnSk, "3"), {_15746=skExistsGlythed_2FnSk}, {is_unit(_15746)}==>glythed(_15746, "3")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_18934=skExistsGlythed_2FnSk},{is_unit(_18934)}==>glythed(_18934,"3")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_18934=skExistsGlythed_2FnSk},{is_unit(_18934)}==>glythed(_18934,"3")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_18934=skExistsGlythed_2FnSk},{is_unit(_18934)}==>glythed(_18934,"3"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_18934=skExistsGlythed_2FnSk},{is_unit(_18934)}==>glythed(_18934,"3"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_18934=skExistsGlythed_2FnSk},{is_unit(_18934)}==>glythed(_18934,"3"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_2FnSk, "3"), {_5622=skExistsGlythed_2FnSk}, {is_unit(_5622)}==>glythed(_5622, "3").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3")))
- % body: rhs([(\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3"))])
- % RHS-Post1: \+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3")
- % Support: pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5418=skExistsGlythed_2FnSk},{is_unit(_5418)}==>glythed(_5418,"3"))),pt(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3"))),rhs([(\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_2FnSk, "3"), {_39058=skExistsGlythed_2FnSk}, {is_unit(_39058)}==>glythed(_39058, "3"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_2FnSk,"3")
- % test: call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3"))
- % body: _6838=skExistsGlythed_2FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"3")])
- % Support: (\+glythed(skExistsGlythed_2FnSk,"3"),{_7048=skExistsGlythed_2FnSk},{is_unit(_7048)}==>glythed(_7048,"3")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',49)
- % RHS-Post1: glythed(skExistsGlythed_2FnSk,"3")
- % Support: \+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_2FnSk,"3")
- % cond: call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3"))
- % action: skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_2FnSk,"3"),(\+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_2FnSk, "3")).
- % Found positive trigger: glythed(skExistsGlythed_2FnSk,"3")
- % body: compound(glythed(skExistsGlythed_2FnSk,"3")),\+is_ftVar(glythed(skExistsGlythed_2FnSk,"3"))*->rhs([{with_current_why(glythed(skExistsGlythed_2FnSk,"3"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_2FnSk,"3"))))}])
- % Found positive trigger: glythed(skExistsGlythed_2FnSk,"3")
- % body: is_kif_clause(glythed(skExistsGlythed_2FnSk,"3"))*->rhs([clif(glythed(skExistsGlythed_2FnSk,"3"))])
- % Found positive trigger: glythed(skExistsGlythed_2FnSk,"3")
- % body: compound(glythed(skExistsGlythed_2FnSk,"3")),\+is_ftVar(glythed(skExistsGlythed_2FnSk,"3"))*->rhs([{with_current_why(glythed(skExistsGlythed_2FnSk,"3"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_2FnSk,"3"))))}])
- % Found negative trigger: glythed(skExistsGlythed_2FnSk,"3")
- % cond: call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3"))
- % body: skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])
- % Support: spft(glythed(skExistsGlythed_2FnSk,"3"),\+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_2FnSk,"3")
- % support (was): \+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_2FnSk,"3"),\+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_2FnSk,"3"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_2FnSk, "3"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_2FnSk,"3"),{_5622=skExistsGlythed_2FnSk},{is_unit(_5622)}==>glythed(_5622,"3"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk}))
- % body: compound(boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"3"):- \+glythed(skExistsGlythed_2FnSk,"3"),{_4094=skExistsGlythed_2FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_2296,"3")))
- % Support: clif(exists(_2152,glythed(_2152,"3"))),pt(clif(exists(_2296,glythed(_2296,"3"))),(is_kif_clause(exists(_2296,glythed(_2296,"3")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"3")),kif_to_boxlog,(glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_2296,"3")))},boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_2296,"3")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_2FnSk, "3"):- \+glythed(_19156, "3")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3")))
- % body: compound(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3")))}])
- % =boxlog=
- % glythed(skExistsGlythed_2FnSk, "3") :-
- % \+ glythed(_3832, "3").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3")))
- % body: delistify_last_arg((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"3")==>glythed(skExistsGlythed_2FnSk,"3")))
- % Support: boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3680,"3"))),pt(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3"))),(delistify_last_arg((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3832,"3")),boxlog_to_pfc,(\+glythed(_3832,"3")==>glythed(skExistsGlythed_2FnSk,"3"))),must_be_unqualified((\+glythed(_3832,"3")==>glythed(skExistsGlythed_2FnSk,"3")))*->rhs([pfclog((\+glythed(_3832,"3")==>glythed(skExistsGlythed_2FnSk,"3")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13722, "3")==>glythed(skExistsGlythed_2FnSk, "3")))).
- % Found positive trigger: pfclog((\+glythed(_16552,"3")==>glythed(skExistsGlythed_2FnSk,"3")))
- % body: compound(pfclog((\+glythed(_16552,"3")==>glythed(skExistsGlythed_2FnSk,"3")))),\+is_ftVar(pfclog((\+glythed(_16552,"3")==>glythed(skExistsGlythed_2FnSk,"3"))))*->rhs([{with_current_why(pfclog((\+glythed(_16552,"3")==>glythed(skExistsGlythed_2FnSk,"3"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16552,"3")==>glythed(skExistsGlythed_2FnSk,"3"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3")))}])
- % =pfclog=
- % \+glythed(_5070, "3")==>glythed(skExistsGlythed_2FnSk, "3").
- % Found positive trigger: pfclog((\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3"))))*->rhs([clif(pfclog((\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3")))
- % body: rhs([(\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3"))])
- % RHS-Post1: \+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3")
- % Support: pfclog((\+glythed(_4918,"3")==>glythed(skExistsGlythed_2FnSk,"3"))),pt(pfclog((\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3"))),rhs([(\+glythed(_5070,"3")==>glythed(skExistsGlythed_2FnSk,"3"))]))
- % r_sane:mpred_fwc1((\+glythed(_31986, "3")==>glythed(skExistsGlythed_2FnSk, "3"))).
- % Adding negative
- % trigger: glythed(_6022,"3")
- % test: call_u_no_bc(glythed(_6022,"3"))
- % body: rhs([glythed(skExistsGlythed_2FnSk,"3")])
- % Support: (\+glythed(_6180,"3")==>glythed(skExistsGlythed_2FnSk,"3")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',49)
- % RHS-Post1: glythed(skExistsGlythed_2FnSk,"3")
- % Support: \+glythed(_6022,"3"),nt(glythed(_6540,"3"),call_u_no_bc(glythed(_6022,"3")),rhs([glythed(skExistsGlythed_2FnSk,"3")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"3")
- % cond: call_u_no_bc(glythed(_6022,"3"))
- % action: rhs([glythed(skExistsGlythed_2FnSk,"3")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_2FnSk,"3"),(\+glythed(_6022,"3"),nt(glythed(_6540,"3"),call_u_no_bc(glythed(_6022,"3")),rhs([glythed(skExistsGlythed_2FnSk,"3")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_2FnSk, "3")).
- % Found positive trigger: glythed(skExistsGlythed_2FnSk,"3")
- % body: compound(glythed(skExistsGlythed_2FnSk,"3")),\+is_ftVar(glythed(skExistsGlythed_2FnSk,"3"))*->rhs([{with_current_why(glythed(skExistsGlythed_2FnSk,"3"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_2FnSk,"3"))))}])
- % Found positive trigger: glythed(skExistsGlythed_2FnSk,"3")
- % body: is_kif_clause(glythed(skExistsGlythed_2FnSk,"3"))*->rhs([clif(glythed(skExistsGlythed_2FnSk,"3"))])
- % Found positive trigger: glythed(skExistsGlythed_2FnSk,"3")
- % body: compound(glythed(skExistsGlythed_2FnSk,"3")),\+is_ftVar(glythed(skExistsGlythed_2FnSk,"3"))*->rhs([{with_current_why(glythed(skExistsGlythed_2FnSk,"3"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_2FnSk,"3"))))}])
- % Found negative trigger: glythed(skExistsGlythed_2FnSk,"3")
- % cond: call_u_no_bc(glythed(_23310,"3"))
- % body: rhs([glythed(skExistsGlythed_2FnSk,"3")])
- % Support: spft(glythed(skExistsGlythed_2FnSk,"3"),\+glythed(_23310,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(_23310,"3")),rhs([glythed(skExistsGlythed_2FnSk,"3")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_2FnSk,"3")
- % support (was): \+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),rhs([glythed(skExistsGlythed_2FnSk,"3")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_2FnSk,"3"),\+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),rhs([glythed(skExistsGlythed_2FnSk,"3")]))))
- % RHS-Post1: glythed(skExistsGlythed_2FnSk,"3")
- % Support: \+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_2FnSk,"3")
- % cond: call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3"))
- % action: skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_2FnSk,"3"),(\+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))))
- % moving(inherit_above(header_sane, glythed(_29070, _29072))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_2FnSk,"3"),\+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))))
- % RHS-Post1: glythed(skExistsGlythed_2FnSk,"3")
- % Support: \+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_2FnSk,"3")
- % cond: call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3"))
- % action: skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_2FnSk,"3"),(\+glythed(skExistsGlythed_2FnSk,"3"),nt(glythed(skExistsGlythed_2FnSk,"3"),call_u_no_bc(glythed(skExistsGlythed_2FnSk,"3")),(skExistsGlythed_2FnSk=skExistsGlythed_2FnSk*->is_unit(skExistsGlythed_2FnSk)*->rhs([glythed(skExistsGlythed_2FnSk,"3")])))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Found positive trigger: pfclog((\+glythed(_5040,"3")==>glythed(skExistsGlythed_2FnSk,"3")))
- % body: compound(pfclog((\+glythed(_5040,"3")==>glythed(skExistsGlythed_2FnSk,"3")))),\+is_ftVar(pfclog((\+glythed(_5040,"3")==>glythed(skExistsGlythed_2FnSk,"3"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"3")==>glythed(skExistsGlythed_2FnSk,"3"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"3")==>glythed(skExistsGlythed_2FnSk,"3"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3802,"3")))
- % body: compound(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3802,"3")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3802,"3"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3802,"3"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_2FnSk,"3"):- \+glythed(_3802,"3"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"3")))
- % body: compound(clif(exists(_2296,glythed(_2296,"3")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"3"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"3"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"3"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"3"))
- % body: compound(exists(_1224,glythed(_1224,"3"))),\+is_ftVar(exists(_1224,glythed(_1224,"3")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"3")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"3")))))}])
- % r_sane:mpred_fwc1(exists(_31346, glythed(_31346, "4"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"4"))
- % body: compound(exists(_1236,glythed(_1236,"4"))),\+is_ftVar(exists(_1236,glythed(_1236,"4")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"4")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"4")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"4"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"4")))*->rhs([clif(exists(_1236,glythed(_1236,"4")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"4")))
- % Support: exists(_1100,glythed(_1100,"4")),pt(exists(_1236,glythed(_1236,"4")),(is_kif_clause(exists(_1236,glythed(_1236,"4")))*->rhs([clif(exists(_1236,glythed(_1236,"4")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "4")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"4")))
- % body: compound(clif(exists(_2296,glythed(_2296,"4")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"4"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"4"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"4"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"4")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"4")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "4")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"4")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"4"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"4"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"4")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"4")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"4")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"4")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"4")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"4")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "4")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "4"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "4"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "4")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_3FnSk, "4")), ~skolem(_2296, skExistsGlythed_3FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "4")), v(nesc(glythed(skExistsGlythed_3FnSk, "4")), ~skolem(_2296, skExistsGlythed_3FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "4"))
- % ; tru(glythed(skExistsGlythed_3FnSk, "4"))
- % ; neg(skolem(_2296, skExistsGlythed_3FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "4"))), n(tru(glythed(skExistsGlythed_3FnSk, "4"))), n(neg(skolem(_2296, skExistsGlythed_3FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_2296,"4"))))
- % Support: clif(exists(_2152,glythed(_2152,"4"))),pt(clif(exists(_2296,glythed(_2296,"4"))),(is_kif_clause(exists(_2296,glythed(_2296,"4")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"4")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_2296,"4"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_2296,"4"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12776, skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk, "4")), proven_neg(glythed(_12776, "4"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15608,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_15608,"4"))))
- % body: compound(boxlog((proven_neg(skolem(_15608,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_15608,"4"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15608,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_15608,"4")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15608,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_15608,"4")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15608,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_15608,"4")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_3FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_3FnSk, "4")),
- % proven_neg(glythed(_4078, "4")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_4078,"4"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_3FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_3894,"4")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4"))),boxlog_to_pfc,(~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_4078,"4"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_3FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_4078,"4"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_3FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_4078,"4"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_3FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_3FnSk, "4"), ~glythed(_16056, "4"), {is_unit(_16056)}==>proven_neg(skolem(_16056, skExistsGlythed_3FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_19302,"4"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_3FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_19302,"4"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_3FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_19302,"4"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_3FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_19302,"4"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_3FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_19302,"4"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_3FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_3FnSk, "4"), ~glythed(_5658, "4"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_3FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5446,"4"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_3FnSk)))),pt(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk)))),rhs([(~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_3FnSk, "4"), ~glythed(_39182, "4"), {is_unit(_39182)}==>proven_neg(skolem(_39182, skExistsGlythed_3FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_3FnSk,"4")
- % body: pt(~glythed(_6914,"4"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_3FnSk))])))
- % Support: (~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_7132,"4"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_3FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',49)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_3FnSk,"4"),~glythed(_5658,"4"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_3FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_3FnSk)):-proven_neg(glythed(skExistsGlythed_3FnSk,"4")),proven_neg(glythed(_4078,"4")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_2296=skExistsGlythed_3FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"4"))),pt(clif(exists(_2296,glythed(_2296,"4"))),(is_kif_clause(exists(_2296,glythed(_2296,"4")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"4")),kif_to_boxlog,(glythed(_2296,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_2296=skExistsGlythed_3FnSk}))},boxlog((glythed(_2296,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_2296=skExistsGlythed_3FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12420, "4"):- \+glythed(skExistsGlythed_3FnSk, "4"), {_12420=skExistsGlythed_3FnSk}))).
- % Found positive trigger: boxlog((glythed(_15184,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_15184=skExistsGlythed_3FnSk}))
- % body: compound(boxlog((glythed(_15184,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_15184=skExistsGlythed_3FnSk}))),\+is_ftVar(boxlog((glythed(_15184,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_15184=skExistsGlythed_3FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15184,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_15184=skExistsGlythed_3FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15184,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_15184=skExistsGlythed_3FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk}))}])
- % =boxlog=
- % glythed(_4094, "4") :-
- % \+ glythed(skExistsGlythed_3FnSk, "4"),
- % { _4094=skExistsGlythed_3FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk})))*->rhs([clif(boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk}))
- % body: delistify_last_arg((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk},{is_unit(_4094)}==>glythed(_4094,"4")))
- % Support: boxlog((glythed(_3918,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_3918=skExistsGlythed_3FnSk})),pt(boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk})),(delistify_last_arg((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk},{is_unit(_4094)}==>glythed(_4094,"4"))),must_be_unqualified((\+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk},{is_unit(_4094)}==>glythed(_4094,"4")))*->rhs([pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk},{is_unit(_4094)}==>glythed(_4094,"4")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_3FnSk, "4"), {_15746=skExistsGlythed_3FnSk}, {is_unit(_15746)}==>glythed(_15746, "4")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_18934=skExistsGlythed_3FnSk},{is_unit(_18934)}==>glythed(_18934,"4")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_18934=skExistsGlythed_3FnSk},{is_unit(_18934)}==>glythed(_18934,"4")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_18934=skExistsGlythed_3FnSk},{is_unit(_18934)}==>glythed(_18934,"4"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_18934=skExistsGlythed_3FnSk},{is_unit(_18934)}==>glythed(_18934,"4"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_18934=skExistsGlythed_3FnSk},{is_unit(_18934)}==>glythed(_18934,"4"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_3FnSk, "4"), {_5622=skExistsGlythed_3FnSk}, {is_unit(_5622)}==>glythed(_5622, "4").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4")))
- % body: rhs([(\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4"))])
- % RHS-Post1: \+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4")
- % Support: pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5418=skExistsGlythed_3FnSk},{is_unit(_5418)}==>glythed(_5418,"4"))),pt(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4"))),rhs([(\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_3FnSk, "4"), {_39058=skExistsGlythed_3FnSk}, {is_unit(_39058)}==>glythed(_39058, "4"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_3FnSk,"4")
- % test: call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4"))
- % body: _6838=skExistsGlythed_3FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"4")])
- % Support: (\+glythed(skExistsGlythed_3FnSk,"4"),{_7048=skExistsGlythed_3FnSk},{is_unit(_7048)}==>glythed(_7048,"4")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',49)
- % RHS-Post1: glythed(skExistsGlythed_3FnSk,"4")
- % Support: \+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_3FnSk,"4")
- % cond: call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4"))
- % action: skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_3FnSk,"4"),(\+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_3FnSk, "4")).
- % Found positive trigger: glythed(skExistsGlythed_3FnSk,"4")
- % body: compound(glythed(skExistsGlythed_3FnSk,"4")),\+is_ftVar(glythed(skExistsGlythed_3FnSk,"4"))*->rhs([{with_current_why(glythed(skExistsGlythed_3FnSk,"4"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_3FnSk,"4"))))}])
- % Found positive trigger: glythed(skExistsGlythed_3FnSk,"4")
- % body: is_kif_clause(glythed(skExistsGlythed_3FnSk,"4"))*->rhs([clif(glythed(skExistsGlythed_3FnSk,"4"))])
- % Found positive trigger: glythed(skExistsGlythed_3FnSk,"4")
- % body: compound(glythed(skExistsGlythed_3FnSk,"4")),\+is_ftVar(glythed(skExistsGlythed_3FnSk,"4"))*->rhs([{with_current_why(glythed(skExistsGlythed_3FnSk,"4"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_3FnSk,"4"))))}])
- % Found negative trigger: glythed(skExistsGlythed_3FnSk,"4")
- % cond: call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4"))
- % body: skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])
- % Support: spft(glythed(skExistsGlythed_3FnSk,"4"),\+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_3FnSk,"4")
- % support (was): \+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_3FnSk,"4"),\+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_3FnSk,"4"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_3FnSk, "4"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_3FnSk,"4"),{_5622=skExistsGlythed_3FnSk},{is_unit(_5622)}==>glythed(_5622,"4"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk}))
- % body: compound(boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"4"):- \+glythed(skExistsGlythed_3FnSk,"4"),{_4094=skExistsGlythed_3FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_2296,"4")))
- % Support: clif(exists(_2152,glythed(_2152,"4"))),pt(clif(exists(_2296,glythed(_2296,"4"))),(is_kif_clause(exists(_2296,glythed(_2296,"4")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"4")),kif_to_boxlog,(glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_2296,"4")))},boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_2296,"4")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_3FnSk, "4"):- \+glythed(_19156, "4")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4")))
- % body: compound(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4")))}])
- % =boxlog=
- % glythed(skExistsGlythed_3FnSk, "4") :-
- % \+ glythed(_3832, "4").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4")))
- % body: delistify_last_arg((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"4")==>glythed(skExistsGlythed_3FnSk,"4")))
- % Support: boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3680,"4"))),pt(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4"))),(delistify_last_arg((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3832,"4")),boxlog_to_pfc,(\+glythed(_3832,"4")==>glythed(skExistsGlythed_3FnSk,"4"))),must_be_unqualified((\+glythed(_3832,"4")==>glythed(skExistsGlythed_3FnSk,"4")))*->rhs([pfclog((\+glythed(_3832,"4")==>glythed(skExistsGlythed_3FnSk,"4")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13722, "4")==>glythed(skExistsGlythed_3FnSk, "4")))).
- % Found positive trigger: pfclog((\+glythed(_16552,"4")==>glythed(skExistsGlythed_3FnSk,"4")))
- % body: compound(pfclog((\+glythed(_16552,"4")==>glythed(skExistsGlythed_3FnSk,"4")))),\+is_ftVar(pfclog((\+glythed(_16552,"4")==>glythed(skExistsGlythed_3FnSk,"4"))))*->rhs([{with_current_why(pfclog((\+glythed(_16552,"4")==>glythed(skExistsGlythed_3FnSk,"4"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16552,"4")==>glythed(skExistsGlythed_3FnSk,"4"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4")))}])
- % =pfclog=
- % \+glythed(_5070, "4")==>glythed(skExistsGlythed_3FnSk, "4").
- % Found positive trigger: pfclog((\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4"))))*->rhs([clif(pfclog((\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4")))
- % body: rhs([(\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4"))])
- % RHS-Post1: \+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4")
- % Support: pfclog((\+glythed(_4918,"4")==>glythed(skExistsGlythed_3FnSk,"4"))),pt(pfclog((\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4"))),rhs([(\+glythed(_5070,"4")==>glythed(skExistsGlythed_3FnSk,"4"))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "4")==>glythed(skExistsGlythed_3FnSk, "4"))).
- % Adding negative
- % trigger: glythed(_6022,"4")
- % test: call_u_no_bc(glythed(_6022,"4"))
- % body: rhs([glythed(skExistsGlythed_3FnSk,"4")])
- % Support: (\+glythed(_6180,"4")==>glythed(skExistsGlythed_3FnSk,"4")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',49)
- % RHS-Post1: glythed(skExistsGlythed_3FnSk,"4")
- % Support: \+glythed(_6022,"4"),nt(glythed(_6540,"4"),call_u_no_bc(glythed(_6022,"4")),rhs([glythed(skExistsGlythed_3FnSk,"4")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"4")
- % cond: call_u_no_bc(glythed(_6022,"4"))
- % action: rhs([glythed(skExistsGlythed_3FnSk,"4")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_3FnSk,"4"),(\+glythed(_6022,"4"),nt(glythed(_6540,"4"),call_u_no_bc(glythed(_6022,"4")),rhs([glythed(skExistsGlythed_3FnSk,"4")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_3FnSk, "4")).
- % Found positive trigger: glythed(skExistsGlythed_3FnSk,"4")
- % body: compound(glythed(skExistsGlythed_3FnSk,"4")),\+is_ftVar(glythed(skExistsGlythed_3FnSk,"4"))*->rhs([{with_current_why(glythed(skExistsGlythed_3FnSk,"4"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_3FnSk,"4"))))}])
- % Found positive trigger: glythed(skExistsGlythed_3FnSk,"4")
- % body: is_kif_clause(glythed(skExistsGlythed_3FnSk,"4"))*->rhs([clif(glythed(skExistsGlythed_3FnSk,"4"))])
- % Found positive trigger: glythed(skExistsGlythed_3FnSk,"4")
- % body: compound(glythed(skExistsGlythed_3FnSk,"4")),\+is_ftVar(glythed(skExistsGlythed_3FnSk,"4"))*->rhs([{with_current_why(glythed(skExistsGlythed_3FnSk,"4"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_3FnSk,"4"))))}])
- % Found negative trigger: glythed(skExistsGlythed_3FnSk,"4")
- % cond: call_u_no_bc(glythed(_23310,"4"))
- % body: rhs([glythed(skExistsGlythed_3FnSk,"4")])
- % Support: spft(glythed(skExistsGlythed_3FnSk,"4"),\+glythed(_23310,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(_23310,"4")),rhs([glythed(skExistsGlythed_3FnSk,"4")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_3FnSk,"4")
- % support (was): \+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),rhs([glythed(skExistsGlythed_3FnSk,"4")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_3FnSk,"4"),\+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),rhs([glythed(skExistsGlythed_3FnSk,"4")]))))
- % RHS-Post1: glythed(skExistsGlythed_3FnSk,"4")
- % Support: \+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_3FnSk,"4")
- % cond: call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4"))
- % action: skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_3FnSk,"4"),(\+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))))
- % moving(inherit_above(header_sane, glythed(_29076, _29078))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_3FnSk,"4"),\+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))))
- % RHS-Post1: glythed(skExistsGlythed_3FnSk,"4")
- % Support: \+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_3FnSk,"4")
- % cond: call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4"))
- % action: skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_3FnSk,"4"),(\+glythed(skExistsGlythed_3FnSk,"4"),nt(glythed(skExistsGlythed_3FnSk,"4"),call_u_no_bc(glythed(skExistsGlythed_3FnSk,"4")),(skExistsGlythed_3FnSk=skExistsGlythed_3FnSk*->is_unit(skExistsGlythed_3FnSk)*->rhs([glythed(skExistsGlythed_3FnSk,"4")])))))
- % moving(inherit_above(header_sane, glythed(_29254, _29256))).
- % Found positive trigger: pfclog((\+glythed(_5040,"4")==>glythed(skExistsGlythed_3FnSk,"4")))
- % body: compound(pfclog((\+glythed(_5040,"4")==>glythed(skExistsGlythed_3FnSk,"4")))),\+is_ftVar(pfclog((\+glythed(_5040,"4")==>glythed(skExistsGlythed_3FnSk,"4"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"4")==>glythed(skExistsGlythed_3FnSk,"4"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"4")==>glythed(skExistsGlythed_3FnSk,"4"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3802,"4")))
- % body: compound(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3802,"4")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3802,"4"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3802,"4"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_3FnSk,"4"):- \+glythed(_3802,"4"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"4")))
- % body: compound(clif(exists(_2296,glythed(_2296,"4")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"4"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"4"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"4"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"4"))
- % body: compound(exists(_1224,glythed(_1224,"4"))),\+is_ftVar(exists(_1224,glythed(_1224,"4")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"4")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"4")))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:50
- % r_sane:mpred_fwc1(exists(_31346, glythed(_31346, "5"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"5"))
- % body: compound(exists(_1236,glythed(_1236,"5"))),\+is_ftVar(exists(_1236,glythed(_1236,"5")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"5")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"5")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"5"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"5")))*->rhs([clif(exists(_1236,glythed(_1236,"5")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"5")))
- % Support: exists(_1100,glythed(_1100,"5")),pt(exists(_1236,glythed(_1236,"5")),(is_kif_clause(exists(_1236,glythed(_1236,"5")))*->rhs([clif(exists(_1236,glythed(_1236,"5")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "5")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"5")))
- % body: compound(clif(exists(_2296,glythed(_2296,"5")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"5"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"5"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"5"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"5")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"5")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "5")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"5")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"5"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"5"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"5")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"5")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"5")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"5")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"5")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"5")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "5")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "5"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "5"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "5")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_4FnSk, "5")), ~skolem(_2296, skExistsGlythed_4FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "5")), v(nesc(glythed(skExistsGlythed_4FnSk, "5")), ~skolem(_2296, skExistsGlythed_4FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "5"))
- % ; tru(glythed(skExistsGlythed_4FnSk, "5"))
- % ; neg(skolem(_2296, skExistsGlythed_4FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "5"))), n(tru(glythed(skExistsGlythed_4FnSk, "5"))), n(neg(skolem(_2296, skExistsGlythed_4FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_2296,"5"))))
- % Support: clif(exists(_2152,glythed(_2152,"5"))),pt(clif(exists(_2296,glythed(_2296,"5"))),(is_kif_clause(exists(_2296,glythed(_2296,"5")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"5")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_2296,"5"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_2296,"5"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12776, skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk, "5")), proven_neg(glythed(_12776, "5"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15608,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_15608,"5"))))
- % body: compound(boxlog((proven_neg(skolem(_15608,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_15608,"5"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15608,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_15608,"5")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15608,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_15608,"5")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15608,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_15608,"5")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_4FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_4FnSk, "5")),
- % proven_neg(glythed(_4078, "5")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_4078,"5"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_4FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_3894,"5")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5"))),boxlog_to_pfc,(~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_4078,"5"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_4FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_4078,"5"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_4FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_4078,"5"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_4FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_4FnSk, "5"), ~glythed(_16056, "5"), {is_unit(_16056)}==>proven_neg(skolem(_16056, skExistsGlythed_4FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_19302,"5"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_4FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_19302,"5"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_4FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_19302,"5"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_4FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_19302,"5"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_4FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_19302,"5"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_4FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_4FnSk, "5"), ~glythed(_5658, "5"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_4FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5446,"5"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_4FnSk)))),pt(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk)))),rhs([(~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_4FnSk, "5"), ~glythed(_39182, "5"), {is_unit(_39182)}==>proven_neg(skolem(_39182, skExistsGlythed_4FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_4FnSk,"5")
- % body: pt(~glythed(_6914,"5"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_4FnSk))])))
- % Support: (~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_7132,"5"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_4FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',50)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_4FnSk,"5"),~glythed(_5658,"5"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_4FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_4FnSk)):-proven_neg(glythed(skExistsGlythed_4FnSk,"5")),proven_neg(glythed(_4078,"5")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_2296=skExistsGlythed_4FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"5"))),pt(clif(exists(_2296,glythed(_2296,"5"))),(is_kif_clause(exists(_2296,glythed(_2296,"5")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"5")),kif_to_boxlog,(glythed(_2296,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_2296=skExistsGlythed_4FnSk}))},boxlog((glythed(_2296,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_2296=skExistsGlythed_4FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12426, "5"):- \+glythed(skExistsGlythed_4FnSk, "5"), {_12426=skExistsGlythed_4FnSk}))).
- % Found positive trigger: boxlog((glythed(_15190,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_15190=skExistsGlythed_4FnSk}))
- % body: compound(boxlog((glythed(_15190,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_15190=skExistsGlythed_4FnSk}))),\+is_ftVar(boxlog((glythed(_15190,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_15190=skExistsGlythed_4FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15190,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_15190=skExistsGlythed_4FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15190,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_15190=skExistsGlythed_4FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk}))}])
- % =boxlog=
- % glythed(_4094, "5") :-
- % \+ glythed(skExistsGlythed_4FnSk, "5"),
- % { _4094=skExistsGlythed_4FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk})))*->rhs([clif(boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk}))
- % body: delistify_last_arg((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk},{is_unit(_4094)}==>glythed(_4094,"5")))
- % Support: boxlog((glythed(_3918,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_3918=skExistsGlythed_4FnSk})),pt(boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk})),(delistify_last_arg((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk},{is_unit(_4094)}==>glythed(_4094,"5"))),must_be_unqualified((\+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk},{is_unit(_4094)}==>glythed(_4094,"5")))*->rhs([pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk},{is_unit(_4094)}==>glythed(_4094,"5")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_4FnSk, "5"), {_15746=skExistsGlythed_4FnSk}, {is_unit(_15746)}==>glythed(_15746, "5")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_18934=skExistsGlythed_4FnSk},{is_unit(_18934)}==>glythed(_18934,"5")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_18934=skExistsGlythed_4FnSk},{is_unit(_18934)}==>glythed(_18934,"5")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_18934=skExistsGlythed_4FnSk},{is_unit(_18934)}==>glythed(_18934,"5"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_18934=skExistsGlythed_4FnSk},{is_unit(_18934)}==>glythed(_18934,"5"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_18934=skExistsGlythed_4FnSk},{is_unit(_18934)}==>glythed(_18934,"5"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_4FnSk, "5"), {_5622=skExistsGlythed_4FnSk}, {is_unit(_5622)}==>glythed(_5622, "5").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5")))
- % body: rhs([(\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5"))])
- % RHS-Post1: \+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5")
- % Support: pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5418=skExistsGlythed_4FnSk},{is_unit(_5418)}==>glythed(_5418,"5"))),pt(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5"))),rhs([(\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_4FnSk, "5"), {_39058=skExistsGlythed_4FnSk}, {is_unit(_39058)}==>glythed(_39058, "5"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_4FnSk,"5")
- % test: call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5"))
- % body: _6838=skExistsGlythed_4FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"5")])
- % Support: (\+glythed(skExistsGlythed_4FnSk,"5"),{_7048=skExistsGlythed_4FnSk},{is_unit(_7048)}==>glythed(_7048,"5")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',50)
- % RHS-Post1: glythed(skExistsGlythed_4FnSk,"5")
- % Support: \+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_4FnSk,"5")
- % cond: call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5"))
- % action: skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_4FnSk,"5"),(\+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_4FnSk, "5")).
- % Found positive trigger: glythed(skExistsGlythed_4FnSk,"5")
- % body: compound(glythed(skExistsGlythed_4FnSk,"5")),\+is_ftVar(glythed(skExistsGlythed_4FnSk,"5"))*->rhs([{with_current_why(glythed(skExistsGlythed_4FnSk,"5"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_4FnSk,"5"))))}])
- % Found positive trigger: glythed(skExistsGlythed_4FnSk,"5")
- % body: is_kif_clause(glythed(skExistsGlythed_4FnSk,"5"))*->rhs([clif(glythed(skExistsGlythed_4FnSk,"5"))])
- % Found positive trigger: glythed(skExistsGlythed_4FnSk,"5")
- % body: compound(glythed(skExistsGlythed_4FnSk,"5")),\+is_ftVar(glythed(skExistsGlythed_4FnSk,"5"))*->rhs([{with_current_why(glythed(skExistsGlythed_4FnSk,"5"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_4FnSk,"5"))))}])
- % Found negative trigger: glythed(skExistsGlythed_4FnSk,"5")
- % cond: call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5"))
- % body: skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])
- % Support: spft(glythed(skExistsGlythed_4FnSk,"5"),\+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_4FnSk,"5")
- % support (was): \+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_4FnSk,"5"),\+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_4FnSk,"5"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_4FnSk, "5"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_4FnSk,"5"),{_5622=skExistsGlythed_4FnSk},{is_unit(_5622)}==>glythed(_5622,"5"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk}))
- % body: compound(boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"5"):- \+glythed(skExistsGlythed_4FnSk,"5"),{_4094=skExistsGlythed_4FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_2296,"5")))
- % Support: clif(exists(_2152,glythed(_2152,"5"))),pt(clif(exists(_2296,glythed(_2296,"5"))),(is_kif_clause(exists(_2296,glythed(_2296,"5")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"5")),kif_to_boxlog,(glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_2296,"5")))},boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_2296,"5")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_4FnSk, "5"):- \+glythed(_19150, "5")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5")))
- % body: compound(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5")))}])
- % =boxlog=
- % glythed(skExistsGlythed_4FnSk, "5") :-
- % \+ glythed(_3832, "5").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5")))
- % body: delistify_last_arg((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"5")==>glythed(skExistsGlythed_4FnSk,"5")))
- % Support: boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3680,"5"))),pt(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5"))),(delistify_last_arg((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3832,"5")),boxlog_to_pfc,(\+glythed(_3832,"5")==>glythed(skExistsGlythed_4FnSk,"5"))),must_be_unqualified((\+glythed(_3832,"5")==>glythed(skExistsGlythed_4FnSk,"5")))*->rhs([pfclog((\+glythed(_3832,"5")==>glythed(skExistsGlythed_4FnSk,"5")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13716, "5")==>glythed(skExistsGlythed_4FnSk, "5")))).
- % Found positive trigger: pfclog((\+glythed(_16546,"5")==>glythed(skExistsGlythed_4FnSk,"5")))
- % body: compound(pfclog((\+glythed(_16546,"5")==>glythed(skExistsGlythed_4FnSk,"5")))),\+is_ftVar(pfclog((\+glythed(_16546,"5")==>glythed(skExistsGlythed_4FnSk,"5"))))*->rhs([{with_current_why(pfclog((\+glythed(_16546,"5")==>glythed(skExistsGlythed_4FnSk,"5"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16546,"5")==>glythed(skExistsGlythed_4FnSk,"5"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5")))}])
- % =pfclog=
- % \+glythed(_5070, "5")==>glythed(skExistsGlythed_4FnSk, "5").
- % Found positive trigger: pfclog((\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5"))))*->rhs([clif(pfclog((\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5")))
- % body: rhs([(\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5"))])
- % RHS-Post1: \+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5")
- % Support: pfclog((\+glythed(_4918,"5")==>glythed(skExistsGlythed_4FnSk,"5"))),pt(pfclog((\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5"))),rhs([(\+glythed(_5070,"5")==>glythed(skExistsGlythed_4FnSk,"5"))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "5")==>glythed(skExistsGlythed_4FnSk, "5"))).
- % Adding negative
- % trigger: glythed(_6022,"5")
- % test: call_u_no_bc(glythed(_6022,"5"))
- % body: rhs([glythed(skExistsGlythed_4FnSk,"5")])
- % Support: (\+glythed(_6180,"5")==>glythed(skExistsGlythed_4FnSk,"5")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',50)
- % RHS-Post1: glythed(skExistsGlythed_4FnSk,"5")
- % Support: \+glythed(_6022,"5"),nt(glythed(_6540,"5"),call_u_no_bc(glythed(_6022,"5")),rhs([glythed(skExistsGlythed_4FnSk,"5")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"5")
- % cond: call_u_no_bc(glythed(_6022,"5"))
- % action: rhs([glythed(skExistsGlythed_4FnSk,"5")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_4FnSk,"5"),(\+glythed(_6022,"5"),nt(glythed(_6540,"5"),call_u_no_bc(glythed(_6022,"5")),rhs([glythed(skExistsGlythed_4FnSk,"5")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_4FnSk, "5")).
- % Found positive trigger: glythed(skExistsGlythed_4FnSk,"5")
- % body: compound(glythed(skExistsGlythed_4FnSk,"5")),\+is_ftVar(glythed(skExistsGlythed_4FnSk,"5"))*->rhs([{with_current_why(glythed(skExistsGlythed_4FnSk,"5"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_4FnSk,"5"))))}])
- % Found positive trigger: glythed(skExistsGlythed_4FnSk,"5")
- % body: is_kif_clause(glythed(skExistsGlythed_4FnSk,"5"))*->rhs([clif(glythed(skExistsGlythed_4FnSk,"5"))])
- % Found positive trigger: glythed(skExistsGlythed_4FnSk,"5")
- % body: compound(glythed(skExistsGlythed_4FnSk,"5")),\+is_ftVar(glythed(skExistsGlythed_4FnSk,"5"))*->rhs([{with_current_why(glythed(skExistsGlythed_4FnSk,"5"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_4FnSk,"5"))))}])
- % Found negative trigger: glythed(skExistsGlythed_4FnSk,"5")
- % cond: call_u_no_bc(glythed(_23310,"5"))
- % body: rhs([glythed(skExistsGlythed_4FnSk,"5")])
- % Support: spft(glythed(skExistsGlythed_4FnSk,"5"),\+glythed(_23310,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(_23310,"5")),rhs([glythed(skExistsGlythed_4FnSk,"5")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_4FnSk,"5")
- % support (was): \+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),rhs([glythed(skExistsGlythed_4FnSk,"5")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_4FnSk,"5"),\+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),rhs([glythed(skExistsGlythed_4FnSk,"5")]))))
- % RHS-Post1: glythed(skExistsGlythed_4FnSk,"5")
- % Support: \+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_4FnSk,"5")
- % cond: call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5"))
- % action: skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_4FnSk,"5"),(\+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))))
- % moving(inherit_above(header_sane, glythed(_29070, _29072))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_4FnSk,"5"),\+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))))
- % RHS-Post1: glythed(skExistsGlythed_4FnSk,"5")
- % Support: \+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_4FnSk,"5")
- % cond: call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5"))
- % action: skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_4FnSk,"5"),(\+glythed(skExistsGlythed_4FnSk,"5"),nt(glythed(skExistsGlythed_4FnSk,"5"),call_u_no_bc(glythed(skExistsGlythed_4FnSk,"5")),(skExistsGlythed_4FnSk=skExistsGlythed_4FnSk*->is_unit(skExistsGlythed_4FnSk)*->rhs([glythed(skExistsGlythed_4FnSk,"5")])))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Found positive trigger: pfclog((\+glythed(_5040,"5")==>glythed(skExistsGlythed_4FnSk,"5")))
- % body: compound(pfclog((\+glythed(_5040,"5")==>glythed(skExistsGlythed_4FnSk,"5")))),\+is_ftVar(pfclog((\+glythed(_5040,"5")==>glythed(skExistsGlythed_4FnSk,"5"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"5")==>glythed(skExistsGlythed_4FnSk,"5"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"5")==>glythed(skExistsGlythed_4FnSk,"5"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3802,"5")))
- % body: compound(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3802,"5")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3802,"5"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3802,"5"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_4FnSk,"5"):- \+glythed(_3802,"5"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"5")))
- % body: compound(clif(exists(_2296,glythed(_2296,"5")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"5"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"5"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"5"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"5"))
- % body: compound(exists(_1224,glythed(_1224,"5"))),\+is_ftVar(exists(_1224,glythed(_1224,"5")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"5")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"5")))))}])
- % r_sane:mpred_fwc1(exists(_31346, glythed(_31346, "6"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"6"))
- % body: compound(exists(_1236,glythed(_1236,"6"))),\+is_ftVar(exists(_1236,glythed(_1236,"6")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"6")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"6")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"6"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"6")))*->rhs([clif(exists(_1236,glythed(_1236,"6")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"6")))
- % Support: exists(_1100,glythed(_1100,"6")),pt(exists(_1236,glythed(_1236,"6")),(is_kif_clause(exists(_1236,glythed(_1236,"6")))*->rhs([clif(exists(_1236,glythed(_1236,"6")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "6")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"6")))
- % body: compound(clif(exists(_2296,glythed(_2296,"6")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"6"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"6"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"6"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"6")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"6")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "6")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"6")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"6"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"6"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"6")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"6")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"6")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"6")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"6")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"6")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "6")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "6"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "6"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "6")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_5FnSk, "6")), ~skolem(_2296, skExistsGlythed_5FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "6")), v(nesc(glythed(skExistsGlythed_5FnSk, "6")), ~skolem(_2296, skExistsGlythed_5FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "6"))
- % ; tru(glythed(skExistsGlythed_5FnSk, "6"))
- % ; neg(skolem(_2296, skExistsGlythed_5FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "6"))), n(tru(glythed(skExistsGlythed_5FnSk, "6"))), n(neg(skolem(_2296, skExistsGlythed_5FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_2296,"6"))))
- % Support: clif(exists(_2152,glythed(_2152,"6"))),pt(clif(exists(_2296,glythed(_2296,"6"))),(is_kif_clause(exists(_2296,glythed(_2296,"6")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"6")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_2296,"6"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_2296,"6"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12776, skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk, "6")), proven_neg(glythed(_12776, "6"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15608,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_15608,"6"))))
- % body: compound(boxlog((proven_neg(skolem(_15608,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_15608,"6"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15608,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_15608,"6")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15608,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_15608,"6")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15608,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_15608,"6")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_5FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_5FnSk, "6")),
- % proven_neg(glythed(_4078, "6")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_4078,"6"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_5FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_3894,"6")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6"))),boxlog_to_pfc,(~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_4078,"6"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_5FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_4078,"6"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_5FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_4078,"6"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_5FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_5FnSk, "6"), ~glythed(_16050, "6"), {is_unit(_16050)}==>proven_neg(skolem(_16050, skExistsGlythed_5FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_19296,"6"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_5FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_19296,"6"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_5FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_19296,"6"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_5FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_19296,"6"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_5FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_19296,"6"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_5FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_5FnSk, "6"), ~glythed(_5658, "6"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_5FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5446,"6"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_5FnSk)))),pt(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk)))),rhs([(~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_5FnSk, "6"), ~glythed(_39176, "6"), {is_unit(_39176)}==>proven_neg(skolem(_39176, skExistsGlythed_5FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_5FnSk,"6")
- % body: pt(~glythed(_6914,"6"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_5FnSk))])))
- % Support: (~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_7132,"6"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_5FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',50)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_5FnSk,"6"),~glythed(_5658,"6"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_5FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_5FnSk)):-proven_neg(glythed(skExistsGlythed_5FnSk,"6")),proven_neg(glythed(_4078,"6")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_2296=skExistsGlythed_5FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"6"))),pt(clif(exists(_2296,glythed(_2296,"6"))),(is_kif_clause(exists(_2296,glythed(_2296,"6")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"6")),kif_to_boxlog,(glythed(_2296,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_2296=skExistsGlythed_5FnSk}))},boxlog((glythed(_2296,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_2296=skExistsGlythed_5FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12426, "6"):- \+glythed(skExistsGlythed_5FnSk, "6"), {_12426=skExistsGlythed_5FnSk}))).
- % Found positive trigger: boxlog((glythed(_15190,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_15190=skExistsGlythed_5FnSk}))
- % body: compound(boxlog((glythed(_15190,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_15190=skExistsGlythed_5FnSk}))),\+is_ftVar(boxlog((glythed(_15190,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_15190=skExistsGlythed_5FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15190,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_15190=skExistsGlythed_5FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15190,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_15190=skExistsGlythed_5FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk}))}])
- % =boxlog=
- % glythed(_4094, "6") :-
- % \+ glythed(skExistsGlythed_5FnSk, "6"),
- % { _4094=skExistsGlythed_5FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk})))*->rhs([clif(boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk}))
- % body: delistify_last_arg((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk},{is_unit(_4094)}==>glythed(_4094,"6")))
- % Support: boxlog((glythed(_3918,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_3918=skExistsGlythed_5FnSk})),pt(boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk})),(delistify_last_arg((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk},{is_unit(_4094)}==>glythed(_4094,"6"))),must_be_unqualified((\+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk},{is_unit(_4094)}==>glythed(_4094,"6")))*->rhs([pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk},{is_unit(_4094)}==>glythed(_4094,"6")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_5FnSk, "6"), {_15746=skExistsGlythed_5FnSk}, {is_unit(_15746)}==>glythed(_15746, "6")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_18934=skExistsGlythed_5FnSk},{is_unit(_18934)}==>glythed(_18934,"6")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_18934=skExistsGlythed_5FnSk},{is_unit(_18934)}==>glythed(_18934,"6")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_18934=skExistsGlythed_5FnSk},{is_unit(_18934)}==>glythed(_18934,"6"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_18934=skExistsGlythed_5FnSk},{is_unit(_18934)}==>glythed(_18934,"6"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_18934=skExistsGlythed_5FnSk},{is_unit(_18934)}==>glythed(_18934,"6"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_5FnSk, "6"), {_5622=skExistsGlythed_5FnSk}, {is_unit(_5622)}==>glythed(_5622, "6").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6")))
- % body: rhs([(\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6"))])
- % RHS-Post1: \+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6")
- % Support: pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5418=skExistsGlythed_5FnSk},{is_unit(_5418)}==>glythed(_5418,"6"))),pt(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6"))),rhs([(\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_5FnSk, "6"), {_39052=skExistsGlythed_5FnSk}, {is_unit(_39052)}==>glythed(_39052, "6"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_5FnSk,"6")
- % test: call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6"))
- % body: _6838=skExistsGlythed_5FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"6")])
- % Support: (\+glythed(skExistsGlythed_5FnSk,"6"),{_7048=skExistsGlythed_5FnSk},{is_unit(_7048)}==>glythed(_7048,"6")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',50)
- % RHS-Post1: glythed(skExistsGlythed_5FnSk,"6")
- % Support: \+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_5FnSk,"6")
- % cond: call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6"))
- % action: skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_5FnSk,"6"),(\+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_5FnSk, "6")).
- % Found positive trigger: glythed(skExistsGlythed_5FnSk,"6")
- % body: compound(glythed(skExistsGlythed_5FnSk,"6")),\+is_ftVar(glythed(skExistsGlythed_5FnSk,"6"))*->rhs([{with_current_why(glythed(skExistsGlythed_5FnSk,"6"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_5FnSk,"6"))))}])
- % Found positive trigger: glythed(skExistsGlythed_5FnSk,"6")
- % body: is_kif_clause(glythed(skExistsGlythed_5FnSk,"6"))*->rhs([clif(glythed(skExistsGlythed_5FnSk,"6"))])
- % Found positive trigger: glythed(skExistsGlythed_5FnSk,"6")
- % body: compound(glythed(skExistsGlythed_5FnSk,"6")),\+is_ftVar(glythed(skExistsGlythed_5FnSk,"6"))*->rhs([{with_current_why(glythed(skExistsGlythed_5FnSk,"6"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_5FnSk,"6"))))}])
- % Found negative trigger: glythed(skExistsGlythed_5FnSk,"6")
- % cond: call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6"))
- % body: skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])
- % Support: spft(glythed(skExistsGlythed_5FnSk,"6"),\+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_5FnSk,"6")
- % support (was): \+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_5FnSk,"6"),\+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_5FnSk,"6"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_5FnSk, "6"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_5FnSk,"6"),{_5622=skExistsGlythed_5FnSk},{is_unit(_5622)}==>glythed(_5622,"6"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk}))
- % body: compound(boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"6"):- \+glythed(skExistsGlythed_5FnSk,"6"),{_4094=skExistsGlythed_5FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_2296,"6")))
- % Support: clif(exists(_2152,glythed(_2152,"6"))),pt(clif(exists(_2296,glythed(_2296,"6"))),(is_kif_clause(exists(_2296,glythed(_2296,"6")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"6")),kif_to_boxlog,(glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_2296,"6")))},boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_2296,"6")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_5FnSk, "6"):- \+glythed(_19150, "6")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6")))
- % body: compound(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6")))}])
- % =boxlog=
- % glythed(skExistsGlythed_5FnSk, "6") :-
- % \+ glythed(_3832, "6").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6")))
- % body: delistify_last_arg((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"6")==>glythed(skExistsGlythed_5FnSk,"6")))
- % Support: boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3680,"6"))),pt(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6"))),(delistify_last_arg((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3832,"6")),boxlog_to_pfc,(\+glythed(_3832,"6")==>glythed(skExistsGlythed_5FnSk,"6"))),must_be_unqualified((\+glythed(_3832,"6")==>glythed(skExistsGlythed_5FnSk,"6")))*->rhs([pfclog((\+glythed(_3832,"6")==>glythed(skExistsGlythed_5FnSk,"6")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13722, "6")==>glythed(skExistsGlythed_5FnSk, "6")))).
- % Found positive trigger: pfclog((\+glythed(_16552,"6")==>glythed(skExistsGlythed_5FnSk,"6")))
- % body: compound(pfclog((\+glythed(_16552,"6")==>glythed(skExistsGlythed_5FnSk,"6")))),\+is_ftVar(pfclog((\+glythed(_16552,"6")==>glythed(skExistsGlythed_5FnSk,"6"))))*->rhs([{with_current_why(pfclog((\+glythed(_16552,"6")==>glythed(skExistsGlythed_5FnSk,"6"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16552,"6")==>glythed(skExistsGlythed_5FnSk,"6"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6")))}])
- % =pfclog=
- % \+glythed(_5070, "6")==>glythed(skExistsGlythed_5FnSk, "6").
- % Found positive trigger: pfclog((\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6"))))*->rhs([clif(pfclog((\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6")))
- % body: rhs([(\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6"))])
- % RHS-Post1: \+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6")
- % Support: pfclog((\+glythed(_4918,"6")==>glythed(skExistsGlythed_5FnSk,"6"))),pt(pfclog((\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6"))),rhs([(\+glythed(_5070,"6")==>glythed(skExistsGlythed_5FnSk,"6"))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "6")==>glythed(skExistsGlythed_5FnSk, "6"))).
- % Adding negative
- % trigger: glythed(_6022,"6")
- % test: call_u_no_bc(glythed(_6022,"6"))
- % body: rhs([glythed(skExistsGlythed_5FnSk,"6")])
- % Support: (\+glythed(_6180,"6")==>glythed(skExistsGlythed_5FnSk,"6")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',50)
- % RHS-Post1: glythed(skExistsGlythed_5FnSk,"6")
- % Support: \+glythed(_6022,"6"),nt(glythed(_6540,"6"),call_u_no_bc(glythed(_6022,"6")),rhs([glythed(skExistsGlythed_5FnSk,"6")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"6")
- % cond: call_u_no_bc(glythed(_6022,"6"))
- % action: rhs([glythed(skExistsGlythed_5FnSk,"6")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_5FnSk,"6"),(\+glythed(_6022,"6"),nt(glythed(_6540,"6"),call_u_no_bc(glythed(_6022,"6")),rhs([glythed(skExistsGlythed_5FnSk,"6")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_5FnSk, "6")).
- % Found positive trigger: glythed(skExistsGlythed_5FnSk,"6")
- % body: compound(glythed(skExistsGlythed_5FnSk,"6")),\+is_ftVar(glythed(skExistsGlythed_5FnSk,"6"))*->rhs([{with_current_why(glythed(skExistsGlythed_5FnSk,"6"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_5FnSk,"6"))))}])
- % Found positive trigger: glythed(skExistsGlythed_5FnSk,"6")
- % body: is_kif_clause(glythed(skExistsGlythed_5FnSk,"6"))*->rhs([clif(glythed(skExistsGlythed_5FnSk,"6"))])
- % Found positive trigger: glythed(skExistsGlythed_5FnSk,"6")
- % body: compound(glythed(skExistsGlythed_5FnSk,"6")),\+is_ftVar(glythed(skExistsGlythed_5FnSk,"6"))*->rhs([{with_current_why(glythed(skExistsGlythed_5FnSk,"6"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_5FnSk,"6"))))}])
- % Found negative trigger: glythed(skExistsGlythed_5FnSk,"6")
- % cond: call_u_no_bc(glythed(_23310,"6"))
- % body: rhs([glythed(skExistsGlythed_5FnSk,"6")])
- % Support: spft(glythed(skExistsGlythed_5FnSk,"6"),\+glythed(_23310,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(_23310,"6")),rhs([glythed(skExistsGlythed_5FnSk,"6")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_5FnSk,"6")
- % support (was): \+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),rhs([glythed(skExistsGlythed_5FnSk,"6")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_5FnSk,"6"),\+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),rhs([glythed(skExistsGlythed_5FnSk,"6")]))))
- % RHS-Post1: glythed(skExistsGlythed_5FnSk,"6")
- % Support: \+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_5FnSk,"6")
- % cond: call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6"))
- % action: skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_5FnSk,"6"),(\+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))))
- % moving(inherit_above(header_sane, glythed(_29070, _29072))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_5FnSk,"6"),\+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))))
- % RHS-Post1: glythed(skExistsGlythed_5FnSk,"6")
- % Support: \+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_5FnSk,"6")
- % cond: call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6"))
- % action: skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_5FnSk,"6"),(\+glythed(skExistsGlythed_5FnSk,"6"),nt(glythed(skExistsGlythed_5FnSk,"6"),call_u_no_bc(glythed(skExistsGlythed_5FnSk,"6")),(skExistsGlythed_5FnSk=skExistsGlythed_5FnSk*->is_unit(skExistsGlythed_5FnSk)*->rhs([glythed(skExistsGlythed_5FnSk,"6")])))))
- % moving(inherit_above(header_sane, glythed(_29254, _29256))).
- % Found positive trigger: pfclog((\+glythed(_5040,"6")==>glythed(skExistsGlythed_5FnSk,"6")))
- % body: compound(pfclog((\+glythed(_5040,"6")==>glythed(skExistsGlythed_5FnSk,"6")))),\+is_ftVar(pfclog((\+glythed(_5040,"6")==>glythed(skExistsGlythed_5FnSk,"6"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"6")==>glythed(skExistsGlythed_5FnSk,"6"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"6")==>glythed(skExistsGlythed_5FnSk,"6"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3802,"6")))
- % body: compound(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3802,"6")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3802,"6"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3802,"6"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_5FnSk,"6"):- \+glythed(_3802,"6"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"6")))
- % body: compound(clif(exists(_2296,glythed(_2296,"6")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"6"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"6"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"6"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"6"))
- % body: compound(exists(_1224,glythed(_1224,"6"))),\+is_ftVar(exists(_1224,glythed(_1224,"6")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"6")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"6")))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:51
- % r_sane:mpred_fwc1(exists(_31340, glythed(_31340, "7"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"7"))
- % body: compound(exists(_1236,glythed(_1236,"7"))),\+is_ftVar(exists(_1236,glythed(_1236,"7")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"7")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"7")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"7"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"7")))*->rhs([clif(exists(_1236,glythed(_1236,"7")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"7")))
- % Support: exists(_1100,glythed(_1100,"7")),pt(exists(_1236,glythed(_1236,"7")),(is_kif_clause(exists(_1236,glythed(_1236,"7")))*->rhs([clif(exists(_1236,glythed(_1236,"7")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "7")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"7")))
- % body: compound(clif(exists(_2296,glythed(_2296,"7")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"7"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"7"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"7"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"7")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"7")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "7")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"7")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"7"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"7"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"7")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"7")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"7")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"7")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"7")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"7")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "7")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "7"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "7"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "7")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_6FnSk, "7")), ~skolem(_2296, skExistsGlythed_6FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "7")), v(nesc(glythed(skExistsGlythed_6FnSk, "7")), ~skolem(_2296, skExistsGlythed_6FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "7"))
- % ; tru(glythed(skExistsGlythed_6FnSk, "7"))
- % ; neg(skolem(_2296, skExistsGlythed_6FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "7"))), n(tru(glythed(skExistsGlythed_6FnSk, "7"))), n(neg(skolem(_2296, skExistsGlythed_6FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_2296,"7"))))
- % Support: clif(exists(_2152,glythed(_2152,"7"))),pt(clif(exists(_2296,glythed(_2296,"7"))),(is_kif_clause(exists(_2296,glythed(_2296,"7")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"7")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_2296,"7"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_2296,"7"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12776, skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk, "7")), proven_neg(glythed(_12776, "7"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15608,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_15608,"7"))))
- % body: compound(boxlog((proven_neg(skolem(_15608,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_15608,"7"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15608,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_15608,"7")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15608,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_15608,"7")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15608,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_15608,"7")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_6FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_6FnSk, "7")),
- % proven_neg(glythed(_4078, "7")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_4078,"7"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_6FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_3894,"7")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7"))),boxlog_to_pfc,(~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_4078,"7"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_6FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_4078,"7"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_6FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_4078,"7"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_6FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_6FnSk, "7"), ~glythed(_16056, "7"), {is_unit(_16056)}==>proven_neg(skolem(_16056, skExistsGlythed_6FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_19302,"7"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_6FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_19302,"7"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_6FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_19302,"7"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_6FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_19302,"7"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_6FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_19302,"7"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_6FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_6FnSk, "7"), ~glythed(_5658, "7"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_6FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5446,"7"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_6FnSk)))),pt(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk)))),rhs([(~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_6FnSk, "7"), ~glythed(_39182, "7"), {is_unit(_39182)}==>proven_neg(skolem(_39182, skExistsGlythed_6FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_6FnSk,"7")
- % body: pt(~glythed(_6914,"7"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_6FnSk))])))
- % Support: (~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_7132,"7"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_6FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',51)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_6FnSk,"7"),~glythed(_5658,"7"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_6FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_6FnSk)):-proven_neg(glythed(skExistsGlythed_6FnSk,"7")),proven_neg(glythed(_4078,"7")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_2296=skExistsGlythed_6FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"7"))),pt(clif(exists(_2296,glythed(_2296,"7"))),(is_kif_clause(exists(_2296,glythed(_2296,"7")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"7")),kif_to_boxlog,(glythed(_2296,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_2296=skExistsGlythed_6FnSk}))},boxlog((glythed(_2296,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_2296=skExistsGlythed_6FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12426, "7"):- \+glythed(skExistsGlythed_6FnSk, "7"), {_12426=skExistsGlythed_6FnSk}))).
- % Found positive trigger: boxlog((glythed(_15190,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_15190=skExistsGlythed_6FnSk}))
- % body: compound(boxlog((glythed(_15190,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_15190=skExistsGlythed_6FnSk}))),\+is_ftVar(boxlog((glythed(_15190,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_15190=skExistsGlythed_6FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15190,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_15190=skExistsGlythed_6FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15190,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_15190=skExistsGlythed_6FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk}))}])
- % =boxlog=
- % glythed(_4094, "7") :-
- % \+ glythed(skExistsGlythed_6FnSk, "7"),
- % { _4094=skExistsGlythed_6FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk})))*->rhs([clif(boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk}))
- % body: delistify_last_arg((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk},{is_unit(_4094)}==>glythed(_4094,"7")))
- % Support: boxlog((glythed(_3918,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_3918=skExistsGlythed_6FnSk})),pt(boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk})),(delistify_last_arg((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk},{is_unit(_4094)}==>glythed(_4094,"7"))),must_be_unqualified((\+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk},{is_unit(_4094)}==>glythed(_4094,"7")))*->rhs([pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk},{is_unit(_4094)}==>glythed(_4094,"7")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_6FnSk, "7"), {_15746=skExistsGlythed_6FnSk}, {is_unit(_15746)}==>glythed(_15746, "7")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_18934=skExistsGlythed_6FnSk},{is_unit(_18934)}==>glythed(_18934,"7")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_18934=skExistsGlythed_6FnSk},{is_unit(_18934)}==>glythed(_18934,"7")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_18934=skExistsGlythed_6FnSk},{is_unit(_18934)}==>glythed(_18934,"7"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_18934=skExistsGlythed_6FnSk},{is_unit(_18934)}==>glythed(_18934,"7"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_18934=skExistsGlythed_6FnSk},{is_unit(_18934)}==>glythed(_18934,"7"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_6FnSk, "7"), {_5622=skExistsGlythed_6FnSk}, {is_unit(_5622)}==>glythed(_5622, "7").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7")))
- % body: rhs([(\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7"))])
- % RHS-Post1: \+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7")
- % Support: pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5418=skExistsGlythed_6FnSk},{is_unit(_5418)}==>glythed(_5418,"7"))),pt(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7"))),rhs([(\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_6FnSk, "7"), {_39058=skExistsGlythed_6FnSk}, {is_unit(_39058)}==>glythed(_39058, "7"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_6FnSk,"7")
- % test: call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7"))
- % body: _6838=skExistsGlythed_6FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"7")])
- % Support: (\+glythed(skExistsGlythed_6FnSk,"7"),{_7048=skExistsGlythed_6FnSk},{is_unit(_7048)}==>glythed(_7048,"7")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',51)
- % RHS-Post1: glythed(skExistsGlythed_6FnSk,"7")
- % Support: \+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_6FnSk,"7")
- % cond: call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7"))
- % action: skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_6FnSk,"7"),(\+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_6FnSk, "7")).
- % Found positive trigger: glythed(skExistsGlythed_6FnSk,"7")
- % body: compound(glythed(skExistsGlythed_6FnSk,"7")),\+is_ftVar(glythed(skExistsGlythed_6FnSk,"7"))*->rhs([{with_current_why(glythed(skExistsGlythed_6FnSk,"7"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_6FnSk,"7"))))}])
- % Found positive trigger: glythed(skExistsGlythed_6FnSk,"7")
- % body: is_kif_clause(glythed(skExistsGlythed_6FnSk,"7"))*->rhs([clif(glythed(skExistsGlythed_6FnSk,"7"))])
- % Found positive trigger: glythed(skExistsGlythed_6FnSk,"7")
- % body: compound(glythed(skExistsGlythed_6FnSk,"7")),\+is_ftVar(glythed(skExistsGlythed_6FnSk,"7"))*->rhs([{with_current_why(glythed(skExistsGlythed_6FnSk,"7"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_6FnSk,"7"))))}])
- % Found negative trigger: glythed(skExistsGlythed_6FnSk,"7")
- % cond: call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7"))
- % body: skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])
- % Support: spft(glythed(skExistsGlythed_6FnSk,"7"),\+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_6FnSk,"7")
- % support (was): \+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_6FnSk,"7"),\+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_6FnSk,"7"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_6FnSk, "7"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_6FnSk,"7"),{_5622=skExistsGlythed_6FnSk},{is_unit(_5622)}==>glythed(_5622,"7"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk}))
- % body: compound(boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"7"):- \+glythed(skExistsGlythed_6FnSk,"7"),{_4094=skExistsGlythed_6FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_2296,"7")))
- % Support: clif(exists(_2152,glythed(_2152,"7"))),pt(clif(exists(_2296,glythed(_2296,"7"))),(is_kif_clause(exists(_2296,glythed(_2296,"7")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"7")),kif_to_boxlog,(glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_2296,"7")))},boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_2296,"7")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_6FnSk, "7"):- \+glythed(_19150, "7")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7")))
- % body: compound(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7")))}])
- % =boxlog=
- % glythed(skExistsGlythed_6FnSk, "7") :-
- % \+ glythed(_3832, "7").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7")))
- % body: delistify_last_arg((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"7")==>glythed(skExistsGlythed_6FnSk,"7")))
- % Support: boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3680,"7"))),pt(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7"))),(delistify_last_arg((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3832,"7")),boxlog_to_pfc,(\+glythed(_3832,"7")==>glythed(skExistsGlythed_6FnSk,"7"))),must_be_unqualified((\+glythed(_3832,"7")==>glythed(skExistsGlythed_6FnSk,"7")))*->rhs([pfclog((\+glythed(_3832,"7")==>glythed(skExistsGlythed_6FnSk,"7")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13722, "7")==>glythed(skExistsGlythed_6FnSk, "7")))).
- % Found positive trigger: pfclog((\+glythed(_16552,"7")==>glythed(skExistsGlythed_6FnSk,"7")))
- % body: compound(pfclog((\+glythed(_16552,"7")==>glythed(skExistsGlythed_6FnSk,"7")))),\+is_ftVar(pfclog((\+glythed(_16552,"7")==>glythed(skExistsGlythed_6FnSk,"7"))))*->rhs([{with_current_why(pfclog((\+glythed(_16552,"7")==>glythed(skExistsGlythed_6FnSk,"7"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16552,"7")==>glythed(skExistsGlythed_6FnSk,"7"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7")))}])
- % =pfclog=
- % \+glythed(_5070, "7")==>glythed(skExistsGlythed_6FnSk, "7").
- % Found positive trigger: pfclog((\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7"))))*->rhs([clif(pfclog((\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7")))
- % body: rhs([(\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7"))])
- % RHS-Post1: \+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7")
- % Support: pfclog((\+glythed(_4918,"7")==>glythed(skExistsGlythed_6FnSk,"7"))),pt(pfclog((\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7"))),rhs([(\+glythed(_5070,"7")==>glythed(skExistsGlythed_6FnSk,"7"))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "7")==>glythed(skExistsGlythed_6FnSk, "7"))).
- % Adding negative
- % trigger: glythed(_6022,"7")
- % test: call_u_no_bc(glythed(_6022,"7"))
- % body: rhs([glythed(skExistsGlythed_6FnSk,"7")])
- % Support: (\+glythed(_6180,"7")==>glythed(skExistsGlythed_6FnSk,"7")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',51)
- % RHS-Post1: glythed(skExistsGlythed_6FnSk,"7")
- % Support: \+glythed(_6022,"7"),nt(glythed(_6540,"7"),call_u_no_bc(glythed(_6022,"7")),rhs([glythed(skExistsGlythed_6FnSk,"7")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"7")
- % cond: call_u_no_bc(glythed(_6022,"7"))
- % action: rhs([glythed(skExistsGlythed_6FnSk,"7")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_6FnSk,"7"),(\+glythed(_6022,"7"),nt(glythed(_6540,"7"),call_u_no_bc(glythed(_6022,"7")),rhs([glythed(skExistsGlythed_6FnSk,"7")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_6FnSk, "7")).
- % Found positive trigger: glythed(skExistsGlythed_6FnSk,"7")
- % body: compound(glythed(skExistsGlythed_6FnSk,"7")),\+is_ftVar(glythed(skExistsGlythed_6FnSk,"7"))*->rhs([{with_current_why(glythed(skExistsGlythed_6FnSk,"7"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_6FnSk,"7"))))}])
- % Found positive trigger: glythed(skExistsGlythed_6FnSk,"7")
- % body: is_kif_clause(glythed(skExistsGlythed_6FnSk,"7"))*->rhs([clif(glythed(skExistsGlythed_6FnSk,"7"))])
- % Found positive trigger: glythed(skExistsGlythed_6FnSk,"7")
- % body: compound(glythed(skExistsGlythed_6FnSk,"7")),\+is_ftVar(glythed(skExistsGlythed_6FnSk,"7"))*->rhs([{with_current_why(glythed(skExistsGlythed_6FnSk,"7"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_6FnSk,"7"))))}])
- % Found negative trigger: glythed(skExistsGlythed_6FnSk,"7")
- % cond: call_u_no_bc(glythed(_23310,"7"))
- % body: rhs([glythed(skExistsGlythed_6FnSk,"7")])
- % Support: spft(glythed(skExistsGlythed_6FnSk,"7"),\+glythed(_23310,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(_23310,"7")),rhs([glythed(skExistsGlythed_6FnSk,"7")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_6FnSk,"7")
- % support (was): \+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),rhs([glythed(skExistsGlythed_6FnSk,"7")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_6FnSk,"7"),\+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),rhs([glythed(skExistsGlythed_6FnSk,"7")]))))
- % RHS-Post1: glythed(skExistsGlythed_6FnSk,"7")
- % Support: \+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_6FnSk,"7")
- % cond: call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7"))
- % action: skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_6FnSk,"7"),(\+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))))
- % moving(inherit_above(header_sane, glythed(_29076, _29078))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_6FnSk,"7"),\+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))))
- % RHS-Post1: glythed(skExistsGlythed_6FnSk,"7")
- % Support: \+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_6FnSk,"7")
- % cond: call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7"))
- % action: skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_6FnSk,"7"),(\+glythed(skExistsGlythed_6FnSk,"7"),nt(glythed(skExistsGlythed_6FnSk,"7"),call_u_no_bc(glythed(skExistsGlythed_6FnSk,"7")),(skExistsGlythed_6FnSk=skExistsGlythed_6FnSk*->is_unit(skExistsGlythed_6FnSk)*->rhs([glythed(skExistsGlythed_6FnSk,"7")])))))
- % moving(inherit_above(header_sane, glythed(_29254, _29256))).
- % Found positive trigger: pfclog((\+glythed(_5040,"7")==>glythed(skExistsGlythed_6FnSk,"7")))
- % body: compound(pfclog((\+glythed(_5040,"7")==>glythed(skExistsGlythed_6FnSk,"7")))),\+is_ftVar(pfclog((\+glythed(_5040,"7")==>glythed(skExistsGlythed_6FnSk,"7"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"7")==>glythed(skExistsGlythed_6FnSk,"7"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"7")==>glythed(skExistsGlythed_6FnSk,"7"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3802,"7")))
- % body: compound(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3802,"7")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3802,"7"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3802,"7"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_6FnSk,"7"):- \+glythed(_3802,"7"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"7")))
- % body: compound(clif(exists(_2296,glythed(_2296,"7")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"7"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"7"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"7"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"7"))
- % body: compound(exists(_1224,glythed(_1224,"7"))),\+is_ftVar(exists(_1224,glythed(_1224,"7")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"7")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"7")))))}])
- % r_sane:mpred_fwc1(exists(_31346, glythed(_31346, "8"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"8"))
- % body: compound(exists(_1236,glythed(_1236,"8"))),\+is_ftVar(exists(_1236,glythed(_1236,"8")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"8")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"8")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"8"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"8")))*->rhs([clif(exists(_1236,glythed(_1236,"8")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"8")))
- % Support: exists(_1100,glythed(_1100,"8")),pt(exists(_1236,glythed(_1236,"8")),(is_kif_clause(exists(_1236,glythed(_1236,"8")))*->rhs([clif(exists(_1236,glythed(_1236,"8")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "8")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"8")))
- % body: compound(clif(exists(_2296,glythed(_2296,"8")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"8"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"8"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"8"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"8")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"8")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "8")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"8")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"8"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"8"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"8")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"8")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"8")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"8")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"8")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"8")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "8")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "8"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "8"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "8")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_7FnSk, "8")), ~skolem(_2296, skExistsGlythed_7FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "8")), v(nesc(glythed(skExistsGlythed_7FnSk, "8")), ~skolem(_2296, skExistsGlythed_7FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "8"))
- % ; tru(glythed(skExistsGlythed_7FnSk, "8"))
- % ; neg(skolem(_2296, skExistsGlythed_7FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "8"))), n(tru(glythed(skExistsGlythed_7FnSk, "8"))), n(neg(skolem(_2296, skExistsGlythed_7FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_2296,"8"))))
- % Support: clif(exists(_2152,glythed(_2152,"8"))),pt(clif(exists(_2296,glythed(_2296,"8"))),(is_kif_clause(exists(_2296,glythed(_2296,"8")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"8")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_2296,"8"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_2296,"8"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12776, skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk, "8")), proven_neg(glythed(_12776, "8"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15608,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_15608,"8"))))
- % body: compound(boxlog((proven_neg(skolem(_15608,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_15608,"8"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15608,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_15608,"8")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15608,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_15608,"8")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15608,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_15608,"8")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_7FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_7FnSk, "8")),
- % proven_neg(glythed(_4078, "8")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_4078,"8"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_7FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_3894,"8")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8"))),boxlog_to_pfc,(~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_4078,"8"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_7FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_4078,"8"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_7FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_4078,"8"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_7FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_7FnSk, "8"), ~glythed(_16056, "8"), {is_unit(_16056)}==>proven_neg(skolem(_16056, skExistsGlythed_7FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_19302,"8"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_7FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_19302,"8"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_7FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_19302,"8"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_7FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_19302,"8"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_7FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_19302,"8"),{is_unit(_19302)}==>proven_neg(skolem(_19302,skExistsGlythed_7FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_7FnSk, "8"), ~glythed(_5658, "8"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_7FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5446,"8"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_7FnSk)))),pt(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk)))),rhs([(~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_7FnSk, "8"), ~glythed(_39182, "8"), {is_unit(_39182)}==>proven_neg(skolem(_39182, skExistsGlythed_7FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_7FnSk,"8")
- % body: pt(~glythed(_6914,"8"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_7FnSk))])))
- % Support: (~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_7132,"8"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_7FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',51)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_7FnSk,"8"),~glythed(_5658,"8"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_7FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_7FnSk)):-proven_neg(glythed(skExistsGlythed_7FnSk,"8")),proven_neg(glythed(_4078,"8")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_2296=skExistsGlythed_7FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"8"))),pt(clif(exists(_2296,glythed(_2296,"8"))),(is_kif_clause(exists(_2296,glythed(_2296,"8")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"8")),kif_to_boxlog,(glythed(_2296,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_2296=skExistsGlythed_7FnSk}))},boxlog((glythed(_2296,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_2296=skExistsGlythed_7FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12426, "8"):- \+glythed(skExistsGlythed_7FnSk, "8"), {_12426=skExistsGlythed_7FnSk}))).
- % Found positive trigger: boxlog((glythed(_15190,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_15190=skExistsGlythed_7FnSk}))
- % body: compound(boxlog((glythed(_15190,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_15190=skExistsGlythed_7FnSk}))),\+is_ftVar(boxlog((glythed(_15190,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_15190=skExistsGlythed_7FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15190,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_15190=skExistsGlythed_7FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15190,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_15190=skExistsGlythed_7FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk}))}])
- % =boxlog=
- % glythed(_4094, "8") :-
- % \+ glythed(skExistsGlythed_7FnSk, "8"),
- % { _4094=skExistsGlythed_7FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk})))*->rhs([clif(boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk}))
- % body: delistify_last_arg((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk},{is_unit(_4094)}==>glythed(_4094,"8")))
- % Support: boxlog((glythed(_3918,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_3918=skExistsGlythed_7FnSk})),pt(boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk})),(delistify_last_arg((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk},{is_unit(_4094)}==>glythed(_4094,"8"))),must_be_unqualified((\+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk},{is_unit(_4094)}==>glythed(_4094,"8")))*->rhs([pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk},{is_unit(_4094)}==>glythed(_4094,"8")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_7FnSk, "8"), {_15746=skExistsGlythed_7FnSk}, {is_unit(_15746)}==>glythed(_15746, "8")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_18934=skExistsGlythed_7FnSk},{is_unit(_18934)}==>glythed(_18934,"8")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_18934=skExistsGlythed_7FnSk},{is_unit(_18934)}==>glythed(_18934,"8")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_18934=skExistsGlythed_7FnSk},{is_unit(_18934)}==>glythed(_18934,"8"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_18934=skExistsGlythed_7FnSk},{is_unit(_18934)}==>glythed(_18934,"8"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_18934=skExistsGlythed_7FnSk},{is_unit(_18934)}==>glythed(_18934,"8"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_7FnSk, "8"), {_5622=skExistsGlythed_7FnSk}, {is_unit(_5622)}==>glythed(_5622, "8").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8")))
- % body: rhs([(\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8"))])
- % RHS-Post1: \+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8")
- % Support: pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5418=skExistsGlythed_7FnSk},{is_unit(_5418)}==>glythed(_5418,"8"))),pt(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8"))),rhs([(\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_7FnSk, "8"), {_39052=skExistsGlythed_7FnSk}, {is_unit(_39052)}==>glythed(_39052, "8"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_7FnSk,"8")
- % test: call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8"))
- % body: _6838=skExistsGlythed_7FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"8")])
- % Support: (\+glythed(skExistsGlythed_7FnSk,"8"),{_7048=skExistsGlythed_7FnSk},{is_unit(_7048)}==>glythed(_7048,"8")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',51)
- % RHS-Post1: glythed(skExistsGlythed_7FnSk,"8")
- % Support: \+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_7FnSk,"8")
- % cond: call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8"))
- % action: skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_7FnSk,"8"),(\+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_7FnSk, "8")).
- % Found positive trigger: glythed(skExistsGlythed_7FnSk,"8")
- % body: compound(glythed(skExistsGlythed_7FnSk,"8")),\+is_ftVar(glythed(skExistsGlythed_7FnSk,"8"))*->rhs([{with_current_why(glythed(skExistsGlythed_7FnSk,"8"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_7FnSk,"8"))))}])
- % Found positive trigger: glythed(skExistsGlythed_7FnSk,"8")
- % body: is_kif_clause(glythed(skExistsGlythed_7FnSk,"8"))*->rhs([clif(glythed(skExistsGlythed_7FnSk,"8"))])
- % Found positive trigger: glythed(skExistsGlythed_7FnSk,"8")
- % body: compound(glythed(skExistsGlythed_7FnSk,"8")),\+is_ftVar(glythed(skExistsGlythed_7FnSk,"8"))*->rhs([{with_current_why(glythed(skExistsGlythed_7FnSk,"8"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_7FnSk,"8"))))}])
- % Found negative trigger: glythed(skExistsGlythed_7FnSk,"8")
- % cond: call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8"))
- % body: skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])
- % Support: spft(glythed(skExistsGlythed_7FnSk,"8"),\+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_7FnSk,"8")
- % support (was): \+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_7FnSk,"8"),\+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_7FnSk,"8"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_7FnSk, "8"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_7FnSk,"8"),{_5622=skExistsGlythed_7FnSk},{is_unit(_5622)}==>glythed(_5622,"8"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk}))
- % body: compound(boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"8"):- \+glythed(skExistsGlythed_7FnSk,"8"),{_4094=skExistsGlythed_7FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_2296,"8")))
- % Support: clif(exists(_2152,glythed(_2152,"8"))),pt(clif(exists(_2296,glythed(_2296,"8"))),(is_kif_clause(exists(_2296,glythed(_2296,"8")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"8")),kif_to_boxlog,(glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_2296,"8")))},boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_2296,"8")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_7FnSk, "8"):- \+glythed(_19156, "8")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8")))
- % body: compound(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8")))}])
- % =boxlog=
- % glythed(skExistsGlythed_7FnSk, "8") :-
- % \+ glythed(_3832, "8").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8")))
- % body: delistify_last_arg((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"8")==>glythed(skExistsGlythed_7FnSk,"8")))
- % Support: boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3680,"8"))),pt(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8"))),(delistify_last_arg((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3832,"8")),boxlog_to_pfc,(\+glythed(_3832,"8")==>glythed(skExistsGlythed_7FnSk,"8"))),must_be_unqualified((\+glythed(_3832,"8")==>glythed(skExistsGlythed_7FnSk,"8")))*->rhs([pfclog((\+glythed(_3832,"8")==>glythed(skExistsGlythed_7FnSk,"8")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13728, "8")==>glythed(skExistsGlythed_7FnSk, "8")))).
- % Found positive trigger: pfclog((\+glythed(_16558,"8")==>glythed(skExistsGlythed_7FnSk,"8")))
- % body: compound(pfclog((\+glythed(_16558,"8")==>glythed(skExistsGlythed_7FnSk,"8")))),\+is_ftVar(pfclog((\+glythed(_16558,"8")==>glythed(skExistsGlythed_7FnSk,"8"))))*->rhs([{with_current_why(pfclog((\+glythed(_16558,"8")==>glythed(skExistsGlythed_7FnSk,"8"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16558,"8")==>glythed(skExistsGlythed_7FnSk,"8"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8")))}])
- % =pfclog=
- % \+glythed(_5070, "8")==>glythed(skExistsGlythed_7FnSk, "8").
- % Found positive trigger: pfclog((\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8"))))*->rhs([clif(pfclog((\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8")))
- % body: rhs([(\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8"))])
- % RHS-Post1: \+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8")
- % Support: pfclog((\+glythed(_4918,"8")==>glythed(skExistsGlythed_7FnSk,"8"))),pt(pfclog((\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8"))),rhs([(\+glythed(_5070,"8")==>glythed(skExistsGlythed_7FnSk,"8"))]))
- % r_sane:mpred_fwc1((\+glythed(_31986, "8")==>glythed(skExistsGlythed_7FnSk, "8"))).
- % Adding negative
- % trigger: glythed(_6022,"8")
- % test: call_u_no_bc(glythed(_6022,"8"))
- % body: rhs([glythed(skExistsGlythed_7FnSk,"8")])
- % Support: (\+glythed(_6180,"8")==>glythed(skExistsGlythed_7FnSk,"8")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',51)
- % RHS-Post1: glythed(skExistsGlythed_7FnSk,"8")
- % Support: \+glythed(_6022,"8"),nt(glythed(_6540,"8"),call_u_no_bc(glythed(_6022,"8")),rhs([glythed(skExistsGlythed_7FnSk,"8")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"8")
- % cond: call_u_no_bc(glythed(_6022,"8"))
- % action: rhs([glythed(skExistsGlythed_7FnSk,"8")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_7FnSk,"8"),(\+glythed(_6022,"8"),nt(glythed(_6540,"8"),call_u_no_bc(glythed(_6022,"8")),rhs([glythed(skExistsGlythed_7FnSk,"8")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_7FnSk, "8")).
- % Found positive trigger: glythed(skExistsGlythed_7FnSk,"8")
- % body: compound(glythed(skExistsGlythed_7FnSk,"8")),\+is_ftVar(glythed(skExistsGlythed_7FnSk,"8"))*->rhs([{with_current_why(glythed(skExistsGlythed_7FnSk,"8"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_7FnSk,"8"))))}])
- % Found positive trigger: glythed(skExistsGlythed_7FnSk,"8")
- % body: is_kif_clause(glythed(skExistsGlythed_7FnSk,"8"))*->rhs([clif(glythed(skExistsGlythed_7FnSk,"8"))])
- % Found positive trigger: glythed(skExistsGlythed_7FnSk,"8")
- % body: compound(glythed(skExistsGlythed_7FnSk,"8")),\+is_ftVar(glythed(skExistsGlythed_7FnSk,"8"))*->rhs([{with_current_why(glythed(skExistsGlythed_7FnSk,"8"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_7FnSk,"8"))))}])
- % Found negative trigger: glythed(skExistsGlythed_7FnSk,"8")
- % cond: call_u_no_bc(glythed(_23310,"8"))
- % body: rhs([glythed(skExistsGlythed_7FnSk,"8")])
- % Support: spft(glythed(skExistsGlythed_7FnSk,"8"),\+glythed(_23310,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(_23310,"8")),rhs([glythed(skExistsGlythed_7FnSk,"8")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_7FnSk,"8")
- % support (was): \+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),rhs([glythed(skExistsGlythed_7FnSk,"8")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_7FnSk,"8"),\+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),rhs([glythed(skExistsGlythed_7FnSk,"8")]))))
- % RHS-Post1: glythed(skExistsGlythed_7FnSk,"8")
- % Support: \+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_7FnSk,"8")
- % cond: call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8"))
- % action: skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_7FnSk,"8"),(\+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))))
- % moving(inherit_above(header_sane, glythed(_29070, _29072))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_7FnSk,"8"),\+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))))
- % RHS-Post1: glythed(skExistsGlythed_7FnSk,"8")
- % Support: \+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_7FnSk,"8")
- % cond: call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8"))
- % action: skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_7FnSk,"8"),(\+glythed(skExistsGlythed_7FnSk,"8"),nt(glythed(skExistsGlythed_7FnSk,"8"),call_u_no_bc(glythed(skExistsGlythed_7FnSk,"8")),(skExistsGlythed_7FnSk=skExistsGlythed_7FnSk*->is_unit(skExistsGlythed_7FnSk)*->rhs([glythed(skExistsGlythed_7FnSk,"8")])))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Found positive trigger: pfclog((\+glythed(_5040,"8")==>glythed(skExistsGlythed_7FnSk,"8")))
- % body: compound(pfclog((\+glythed(_5040,"8")==>glythed(skExistsGlythed_7FnSk,"8")))),\+is_ftVar(pfclog((\+glythed(_5040,"8")==>glythed(skExistsGlythed_7FnSk,"8"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"8")==>glythed(skExistsGlythed_7FnSk,"8"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"8")==>glythed(skExistsGlythed_7FnSk,"8"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3802,"8")))
- % body: compound(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3802,"8")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3802,"8"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3802,"8"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_7FnSk,"8"):- \+glythed(_3802,"8"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"8")))
- % body: compound(clif(exists(_2296,glythed(_2296,"8")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"8"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"8"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"8"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"8"))
- % body: compound(exists(_1224,glythed(_1224,"8"))),\+is_ftVar(exists(_1224,glythed(_1224,"8")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"8")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"8")))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:52
- % r_sane:mpred_fwc1(exists(_31346, glythed(_31346, "9"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"9"))
- % body: compound(exists(_1236,glythed(_1236,"9"))),\+is_ftVar(exists(_1236,glythed(_1236,"9")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"9")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"9")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"9"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"9")))*->rhs([clif(exists(_1236,glythed(_1236,"9")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"9")))
- % Support: exists(_1100,glythed(_1100,"9")),pt(exists(_1236,glythed(_1236,"9")),(is_kif_clause(exists(_1236,glythed(_1236,"9")))*->rhs([clif(exists(_1236,glythed(_1236,"9")))])))
- % r_sane:mpred_fwc1(clif(exists(_15378, glythed(_15378, "9")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"9")))
- % body: compound(clif(exists(_2296,glythed(_2296,"9")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"9"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"9"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"9"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"9")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"9")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "9")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"9")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"9"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"9"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"9")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"9")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"9")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"9")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"9")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"9")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "9")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "9"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "9"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "9")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_8FnSk, "9")), ~skolem(_2296, skExistsGlythed_8FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "9")), v(nesc(glythed(skExistsGlythed_8FnSk, "9")), ~skolem(_2296, skExistsGlythed_8FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "9"))
- % ; tru(glythed(skExistsGlythed_8FnSk, "9"))
- % ; neg(skolem(_2296, skExistsGlythed_8FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "9"))), n(tru(glythed(skExistsGlythed_8FnSk, "9"))), n(neg(skolem(_2296, skExistsGlythed_8FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_2296,"9"))))
- % Support: clif(exists(_2152,glythed(_2152,"9"))),pt(clif(exists(_2296,glythed(_2296,"9"))),(is_kif_clause(exists(_2296,glythed(_2296,"9")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"9")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_2296,"9"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_2296,"9"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12782, skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk, "9")), proven_neg(glythed(_12782, "9"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15614,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_15614,"9"))))
- % body: compound(boxlog((proven_neg(skolem(_15614,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_15614,"9"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15614,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_15614,"9")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15614,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_15614,"9")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15614,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_15614,"9")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_8FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_8FnSk, "9")),
- % proven_neg(glythed(_4078, "9")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_4078,"9"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_8FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_3894,"9")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9"))),boxlog_to_pfc,(~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_4078,"9"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_8FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_4078,"9"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_8FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_4078,"9"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_8FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_8FnSk, "9"), ~glythed(_16062, "9"), {is_unit(_16062)}==>proven_neg(skolem(_16062, skExistsGlythed_8FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_19308,"9"),{is_unit(_19308)}==>proven_neg(skolem(_19308,skExistsGlythed_8FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_19308,"9"),{is_unit(_19308)}==>proven_neg(skolem(_19308,skExistsGlythed_8FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_19308,"9"),{is_unit(_19308)}==>proven_neg(skolem(_19308,skExistsGlythed_8FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_19308,"9"),{is_unit(_19308)}==>proven_neg(skolem(_19308,skExistsGlythed_8FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_19308,"9"),{is_unit(_19308)}==>proven_neg(skolem(_19308,skExistsGlythed_8FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_8FnSk, "9"), ~glythed(_5658, "9"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_8FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5446,"9"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_8FnSk)))),pt(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk)))),rhs([(~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_8FnSk, "9"), ~glythed(_39182, "9"), {is_unit(_39182)}==>proven_neg(skolem(_39182, skExistsGlythed_8FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_8FnSk,"9")
- % body: pt(~glythed(_6914,"9"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_8FnSk))])))
- % Support: (~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_7132,"9"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_8FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',52)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_8FnSk,"9"),~glythed(_5658,"9"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_8FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_8FnSk)):-proven_neg(glythed(skExistsGlythed_8FnSk,"9")),proven_neg(glythed(_4078,"9")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_2296=skExistsGlythed_8FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"9"))),pt(clif(exists(_2296,glythed(_2296,"9"))),(is_kif_clause(exists(_2296,glythed(_2296,"9")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"9")),kif_to_boxlog,(glythed(_2296,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_2296=skExistsGlythed_8FnSk}))},boxlog((glythed(_2296,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_2296=skExistsGlythed_8FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12426, "9"):- \+glythed(skExistsGlythed_8FnSk, "9"), {_12426=skExistsGlythed_8FnSk}))).
- % Found positive trigger: boxlog((glythed(_15190,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_15190=skExistsGlythed_8FnSk}))
- % body: compound(boxlog((glythed(_15190,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_15190=skExistsGlythed_8FnSk}))),\+is_ftVar(boxlog((glythed(_15190,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_15190=skExistsGlythed_8FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15190,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_15190=skExistsGlythed_8FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15190,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_15190=skExistsGlythed_8FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk}))}])
- % =boxlog=
- % glythed(_4094, "9") :-
- % \+ glythed(skExistsGlythed_8FnSk, "9"),
- % { _4094=skExistsGlythed_8FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk})))*->rhs([clif(boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk}))
- % body: delistify_last_arg((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk},{is_unit(_4094)}==>glythed(_4094,"9")))
- % Support: boxlog((glythed(_3918,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_3918=skExistsGlythed_8FnSk})),pt(boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk})),(delistify_last_arg((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk},{is_unit(_4094)}==>glythed(_4094,"9"))),must_be_unqualified((\+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk},{is_unit(_4094)}==>glythed(_4094,"9")))*->rhs([pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk},{is_unit(_4094)}==>glythed(_4094,"9")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_8FnSk, "9"), {_15752=skExistsGlythed_8FnSk}, {is_unit(_15752)}==>glythed(_15752, "9")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_18940=skExistsGlythed_8FnSk},{is_unit(_18940)}==>glythed(_18940,"9")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_18940=skExistsGlythed_8FnSk},{is_unit(_18940)}==>glythed(_18940,"9")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_18940=skExistsGlythed_8FnSk},{is_unit(_18940)}==>glythed(_18940,"9"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_18940=skExistsGlythed_8FnSk},{is_unit(_18940)}==>glythed(_18940,"9"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_18940=skExistsGlythed_8FnSk},{is_unit(_18940)}==>glythed(_18940,"9"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_8FnSk, "9"), {_5622=skExistsGlythed_8FnSk}, {is_unit(_5622)}==>glythed(_5622, "9").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9")))
- % body: rhs([(\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9"))])
- % RHS-Post1: \+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9")
- % Support: pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5418=skExistsGlythed_8FnSk},{is_unit(_5418)}==>glythed(_5418,"9"))),pt(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9"))),rhs([(\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_8FnSk, "9"), {_39058=skExistsGlythed_8FnSk}, {is_unit(_39058)}==>glythed(_39058, "9"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_8FnSk,"9")
- % test: call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9"))
- % body: _6838=skExistsGlythed_8FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"9")])
- % Support: (\+glythed(skExistsGlythed_8FnSk,"9"),{_7048=skExistsGlythed_8FnSk},{is_unit(_7048)}==>glythed(_7048,"9")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',52)
- % RHS-Post1: glythed(skExistsGlythed_8FnSk,"9")
- % Support: \+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_8FnSk,"9")
- % cond: call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9"))
- % action: skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_8FnSk,"9"),(\+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_8FnSk, "9")).
- % Found positive trigger: glythed(skExistsGlythed_8FnSk,"9")
- % body: compound(glythed(skExistsGlythed_8FnSk,"9")),\+is_ftVar(glythed(skExistsGlythed_8FnSk,"9"))*->rhs([{with_current_why(glythed(skExistsGlythed_8FnSk,"9"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_8FnSk,"9"))))}])
- % Found positive trigger: glythed(skExistsGlythed_8FnSk,"9")
- % body: is_kif_clause(glythed(skExistsGlythed_8FnSk,"9"))*->rhs([clif(glythed(skExistsGlythed_8FnSk,"9"))])
- % Found positive trigger: glythed(skExistsGlythed_8FnSk,"9")
- % body: compound(glythed(skExistsGlythed_8FnSk,"9")),\+is_ftVar(glythed(skExistsGlythed_8FnSk,"9"))*->rhs([{with_current_why(glythed(skExistsGlythed_8FnSk,"9"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_8FnSk,"9"))))}])
- % Found negative trigger: glythed(skExistsGlythed_8FnSk,"9")
- % cond: call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9"))
- % body: skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])
- % Support: spft(glythed(skExistsGlythed_8FnSk,"9"),\+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_8FnSk,"9")
- % support (was): \+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_8FnSk,"9"),\+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_8FnSk,"9"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_8FnSk, "9"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_8FnSk,"9"),{_5622=skExistsGlythed_8FnSk},{is_unit(_5622)}==>glythed(_5622,"9"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk}))
- % body: compound(boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"9"):- \+glythed(skExistsGlythed_8FnSk,"9"),{_4094=skExistsGlythed_8FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_2296,"9")))
- % Support: clif(exists(_2152,glythed(_2152,"9"))),pt(clif(exists(_2296,glythed(_2296,"9"))),(is_kif_clause(exists(_2296,glythed(_2296,"9")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"9")),kif_to_boxlog,(glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_2296,"9")))},boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_2296,"9")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_8FnSk, "9"):- \+glythed(_19156, "9")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9")))
- % body: compound(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9")))}])
- % =boxlog=
- % glythed(skExistsGlythed_8FnSk, "9") :-
- % \+ glythed(_3832, "9").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9")))
- % body: delistify_last_arg((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"9")==>glythed(skExistsGlythed_8FnSk,"9")))
- % Support: boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3680,"9"))),pt(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9"))),(delistify_last_arg((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3832,"9")),boxlog_to_pfc,(\+glythed(_3832,"9")==>glythed(skExistsGlythed_8FnSk,"9"))),must_be_unqualified((\+glythed(_3832,"9")==>glythed(skExistsGlythed_8FnSk,"9")))*->rhs([pfclog((\+glythed(_3832,"9")==>glythed(skExistsGlythed_8FnSk,"9")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13722, "9")==>glythed(skExistsGlythed_8FnSk, "9")))).
- % Found positive trigger: pfclog((\+glythed(_16552,"9")==>glythed(skExistsGlythed_8FnSk,"9")))
- % body: compound(pfclog((\+glythed(_16552,"9")==>glythed(skExistsGlythed_8FnSk,"9")))),\+is_ftVar(pfclog((\+glythed(_16552,"9")==>glythed(skExistsGlythed_8FnSk,"9"))))*->rhs([{with_current_why(pfclog((\+glythed(_16552,"9")==>glythed(skExistsGlythed_8FnSk,"9"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16552,"9")==>glythed(skExistsGlythed_8FnSk,"9"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9")))}])
- % =pfclog=
- % \+glythed(_5070, "9")==>glythed(skExistsGlythed_8FnSk, "9").
- % Found positive trigger: pfclog((\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9"))))*->rhs([clif(pfclog((\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9")))
- % body: rhs([(\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9"))])
- % RHS-Post1: \+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9")
- % Support: pfclog((\+glythed(_4918,"9")==>glythed(skExistsGlythed_8FnSk,"9"))),pt(pfclog((\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9"))),rhs([(\+glythed(_5070,"9")==>glythed(skExistsGlythed_8FnSk,"9"))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "9")==>glythed(skExistsGlythed_8FnSk, "9"))).
- % Adding negative
- % trigger: glythed(_6022,"9")
- % test: call_u_no_bc(glythed(_6022,"9"))
- % body: rhs([glythed(skExistsGlythed_8FnSk,"9")])
- % Support: (\+glythed(_6180,"9")==>glythed(skExistsGlythed_8FnSk,"9")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',52)
- % RHS-Post1: glythed(skExistsGlythed_8FnSk,"9")
- % Support: \+glythed(_6022,"9"),nt(glythed(_6540,"9"),call_u_no_bc(glythed(_6022,"9")),rhs([glythed(skExistsGlythed_8FnSk,"9")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"9")
- % cond: call_u_no_bc(glythed(_6022,"9"))
- % action: rhs([glythed(skExistsGlythed_8FnSk,"9")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_8FnSk,"9"),(\+glythed(_6022,"9"),nt(glythed(_6540,"9"),call_u_no_bc(glythed(_6022,"9")),rhs([glythed(skExistsGlythed_8FnSk,"9")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_8FnSk, "9")).
- % Found positive trigger: glythed(skExistsGlythed_8FnSk,"9")
- % body: compound(glythed(skExistsGlythed_8FnSk,"9")),\+is_ftVar(glythed(skExistsGlythed_8FnSk,"9"))*->rhs([{with_current_why(glythed(skExistsGlythed_8FnSk,"9"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_8FnSk,"9"))))}])
- % Found positive trigger: glythed(skExistsGlythed_8FnSk,"9")
- % body: is_kif_clause(glythed(skExistsGlythed_8FnSk,"9"))*->rhs([clif(glythed(skExistsGlythed_8FnSk,"9"))])
- % Found positive trigger: glythed(skExistsGlythed_8FnSk,"9")
- % body: compound(glythed(skExistsGlythed_8FnSk,"9")),\+is_ftVar(glythed(skExistsGlythed_8FnSk,"9"))*->rhs([{with_current_why(glythed(skExistsGlythed_8FnSk,"9"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_8FnSk,"9"))))}])
- % Found negative trigger: glythed(skExistsGlythed_8FnSk,"9")
- % cond: call_u_no_bc(glythed(_23310,"9"))
- % body: rhs([glythed(skExistsGlythed_8FnSk,"9")])
- % Support: spft(glythed(skExistsGlythed_8FnSk,"9"),\+glythed(_23310,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(_23310,"9")),rhs([glythed(skExistsGlythed_8FnSk,"9")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_8FnSk,"9")
- % support (was): \+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),rhs([glythed(skExistsGlythed_8FnSk,"9")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_8FnSk,"9"),\+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),rhs([glythed(skExistsGlythed_8FnSk,"9")]))))
- % RHS-Post1: glythed(skExistsGlythed_8FnSk,"9")
- % Support: \+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_8FnSk,"9")
- % cond: call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9"))
- % action: skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_8FnSk,"9"),(\+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))))
- % moving(inherit_above(header_sane, glythed(_29076, _29078))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_8FnSk,"9"),\+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))))
- % RHS-Post1: glythed(skExistsGlythed_8FnSk,"9")
- % Support: \+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_8FnSk,"9")
- % cond: call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9"))
- % action: skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_8FnSk,"9"),(\+glythed(skExistsGlythed_8FnSk,"9"),nt(glythed(skExistsGlythed_8FnSk,"9"),call_u_no_bc(glythed(skExistsGlythed_8FnSk,"9")),(skExistsGlythed_8FnSk=skExistsGlythed_8FnSk*->is_unit(skExistsGlythed_8FnSk)*->rhs([glythed(skExistsGlythed_8FnSk,"9")])))))
- % moving(inherit_above(header_sane, glythed(_29254, _29256))).
- % Found positive trigger: pfclog((\+glythed(_5040,"9")==>glythed(skExistsGlythed_8FnSk,"9")))
- % body: compound(pfclog((\+glythed(_5040,"9")==>glythed(skExistsGlythed_8FnSk,"9")))),\+is_ftVar(pfclog((\+glythed(_5040,"9")==>glythed(skExistsGlythed_8FnSk,"9"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"9")==>glythed(skExistsGlythed_8FnSk,"9"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"9")==>glythed(skExistsGlythed_8FnSk,"9"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3802,"9")))
- % body: compound(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3802,"9")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3802,"9"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3802,"9"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_8FnSk,"9"):- \+glythed(_3802,"9"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"9")))
- % body: compound(clif(exists(_2296,glythed(_2296,"9")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"9"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"9"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"9"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"9"))
- % body: compound(exists(_1224,glythed(_1224,"9"))),\+is_ftVar(exists(_1224,glythed(_1224,"9")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"9")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"9")))))}])
- % r_sane:mpred_fwc1(exists(_31346, glythed(_31346, "0"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"0"))
- % body: compound(exists(_1236,glythed(_1236,"0"))),\+is_ftVar(exists(_1236,glythed(_1236,"0")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"0")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"0")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"0"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"0")))*->rhs([clif(exists(_1236,glythed(_1236,"0")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"0")))
- % Support: exists(_1100,glythed(_1100,"0")),pt(exists(_1236,glythed(_1236,"0")),(is_kif_clause(exists(_1236,glythed(_1236,"0")))*->rhs([clif(exists(_1236,glythed(_1236,"0")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "0")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"0")))
- % body: compound(clif(exists(_2296,glythed(_2296,"0")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"0"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"0"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"0"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"0")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"0")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "0")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"0")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"0"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"0"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"0")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"0")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"0")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"0")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"0")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"0")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "0")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "0"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "0"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "0")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_9FnSk, "0")), ~skolem(_2296, skExistsGlythed_9FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "0")), v(nesc(glythed(skExistsGlythed_9FnSk, "0")), ~skolem(_2296, skExistsGlythed_9FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "0"))
- % ; tru(glythed(skExistsGlythed_9FnSk, "0"))
- % ; neg(skolem(_2296, skExistsGlythed_9FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "0"))), n(tru(glythed(skExistsGlythed_9FnSk, "0"))), n(neg(skolem(_2296, skExistsGlythed_9FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_2296,"0"))))
- % Support: clif(exists(_2152,glythed(_2152,"0"))),pt(clif(exists(_2296,glythed(_2296,"0"))),(is_kif_clause(exists(_2296,glythed(_2296,"0")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"0")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_2296,"0"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_2296,"0"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12782, skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk, "0")), proven_neg(glythed(_12782, "0"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15614,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_15614,"0"))))
- % body: compound(boxlog((proven_neg(skolem(_15614,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_15614,"0"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15614,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_15614,"0")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15614,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_15614,"0")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15614,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_15614,"0")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_9FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_9FnSk, "0")),
- % proven_neg(glythed(_4078, "0")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0"))),boxlog_to_pfc,_15530),must_be_unqualified(_15530)*->rhs([pfclog(_15530)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_4078,"0"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_9FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_3894,"0")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0"))),boxlog_to_pfc,(~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_4078,"0"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_9FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_4078,"0"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_9FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_4078,"0"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_9FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_9FnSk, "0"), ~glythed(_16050, "0"), {is_unit(_16050)}==>proven_neg(skolem(_16050, skExistsGlythed_9FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_19296,"0"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_9FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_19296,"0"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_9FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_19296,"0"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_9FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_19296,"0"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_9FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_19296,"0"),{is_unit(_19296)}==>proven_neg(skolem(_19296,skExistsGlythed_9FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_9FnSk, "0"), ~glythed(_5658, "0"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_9FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5446,"0"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_9FnSk)))),pt(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk)))),rhs([(~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_9FnSk, "0"), ~glythed(_39176, "0"), {is_unit(_39176)}==>proven_neg(skolem(_39176, skExistsGlythed_9FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_9FnSk,"0")
- % body: pt(~glythed(_6914,"0"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_9FnSk))])))
- % Support: (~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_7132,"0"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_9FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',52)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_9FnSk,"0"),~glythed(_5658,"0"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_9FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_9FnSk)):-proven_neg(glythed(skExistsGlythed_9FnSk,"0")),proven_neg(glythed(_4078,"0")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_2296=skExistsGlythed_9FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"0"))),pt(clif(exists(_2296,glythed(_2296,"0"))),(is_kif_clause(exists(_2296,glythed(_2296,"0")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"0")),kif_to_boxlog,(glythed(_2296,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_2296=skExistsGlythed_9FnSk}))},boxlog((glythed(_2296,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_2296=skExistsGlythed_9FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12426, "0"):- \+glythed(skExistsGlythed_9FnSk, "0"), {_12426=skExistsGlythed_9FnSk}))).
- % Found positive trigger: boxlog((glythed(_15190,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_15190=skExistsGlythed_9FnSk}))
- % body: compound(boxlog((glythed(_15190,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_15190=skExistsGlythed_9FnSk}))),\+is_ftVar(boxlog((glythed(_15190,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_15190=skExistsGlythed_9FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15190,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_15190=skExistsGlythed_9FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15190,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_15190=skExistsGlythed_9FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk}))}])
- % =boxlog=
- % glythed(_4094, "0") :-
- % \+ glythed(skExistsGlythed_9FnSk, "0"),
- % { _4094=skExistsGlythed_9FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk})))*->rhs([clif(boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk}))
- % body: delistify_last_arg((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk}),boxlog_to_pfc,_15264),must_be_unqualified(_15264)*->rhs([pfclog(_15264)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk},{is_unit(_4094)}==>glythed(_4094,"0")))
- % Support: boxlog((glythed(_3918,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_3918=skExistsGlythed_9FnSk})),pt(boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk})),(delistify_last_arg((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk},{is_unit(_4094)}==>glythed(_4094,"0"))),must_be_unqualified((\+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk},{is_unit(_4094)}==>glythed(_4094,"0")))*->rhs([pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk},{is_unit(_4094)}==>glythed(_4094,"0")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_9FnSk, "0"), {_15746=skExistsGlythed_9FnSk}, {is_unit(_15746)}==>glythed(_15746, "0")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_18934=skExistsGlythed_9FnSk},{is_unit(_18934)}==>glythed(_18934,"0")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_18934=skExistsGlythed_9FnSk},{is_unit(_18934)}==>glythed(_18934,"0")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_18934=skExistsGlythed_9FnSk},{is_unit(_18934)}==>glythed(_18934,"0"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_18934=skExistsGlythed_9FnSk},{is_unit(_18934)}==>glythed(_18934,"0"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_18934=skExistsGlythed_9FnSk},{is_unit(_18934)}==>glythed(_18934,"0"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_9FnSk, "0"), {_5622=skExistsGlythed_9FnSk}, {is_unit(_5622)}==>glythed(_5622, "0").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0")))
- % body: rhs([(\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0"))])
- % RHS-Post1: \+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0")
- % Support: pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5418=skExistsGlythed_9FnSk},{is_unit(_5418)}==>glythed(_5418,"0"))),pt(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0"))),rhs([(\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_9FnSk, "0"), {_39058=skExistsGlythed_9FnSk}, {is_unit(_39058)}==>glythed(_39058, "0"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_9FnSk,"0")
- % test: call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0"))
- % body: _6838=skExistsGlythed_9FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"0")])
- % Support: (\+glythed(skExistsGlythed_9FnSk,"0"),{_7048=skExistsGlythed_9FnSk},{is_unit(_7048)}==>glythed(_7048,"0")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',52)
- % RHS-Post1: glythed(skExistsGlythed_9FnSk,"0")
- % Support: \+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_9FnSk,"0")
- % cond: call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0"))
- % action: skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_9FnSk,"0"),(\+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_9FnSk, "0")).
- % Found positive trigger: glythed(skExistsGlythed_9FnSk,"0")
- % body: compound(glythed(skExistsGlythed_9FnSk,"0")),\+is_ftVar(glythed(skExistsGlythed_9FnSk,"0"))*->rhs([{with_current_why(glythed(skExistsGlythed_9FnSk,"0"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_9FnSk,"0"))))}])
- % Found positive trigger: glythed(skExistsGlythed_9FnSk,"0")
- % body: is_kif_clause(glythed(skExistsGlythed_9FnSk,"0"))*->rhs([clif(glythed(skExistsGlythed_9FnSk,"0"))])
- % Found positive trigger: glythed(skExistsGlythed_9FnSk,"0")
- % body: compound(glythed(skExistsGlythed_9FnSk,"0")),\+is_ftVar(glythed(skExistsGlythed_9FnSk,"0"))*->rhs([{with_current_why(glythed(skExistsGlythed_9FnSk,"0"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_9FnSk,"0"))))}])
- % Found negative trigger: glythed(skExistsGlythed_9FnSk,"0")
- % cond: call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0"))
- % body: skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])
- % Support: spft(glythed(skExistsGlythed_9FnSk,"0"),\+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")]))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_9FnSk,"0")
- % support (was): \+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_9FnSk,"0"),\+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_9FnSk,"0"),_12688,_12690).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_9FnSk, "0"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_9FnSk,"0"),{_5622=skExistsGlythed_9FnSk},{is_unit(_5622)}==>glythed(_5622,"0"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk}))
- % body: compound(boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"0"):- \+glythed(skExistsGlythed_9FnSk,"0"),{_4094=skExistsGlythed_9FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_2296,"0")))
- % Support: clif(exists(_2152,glythed(_2152,"0"))),pt(clif(exists(_2296,glythed(_2296,"0"))),(is_kif_clause(exists(_2296,glythed(_2296,"0")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"0")),kif_to_boxlog,(glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_2296,"0")))},boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_2296,"0")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_9FnSk, "0"):- \+glythed(_19156, "0")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0")))
- % body: compound(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0")))}])
- % =boxlog=
- % glythed(skExistsGlythed_9FnSk, "0") :-
- % \+ glythed(_3832, "0").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0")))
- % body: delistify_last_arg((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0")),boxlog_to_pfc,_19214),must_be_unqualified(_19214)*->rhs([pfclog(_19214)])
- % RHS-Post1: pfclog((\+glythed(_3832,"0")==>glythed(skExistsGlythed_9FnSk,"0")))
- % Support: boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3680,"0"))),pt(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0"))),(delistify_last_arg((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3832,"0")),boxlog_to_pfc,(\+glythed(_3832,"0")==>glythed(skExistsGlythed_9FnSk,"0"))),must_be_unqualified((\+glythed(_3832,"0")==>glythed(skExistsGlythed_9FnSk,"0")))*->rhs([pfclog((\+glythed(_3832,"0")==>glythed(skExistsGlythed_9FnSk,"0")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13722, "0")==>glythed(skExistsGlythed_9FnSk, "0")))).
- % Found positive trigger: pfclog((\+glythed(_16552,"0")==>glythed(skExistsGlythed_9FnSk,"0")))
- % body: compound(pfclog((\+glythed(_16552,"0")==>glythed(skExistsGlythed_9FnSk,"0")))),\+is_ftVar(pfclog((\+glythed(_16552,"0")==>glythed(skExistsGlythed_9FnSk,"0"))))*->rhs([{with_current_why(pfclog((\+glythed(_16552,"0")==>glythed(skExistsGlythed_9FnSk,"0"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16552,"0")==>glythed(skExistsGlythed_9FnSk,"0"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0")))}])
- % =pfclog=
- % \+glythed(_5070, "0")==>glythed(skExistsGlythed_9FnSk, "0").
- % Found positive trigger: pfclog((\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0"))))*->rhs([clif(pfclog((\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0")))
- % body: rhs([(\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0"))])
- % RHS-Post1: \+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0")
- % Support: pfclog((\+glythed(_4918,"0")==>glythed(skExistsGlythed_9FnSk,"0"))),pt(pfclog((\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0"))),rhs([(\+glythed(_5070,"0")==>glythed(skExistsGlythed_9FnSk,"0"))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "0")==>glythed(skExistsGlythed_9FnSk, "0"))).
- % Adding negative
- % trigger: glythed(_6022,"0")
- % test: call_u_no_bc(glythed(_6022,"0"))
- % body: rhs([glythed(skExistsGlythed_9FnSk,"0")])
- % Support: (\+glythed(_6180,"0")==>glythed(skExistsGlythed_9FnSk,"0")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',52)
- % RHS-Post1: glythed(skExistsGlythed_9FnSk,"0")
- % Support: \+glythed(_6022,"0"),nt(glythed(_6540,"0"),call_u_no_bc(glythed(_6022,"0")),rhs([glythed(skExistsGlythed_9FnSk,"0")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"0")
- % cond: call_u_no_bc(glythed(_6022,"0"))
- % action: rhs([glythed(skExistsGlythed_9FnSk,"0")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_9FnSk,"0"),(\+glythed(_6022,"0"),nt(glythed(_6540,"0"),call_u_no_bc(glythed(_6022,"0")),rhs([glythed(skExistsGlythed_9FnSk,"0")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_9FnSk, "0")).
- % Found positive trigger: glythed(skExistsGlythed_9FnSk,"0")
- % body: compound(glythed(skExistsGlythed_9FnSk,"0")),\+is_ftVar(glythed(skExistsGlythed_9FnSk,"0"))*->rhs([{with_current_why(glythed(skExistsGlythed_9FnSk,"0"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_9FnSk,"0"))))}])
- % Found positive trigger: glythed(skExistsGlythed_9FnSk,"0")
- % body: is_kif_clause(glythed(skExistsGlythed_9FnSk,"0"))*->rhs([clif(glythed(skExistsGlythed_9FnSk,"0"))])
- % Found positive trigger: glythed(skExistsGlythed_9FnSk,"0")
- % body: compound(glythed(skExistsGlythed_9FnSk,"0")),\+is_ftVar(glythed(skExistsGlythed_9FnSk,"0"))*->rhs([{with_current_why(glythed(skExistsGlythed_9FnSk,"0"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_9FnSk,"0"))))}])
- % Found negative trigger: glythed(skExistsGlythed_9FnSk,"0")
- % cond: call_u_no_bc(glythed(_23310,"0"))
- % body: rhs([glythed(skExistsGlythed_9FnSk,"0")])
- % Support: spft(glythed(skExistsGlythed_9FnSk,"0"),\+glythed(_23310,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(_23310,"0")),rhs([glythed(skExistsGlythed_9FnSk,"0")])))
- % moving(inherit_above(header_sane, glythed(_27704, _27706))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_9FnSk,"0")
- % support (was): \+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),rhs([glythed(skExistsGlythed_9FnSk,"0")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_9FnSk,"0"),\+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),rhs([glythed(skExistsGlythed_9FnSk,"0")]))))
- % RHS-Post1: glythed(skExistsGlythed_9FnSk,"0")
- % Support: \+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_9FnSk,"0")
- % cond: call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0"))
- % action: skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_9FnSk,"0"),(\+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))))
- % moving(inherit_above(header_sane, glythed(_29070, _29072))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_9FnSk,"0"),\+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))))
- % RHS-Post1: glythed(skExistsGlythed_9FnSk,"0")
- % Support: \+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_9FnSk,"0")
- % cond: call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0"))
- % action: skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_9FnSk,"0"),(\+glythed(skExistsGlythed_9FnSk,"0"),nt(glythed(skExistsGlythed_9FnSk,"0"),call_u_no_bc(glythed(skExistsGlythed_9FnSk,"0")),(skExistsGlythed_9FnSk=skExistsGlythed_9FnSk*->is_unit(skExistsGlythed_9FnSk)*->rhs([glythed(skExistsGlythed_9FnSk,"0")])))))
- % moving(inherit_above(header_sane, glythed(_29260, _29262))).
- % Found positive trigger: pfclog((\+glythed(_5040,"0")==>glythed(skExistsGlythed_9FnSk,"0")))
- % body: compound(pfclog((\+glythed(_5040,"0")==>glythed(skExistsGlythed_9FnSk,"0")))),\+is_ftVar(pfclog((\+glythed(_5040,"0")==>glythed(skExistsGlythed_9FnSk,"0"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"0")==>glythed(skExistsGlythed_9FnSk,"0"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"0")==>glythed(skExistsGlythed_9FnSk,"0"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3802,"0")))
- % body: compound(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3802,"0")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3802,"0"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3802,"0"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_9FnSk,"0"):- \+glythed(_3802,"0"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"0")))
- % body: compound(clif(exists(_2296,glythed(_2296,"0")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"0"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"0"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"0"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"0"))
- % body: compound(exists(_1224,glythed(_1224,"0"))),\+is_ftVar(exists(_1224,glythed(_1224,"0")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"0")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"0")))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:53
- % r_sane:mpred_fwc1(exists(_31346, glythed(_31346, "+"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"+"))
- % body: compound(exists(_1236,glythed(_1236,"+"))),\+is_ftVar(exists(_1236,glythed(_1236,"+")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"+")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"+")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"+"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"+")))*->rhs([clif(exists(_1236,glythed(_1236,"+")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"+")))
- % Support: exists(_1100,glythed(_1100,"+")),pt(exists(_1236,glythed(_1236,"+")),(is_kif_clause(exists(_1236,glythed(_1236,"+")))*->rhs([clif(exists(_1236,glythed(_1236,"+")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "+")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"+")))
- % body: compound(clif(exists(_2296,glythed(_2296,"+")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"+"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"+"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"+"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"+")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"+")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "+")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"+")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"+"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"+"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"+")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"+")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"+")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"+")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"+")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"+")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "+")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "+"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "+"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "+")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_10FnSk, "+")), ~skolem(_2296, skExistsGlythed_10FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "+")), v(nesc(glythed(skExistsGlythed_10FnSk, "+")), ~skolem(_2296, skExistsGlythed_10FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "+"))
- % ; tru(glythed(skExistsGlythed_10FnSk, "+"))
- % ; neg(skolem(_2296, skExistsGlythed_10FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "+"))), n(tru(glythed(skExistsGlythed_10FnSk, "+"))), n(neg(skolem(_2296, skExistsGlythed_10FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_2296,"+"))))
- % Support: clif(exists(_2152,glythed(_2152,"+"))),pt(clif(exists(_2296,glythed(_2296,"+"))),(is_kif_clause(exists(_2296,glythed(_2296,"+")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"+")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_2296,"+"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_2296,"+"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12784, skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk, "+")), proven_neg(glythed(_12784, "+"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15618,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_15618,"+"))))
- % body: compound(boxlog((proven_neg(skolem(_15618,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_15618,"+"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15618,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_15618,"+")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15618,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_15618,"+")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15618,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_15618,"+")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_10FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_10FnSk, "+")),
- % proven_neg(glythed(_4078, "+")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+"))),boxlog_to_pfc,_15538),must_be_unqualified(_15538)*->rhs([pfclog(_15538)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_4078,"+"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_10FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_3894,"+")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+"))),boxlog_to_pfc,(~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_4078,"+"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_10FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_4078,"+"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_10FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_4078,"+"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_10FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_10FnSk, "+"), ~glythed(_16060, "+"), {is_unit(_16060)}==>proven_neg(skolem(_16060, skExistsGlythed_10FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_19306,"+"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_10FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_19306,"+"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_10FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_19306,"+"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_10FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_19306,"+"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_10FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_19306,"+"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_10FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_10FnSk, "+"), ~glythed(_5658, "+"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_10FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5446,"+"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_10FnSk)))),pt(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk)))),rhs([(~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_10FnSk, "+"), ~glythed(_39194, "+"), {is_unit(_39194)}==>proven_neg(skolem(_39194, skExistsGlythed_10FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_10FnSk,"+")
- % body: pt(~glythed(_6914,"+"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_10FnSk))])))
- % Support: (~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_7132,"+"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_10FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',53)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_10FnSk,"+"),~glythed(_5658,"+"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_10FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_10FnSk)):-proven_neg(glythed(skExistsGlythed_10FnSk,"+")),proven_neg(glythed(_4078,"+")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_2296=skExistsGlythed_10FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"+"))),pt(clif(exists(_2296,glythed(_2296,"+"))),(is_kif_clause(exists(_2296,glythed(_2296,"+")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"+")),kif_to_boxlog,(glythed(_2296,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_2296=skExistsGlythed_10FnSk}))},boxlog((glythed(_2296,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_2296=skExistsGlythed_10FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12428, "+"):- \+glythed(skExistsGlythed_10FnSk, "+"), {_12428=skExistsGlythed_10FnSk}))).
- % Found positive trigger: boxlog((glythed(_15194,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_15194=skExistsGlythed_10FnSk}))
- % body: compound(boxlog((glythed(_15194,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_15194=skExistsGlythed_10FnSk}))),\+is_ftVar(boxlog((glythed(_15194,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_15194=skExistsGlythed_10FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15194,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_15194=skExistsGlythed_10FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15194,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_15194=skExistsGlythed_10FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk}))}])
- % =boxlog=
- % glythed(_4094, "+") :-
- % \+ glythed(skExistsGlythed_10FnSk, "+"),
- % { _4094=skExistsGlythed_10FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk})))*->rhs([clif(boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk}))
- % body: delistify_last_arg((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk}),boxlog_to_pfc,_15268),must_be_unqualified(_15268)*->rhs([pfclog(_15268)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk},{is_unit(_4094)}==>glythed(_4094,"+")))
- % Support: boxlog((glythed(_3918,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_3918=skExistsGlythed_10FnSk})),pt(boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk})),(delistify_last_arg((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk},{is_unit(_4094)}==>glythed(_4094,"+"))),must_be_unqualified((\+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk},{is_unit(_4094)}==>glythed(_4094,"+")))*->rhs([pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk},{is_unit(_4094)}==>glythed(_4094,"+")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_10FnSk, "+"), {_15750=skExistsGlythed_10FnSk}, {is_unit(_15750)}==>glythed(_15750, "+")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_18940=skExistsGlythed_10FnSk},{is_unit(_18940)}==>glythed(_18940,"+")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_18940=skExistsGlythed_10FnSk},{is_unit(_18940)}==>glythed(_18940,"+")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_18940=skExistsGlythed_10FnSk},{is_unit(_18940)}==>glythed(_18940,"+"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_18940=skExistsGlythed_10FnSk},{is_unit(_18940)}==>glythed(_18940,"+"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_18940=skExistsGlythed_10FnSk},{is_unit(_18940)}==>glythed(_18940,"+"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_10FnSk, "+"), {_5622=skExistsGlythed_10FnSk}, {is_unit(_5622)}==>glythed(_5622, "+").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+")))
- % body: rhs([(\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+"))])
- % RHS-Post1: \+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+")
- % Support: pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5418=skExistsGlythed_10FnSk},{is_unit(_5418)}==>glythed(_5418,"+"))),pt(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+"))),rhs([(\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_10FnSk, "+"), {_39068=skExistsGlythed_10FnSk}, {is_unit(_39068)}==>glythed(_39068, "+"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_10FnSk,"+")
- % test: call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+"))
- % body: _6838=skExistsGlythed_10FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"+")])
- % Support: (\+glythed(skExistsGlythed_10FnSk,"+"),{_7048=skExistsGlythed_10FnSk},{is_unit(_7048)}==>glythed(_7048,"+")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',53)
- % RHS-Post1: glythed(skExistsGlythed_10FnSk,"+")
- % Support: \+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_10FnSk,"+")
- % cond: call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+"))
- % action: skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_10FnSk,"+"),(\+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_10FnSk, "+")).
- % Found positive trigger: glythed(skExistsGlythed_10FnSk,"+")
- % body: compound(glythed(skExistsGlythed_10FnSk,"+")),\+is_ftVar(glythed(skExistsGlythed_10FnSk,"+"))*->rhs([{with_current_why(glythed(skExistsGlythed_10FnSk,"+"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_10FnSk,"+"))))}])
- % Found positive trigger: glythed(skExistsGlythed_10FnSk,"+")
- % body: is_kif_clause(glythed(skExistsGlythed_10FnSk,"+"))*->rhs([clif(glythed(skExistsGlythed_10FnSk,"+"))])
- % Found positive trigger: glythed(skExistsGlythed_10FnSk,"+")
- % body: compound(glythed(skExistsGlythed_10FnSk,"+")),\+is_ftVar(glythed(skExistsGlythed_10FnSk,"+"))*->rhs([{with_current_why(glythed(skExistsGlythed_10FnSk,"+"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_10FnSk,"+"))))}])
- % Found negative trigger: glythed(skExistsGlythed_10FnSk,"+")
- % cond: call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+"))
- % body: skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])
- % Support: spft(glythed(skExistsGlythed_10FnSk,"+"),\+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")]))))
- % moving(inherit_above(header_sane, glythed(_29272, _29274))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_10FnSk,"+")
- % support (was): \+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_10FnSk,"+"),\+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_10FnSk,"+"),_12690,_12692).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_10FnSk, "+"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_10FnSk,"+"),{_5622=skExistsGlythed_10FnSk},{is_unit(_5622)}==>glythed(_5622,"+"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk}))
- % body: compound(boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"+"):- \+glythed(skExistsGlythed_10FnSk,"+"),{_4094=skExistsGlythed_10FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_2296,"+")))
- % Support: clif(exists(_2152,glythed(_2152,"+"))),pt(clif(exists(_2296,glythed(_2296,"+"))),(is_kif_clause(exists(_2296,glythed(_2296,"+")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"+")),kif_to_boxlog,(glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_2296,"+")))},boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_2296,"+")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_10FnSk, "+"):- \+glythed(_19158, "+")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+")))
- % body: compound(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+")))}])
- % =boxlog=
- % glythed(skExistsGlythed_10FnSk, "+") :-
- % \+ glythed(_3832, "+").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+")))
- % body: delistify_last_arg((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+")),boxlog_to_pfc,_19218),must_be_unqualified(_19218)*->rhs([pfclog(_19218)])
- % RHS-Post1: pfclog((\+glythed(_3832,"+")==>glythed(skExistsGlythed_10FnSk,"+")))
- % Support: boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3680,"+"))),pt(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+"))),(delistify_last_arg((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3832,"+")),boxlog_to_pfc,(\+glythed(_3832,"+")==>glythed(skExistsGlythed_10FnSk,"+"))),must_be_unqualified((\+glythed(_3832,"+")==>glythed(skExistsGlythed_10FnSk,"+")))*->rhs([pfclog((\+glythed(_3832,"+")==>glythed(skExistsGlythed_10FnSk,"+")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13724, "+")==>glythed(skExistsGlythed_10FnSk, "+")))).
- % Found positive trigger: pfclog((\+glythed(_16554,"+")==>glythed(skExistsGlythed_10FnSk,"+")))
- % body: compound(pfclog((\+glythed(_16554,"+")==>glythed(skExistsGlythed_10FnSk,"+")))),\+is_ftVar(pfclog((\+glythed(_16554,"+")==>glythed(skExistsGlythed_10FnSk,"+"))))*->rhs([{with_current_why(pfclog((\+glythed(_16554,"+")==>glythed(skExistsGlythed_10FnSk,"+"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16554,"+")==>glythed(skExistsGlythed_10FnSk,"+"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+")))}])
- % =pfclog=
- % \+glythed(_5070, "+")==>glythed(skExistsGlythed_10FnSk, "+").
- % Found positive trigger: pfclog((\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+"))))*->rhs([clif(pfclog((\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+")))
- % body: rhs([(\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+"))])
- % RHS-Post1: \+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+")
- % Support: pfclog((\+glythed(_4918,"+")==>glythed(skExistsGlythed_10FnSk,"+"))),pt(pfclog((\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+"))),rhs([(\+glythed(_5070,"+")==>glythed(skExistsGlythed_10FnSk,"+"))]))
- % r_sane:mpred_fwc1((\+glythed(_31998, "+")==>glythed(skExistsGlythed_10FnSk, "+"))).
- % Adding negative
- % trigger: glythed(_6022,"+")
- % test: call_u_no_bc(glythed(_6022,"+"))
- % body: rhs([glythed(skExistsGlythed_10FnSk,"+")])
- % Support: (\+glythed(_6180,"+")==>glythed(skExistsGlythed_10FnSk,"+")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',53)
- % RHS-Post1: glythed(skExistsGlythed_10FnSk,"+")
- % Support: \+glythed(_6022,"+"),nt(glythed(_6540,"+"),call_u_no_bc(glythed(_6022,"+")),rhs([glythed(skExistsGlythed_10FnSk,"+")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"+")
- % cond: call_u_no_bc(glythed(_6022,"+"))
- % action: rhs([glythed(skExistsGlythed_10FnSk,"+")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_10FnSk,"+"),(\+glythed(_6022,"+"),nt(glythed(_6540,"+"),call_u_no_bc(glythed(_6022,"+")),rhs([glythed(skExistsGlythed_10FnSk,"+")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_10FnSk, "+")).
- % Found positive trigger: glythed(skExistsGlythed_10FnSk,"+")
- % body: compound(glythed(skExistsGlythed_10FnSk,"+")),\+is_ftVar(glythed(skExistsGlythed_10FnSk,"+"))*->rhs([{with_current_why(glythed(skExistsGlythed_10FnSk,"+"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_10FnSk,"+"))))}])
- % Found positive trigger: glythed(skExistsGlythed_10FnSk,"+")
- % body: is_kif_clause(glythed(skExistsGlythed_10FnSk,"+"))*->rhs([clif(glythed(skExistsGlythed_10FnSk,"+"))])
- % Found positive trigger: glythed(skExistsGlythed_10FnSk,"+")
- % body: compound(glythed(skExistsGlythed_10FnSk,"+")),\+is_ftVar(glythed(skExistsGlythed_10FnSk,"+"))*->rhs([{with_current_why(glythed(skExistsGlythed_10FnSk,"+"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_10FnSk,"+"))))}])
- % Found negative trigger: glythed(skExistsGlythed_10FnSk,"+")
- % cond: call_u_no_bc(glythed(_23316,"+"))
- % body: rhs([glythed(skExistsGlythed_10FnSk,"+")])
- % Support: spft(glythed(skExistsGlythed_10FnSk,"+"),\+glythed(_23316,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(_23316,"+")),rhs([glythed(skExistsGlythed_10FnSk,"+")])))
- % moving(inherit_above(header_sane, glythed(_27712, _27714))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_10FnSk,"+")
- % support (was): \+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),rhs([glythed(skExistsGlythed_10FnSk,"+")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_10FnSk,"+"),\+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),rhs([glythed(skExistsGlythed_10FnSk,"+")]))))
- % RHS-Post1: glythed(skExistsGlythed_10FnSk,"+")
- % Support: \+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_10FnSk,"+")
- % cond: call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+"))
- % action: skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_10FnSk,"+"),(\+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))))
- % moving(inherit_above(header_sane, glythed(_29090, _29092))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_10FnSk,"+"),\+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))))
- % RHS-Post1: glythed(skExistsGlythed_10FnSk,"+")
- % Support: \+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_10FnSk,"+")
- % cond: call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+"))
- % action: skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_10FnSk,"+"),(\+glythed(skExistsGlythed_10FnSk,"+"),nt(glythed(skExistsGlythed_10FnSk,"+"),call_u_no_bc(glythed(skExistsGlythed_10FnSk,"+")),(skExistsGlythed_10FnSk=skExistsGlythed_10FnSk*->is_unit(skExistsGlythed_10FnSk)*->rhs([glythed(skExistsGlythed_10FnSk,"+")])))))
- % moving(inherit_above(header_sane, glythed(_29268, _29270))).
- % Found positive trigger: pfclog((\+glythed(_5040,"+")==>glythed(skExistsGlythed_10FnSk,"+")))
- % body: compound(pfclog((\+glythed(_5040,"+")==>glythed(skExistsGlythed_10FnSk,"+")))),\+is_ftVar(pfclog((\+glythed(_5040,"+")==>glythed(skExistsGlythed_10FnSk,"+"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"+")==>glythed(skExistsGlythed_10FnSk,"+"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"+")==>glythed(skExistsGlythed_10FnSk,"+"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3802,"+")))
- % body: compound(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3802,"+")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3802,"+"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3802,"+"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_10FnSk,"+"):- \+glythed(_3802,"+"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"+")))
- % body: compound(clif(exists(_2296,glythed(_2296,"+")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"+"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"+"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"+"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"+"))
- % body: compound(exists(_1224,glythed(_1224,"+"))),\+is_ftVar(exists(_1224,glythed(_1224,"+")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"+")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"+")))))}])
- % r_sane:mpred_fwc1(exists(_31348, glythed(_31348, "-"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"-"))
- % body: compound(exists(_1236,glythed(_1236,"-"))),\+is_ftVar(exists(_1236,glythed(_1236,"-")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"-")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"-")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"-"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"-")))*->rhs([clif(exists(_1236,glythed(_1236,"-")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"-")))
- % Support: exists(_1100,glythed(_1100,"-")),pt(exists(_1236,glythed(_1236,"-")),(is_kif_clause(exists(_1236,glythed(_1236,"-")))*->rhs([clif(exists(_1236,glythed(_1236,"-")))])))
- % r_sane:mpred_fwc1(clif(exists(_15390, glythed(_15390, "-")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"-")))
- % body: compound(clif(exists(_2296,glythed(_2296,"-")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"-"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"-"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"-"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"-")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"-")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "-")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"-")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"-"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"-"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"-")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"-")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"-")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"-")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"-")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"-")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "-")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "-"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "-"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "-")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_11FnSk, "-")), ~skolem(_2296, skExistsGlythed_11FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "-")), v(nesc(glythed(skExistsGlythed_11FnSk, "-")), ~skolem(_2296, skExistsGlythed_11FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "-"))
- % ; tru(glythed(skExistsGlythed_11FnSk, "-"))
- % ; neg(skolem(_2296, skExistsGlythed_11FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "-"))), n(tru(glythed(skExistsGlythed_11FnSk, "-"))), n(neg(skolem(_2296, skExistsGlythed_11FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_2296,"-"))))
- % Support: clif(exists(_2152,glythed(_2152,"-"))),pt(clif(exists(_2296,glythed(_2296,"-"))),(is_kif_clause(exists(_2296,glythed(_2296,"-")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"-")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_2296,"-"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_2296,"-"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12784, skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk, "-")), proven_neg(glythed(_12784, "-"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15618,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_15618,"-"))))
- % body: compound(boxlog((proven_neg(skolem(_15618,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_15618,"-"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15618,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_15618,"-")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15618,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_15618,"-")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15618,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_15618,"-")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_11FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_11FnSk, "-")),
- % proven_neg(glythed(_4078, "-")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-"))),boxlog_to_pfc,_15538),must_be_unqualified(_15538)*->rhs([pfclog(_15538)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_4078,"-"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_11FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_3894,"-")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-"))),boxlog_to_pfc,(~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_4078,"-"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_11FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_4078,"-"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_11FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_4078,"-"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_11FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_11FnSk, "-"), ~glythed(_16060, "-"), {is_unit(_16060)}==>proven_neg(skolem(_16060, skExistsGlythed_11FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_19306,"-"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_11FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_19306,"-"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_11FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_19306,"-"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_11FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_19306,"-"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_11FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_19306,"-"),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_11FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_11FnSk, "-"), ~glythed(_5658, "-"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_11FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5446,"-"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_11FnSk)))),pt(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk)))),rhs([(~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_11FnSk, "-"), ~glythed(_39194, "-"), {is_unit(_39194)}==>proven_neg(skolem(_39194, skExistsGlythed_11FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_11FnSk,"-")
- % body: pt(~glythed(_6914,"-"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_11FnSk))])))
- % Support: (~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_7132,"-"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_11FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',53)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_11FnSk,"-"),~glythed(_5658,"-"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_11FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_11FnSk)):-proven_neg(glythed(skExistsGlythed_11FnSk,"-")),proven_neg(glythed(_4078,"-")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_2296=skExistsGlythed_11FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"-"))),pt(clif(exists(_2296,glythed(_2296,"-"))),(is_kif_clause(exists(_2296,glythed(_2296,"-")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"-")),kif_to_boxlog,(glythed(_2296,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_2296=skExistsGlythed_11FnSk}))},boxlog((glythed(_2296,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_2296=skExistsGlythed_11FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12428, "-"):- \+glythed(skExistsGlythed_11FnSk, "-"), {_12428=skExistsGlythed_11FnSk}))).
- % Found positive trigger: boxlog((glythed(_15194,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_15194=skExistsGlythed_11FnSk}))
- % body: compound(boxlog((glythed(_15194,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_15194=skExistsGlythed_11FnSk}))),\+is_ftVar(boxlog((glythed(_15194,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_15194=skExistsGlythed_11FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15194,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_15194=skExistsGlythed_11FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15194,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_15194=skExistsGlythed_11FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk}))}])
- % =boxlog=
- % glythed(_4094, "-") :-
- % \+ glythed(skExistsGlythed_11FnSk, "-"),
- % { _4094=skExistsGlythed_11FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk})))*->rhs([clif(boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk}))
- % body: delistify_last_arg((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk}),boxlog_to_pfc,_15268),must_be_unqualified(_15268)*->rhs([pfclog(_15268)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk},{is_unit(_4094)}==>glythed(_4094,"-")))
- % Support: boxlog((glythed(_3918,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_3918=skExistsGlythed_11FnSk})),pt(boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk})),(delistify_last_arg((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk},{is_unit(_4094)}==>glythed(_4094,"-"))),must_be_unqualified((\+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk},{is_unit(_4094)}==>glythed(_4094,"-")))*->rhs([pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk},{is_unit(_4094)}==>glythed(_4094,"-")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_11FnSk, "-"), {_15750=skExistsGlythed_11FnSk}, {is_unit(_15750)}==>glythed(_15750, "-")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_18940=skExistsGlythed_11FnSk},{is_unit(_18940)}==>glythed(_18940,"-")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_18940=skExistsGlythed_11FnSk},{is_unit(_18940)}==>glythed(_18940,"-")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_18940=skExistsGlythed_11FnSk},{is_unit(_18940)}==>glythed(_18940,"-"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_18940=skExistsGlythed_11FnSk},{is_unit(_18940)}==>glythed(_18940,"-"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_18940=skExistsGlythed_11FnSk},{is_unit(_18940)}==>glythed(_18940,"-"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_11FnSk, "-"), {_5622=skExistsGlythed_11FnSk}, {is_unit(_5622)}==>glythed(_5622, "-").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-")))
- % body: rhs([(\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-"))])
- % RHS-Post1: \+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-")
- % Support: pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5418=skExistsGlythed_11FnSk},{is_unit(_5418)}==>glythed(_5418,"-"))),pt(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-"))),rhs([(\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_11FnSk, "-"), {_39062=skExistsGlythed_11FnSk}, {is_unit(_39062)}==>glythed(_39062, "-"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_11FnSk,"-")
- % test: call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-"))
- % body: _6838=skExistsGlythed_11FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"-")])
- % Support: (\+glythed(skExistsGlythed_11FnSk,"-"),{_7048=skExistsGlythed_11FnSk},{is_unit(_7048)}==>glythed(_7048,"-")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',53)
- % RHS-Post1: glythed(skExistsGlythed_11FnSk,"-")
- % Support: \+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_11FnSk,"-")
- % cond: call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-"))
- % action: skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_11FnSk,"-"),(\+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_11FnSk, "-")).
- % Found positive trigger: glythed(skExistsGlythed_11FnSk,"-")
- % body: compound(glythed(skExistsGlythed_11FnSk,"-")),\+is_ftVar(glythed(skExistsGlythed_11FnSk,"-"))*->rhs([{with_current_why(glythed(skExistsGlythed_11FnSk,"-"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_11FnSk,"-"))))}])
- % Found positive trigger: glythed(skExistsGlythed_11FnSk,"-")
- % body: is_kif_clause(glythed(skExistsGlythed_11FnSk,"-"))*->rhs([clif(glythed(skExistsGlythed_11FnSk,"-"))])
- % Found positive trigger: glythed(skExistsGlythed_11FnSk,"-")
- % body: compound(glythed(skExistsGlythed_11FnSk,"-")),\+is_ftVar(glythed(skExistsGlythed_11FnSk,"-"))*->rhs([{with_current_why(glythed(skExistsGlythed_11FnSk,"-"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_11FnSk,"-"))))}])
- % Found negative trigger: glythed(skExistsGlythed_11FnSk,"-")
- % cond: call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-"))
- % body: skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])
- % Support: spft(glythed(skExistsGlythed_11FnSk,"-"),\+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")]))))
- % moving(inherit_above(header_sane, glythed(_29272, _29274))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_11FnSk,"-")
- % support (was): \+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_11FnSk,"-"),\+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_11FnSk,"-"),_12690,_12692).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_11FnSk, "-"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_11FnSk,"-"),{_5622=skExistsGlythed_11FnSk},{is_unit(_5622)}==>glythed(_5622,"-"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk}))
- % body: compound(boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"-"):- \+glythed(skExistsGlythed_11FnSk,"-"),{_4094=skExistsGlythed_11FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_2296,"-")))
- % Support: clif(exists(_2152,glythed(_2152,"-"))),pt(clif(exists(_2296,glythed(_2296,"-"))),(is_kif_clause(exists(_2296,glythed(_2296,"-")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"-")),kif_to_boxlog,(glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_2296,"-")))},boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_2296,"-")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_11FnSk, "-"):- \+glythed(_19152, "-")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-")))
- % body: compound(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-")))}])
- % =boxlog=
- % glythed(skExistsGlythed_11FnSk, "-") :-
- % \+ glythed(_3832, "-").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-")))
- % body: delistify_last_arg((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-")),boxlog_to_pfc,_19218),must_be_unqualified(_19218)*->rhs([pfclog(_19218)])
- % RHS-Post1: pfclog((\+glythed(_3832,"-")==>glythed(skExistsGlythed_11FnSk,"-")))
- % Support: boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3680,"-"))),pt(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-"))),(delistify_last_arg((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3832,"-")),boxlog_to_pfc,(\+glythed(_3832,"-")==>glythed(skExistsGlythed_11FnSk,"-"))),must_be_unqualified((\+glythed(_3832,"-")==>glythed(skExistsGlythed_11FnSk,"-")))*->rhs([pfclog((\+glythed(_3832,"-")==>glythed(skExistsGlythed_11FnSk,"-")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13724, "-")==>glythed(skExistsGlythed_11FnSk, "-")))).
- % Found positive trigger: pfclog((\+glythed(_16554,"-")==>glythed(skExistsGlythed_11FnSk,"-")))
- % body: compound(pfclog((\+glythed(_16554,"-")==>glythed(skExistsGlythed_11FnSk,"-")))),\+is_ftVar(pfclog((\+glythed(_16554,"-")==>glythed(skExistsGlythed_11FnSk,"-"))))*->rhs([{with_current_why(pfclog((\+glythed(_16554,"-")==>glythed(skExistsGlythed_11FnSk,"-"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16554,"-")==>glythed(skExistsGlythed_11FnSk,"-"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-")))}])
- % =pfclog=
- % \+glythed(_5070, "-")==>glythed(skExistsGlythed_11FnSk, "-").
- % Found positive trigger: pfclog((\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-"))))*->rhs([clif(pfclog((\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-")))
- % body: rhs([(\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-"))])
- % RHS-Post1: \+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-")
- % Support: pfclog((\+glythed(_4918,"-")==>glythed(skExistsGlythed_11FnSk,"-"))),pt(pfclog((\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-"))),rhs([(\+glythed(_5070,"-")==>glythed(skExistsGlythed_11FnSk,"-"))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "-")==>glythed(skExistsGlythed_11FnSk, "-"))).
- % Adding negative
- % trigger: glythed(_6022,"-")
- % test: call_u_no_bc(glythed(_6022,"-"))
- % body: rhs([glythed(skExistsGlythed_11FnSk,"-")])
- % Support: (\+glythed(_6180,"-")==>glythed(skExistsGlythed_11FnSk,"-")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',53)
- % RHS-Post1: glythed(skExistsGlythed_11FnSk,"-")
- % Support: \+glythed(_6022,"-"),nt(glythed(_6540,"-"),call_u_no_bc(glythed(_6022,"-")),rhs([glythed(skExistsGlythed_11FnSk,"-")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"-")
- % cond: call_u_no_bc(glythed(_6022,"-"))
- % action: rhs([glythed(skExistsGlythed_11FnSk,"-")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_11FnSk,"-"),(\+glythed(_6022,"-"),nt(glythed(_6540,"-"),call_u_no_bc(glythed(_6022,"-")),rhs([glythed(skExistsGlythed_11FnSk,"-")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_11FnSk, "-")).
- % Found positive trigger: glythed(skExistsGlythed_11FnSk,"-")
- % body: compound(glythed(skExistsGlythed_11FnSk,"-")),\+is_ftVar(glythed(skExistsGlythed_11FnSk,"-"))*->rhs([{with_current_why(glythed(skExistsGlythed_11FnSk,"-"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_11FnSk,"-"))))}])
- % Found positive trigger: glythed(skExistsGlythed_11FnSk,"-")
- % body: is_kif_clause(glythed(skExistsGlythed_11FnSk,"-"))*->rhs([clif(glythed(skExistsGlythed_11FnSk,"-"))])
- % Found positive trigger: glythed(skExistsGlythed_11FnSk,"-")
- % body: compound(glythed(skExistsGlythed_11FnSk,"-")),\+is_ftVar(glythed(skExistsGlythed_11FnSk,"-"))*->rhs([{with_current_why(glythed(skExistsGlythed_11FnSk,"-"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_11FnSk,"-"))))}])
- % Found negative trigger: glythed(skExistsGlythed_11FnSk,"-")
- % cond: call_u_no_bc(glythed(_23316,"-"))
- % body: rhs([glythed(skExistsGlythed_11FnSk,"-")])
- % Support: spft(glythed(skExistsGlythed_11FnSk,"-"),\+glythed(_23316,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(_23316,"-")),rhs([glythed(skExistsGlythed_11FnSk,"-")])))
- % moving(inherit_above(header_sane, glythed(_27712, _27714))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_11FnSk,"-")
- % support (was): \+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),rhs([glythed(skExistsGlythed_11FnSk,"-")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_11FnSk,"-"),\+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),rhs([glythed(skExistsGlythed_11FnSk,"-")]))))
- % RHS-Post1: glythed(skExistsGlythed_11FnSk,"-")
- % Support: \+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_11FnSk,"-")
- % cond: call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-"))
- % action: skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_11FnSk,"-"),(\+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))))
- % moving(inherit_above(header_sane, glythed(_29090, _29092))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_11FnSk,"-"),\+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))))
- % RHS-Post1: glythed(skExistsGlythed_11FnSk,"-")
- % Support: \+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_11FnSk,"-")
- % cond: call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-"))
- % action: skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_11FnSk,"-"),(\+glythed(skExistsGlythed_11FnSk,"-"),nt(glythed(skExistsGlythed_11FnSk,"-"),call_u_no_bc(glythed(skExistsGlythed_11FnSk,"-")),(skExistsGlythed_11FnSk=skExistsGlythed_11FnSk*->is_unit(skExistsGlythed_11FnSk)*->rhs([glythed(skExistsGlythed_11FnSk,"-")])))))
- % moving(inherit_above(header_sane, glythed(_29268, _29270))).
- % Found positive trigger: pfclog((\+glythed(_5040,"-")==>glythed(skExistsGlythed_11FnSk,"-")))
- % body: compound(pfclog((\+glythed(_5040,"-")==>glythed(skExistsGlythed_11FnSk,"-")))),\+is_ftVar(pfclog((\+glythed(_5040,"-")==>glythed(skExistsGlythed_11FnSk,"-"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"-")==>glythed(skExistsGlythed_11FnSk,"-"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"-")==>glythed(skExistsGlythed_11FnSk,"-"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3802,"-")))
- % body: compound(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3802,"-")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3802,"-"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3802,"-"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_11FnSk,"-"):- \+glythed(_3802,"-"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"-")))
- % body: compound(clif(exists(_2296,glythed(_2296,"-")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"-"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"-"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"-"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"-"))
- % body: compound(exists(_1224,glythed(_1224,"-"))),\+is_ftVar(exists(_1224,glythed(_1224,"-")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"-")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"-")))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:54
- % r_sane:mpred_fwc1(exists(_31348, glythed(_31348, "="))).
- % Found positive trigger: exists(_1236,glythed(_1236,"="))
- % body: compound(exists(_1236,glythed(_1236,"="))),\+is_ftVar(exists(_1236,glythed(_1236,"=")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"=")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"=")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"="))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"=")))*->rhs([clif(exists(_1236,glythed(_1236,"=")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"=")))
- % Support: exists(_1100,glythed(_1100,"=")),pt(exists(_1236,glythed(_1236,"=")),(is_kif_clause(exists(_1236,glythed(_1236,"=")))*->rhs([clif(exists(_1236,glythed(_1236,"=")))])))
- % r_sane:mpred_fwc1(clif(exists(_15384, glythed(_15384, "=")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"=")))
- % body: compound(clif(exists(_2296,glythed(_2296,"=")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"="))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"="))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"="))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"=")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"=")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "=")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"=")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"="))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"="))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"=")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"=")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"=")),kif_to_boxlog,_15428)},boxlog(_15428)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"=")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"=")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"=")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "=")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "="))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "="))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "=")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_12FnSk, "=")), ~skolem(_2296, skExistsGlythed_12FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "=")), v(nesc(glythed(skExistsGlythed_12FnSk, "=")), ~skolem(_2296, skExistsGlythed_12FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "="))
- % ; tru(glythed(skExistsGlythed_12FnSk, "="))
- % ; neg(skolem(_2296, skExistsGlythed_12FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "="))), n(tru(glythed(skExistsGlythed_12FnSk, "="))), n(neg(skolem(_2296, skExistsGlythed_12FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_2296,"="))))
- % Support: clif(exists(_2152,glythed(_2152,"="))),pt(clif(exists(_2296,glythed(_2296,"="))),(is_kif_clause(exists(_2296,glythed(_2296,"=")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"=")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_2296,"="))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_2296,"="))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12784, skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk, "=")), proven_neg(glythed(_12784, "="))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15618,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_15618,"="))))
- % body: compound(boxlog((proven_neg(skolem(_15618,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_15618,"="))))),\+is_ftVar(boxlog((proven_neg(skolem(_15618,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_15618,"=")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15618,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_15618,"=")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15618,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_15618,"=")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"="))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"="))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_12FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_12FnSk, "=")),
- % proven_neg(glythed(_4078, "=")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"="))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"=")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"=")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"="))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"="))),boxlog_to_pfc,_15538),must_be_unqualified(_15538)*->rhs([pfclog(_15538)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_4078,"="),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_12FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_3894,"=")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"=")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"="))),boxlog_to_pfc,(~glythed(skExistsGlythed_12FnSk,"="),~glythed(_4078,"="),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_12FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_4078,"="),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_12FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_4078,"="),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_12FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_12FnSk, "="), ~glythed(_16060, "="), {is_unit(_16060)}==>proven_neg(skolem(_16060, skExistsGlythed_12FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_19306,"="),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_12FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_19306,"="),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_12FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_19306,"="),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_12FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_19306,"="),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_12FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_19306,"="),{is_unit(_19306)}==>proven_neg(skolem(_19306,skExistsGlythed_12FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_12FnSk, "="), ~glythed(_5658, "="), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_12FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5446,"="),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_12FnSk)))),pt(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk)))),rhs([(~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_12FnSk, "="), ~glythed(_39194, "="), {is_unit(_39194)}==>proven_neg(skolem(_39194, skExistsGlythed_12FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_12FnSk,"=")
- % body: pt(~glythed(_6914,"="),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_12FnSk))])))
- % Support: (~glythed(skExistsGlythed_12FnSk,"="),~glythed(_7132,"="),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_12FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',54)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_12FnSk,"="),~glythed(_5658,"="),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_12FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"="))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"="))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"=")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"=")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_12FnSk)):-proven_neg(glythed(skExistsGlythed_12FnSk,"=")),proven_neg(glythed(_4078,"=")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_2296=skExistsGlythed_12FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"="))),pt(clif(exists(_2296,glythed(_2296,"="))),(is_kif_clause(exists(_2296,glythed(_2296,"=")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"=")),kif_to_boxlog,(glythed(_2296,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_2296=skExistsGlythed_12FnSk}))},boxlog((glythed(_2296,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_2296=skExistsGlythed_12FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12428, "="):- \+glythed(skExistsGlythed_12FnSk, "="), {_12428=skExistsGlythed_12FnSk}))).
- % Found positive trigger: boxlog((glythed(_15194,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_15194=skExistsGlythed_12FnSk}))
- % body: compound(boxlog((glythed(_15194,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_15194=skExistsGlythed_12FnSk}))),\+is_ftVar(boxlog((glythed(_15194,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_15194=skExistsGlythed_12FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15194,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_15194=skExistsGlythed_12FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15194,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_15194=skExistsGlythed_12FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk}))}])
- % =boxlog=
- % glythed(_4094, "=") :-
- % \+ glythed(skExistsGlythed_12FnSk, "="),
- % { _4094=skExistsGlythed_12FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk})))*->rhs([clif(boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk}))
- % body: delistify_last_arg((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk}),boxlog_to_pfc,_15268),must_be_unqualified(_15268)*->rhs([pfclog(_15268)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk},{is_unit(_4094)}==>glythed(_4094,"=")))
- % Support: boxlog((glythed(_3918,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_3918=skExistsGlythed_12FnSk})),pt(boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk})),(delistify_last_arg((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk},{is_unit(_4094)}==>glythed(_4094,"="))),must_be_unqualified((\+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk},{is_unit(_4094)}==>glythed(_4094,"=")))*->rhs([pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk},{is_unit(_4094)}==>glythed(_4094,"=")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_12FnSk, "="), {_15744=skExistsGlythed_12FnSk}, {is_unit(_15744)}==>glythed(_15744, "=")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_18934=skExistsGlythed_12FnSk},{is_unit(_18934)}==>glythed(_18934,"=")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_18934=skExistsGlythed_12FnSk},{is_unit(_18934)}==>glythed(_18934,"=")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_18934=skExistsGlythed_12FnSk},{is_unit(_18934)}==>glythed(_18934,"="))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_18934=skExistsGlythed_12FnSk},{is_unit(_18934)}==>glythed(_18934,"="))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_18934=skExistsGlythed_12FnSk},{is_unit(_18934)}==>glythed(_18934,"="))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"=")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"=")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_12FnSk, "="), {_5622=skExistsGlythed_12FnSk}, {is_unit(_5622)}==>glythed(_5622, "=").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"=")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"="))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"="))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"=")))
- % body: rhs([(\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"="))])
- % RHS-Post1: \+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"=")
- % Support: pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5418=skExistsGlythed_12FnSk},{is_unit(_5418)}==>glythed(_5418,"="))),pt(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"="))),rhs([(\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"="))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_12FnSk, "="), {_39068=skExistsGlythed_12FnSk}, {is_unit(_39068)}==>glythed(_39068, "="))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_12FnSk,"=")
- % test: call_u_no_bc(glythed(skExistsGlythed_12FnSk,"="))
- % body: _6838=skExistsGlythed_12FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"=")])
- % Support: (\+glythed(skExistsGlythed_12FnSk,"="),{_7048=skExistsGlythed_12FnSk},{is_unit(_7048)}==>glythed(_7048,"=")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',54)
- % RHS-Post1: glythed(skExistsGlythed_12FnSk,"=")
- % Support: \+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_12FnSk,"=")
- % cond: call_u_no_bc(glythed(skExistsGlythed_12FnSk,"="))
- % action: skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_12FnSk,"="),(\+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_12FnSk, "=")).
- % Found positive trigger: glythed(skExistsGlythed_12FnSk,"=")
- % body: compound(glythed(skExistsGlythed_12FnSk,"=")),\+is_ftVar(glythed(skExistsGlythed_12FnSk,"="))*->rhs([{with_current_why(glythed(skExistsGlythed_12FnSk,"="),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_12FnSk,"="))))}])
- % Found positive trigger: glythed(skExistsGlythed_12FnSk,"=")
- % body: is_kif_clause(glythed(skExistsGlythed_12FnSk,"="))*->rhs([clif(glythed(skExistsGlythed_12FnSk,"="))])
- % Found positive trigger: glythed(skExistsGlythed_12FnSk,"=")
- % body: compound(glythed(skExistsGlythed_12FnSk,"=")),\+is_ftVar(glythed(skExistsGlythed_12FnSk,"="))*->rhs([{with_current_why(glythed(skExistsGlythed_12FnSk,"="),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_12FnSk,"="))))}])
- % Found negative trigger: glythed(skExistsGlythed_12FnSk,"=")
- % cond: call_u_no_bc(glythed(skExistsGlythed_12FnSk,"="))
- % body: skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])
- % Support: spft(glythed(skExistsGlythed_12FnSk,"="),\+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")]))))
- % moving(inherit_above(header_sane, glythed(_29272, _29274))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_12FnSk,"=")
- % support (was): \+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_12FnSk,"="),\+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_12FnSk,"="),_12690,_12692).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_12FnSk, "="))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"=")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"=")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"="))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"="))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_12FnSk,"="),{_5622=skExistsGlythed_12FnSk},{is_unit(_5622)}==>glythed(_5622,"="))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk}))
- % body: compound(boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"="):- \+glythed(skExistsGlythed_12FnSk,"="),{_4094=skExistsGlythed_12FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_2296,"=")))
- % Support: clif(exists(_2152,glythed(_2152,"="))),pt(clif(exists(_2296,glythed(_2296,"="))),(is_kif_clause(exists(_2296,glythed(_2296,"=")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"=")),kif_to_boxlog,(glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_2296,"=")))},boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_2296,"=")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_12FnSk, "="):- \+glythed(_19158, "=")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"=")))
- % body: compound(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"=")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"="))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"="))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"="))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"=")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"=")))}])
- % =boxlog=
- % glythed(skExistsGlythed_12FnSk, "=") :-
- % \+ glythed(_3832, "=").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"=")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"="))))*->rhs([clif(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"="))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"=")))
- % body: delistify_last_arg((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"=")),boxlog_to_pfc,_19218),must_be_unqualified(_19218)*->rhs([pfclog(_19218)])
- % RHS-Post1: pfclog((\+glythed(_3832,"=")==>glythed(skExistsGlythed_12FnSk,"=")))
- % Support: boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3680,"="))),pt(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"="))),(delistify_last_arg((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3832,"=")),boxlog_to_pfc,(\+glythed(_3832,"=")==>glythed(skExistsGlythed_12FnSk,"="))),must_be_unqualified((\+glythed(_3832,"=")==>glythed(skExistsGlythed_12FnSk,"=")))*->rhs([pfclog((\+glythed(_3832,"=")==>glythed(skExistsGlythed_12FnSk,"=")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13718, "=")==>glythed(skExistsGlythed_12FnSk, "=")))).
- % Found positive trigger: pfclog((\+glythed(_16548,"=")==>glythed(skExistsGlythed_12FnSk,"=")))
- % body: compound(pfclog((\+glythed(_16548,"=")==>glythed(skExistsGlythed_12FnSk,"=")))),\+is_ftVar(pfclog((\+glythed(_16548,"=")==>glythed(skExistsGlythed_12FnSk,"="))))*->rhs([{with_current_why(pfclog((\+glythed(_16548,"=")==>glythed(skExistsGlythed_12FnSk,"="))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16548,"=")==>glythed(skExistsGlythed_12FnSk,"="))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"=")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"=")))}])
- % =pfclog=
- % \+glythed(_5070, "=")==>glythed(skExistsGlythed_12FnSk, "=").
- % Found positive trigger: pfclog((\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"=")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"="))))*->rhs([clif(pfclog((\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"="))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"=")))
- % body: rhs([(\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"="))])
- % RHS-Post1: \+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"=")
- % Support: pfclog((\+glythed(_4918,"=")==>glythed(skExistsGlythed_12FnSk,"="))),pt(pfclog((\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"="))),rhs([(\+glythed(_5070,"=")==>glythed(skExistsGlythed_12FnSk,"="))]))
- % r_sane:mpred_fwc1((\+glythed(_31992, "=")==>glythed(skExistsGlythed_12FnSk, "="))).
- % Adding negative
- % trigger: glythed(_6022,"=")
- % test: call_u_no_bc(glythed(_6022,"="))
- % body: rhs([glythed(skExistsGlythed_12FnSk,"=")])
- % Support: (\+glythed(_6180,"=")==>glythed(skExistsGlythed_12FnSk,"=")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',54)
- % RHS-Post1: glythed(skExistsGlythed_12FnSk,"=")
- % Support: \+glythed(_6022,"="),nt(glythed(_6540,"="),call_u_no_bc(glythed(_6022,"=")),rhs([glythed(skExistsGlythed_12FnSk,"=")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"=")
- % cond: call_u_no_bc(glythed(_6022,"="))
- % action: rhs([glythed(skExistsGlythed_12FnSk,"=")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_12FnSk,"="),(\+glythed(_6022,"="),nt(glythed(_6540,"="),call_u_no_bc(glythed(_6022,"=")),rhs([glythed(skExistsGlythed_12FnSk,"=")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_12FnSk, "=")).
- % Found positive trigger: glythed(skExistsGlythed_12FnSk,"=")
- % body: compound(glythed(skExistsGlythed_12FnSk,"=")),\+is_ftVar(glythed(skExistsGlythed_12FnSk,"="))*->rhs([{with_current_why(glythed(skExistsGlythed_12FnSk,"="),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_12FnSk,"="))))}])
- % Found positive trigger: glythed(skExistsGlythed_12FnSk,"=")
- % body: is_kif_clause(glythed(skExistsGlythed_12FnSk,"="))*->rhs([clif(glythed(skExistsGlythed_12FnSk,"="))])
- % Found positive trigger: glythed(skExistsGlythed_12FnSk,"=")
- % body: compound(glythed(skExistsGlythed_12FnSk,"=")),\+is_ftVar(glythed(skExistsGlythed_12FnSk,"="))*->rhs([{with_current_why(glythed(skExistsGlythed_12FnSk,"="),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_12FnSk,"="))))}])
- % Found negative trigger: glythed(skExistsGlythed_12FnSk,"=")
- % cond: call_u_no_bc(glythed(_23316,"="))
- % body: rhs([glythed(skExistsGlythed_12FnSk,"=")])
- % Support: spft(glythed(skExistsGlythed_12FnSk,"="),\+glythed(_23316,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(_23316,"=")),rhs([glythed(skExistsGlythed_12FnSk,"=")])))
- % moving(inherit_above(header_sane, glythed(_27712, _27714))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_12FnSk,"=")
- % support (was): \+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),rhs([glythed(skExistsGlythed_12FnSk,"=")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_12FnSk,"="),\+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),rhs([glythed(skExistsGlythed_12FnSk,"=")]))))
- % RHS-Post1: glythed(skExistsGlythed_12FnSk,"=")
- % Support: \+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_12FnSk,"=")
- % cond: call_u_no_bc(glythed(skExistsGlythed_12FnSk,"="))
- % action: skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_12FnSk,"="),(\+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))))
- % moving(inherit_above(header_sane, glythed(_29084, _29086))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_12FnSk,"="),\+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))))
- % RHS-Post1: glythed(skExistsGlythed_12FnSk,"=")
- % Support: \+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_12FnSk,"=")
- % cond: call_u_no_bc(glythed(skExistsGlythed_12FnSk,"="))
- % action: skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_12FnSk,"="),(\+glythed(skExistsGlythed_12FnSk,"="),nt(glythed(skExistsGlythed_12FnSk,"="),call_u_no_bc(glythed(skExistsGlythed_12FnSk,"=")),(skExistsGlythed_12FnSk=skExistsGlythed_12FnSk*->is_unit(skExistsGlythed_12FnSk)*->rhs([glythed(skExistsGlythed_12FnSk,"=")])))))
- % moving(inherit_above(header_sane, glythed(_29268, _29270))).
- % Found positive trigger: pfclog((\+glythed(_5040,"=")==>glythed(skExistsGlythed_12FnSk,"=")))
- % body: compound(pfclog((\+glythed(_5040,"=")==>glythed(skExistsGlythed_12FnSk,"=")))),\+is_ftVar(pfclog((\+glythed(_5040,"=")==>glythed(skExistsGlythed_12FnSk,"="))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"=")==>glythed(skExistsGlythed_12FnSk,"="))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"=")==>glythed(skExistsGlythed_12FnSk,"="))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3802,"=")))
- % body: compound(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3802,"=")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3802,"="))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3802,"="))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_12FnSk,"="):- \+glythed(_3802,"="))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"=")))
- % body: compound(clif(exists(_2296,glythed(_2296,"=")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"="))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"="))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"="))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"="))
- % body: compound(exists(_1224,glythed(_1224,"="))),\+is_ftVar(exists(_1224,glythed(_1224,"=")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"=")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"=")))))}])
- % r_sane:mpred_fwc1(exists(_31354, glythed(_31354, "CLR"))).
- % Found positive trigger: exists(_1236,glythed(_1236,"CLR"))
- % body: compound(exists(_1236,glythed(_1236,"CLR"))),\+is_ftVar(exists(_1236,glythed(_1236,"CLR")))*->rhs([{with_current_why(exists(_1236,glythed(_1236,"CLR")),ignore(\+addAdmittedArguments(exists(_1236,glythed(_1236,"CLR")))))}])
- % Found positive trigger: exists(_1236,glythed(_1236,"CLR"))
- % body: is_kif_clause(exists(_1236,glythed(_1236,"CLR")))*->rhs([clif(exists(_1236,glythed(_1236,"CLR")))])
- % RHS-Post1: clif(exists(_1236,glythed(_1236,"CLR")))
- % Support: exists(_1100,glythed(_1100,"CLR")),pt(exists(_1236,glythed(_1236,"CLR")),(is_kif_clause(exists(_1236,glythed(_1236,"CLR")))*->rhs([clif(exists(_1236,glythed(_1236,"CLR")))])))
- % r_sane:mpred_fwc1(clif(exists(_15394, glythed(_15394, "CLR")))).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"CLR")))
- % body: compound(clif(exists(_2296,glythed(_2296,"CLR")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"CLR"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"CLR"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"CLR"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"CLR")))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2296,glythed(_2296,"CLR")))}])
- % =clif=
- % exists(_2296, glythed(_2296, "CLR")).
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"CLR")))
- % body: is_kif_clause(clif(exists(_2296,glythed(_2296,"CLR"))))*->rhs([clif(clif(exists(_2296,glythed(_2296,"CLR"))))])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"CLR")))
- % body: \+is_kif_clause(exists(_2296,glythed(_2296,"CLR")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"CLR")),kif_to_boxlog,_15432)},boxlog(_15432)])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"CLR")))
- % body: is_kif_clause(exists(_2296,glythed(_2296,"CLR")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"CLR")),kif_to_boxlog,_2498)},boxlog(_2498)])
- % kif :-
- % exists(_2296, glythed(_2296, "CLR")).
- % qualify_nesc :-
- % exists(_2296, nesc(glythed(_2296, "CLR"))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2296, nesc(b_d(KB, nesc, poss), glythed(_2296, "CLR"))), v(nesc(b_d(KB, nesc, poss), glythed(_2296, "CLR")), v(nesc(b_d(KB, nesc, poss), glythed(skExistsGlythed_13FnSk, "CLR")), ~skolem(_2296, skExistsGlythed_13FnSk)))))).
- % nnf :-
- % v(nesc(glythed(_2296, "CLR")), v(nesc(glythed(skExistsGlythed_13FnSk, "CLR")), ~skolem(_2296, skExistsGlythed_13FnSk))).
- % th_nnf_in :-
- % ( tru(glythed(_2296, "CLR"))
- % ; tru(glythed(skExistsGlythed_13FnSk, "CLR"))
- % ; neg(skolem(_2296, skExistsGlythed_13FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(glythed(_2296, "CLR"))), n(tru(glythed(skExistsGlythed_13FnSk, "CLR"))), n(neg(skolem(_2296, skExistsGlythed_13FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2296,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_2296,"CLR"))))
- % Support: clif(exists(_2152,glythed(_2152,"CLR"))),pt(clif(exists(_2296,glythed(_2296,"CLR"))),(is_kif_clause(exists(_2296,glythed(_2296,"CLR")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"CLR")),kif_to_boxlog,(proven_neg(skolem(_2296,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_2296,"CLR"))))},boxlog((proven_neg(skolem(_2296,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_2296,"CLR"))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12790, skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk, "CLR")), proven_neg(glythed(_12790, "CLR"))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15626,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_15626,"CLR"))))
- % body: compound(boxlog((proven_neg(skolem(_15626,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_15626,"CLR"))))),\+is_ftVar(boxlog((proven_neg(skolem(_15626,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_15626,"CLR")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15626,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_15626,"CLR")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15626,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_15626,"CLR")))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR"))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR"))))}])
- % =boxlog=
- % proven_neg(skolem(_4078, skExistsGlythed_13FnSk)) :-
- % proven_neg(glythed(skExistsGlythed_13FnSk, "CLR")),
- % proven_neg(glythed(_4078, "CLR")).
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR"))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR")))))*->rhs([clif(boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR")))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR"))))
- % body: delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR"))),boxlog_to_pfc,_15546),must_be_unqualified(_15546)*->rhs([pfclog(_15546)])
- % RHS-Post1: pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_4078,"CLR"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_13FnSk))))
- % Support: boxlog((proven_neg(skolem(_3894,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_3894,"CLR")))),pt(boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR")))),(delistify_last_arg((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR"))),boxlog_to_pfc,(~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_4078,"CLR"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_13FnSk)))),must_be_unqualified((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_4078,"CLR"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_13FnSk))))*->rhs([pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_4078,"CLR"),{is_unit(_4078)}==>proven_neg(skolem(_4078,skExistsGlythed_13FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~glythed(skExistsGlythed_13FnSk, "CLR"), ~glythed(_16068, "CLR"), {is_unit(_16068)}==>proven_neg(skolem(_16068, skExistsGlythed_13FnSk))))).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_19318,"CLR"),{is_unit(_19318)}==>proven_neg(skolem(_19318,skExistsGlythed_13FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_19318,"CLR"),{is_unit(_19318)}==>proven_neg(skolem(_19318,skExistsGlythed_13FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_19318,"CLR"),{is_unit(_19318)}==>proven_neg(skolem(_19318,skExistsGlythed_13FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_19318,"CLR"),{is_unit(_19318)}==>proven_neg(skolem(_19318,skExistsGlythed_13FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_19318,"CLR"),{is_unit(_19318)}==>proven_neg(skolem(_19318,skExistsGlythed_13FnSk)))))))}])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk))))}])
- % =pfclog=
- % ~glythed(skExistsGlythed_13FnSk, "CLR"), ~glythed(_5658, "CLR"), {is_unit(_5658)}==>proven_neg(skolem(_5658, skExistsGlythed_13FnSk)).
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk))))
- % body: is_kif_clause(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk)))))*->rhs([clif(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk)))))])
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk))))
- % body: rhs([(~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk)))])
- % RHS-Post1: ~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk))
- % Support: pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5446,"CLR"),{is_unit(_5446)}==>proven_neg(skolem(_5446,skExistsGlythed_13FnSk)))),pt(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk)))),rhs([(~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk)))]))
- % r_sane:mpred_fwc1((~glythed(skExistsGlythed_13FnSk, "CLR"), ~glythed(_39224, "CLR"), {is_unit(_39224)}==>proven_neg(skolem(_39224, skExistsGlythed_13FnSk)))).
- % Adding positive
- % trigger: ~glythed(skExistsGlythed_13FnSk,"CLR")
- % body: pt(~glythed(_6914,"CLR"),(is_unit(_6914)*->rhs([proven_neg(skolem(_6914,skExistsGlythed_13FnSk))])))
- % Support: (~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_7132,"CLR"),{is_unit(_7132)}==>proven_neg(skolem(_7132,skExistsGlythed_13FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',54)
- % Found positive trigger: pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk))))
- % body: compound(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk))))),\+is_ftVar(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk)))))*->rhs([{with_current_why(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk)))),ignore(\+addAdmittedArguments(pfclog((~glythed(skExistsGlythed_13FnSk,"CLR"),~glythed(_5658,"CLR"),{is_unit(_5658)}==>proven_neg(skolem(_5658,skExistsGlythed_13FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR"))))
- % body: compound(boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR"))))),\+is_ftVar(boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR")))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR")))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4078,skExistsGlythed_13FnSk)):-proven_neg(glythed(skExistsGlythed_13FnSk,"CLR")),proven_neg(glythed(_4078,"CLR")))))))}])
- % RHS-Post1: boxlog((glythed(_2296,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_2296=skExistsGlythed_13FnSk}))
- % Support: clif(exists(_2152,glythed(_2152,"CLR"))),pt(clif(exists(_2296,glythed(_2296,"CLR"))),(is_kif_clause(exists(_2296,glythed(_2296,"CLR")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"CLR")),kif_to_boxlog,(glythed(_2296,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_2296=skExistsGlythed_13FnSk}))},boxlog((glythed(_2296,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_2296=skExistsGlythed_13FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((glythed(_12432, "CLR"):- \+glythed(skExistsGlythed_13FnSk, "CLR"), {_12432=skExistsGlythed_13FnSk}))).
- % Found positive trigger: boxlog((glythed(_15200,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_15200=skExistsGlythed_13FnSk}))
- % body: compound(boxlog((glythed(_15200,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_15200=skExistsGlythed_13FnSk}))),\+is_ftVar(boxlog((glythed(_15200,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_15200=skExistsGlythed_13FnSk})))*->rhs([{with_current_why(boxlog((glythed(_15200,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_15200=skExistsGlythed_13FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_15200,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_15200=skExistsGlythed_13FnSk})))))}])
- % Found positive trigger: boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk}))}])
- % =boxlog=
- % glythed(_4094, "CLR") :-
- % \+ glythed(skExistsGlythed_13FnSk, "CLR"),
- % { _4094=skExistsGlythed_13FnSk
- % }.
- % Found positive trigger: boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk}))
- % body: is_kif_clause(boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk})))*->rhs([clif(boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk})))])
- % Found positive trigger: boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk}))
- % body: delistify_last_arg((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk}),boxlog_to_pfc,_15280),must_be_unqualified(_15280)*->rhs([pfclog(_15280)])
- % RHS-Post1: pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk},{is_unit(_4094)}==>glythed(_4094,"CLR")))
- % Support: boxlog((glythed(_3918,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_3918=skExistsGlythed_13FnSk})),pt(boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk})),(delistify_last_arg((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk}),boxlog_to_pfc,(\+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk},{is_unit(_4094)}==>glythed(_4094,"CLR"))),must_be_unqualified((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk},{is_unit(_4094)}==>glythed(_4094,"CLR")))*->rhs([pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk},{is_unit(_4094)}==>glythed(_4094,"CLR")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(skExistsGlythed_13FnSk, "CLR"), {_15756=skExistsGlythed_13FnSk}, {is_unit(_15756)}==>glythed(_15756, "CLR")))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_18946=skExistsGlythed_13FnSk},{is_unit(_18946)}==>glythed(_18946,"CLR")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_18946=skExistsGlythed_13FnSk},{is_unit(_18946)}==>glythed(_18946,"CLR")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_18946=skExistsGlythed_13FnSk},{is_unit(_18946)}==>glythed(_18946,"CLR"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_18946=skExistsGlythed_13FnSk},{is_unit(_18946)}==>glythed(_18946,"CLR"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_18946=skExistsGlythed_13FnSk},{is_unit(_18946)}==>glythed(_18946,"CLR"))))))}])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR")))}])
- % =pfclog=
- % \+glythed(skExistsGlythed_13FnSk, "CLR"), {_5622=skExistsGlythed_13FnSk}, {is_unit(_5622)}==>glythed(_5622, "CLR").
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR")))
- % body: is_kif_clause(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR"))))*->rhs([clif(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR"))))])
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR")))
- % body: rhs([(\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR"))])
- % RHS-Post1: \+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR")
- % Support: pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5418=skExistsGlythed_13FnSk},{is_unit(_5418)}==>glythed(_5418,"CLR"))),pt(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR"))),rhs([(\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR"))]))
- % r_sane:mpred_fwc1((\+glythed(skExistsGlythed_13FnSk, "CLR"), {_39098=skExistsGlythed_13FnSk}, {is_unit(_39098)}==>glythed(_39098, "CLR"))).
- % Adding negative
- % trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % test: call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR"))
- % body: _6838=skExistsGlythed_13FnSk*->is_unit(_6838)*->rhs([glythed(_6838,"CLR")])
- % Support: (\+glythed(skExistsGlythed_13FnSk,"CLR"),{_7048=skExistsGlythed_13FnSk},{is_unit(_7048)}==>glythed(_7048,"CLR")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',54)
- % RHS-Post1: glythed(skExistsGlythed_13FnSk,"CLR")
- % Support: \+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % cond: call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR"))
- % action: skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_13FnSk,"CLR"),(\+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_13FnSk, "CLR")).
- % Found positive trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % body: compound(glythed(skExistsGlythed_13FnSk,"CLR")),\+is_ftVar(glythed(skExistsGlythed_13FnSk,"CLR"))*->rhs([{with_current_why(glythed(skExistsGlythed_13FnSk,"CLR"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_13FnSk,"CLR"))))}])
- % Found positive trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % body: is_kif_clause(glythed(skExistsGlythed_13FnSk,"CLR"))*->rhs([clif(glythed(skExistsGlythed_13FnSk,"CLR"))])
- % Found positive trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % body: compound(glythed(skExistsGlythed_13FnSk,"CLR")),\+is_ftVar(glythed(skExistsGlythed_13FnSk,"CLR"))*->rhs([{with_current_why(glythed(skExistsGlythed_13FnSk,"CLR"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_13FnSk,"CLR"))))}])
- % Found negative trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % cond: call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR"))
- % body: skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])
- % Support: spft(glythed(skExistsGlythed_13FnSk,"CLR"),\+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")]))))
- % moving(inherit_above(header_sane, glythed(_29290, _29292))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_13FnSk,"CLR")
- % support (was): \+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_13FnSk,"CLR"),\+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))))
- % Couldn't retract_i: spft(glythed(skExistsGlythed_13FnSk,"CLR"),_12694,_12696).
- % show_failure(mpred_undo1, retract_u(glythed(skExistsGlythed_13FnSk, "CLR"))).
- % Found positive trigger: pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR")))
- % body: compound(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR")))),\+is_ftVar(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR"))))*->rhs([{with_current_why(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(skExistsGlythed_13FnSk,"CLR"),{_5622=skExistsGlythed_13FnSk},{is_unit(_5622)}==>glythed(_5622,"CLR"))))))}])
- % Found positive trigger: boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk}))
- % body: compound(boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk}))),\+is_ftVar(boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk})))*->rhs([{with_current_why(boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk})),ignore(\+addAdmittedArguments(boxlog((glythed(_4094,"CLR"):- \+glythed(skExistsGlythed_13FnSk,"CLR"),{_4094=skExistsGlythed_13FnSk})))))}])
- % RHS-Post1: boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_2296,"CLR")))
- % Support: clif(exists(_2152,glythed(_2152,"CLR"))),pt(clif(exists(_2296,glythed(_2296,"CLR"))),(is_kif_clause(exists(_2296,glythed(_2296,"CLR")))*->rhs([{delistify_last_arg(exists(_2296,glythed(_2296,"CLR")),kif_to_boxlog,(glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_2296,"CLR")))},boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_2296,"CLR")))])))
- % r_sane:mpred_fwc1(boxlog((glythed(skExistsGlythed_13FnSk, "CLR"):- \+glythed(_19178, "CLR")))).
- % Found positive trigger: boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR")))
- % body: compound(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR")))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR")))}])
- % =boxlog=
- % glythed(skExistsGlythed_13FnSk, "CLR") :-
- % \+ glythed(_3832, "CLR").
- % Found positive trigger: boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR")))
- % body: is_kif_clause(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR"))))*->rhs([clif(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR"))))])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR")))
- % body: delistify_last_arg((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR")),boxlog_to_pfc,_19232),must_be_unqualified(_19232)*->rhs([pfclog(_19232)])
- % RHS-Post1: pfclog((\+glythed(_3832,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))
- % Support: boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3680,"CLR"))),pt(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR"))),(delistify_last_arg((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3832,"CLR")),boxlog_to_pfc,(\+glythed(_3832,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))),must_be_unqualified((\+glythed(_3832,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))*->rhs([pfclog((\+glythed(_3832,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))])))
- % r_sane:mpred_fwc1(pfclog((\+glythed(_13730, "CLR")==>glythed(skExistsGlythed_13FnSk, "CLR")))).
- % Found positive trigger: pfclog((\+glythed(_16562,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))
- % body: compound(pfclog((\+glythed(_16562,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))),\+is_ftVar(pfclog((\+glythed(_16562,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))))*->rhs([{with_current_why(pfclog((\+glythed(_16562,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_16562,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))))))}])
- % Found positive trigger: pfclog((\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))}])
- % =pfclog=
- % \+glythed(_5070, "CLR")==>glythed(skExistsGlythed_13FnSk, "CLR").
- % Found positive trigger: pfclog((\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))
- % body: is_kif_clause(pfclog((\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))))*->rhs([clif(pfclog((\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))))])
- % Found positive trigger: pfclog((\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))
- % body: rhs([(\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))])
- % RHS-Post1: \+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")
- % Support: pfclog((\+glythed(_4918,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))),pt(pfclog((\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))),rhs([(\+glythed(_5070,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))]))
- % r_sane:mpred_fwc1((\+glythed(_32030, "CLR")==>glythed(skExistsGlythed_13FnSk, "CLR"))).
- % Adding negative
- % trigger: glythed(_6022,"CLR")
- % test: call_u_no_bc(glythed(_6022,"CLR"))
- % body: rhs([glythed(skExistsGlythed_13FnSk,"CLR")])
- % Support: (\+glythed(_6180,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',54)
- % RHS-Post1: glythed(skExistsGlythed_13FnSk,"CLR")
- % Support: \+glythed(_6022,"CLR"),nt(glythed(_6540,"CLR"),call_u_no_bc(glythed(_6022,"CLR")),rhs([glythed(skExistsGlythed_13FnSk,"CLR")]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(_6540,"CLR")
- % cond: call_u_no_bc(glythed(_6022,"CLR"))
- % action: rhs([glythed(skExistsGlythed_13FnSk,"CLR")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_13FnSk,"CLR"),(\+glythed(_6022,"CLR"),nt(glythed(_6540,"CLR"),call_u_no_bc(glythed(_6022,"CLR")),rhs([glythed(skExistsGlythed_13FnSk,"CLR")]))))
- % r_sane:mpred_fwc1(glythed(skExistsGlythed_13FnSk, "CLR")).
- % Found positive trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % body: compound(glythed(skExistsGlythed_13FnSk,"CLR")),\+is_ftVar(glythed(skExistsGlythed_13FnSk,"CLR"))*->rhs([{with_current_why(glythed(skExistsGlythed_13FnSk,"CLR"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_13FnSk,"CLR"))))}])
- % Found positive trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % body: is_kif_clause(glythed(skExistsGlythed_13FnSk,"CLR"))*->rhs([clif(glythed(skExistsGlythed_13FnSk,"CLR"))])
- % Found positive trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % body: compound(glythed(skExistsGlythed_13FnSk,"CLR")),\+is_ftVar(glythed(skExistsGlythed_13FnSk,"CLR"))*->rhs([{with_current_why(glythed(skExistsGlythed_13FnSk,"CLR"),ignore(\+addAdmittedArguments(glythed(skExistsGlythed_13FnSk,"CLR"))))}])
- % Found negative trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % cond: call_u_no_bc(glythed(_23326,"CLR"))
- % body: rhs([glythed(skExistsGlythed_13FnSk,"CLR")])
- % Support: spft(glythed(skExistsGlythed_13FnSk,"CLR"),\+glythed(_23326,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(_23326,"CLR")),rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))
- % moving(inherit_above(header_sane, glythed(_27730, _27732))).
- % Removing (withdraw1)
- % term: glythed(skExistsGlythed_13FnSk,"CLR")
- % support (was): \+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),rhs([glythed(skExistsGlythed_13FnSk,"CLR")]))
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_13FnSk,"CLR"),\+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),rhs([glythed(skExistsGlythed_13FnSk,"CLR")]))))
- % RHS-Post1: glythed(skExistsGlythed_13FnSk,"CLR")
- % Support: \+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % cond: call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR"))
- % action: skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_13FnSk,"CLR"),(\+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))))
- % moving(inherit_above(header_sane, glythed(_29100, _29102))).
- % SUCCESS: retract_u(spft(glythed(skExistsGlythed_13FnSk,"CLR"),\+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))))
- % RHS-Post1: glythed(skExistsGlythed_13FnSk,"CLR")
- % Support: \+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: glythed(skExistsGlythed_13FnSk,"CLR")
- % cond: call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR"))
- % action: skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])
- % from: mpred_add_support_fast(glythed(skExistsGlythed_13FnSk,"CLR"),(\+glythed(skExistsGlythed_13FnSk,"CLR"),nt(glythed(skExistsGlythed_13FnSk,"CLR"),call_u_no_bc(glythed(skExistsGlythed_13FnSk,"CLR")),(skExistsGlythed_13FnSk=skExistsGlythed_13FnSk*->is_unit(skExistsGlythed_13FnSk)*->rhs([glythed(skExistsGlythed_13FnSk,"CLR")])))))
- % moving(inherit_above(header_sane, glythed(_29286, _29288))).
- % Found positive trigger: pfclog((\+glythed(_5040,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))
- % body: compound(pfclog((\+glythed(_5040,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR")))),\+is_ftVar(pfclog((\+glythed(_5040,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))))*->rhs([{with_current_why(pfclog((\+glythed(_5040,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))),ignore(\+addAdmittedArguments(pfclog((\+glythed(_5040,"CLR")==>glythed(skExistsGlythed_13FnSk,"CLR"))))))}])
- % Found positive trigger: boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3802,"CLR")))
- % body: compound(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3802,"CLR")))),\+is_ftVar(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3802,"CLR"))))*->rhs([{with_current_why(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3802,"CLR"))),ignore(\+addAdmittedArguments(boxlog((glythed(skExistsGlythed_13FnSk,"CLR"):- \+glythed(_3802,"CLR"))))))}])
- % Found positive trigger: clif(exists(_2296,glythed(_2296,"CLR")))
- % body: compound(clif(exists(_2296,glythed(_2296,"CLR")))),\+is_ftVar(clif(exists(_2296,glythed(_2296,"CLR"))))*->rhs([{with_current_why(clif(exists(_2296,glythed(_2296,"CLR"))),ignore(\+addAdmittedArguments(clif(exists(_2296,glythed(_2296,"CLR"))))))}])
- % Found positive trigger: exists(_1224,glythed(_1224,"CLR"))
- % body: compound(exists(_1224,glythed(_1224,"CLR"))),\+is_ftVar(exists(_1224,glythed(_1224,"CLR")))*->rhs([{with_current_why(exists(_1224,glythed(_1224,"CLR")),ignore(\+addAdmittedArguments(exists(_1224,glythed(_1224,"CLR")))))}])
- :- dynamic baseKB:glythed/2.
- :- multifile baseKB:glythed/2.
- :- public baseKB:glythed/2.
- :- module_transparent baseKB:glythed/2.
- :- dynamic glythed/2.
- :- multifile glythed/2.
- :- public glythed/2.
- :- module_transparent glythed/2.
- glythed(skExistsGlythed_0FnSk, "1").
- glythed(skExistsGlythed_1FnSk, "2").
- glythed(skExistsGlythed_2FnSk, "3").
- glythed(skExistsGlythed_3FnSk, "4").
- glythed(skExistsGlythed_4FnSk, "5").
- glythed(skExistsGlythed_5FnSk, "6").
- glythed(skExistsGlythed_6FnSk, "7").
- glythed(skExistsGlythed_7FnSk, "8").
- glythed(skExistsGlythed_8FnSk, "9").
- glythed(skExistsGlythed_9FnSk, "0").
- glythed(skExistsGlythed_10FnSk, "+").
- glythed(skExistsGlythed_11FnSk, "-").
- glythed(skExistsGlythed_12FnSk, "=").
- glythed(skExistsGlythed_13FnSk, "CLR").
- glythed(A, B) :-
- inherit_above(header_sane, glythed(A, B)).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:59
- % r_sane:mpred_fwc1(forall(_31364, same(_31364, _31364))).
- % Found positive trigger: forall(_1224,same(_1224,_1224))
- % body: compound(forall(_1224,same(_1224,_1224))),\+is_ftVar(forall(_1224,same(_1224,_1224)))*->rhs([{with_current_why(forall(_1224,same(_1224,_1224)),ignore(\+addAdmittedArguments(forall(_1224,same(_1224,_1224)))))}])
- % Found positive trigger: forall(_1224,same(_1224,_1224))
- % body: is_kif_clause(forall(_1224,same(_1224,_1224)))*->rhs([clif(forall(_1224,same(_1224,_1224)))])
- % Found positive trigger: forall(_1224,same(_1224,_1224))
- % body: compound(forall(_1224,same(_1224,_1224))),\+is_ftVar(forall(_1224,same(_1224,_1224)))*->rhs([{with_current_why(forall(_1224,same(_1224,_1224)),ignore(\+addAdmittedArguments(forall(_1224,same(_1224,_1224)))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:62
- % r_sane:mpred_fwc1(forall([_21296, _21302, _21308, _21314], =>(&(&(glythed(_21296, _21308), glythed(_21302, _21314)), different(_21308, _21314)), different(_21296, _21302)))).
- % Found positive trigger: forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792)))
- % body: compound(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792)))),\+is_ftVar(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))))*->rhs([{with_current_why(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))),ignore(\+addAdmittedArguments(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))))))}])
- % Found positive trigger: forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792)))
- % body: is_kif_clause(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))))*->rhs([clif(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))))])
- % RHS-Post1: clif(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))))
- % Support: forall([_1518,_1524,_1530,_1536],=>(&(&(glythed(_1518,_1530),glythed(_1524,_1536)),different(_1530,_1536)),different(_1518,_1524))),pt(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))),(is_kif_clause(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))))*->rhs([clif(forall([_1786,_1792,_1798,_1804],=>(&(&(glythed(_1786,_1798),glythed(_1792,_1804)),different(_1798,_1804)),different(_1786,_1792))))])))
- % r_sane:mpred_fwc1(clif(forall([_23782, _23788, _23794, _23800], =>(&(&(glythed(_23782, _23794), glythed(_23788, _23800)), different(_23794, _23800)), different(_23782, _23788))))).
- % Found positive trigger: clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))
- % body: compound(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))),\+is_ftVar(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))))*->rhs([{with_current_why(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))),ignore(\+addAdmittedArguments(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))))))}])
- % Found positive trigger: clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))}])
- % =clif=
- % forall([_3640, _3646, _3652, _3658], =>(&(&(glythed(_3640, _3652), glythed(_3646, _3658)), different(_3652, _3658)), different(_3640, _3646))).
- % Found positive trigger: clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))
- % body: is_kif_clause(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))))*->rhs([clif(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))))])
- % Found positive trigger: clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))
- % body: \+is_kif_clause(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))*->rhs([{delistify_last_arg(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))),kif_to_boxlog,_4044)},boxlog(_4044)])
- % Found positive trigger: clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))
- % body: is_kif_clause(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))*->rhs([{delistify_last_arg(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))),kif_to_boxlog,_7502)},boxlog(_7502)])
- % kif :-
- % all([_3640, _3646, _3652, _3658],
- % =>(&(&(glythed(_3640, _3652), glythed(_3646, _3658)), different(_3652, _3658)), different(_3640, _3646))).
- % qualify_nesc :-
- % all([_3640, _3646, _3652, _3658],
- % nesc(=>(&(&(glythed(_3640, _3652), glythed(_3646, _3658)), different(_3652, _3658)), different(_3640, _3646)))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_3640, all(_3646, all(_3652, all(_3658, nesc(b_d(KB, nesc, poss), =>(&(&(glythed(_3640, _3652), glythed(_3646, _3658)), different(_3652, _3658)), different(_3640, _3646))))))), nesc(b_d(KB, nesc, poss), v(v(v(~glythed(_3640, _3652), ~glythed(_3646, _3658)), ~different(_3652, _3658)), different(_3640, _3646)))))).
- % nnf :-
- % nesc(v(v(v(~glythed(_3640, _3652), ~glythed(_3646, _3658)), ~different(_3652, _3658)), different(_3640, _3646))).
- % th_nnf_in :-
- % ( ( ( neg(glythed(_3640, _3652))
- % ; neg(glythed(_3646, _3658))
- % )
- % ; neg(different(_3652, _3658))
- % )
- % ; tru(different(_3640, _3646))
- % ).
- % th_nnf_out :-
- % ~ (((n(neg(glythed(_3640, _3652))), n(neg(glythed(_3646, _3658)))), n(neg(different(_3652, _3658)))), n(tru(different(_3640, _3646)))).
- % RHS-Post1: boxlog((proven_neg(different(_3652,_3658)):-proven_not_neg(glythed(_3640,_3652)),proven_not_neg(glythed(_3646,_3658)),proven_neg(different(_3640,_3646))))
- % Support: clif(forall([_3364,_3370,_3376,_3382],=>(&(&(glythed(_3364,_3376),glythed(_3370,_3382)),different(_3376,_3382)),different(_3364,_3370)))),pt(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))),(is_kif_clause(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))*->rhs([{delistify_last_arg(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))),kif_to_boxlog,(proven_neg(different(_3652,_3658)):-proven_not_neg(glythed(_3640,_3652)),proven_not_neg(glythed(_3646,_3658)),proven_neg(different(_3640,_3646))))},boxlog((proven_neg(different(_3652,_3658)):-proven_not_neg(glythed(_3640,_3652)),proven_not_neg(glythed(_3646,_3658)),proven_neg(different(_3640,_3646))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(different(_16112, _16114)):-proven_not_neg(glythed(_16128, _16112)), proven_not_neg(glythed(_16144, _16114)), proven_neg(different(_16128, _16144))))).
- % Found positive trigger: boxlog((proven_neg(different(_19294,_19296)):-proven_not_neg(glythed(_19310,_19294)),proven_not_neg(glythed(_19326,_19296)),proven_neg(different(_19310,_19326))))
- % body: compound(boxlog((proven_neg(different(_19294,_19296)):-proven_not_neg(glythed(_19310,_19294)),proven_not_neg(glythed(_19326,_19296)),proven_neg(different(_19310,_19326))))),\+is_ftVar(boxlog((proven_neg(different(_19294,_19296)):-proven_not_neg(glythed(_19310,_19294)),proven_not_neg(glythed(_19326,_19296)),proven_neg(different(_19310,_19326)))))*->rhs([{with_current_why(boxlog((proven_neg(different(_19294,_19296)):-proven_not_neg(glythed(_19310,_19294)),proven_not_neg(glythed(_19326,_19296)),proven_neg(different(_19310,_19326)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(different(_19294,_19296)):-proven_not_neg(glythed(_19310,_19294)),proven_not_neg(glythed(_19326,_19296)),proven_neg(different(_19310,_19326)))))))}])
- % Found positive trigger: boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328))))}])
- % =boxlog=
- % proven_neg(different(_6296, _6298)) :-
- % proven_not_neg(glythed(_6312, _6296)),
- % proven_not_neg(glythed(_6328, _6298)),
- % proven_neg(different(_6312, _6328)).
- % Found positive trigger: boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328))))
- % body: is_kif_clause(boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328)))))*->rhs([clif(boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328)))))])
- % Found positive trigger: boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328))))
- % body: delistify_last_arg((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328))),boxlog_to_pfc,_18888),must_be_unqualified(_18888)*->rhs([pfclog(_18888)])
- % RHS-Post1: pfclog((proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),not_different(_6312,_6328),{is_unit(_6298,_6296)}==>proven_neg(different(_6296,_6298))))
- % Support: boxlog((proven_neg(different(_6048,_6050)):-proven_not_neg(glythed(_6064,_6048)),proven_not_neg(glythed(_6080,_6050)),proven_neg(different(_6064,_6080)))),pt(boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328)))),(delistify_last_arg((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328))),boxlog_to_pfc,(proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),not_different(_6312,_6328),{is_unit(_6298,_6296)}==>proven_neg(different(_6296,_6298)))),must_be_unqualified((proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),not_different(_6312,_6328),{is_unit(_6298,_6296)}==>proven_neg(different(_6296,_6298))))*->rhs([pfclog((proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),not_different(_6312,_6328),{is_unit(_6298,_6296)}==>proven_neg(different(_6296,_6298))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(glythed(_19300, _19302)), proven_not_neg(glythed(_19316, _19318)), not_different(_19300, _19316), {is_unit(_19318, _19302)}==>proven_neg(different(_19302, _19318))))).
- % Found positive trigger: pfclog((proven_not_neg(glythed(_22878,_22880)),proven_not_neg(glythed(_22894,_22896)),not_different(_22878,_22894),{is_unit(_22896,_22880)}==>proven_neg(different(_22880,_22896))))
- % body: compound(pfclog((proven_not_neg(glythed(_22878,_22880)),proven_not_neg(glythed(_22894,_22896)),not_different(_22878,_22894),{is_unit(_22896,_22880)}==>proven_neg(different(_22880,_22896))))),\+is_ftVar(pfclog((proven_not_neg(glythed(_22878,_22880)),proven_not_neg(glythed(_22894,_22896)),not_different(_22878,_22894),{is_unit(_22896,_22880)}==>proven_neg(different(_22880,_22896)))))*->rhs([{with_current_why(pfclog((proven_not_neg(glythed(_22878,_22880)),proven_not_neg(glythed(_22894,_22896)),not_different(_22878,_22894),{is_unit(_22896,_22880)}==>proven_neg(different(_22880,_22896)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(glythed(_22878,_22880)),proven_not_neg(glythed(_22894,_22896)),not_different(_22878,_22894),{is_unit(_22896,_22880)}==>proven_neg(different(_22880,_22896)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278))))}])
- % =pfclog=
- % proven_not_neg(glythed(_8260, _8262)), proven_not_neg(glythed(_8276, _8278)), not_different(_8260, _8276), {is_unit(_8278, _8262)}==>proven_neg(different(_8262, _8278)).
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278))))
- % body: is_kif_clause(pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278)))))*->rhs([clif(pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278)))))])
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278))))
- % body: rhs([(proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278)))])
- % RHS-Post1: proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278))
- % Support: pfclog((proven_not_neg(glythed(_7988,_7990)),proven_not_neg(glythed(_8004,_8006)),not_different(_7988,_8004),{is_unit(_8006,_7990)}==>proven_neg(different(_7990,_8006)))),pt(pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278)))),rhs([(proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278)))]))
- % r_sane:mpred_fwc1((proven_not_neg(glythed(_44692, _44694)), proven_not_neg(glythed(_44708, _44710)), not_different(_44692, _44708), {is_unit(_44710, _44694)}==>proven_neg(different(_44694, _44710)))).
- % Adding positive
- % trigger: proven_not_neg(glythed(_9794,_9796))
- % body: pt(proven_not_neg(glythed(_9810,_9812)),pt(not_different(_9794,_9810),(is_unit(_9812,_9796)*->rhs([proven_neg(different(_9796,_9812))]))))
- % Support: (proven_not_neg(glythed(_10072,_10074)),proven_not_neg(glythed(_10088,_10090)),not_different(_10072,_10088),{is_unit(_10090,_10074)}==>proven_neg(different(_10074,_10090))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',62)
- % uses_predicate(header_sane, baseKB, proven_not_neg, 1).
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278))))
- % body: compound(pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278))))),\+is_ftVar(pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278)))))*->rhs([{with_current_why(pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(glythed(_8260,_8262)),proven_not_neg(glythed(_8276,_8278)),not_different(_8260,_8276),{is_unit(_8278,_8262)}==>proven_neg(different(_8262,_8278)))))))}])
- % Found positive trigger: boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328))))
- % body: compound(boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328))))),\+is_ftVar(boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328)))))*->rhs([{with_current_why(boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(different(_6296,_6298)):-proven_not_neg(glythed(_6312,_6296)),proven_not_neg(glythed(_6328,_6298)),proven_neg(different(_6312,_6328)))))))}])
- % RHS-Post1: boxlog((proven_neg(glythed(_3646,_3658)):-proven_not_neg(glythed(_3640,_3652)),proven_not_neg(different(_3652,_3658)),proven_neg(different(_3640,_3646))))
- % Support: clif(forall([_3364,_3370,_3376,_3382],=>(&(&(glythed(_3364,_3376),glythed(_3370,_3382)),different(_3376,_3382)),different(_3364,_3370)))),pt(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))),(is_kif_clause(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))*->rhs([{delistify_last_arg(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))),kif_to_boxlog,(proven_neg(glythed(_3646,_3658)):-proven_not_neg(glythed(_3640,_3652)),proven_not_neg(different(_3652,_3658)),proven_neg(different(_3640,_3646))))},boxlog((proven_neg(glythed(_3646,_3658)):-proven_not_neg(glythed(_3640,_3652)),proven_not_neg(different(_3652,_3658)),proven_neg(different(_3640,_3646))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(glythed(_16194, _16196)):-proven_not_neg(glythed(_16210, _16212)), proven_not_neg(different(_16212, _16196)), proven_neg(different(_16210, _16194))))).
- % Found positive trigger: boxlog((proven_neg(glythed(_19376,_19378)):-proven_not_neg(glythed(_19392,_19394)),proven_not_neg(different(_19394,_19378)),proven_neg(different(_19392,_19376))))
- % body: compound(boxlog((proven_neg(glythed(_19376,_19378)):-proven_not_neg(glythed(_19392,_19394)),proven_not_neg(different(_19394,_19378)),proven_neg(different(_19392,_19376))))),\+is_ftVar(boxlog((proven_neg(glythed(_19376,_19378)):-proven_not_neg(glythed(_19392,_19394)),proven_not_neg(different(_19394,_19378)),proven_neg(different(_19392,_19376)))))*->rhs([{with_current_why(boxlog((proven_neg(glythed(_19376,_19378)):-proven_not_neg(glythed(_19392,_19394)),proven_not_neg(different(_19394,_19378)),proven_neg(different(_19392,_19376)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(glythed(_19376,_19378)):-proven_not_neg(glythed(_19392,_19394)),proven_not_neg(different(_19394,_19378)),proven_neg(different(_19392,_19376)))))))}])
- % Found positive trigger: boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392))))}])
- % =boxlog=
- % proven_neg(glythed(_6392, _6394)) :-
- % proven_not_neg(glythed(_6408, _6410)),
- % proven_not_neg(different(_6410, _6394)),
- % proven_neg(different(_6408, _6392)).
- % Found positive trigger: boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392))))
- % body: is_kif_clause(boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392)))))*->rhs([clif(boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392)))))])
- % Found positive trigger: boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392))))
- % body: delistify_last_arg((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392))),boxlog_to_pfc,_18984),must_be_unqualified(_18984)*->rhs([pfclog(_18984)])
- % RHS-Post1: pfclog((proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),not_different(_6408,_6392),{is_unit(_6394,_6392)}==>proven_neg(glythed(_6392,_6394))))
- % Support: boxlog((proven_neg(glythed(_6144,_6146)):-proven_not_neg(glythed(_6160,_6162)),proven_not_neg(different(_6162,_6146)),proven_neg(different(_6160,_6144)))),pt(boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392)))),(delistify_last_arg((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392))),boxlog_to_pfc,(proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),not_different(_6408,_6392),{is_unit(_6394,_6392)}==>proven_neg(glythed(_6392,_6394)))),must_be_unqualified((proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),not_different(_6408,_6392),{is_unit(_6394,_6392)}==>proven_neg(glythed(_6392,_6394))))*->rhs([pfclog((proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),not_different(_6408,_6392),{is_unit(_6394,_6392)}==>proven_neg(glythed(_6392,_6394))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(glythed(_19390, _19392)), proven_not_neg(different(_19392, _19408)), not_different(_19390, _19420), {is_unit(_19408, _19420)}==>proven_neg(glythed(_19420, _19408))))).
- % Found positive trigger: pfclog((proven_not_neg(glythed(_22968,_22970)),proven_not_neg(different(_22970,_22986)),not_different(_22968,_22998),{is_unit(_22986,_22998)}==>proven_neg(glythed(_22998,_22986))))
- % body: compound(pfclog((proven_not_neg(glythed(_22968,_22970)),proven_not_neg(different(_22970,_22986)),not_different(_22968,_22998),{is_unit(_22986,_22998)}==>proven_neg(glythed(_22998,_22986))))),\+is_ftVar(pfclog((proven_not_neg(glythed(_22968,_22970)),proven_not_neg(different(_22970,_22986)),not_different(_22968,_22998),{is_unit(_22986,_22998)}==>proven_neg(glythed(_22998,_22986)))))*->rhs([{with_current_why(pfclog((proven_not_neg(glythed(_22968,_22970)),proven_not_neg(different(_22970,_22986)),not_different(_22968,_22998),{is_unit(_22986,_22998)}==>proven_neg(glythed(_22998,_22986)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(glythed(_22968,_22970)),proven_not_neg(different(_22970,_22986)),not_different(_22968,_22998),{is_unit(_22986,_22998)}==>proven_neg(glythed(_22998,_22986)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374))))}])
- % =pfclog=
- % proven_not_neg(glythed(_8356, _8358)), proven_not_neg(different(_8358, _8374)), not_different(_8356, _8386), {is_unit(_8374, _8386)}==>proven_neg(glythed(_8386, _8374)).
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374))))
- % body: is_kif_clause(pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374)))))*->rhs([clif(pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374)))))])
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374))))
- % body: rhs([(proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374)))])
- % RHS-Post1: proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374))
- % Support: pfclog((proven_not_neg(glythed(_8084,_8086)),proven_not_neg(different(_8086,_8102)),not_different(_8084,_8114),{is_unit(_8102,_8114)}==>proven_neg(glythed(_8114,_8102)))),pt(pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374)))),rhs([(proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374)))]))
- % r_sane:mpred_fwc1((proven_not_neg(glythed(_44788, _44790)), proven_not_neg(different(_44790, _44806)), not_different(_44788, _44818), {is_unit(_44806, _44818)}==>proven_neg(glythed(_44818, _44806)))).
- % Adding positive
- % trigger: proven_not_neg(glythed(_9890,_9892))
- % body: pt(proven_not_neg(different(_9892,_9908)),pt(not_different(_9890,_9920),(is_unit(_9908,_9920)*->rhs([proven_neg(glythed(_9920,_9908))]))))
- % Support: (proven_not_neg(glythed(_10168,_10170)),proven_not_neg(different(_10170,_10186)),not_different(_10168,_10198),{is_unit(_10186,_10198)}==>proven_neg(glythed(_10198,_10186))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',62)
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374))))
- % body: compound(pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374))))),\+is_ftVar(pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374)))))*->rhs([{with_current_why(pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(glythed(_8356,_8358)),proven_not_neg(different(_8358,_8374)),not_different(_8356,_8386),{is_unit(_8374,_8386)}==>proven_neg(glythed(_8386,_8374)))))))}])
- % Found positive trigger: boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392))))
- % body: compound(boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392))))),\+is_ftVar(boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392)))))*->rhs([{with_current_why(boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(glythed(_6392,_6394)):-proven_not_neg(glythed(_6408,_6410)),proven_not_neg(different(_6410,_6394)),proven_neg(different(_6408,_6392)))))))}])
- % RHS-Post1: boxlog((proven_neg(glythed(_3640,_3652)):-proven_not_neg(glythed(_3646,_3658)),proven_not_neg(different(_3652,_3658)),proven_neg(different(_3640,_3646))))
- % Support: clif(forall([_3364,_3370,_3376,_3382],=>(&(&(glythed(_3364,_3376),glythed(_3370,_3382)),different(_3376,_3382)),different(_3364,_3370)))),pt(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))),(is_kif_clause(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))*->rhs([{delistify_last_arg(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))),kif_to_boxlog,(proven_neg(glythed(_3640,_3652)):-proven_not_neg(glythed(_3646,_3658)),proven_not_neg(different(_3652,_3658)),proven_neg(different(_3640,_3646))))},boxlog((proven_neg(glythed(_3640,_3652)):-proven_not_neg(glythed(_3646,_3658)),proven_not_neg(different(_3652,_3658)),proven_neg(different(_3640,_3646))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(glythed(_50922, _50924)):-proven_not_neg(glythed(_50938, _50940)), proven_not_neg(different(_50924, _50940)), proven_neg(different(_50922, _50938))))).
- % Found positive trigger: boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))))
- % body: compound(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))))),\+is_ftVar(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))))*->rhs([{with_current_why(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))))))}])
- % Found positive trigger: boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))))}])
- % =boxlog=
- % proven_neg(glythed(_6460, _6462)) :-
- % proven_not_neg(glythed(_6476, _6478)),
- % proven_not_neg(different(_6462, _6478)),
- % proven_neg(different(_6460, _6476)).
- % Found positive trigger: boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))))
- % body: is_kif_clause(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))))*->rhs([clif(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))))])
- % Found positive trigger: boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))))
- % body: delistify_last_arg((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))),boxlog_to_pfc,_25286),must_be_unqualified(_25286)*->rhs([pfclog(_25286)])
- % RHS-Post1: pfclog((proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),not_different(_6460,_6476),{is_unit(_6462,_6460)}==>proven_neg(glythed(_6460,_6462))))
- % Support: boxlog((proven_neg(glythed(_6212,_6214)):-proven_not_neg(glythed(_6228,_6230)),proven_not_neg(different(_6214,_6230)),proven_neg(different(_6212,_6228)))),pt(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))),(delistify_last_arg((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))),boxlog_to_pfc,(proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),not_different(_6460,_6476),{is_unit(_6462,_6460)}==>proven_neg(glythed(_6460,_6462)))),must_be_unqualified((proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),not_different(_6460,_6476),{is_unit(_6462,_6460)}==>proven_neg(glythed(_6460,_6462))))*->rhs([pfclog((proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),not_different(_6460,_6476),{is_unit(_6462,_6460)}==>proven_neg(glythed(_6460,_6462))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(glythed(_19062, _19064)), proven_not_neg(different(_19078, _19064)), not_different(_19090, _19062), {is_unit(_19078, _19090)}==>proven_neg(glythed(_19090, _19078))))).
- % Found positive trigger: pfclog((proven_not_neg(glythed(_22640,_22642)),proven_not_neg(different(_22656,_22642)),not_different(_22668,_22640),{is_unit(_22656,_22668)}==>proven_neg(glythed(_22668,_22656))))
- % body: compound(pfclog((proven_not_neg(glythed(_22640,_22642)),proven_not_neg(different(_22656,_22642)),not_different(_22668,_22640),{is_unit(_22656,_22668)}==>proven_neg(glythed(_22668,_22656))))),\+is_ftVar(pfclog((proven_not_neg(glythed(_22640,_22642)),proven_not_neg(different(_22656,_22642)),not_different(_22668,_22640),{is_unit(_22656,_22668)}==>proven_neg(glythed(_22668,_22656)))))*->rhs([{with_current_why(pfclog((proven_not_neg(glythed(_22640,_22642)),proven_not_neg(different(_22656,_22642)),not_different(_22668,_22640),{is_unit(_22656,_22668)}==>proven_neg(glythed(_22668,_22656)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(glythed(_22640,_22642)),proven_not_neg(different(_22656,_22642)),not_different(_22668,_22640),{is_unit(_22656,_22668)}==>proven_neg(glythed(_22668,_22656)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444))))}])
- % =pfclog=
- % proven_not_neg(glythed(_8428, _8430)), proven_not_neg(different(_8444, _8430)), not_different(_8456, _8428), {is_unit(_8444, _8456)}==>proven_neg(glythed(_8456, _8444)).
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444))))
- % body: is_kif_clause(pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444)))))*->rhs([clif(pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444)))))])
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444))))
- % body: rhs([(proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444)))])
- % RHS-Post1: proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444))
- % Support: pfclog((proven_not_neg(glythed(_8156,_8158)),proven_not_neg(different(_8172,_8158)),not_different(_8184,_8156),{is_unit(_8172,_8184)}==>proven_neg(glythed(_8184,_8172)))),pt(pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444)))),rhs([(proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444)))]))
- % r_sane:mpred_fwc1((proven_not_neg(glythed(_44406, _44408)), proven_not_neg(different(_44422, _44408)), not_different(_44434, _44406), {is_unit(_44422, _44434)}==>proven_neg(glythed(_44434, _44422)))).
- % Adding positive
- % trigger: proven_not_neg(glythed(_9966,_9968))
- % body: pt(proven_not_neg(different(_9982,_9968)),pt(not_different(_9994,_9966),(is_unit(_9982,_9994)*->rhs([proven_neg(glythed(_9994,_9982))]))))
- % Support: (proven_not_neg(glythed(_10244,_10246)),proven_not_neg(different(_10260,_10246)),not_different(_10272,_10244),{is_unit(_10260,_10272)}==>proven_neg(glythed(_10272,_10260))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',62)
- % Found positive trigger: pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444))))
- % body: compound(pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444))))),\+is_ftVar(pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444)))))*->rhs([{with_current_why(pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(glythed(_8428,_8430)),proven_not_neg(different(_8444,_8430)),not_different(_8456,_8428),{is_unit(_8444,_8456)}==>proven_neg(glythed(_8456,_8444)))))))}])
- % Found positive trigger: boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))))
- % body: compound(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476))))),\+is_ftVar(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))))*->rhs([{with_current_why(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(glythed(_6460,_6462)):-proven_not_neg(glythed(_6476,_6478)),proven_not_neg(different(_6462,_6478)),proven_neg(different(_6460,_6476)))))))}])
- % RHS-Post1: boxlog((different(_3640,_3646):-proven_tru(glythed(_3640,_3652)),proven_tru(glythed(_3646,_3658)),proven_tru(different(_3652,_3658))))
- % Support: clif(forall([_3364,_3370,_3376,_3382],=>(&(&(glythed(_3364,_3376),glythed(_3370,_3382)),different(_3376,_3382)),different(_3364,_3370)))),pt(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))),(is_kif_clause(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))*->rhs([{delistify_last_arg(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))),kif_to_boxlog,(different(_3640,_3646):-proven_tru(glythed(_3640,_3652)),proven_tru(glythed(_3646,_3658)),proven_tru(different(_3652,_3658))))},boxlog((different(_3640,_3646):-proven_tru(glythed(_3640,_3652)),proven_tru(glythed(_3646,_3658)),proven_tru(different(_3652,_3658))))])))
- % r_sane:mpred_fwc1(boxlog((different(_51046, _51048):-proven_tru(glythed(_51046, _51064)), proven_tru(glythed(_51048, _51080)), proven_tru(different(_51064, _51080))))).
- % Found positive trigger: boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062))))
- % body: compound(boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062))))),\+is_ftVar(boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062)))))*->rhs([{with_current_why(boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062)))),ignore(\+addAdmittedArguments(boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062)))))))}])
- % Found positive trigger: boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062))))}])
- % =boxlog=
- % different(_6028, _6030) :-
- % proven_tru(glythed(_6028, _6046)),
- % proven_tru(glythed(_6030, _6062)),
- % proven_tru(different(_6046, _6062)).
- % Found positive trigger: boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062))))
- % body: is_kif_clause(boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062)))))*->rhs([clif(boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062)))))])
- % Found positive trigger: boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062))))
- % body: delistify_last_arg((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062))),boxlog_to_pfc,_24454),must_be_unqualified(_24454)*->rhs([pfclog(_24454)])
- % RHS-Post1: pfclog((glythed(_6028,_6046),glythed(_6030,_6062),{dif:dif(_6046,_6062)},{is_unit(_6030,_6028)}==>different(_6028,_6030)))
- % Support: boxlog((different(_5788,_5790):-proven_tru(glythed(_5788,_5806)),proven_tru(glythed(_5790,_5822)),proven_tru(different(_5806,_5822)))),pt(boxlog((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062)))),(delistify_last_arg((different(_6028,_6030):-proven_tru(glythed(_6028,_6046)),proven_tru(glythed(_6030,_6062)),proven_tru(different(_6046,_6062))),boxlog_to_pfc,(glythed(_6028,_6046),glythed(_6030,_6062),{dif:dif(_6046,_6062)},{is_unit(_6030,_6028)}==>different(_6028,_6030))),must_be_unqualified((glythed(_6028,_6046),glythed(_6030,_6062),{dif:dif(_6046,_6062)},{is_unit(_6030,_6028)}==>different(_6028,_6030)))*->rhs([pfclog((glythed(_6028,_6046),glythed(_6030,_6062),{dif:dif(_6046,_6062)},{is_unit(_6030,_6028)}==>different(_6028,_6030)))])))
- % r_sane:mpred_fwc1(pfclog((glythed(_18720, _18722), glythed(_18732, _18734), {dif:dif(_18722, _18734)}, {is_unit(_18732, _18720)}==>different(_18720, _18732)))).
- % Found positive trigger: pfclog((glythed(_22196,_22198),glythed(_22208,_22210),{dif:dif(_22198,_22210)},{is_unit(_22208,_22196)}==>different(_22196,_22208)))
- % body: compound(pfclog((glythed(_22196,_22198),glythed(_22208,_22210),{dif:dif(_22198,_22210)},{is_unit(_22208,_22196)}==>different(_22196,_22208)))),\+is_ftVar(pfclog((glythed(_22196,_22198),glythed(_22208,_22210),{dif:dif(_22198,_22210)},{is_unit(_22208,_22196)}==>different(_22196,_22208))))*->rhs([{with_current_why(pfclog((glythed(_22196,_22198),glythed(_22208,_22210),{dif:dif(_22198,_22210)},{is_unit(_22208,_22196)}==>different(_22196,_22208))),ignore(\+addAdmittedArguments(pfclog((glythed(_22196,_22198),glythed(_22208,_22210),{dif:dif(_22198,_22210)},{is_unit(_22208,_22196)}==>different(_22196,_22208))))))}])
- % Found positive trigger: pfclog((glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962)))}])
- % =pfclog=
- % glythed(_7950, _7952), glythed(_7962, _7964), {dif:dif(_7952, _7964)}, {is_unit(_7962, _7950)}==>different(_7950, _7962).
- % Found positive trigger: pfclog((glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962)))
- % body: is_kif_clause(pfclog((glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962))))*->rhs([clif(pfclog((glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962))))])
- % Found positive trigger: pfclog((glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962)))
- % body: rhs([(glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962))])
- % RHS-Post1: glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962)
- % Support: pfclog((glythed(_7682,_7684),glythed(_7694,_7696),{dif:dif(_7684,_7696)},{is_unit(_7694,_7682)}==>different(_7682,_7694))),pt(pfclog((glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962))),rhs([(glythed(_7950,_7952),glythed(_7962,_7964),{dif:dif(_7952,_7964)},{is_unit(_7962,_7950)}==>different(_7950,_7962))]))
- % r_sane:mpred_fwc1((glythed(_44914, _44916), glythed(_44926, _44928), {dif:dif(_44916, _44928)}, {is_unit(_44926, _44914)}==>different(_44914, _44926))).
- % Adding positive
- % trigger: glythed(_9432,_9434)
- % body: pt(glythed(_9444,_9446),(dif:dif(_9434,_9446)*->is_unit(_9444,_9432)*->rhs([different(_9432,_9444)])))
- % Support: (glythed(_9706,_9708),glythed(_9718,_9720),{dif:dif(_9708,_9720)},{is_unit(_9718,_9706)}==>different(_9706,_9718)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',62)
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("1",_9446)*->is_unit(_9444,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_9444)])
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_16030,_16032),pt(glythed(_16042,_16044),(dif:dif(_16032,_16044)*->is_unit(_16042,_16030)*->rhs([different(_16030,_16042)]))))
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_25040,_25042),(dif:dif("1",_25042)*->is_unit(_25040,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_25040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_1FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_1FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_1FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_1FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_1FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_1FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_1FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_1FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_1FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_1FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_2FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_2FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_2FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_2FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_2FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_2FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_2FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_2FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_2FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_2FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_3FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_3FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_3FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_3FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_3FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_3FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_3FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_3FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_3FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_3FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_4FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_4FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_4FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_4FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_4FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_4FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_4FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_4FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_4FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_4FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_5FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_5FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_5FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_5FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_5FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_5FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_5FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_5FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_5FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_5FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_6FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_6FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_6FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_6FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_6FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_6FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_6FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_6FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_6FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_6FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_7FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_7FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_7FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_7FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_7FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_7FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_7FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_7FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_7FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_7FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_8FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_8FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_8FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_8FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_8FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_8FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_8FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_8FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_8FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_8FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_9FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_9FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_9FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_9FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_9FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_9FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_9FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_9FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_9FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_9FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_10FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_10FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_10FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_10FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_10FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_10FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_10FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_10FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_10FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_10FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_11FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_11FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_11FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_11FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_11FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_11FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_11FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_11FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_11FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_11FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_12FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_12FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_12FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_12FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_12FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_12FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_12FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_12FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_12FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_12FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_10858,_10860),(dif:dif("1",_10860)*->is_unit(_10858,skExistsGlythed_0FnSk)*->rhs([different(skExistsGlythed_0FnSk,_10858)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_0FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_13FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_13FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_13FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_13FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_13FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_13FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_13FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_13FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_13FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_13FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_0FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("2",_9446)*->is_unit(_9444,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_9444)])
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_34106,_34108),(dif:dif("2",_34108)*->is_unit(_34106,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_34106)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(different, 2, skExistsGlythed_0FnSk)).
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_0FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_0FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_0FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_0FnSk)
- % body: is_kif_clause(admittedArgument(different,2,skExistsGlythed_0FnSk))*->rhs([clif(admittedArgument(different,2,skExistsGlythed_0FnSk))])
- % Found positive trigger: admittedArgument(different,2,skExistsGlythed_0FnSk)
- % body: compound(admittedArgument(different,2,skExistsGlythed_0FnSk)),\+is_ftVar(admittedArgument(different,2,skExistsGlythed_0FnSk))*->rhs([{with_current_why(admittedArgument(different,2,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(admittedArgument(different,2,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_10886,_10888),(dif:dif("2",_10888)*->is_unit(_10886,skExistsGlythed_1FnSk)*->rhs([different(skExistsGlythed_1FnSk,_10886)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_1FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_1FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("3",_9446)*->is_unit(_9444,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_9444)])
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_36128,_36130),(dif:dif("3",_36130)*->is_unit(_36128,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_36128)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_10914,_10916),(dif:dif("3",_10916)*->is_unit(_10914,skExistsGlythed_2FnSk)*->rhs([different(skExistsGlythed_2FnSk,_10914)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_2FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_2FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("4",_9446)*->is_unit(_9444,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_9444)])
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_10942,_10944),(dif:dif("4",_10944)*->is_unit(_10942,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10942)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_10928,_10930),(dif:dif("4",_10930)*->is_unit(_10928,skExistsGlythed_3FnSk)*->rhs([different(skExistsGlythed_3FnSk,_10928)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_3FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_3FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("5",_9446)*->is_unit(_9444,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_9444)])
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_16714,_16716),(dif:dif("5",_16716)*->is_unit(_16714,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_16714)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_10962,_10964),(dif:dif("5",_10964)*->is_unit(_10962,skExistsGlythed_4FnSk)*->rhs([different(skExistsGlythed_4FnSk,_10962)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_4FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_4FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("6",_9446)*->is_unit(_9444,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_9444)])
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_10998,_11000),(dif:dif("6",_11000)*->is_unit(_10998,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10998)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_10984,_10986),(dif:dif("6",_10986)*->is_unit(_10984,skExistsGlythed_5FnSk)*->rhs([different(skExistsGlythed_5FnSk,_10984)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_5FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_5FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("7",_9446)*->is_unit(_9444,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_9444)])
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_16770,_16772),(dif:dif("7",_16772)*->is_unit(_16770,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_16770)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_11018,_11020),(dif:dif("7",_11020)*->is_unit(_11018,skExistsGlythed_6FnSk)*->rhs([different(skExistsGlythed_6FnSk,_11018)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_6FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_6FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("8",_9446)*->is_unit(_9444,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_9444)])
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_11054,_11056),(dif:dif("8",_11056)*->is_unit(_11054,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11054)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_11040,_11042),(dif:dif("8",_11042)*->is_unit(_11040,skExistsGlythed_7FnSk)*->rhs([different(skExistsGlythed_7FnSk,_11040)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_7FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_7FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("9",_9446)*->is_unit(_9444,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_9444)])
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_16826,_16828),(dif:dif("9",_16828)*->is_unit(_16826,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_16826)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_11074,_11076),(dif:dif("9",_11076)*->is_unit(_11074,skExistsGlythed_8FnSk)*->rhs([different(skExistsGlythed_8FnSk,_11074)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_8FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_8FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("0",_9446)*->is_unit(_9444,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_9444)])
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_11110,_11112),(dif:dif("0",_11112)*->is_unit(_11110,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11110)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_11096,_11098),(dif:dif("0",_11098)*->is_unit(_11096,skExistsGlythed_9FnSk)*->rhs([different(skExistsGlythed_9FnSk,_11096)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_9FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_9FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("+",_9446)*->is_unit(_9444,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_9444)])
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_16884,_16886),(dif:dif("+",_16886)*->is_unit(_16884,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_16884)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_11130,_11132),(dif:dif("+",_11132)*->is_unit(_11130,skExistsGlythed_10FnSk)*->rhs([different(skExistsGlythed_10FnSk,_11130)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_10FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_10FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("-",_9446)*->is_unit(_9444,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_9444)])
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_11166,_11168),(dif:dif("-",_11168)*->is_unit(_11166,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11166)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_12FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_11152,_11154),(dif:dif("-",_11154)*->is_unit(_11152,skExistsGlythed_11FnSk)*->rhs([different(skExistsGlythed_11FnSk,_11152)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_11FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_11FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("=",_9446)*->is_unit(_9444,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_9444)])
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_16940,_16942),(dif:dif("=",_16942)*->is_unit(_16940,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_16940)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk)
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_11186,_11188),(dif:dif("=",_11188)*->is_unit(_11186,skExistsGlythed_12FnSk)*->rhs([different(skExistsGlythed_12FnSk,_11186)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_12FnSk, skExistsGlythed_13FnSk)).
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk)
- % body: is_kif_clause(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk))*->rhs([clif(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk))])
- % Found positive trigger: different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk)
- % body: compound(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk)),\+is_ftVar(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk))*->rhs([{with_current_why(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_12FnSk,skExistsGlythed_13FnSk))))}])
- % Adding positive
- % trigger: glythed(_9444,_9446)
- % body: dif:dif("CLR",_9446)*->is_unit(_9444,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_9444)])
- % Support: glythed(skExistsGlythed_13FnSk,"CLR"),pt(glythed(_10370,_10372),pt(glythed(_10382,_10384),(dif:dif(_10372,_10384)*->is_unit(_10382,_10370)*->rhs([different(_10370,_10382)]))))
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk)
- % Support: glythed(skExistsGlythed_0FnSk,"1"),pt(glythed(_11222,_11224),(dif:dif("CLR",_11224)*->is_unit(_11222,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11222)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_0FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_0FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk)
- % Support: glythed(skExistsGlythed_1FnSk,"2"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_1FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_1FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk)
- % Support: glythed(skExistsGlythed_2FnSk,"3"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_2FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_2FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk)
- % Support: glythed(skExistsGlythed_3FnSk,"4"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_3FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_3FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk)
- % Support: glythed(skExistsGlythed_4FnSk,"5"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_4FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_4FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk)
- % Support: glythed(skExistsGlythed_5FnSk,"6"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_5FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_5FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk)
- % Support: glythed(skExistsGlythed_6FnSk,"7"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_6FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_6FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk)
- % Support: glythed(skExistsGlythed_7FnSk,"8"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_7FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_7FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk)
- % Support: glythed(skExistsGlythed_8FnSk,"9"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_8FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_8FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk)
- % Support: glythed(skExistsGlythed_9FnSk,"0"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_9FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_9FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk)
- % Support: glythed(skExistsGlythed_10FnSk,"+"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_10FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_10FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk)
- % Support: glythed(skExistsGlythed_11FnSk,"-"),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_11FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_11FnSk))))}])
- % RHS-Post1: different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk)
- % Support: glythed(skExistsGlythed_12FnSk,"="),pt(glythed(_11208,_11210),(dif:dif("CLR",_11210)*->is_unit(_11208,skExistsGlythed_13FnSk)*->rhs([different(skExistsGlythed_13FnSk,_11208)])))
- % r_sane:mpred_fwc1(different(skExistsGlythed_13FnSk, skExistsGlythed_12FnSk)).
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk))))}])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk)
- % body: is_kif_clause(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk))*->rhs([clif(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk))])
- % Found positive trigger: different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk)
- % body: compound(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk)),\+is_ftVar(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk))*->rhs([{with_current_why(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk),ignore(\+addAdmittedArguments(different(skExistsGlythed_13FnSk,skExistsGlythed_12FnSk))))}])
- % gripe_CPUTIME(true, warn(2.0074304230000024>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, (glythed(_7918, _7920), glythed(_7930, _7932), {dif:dif(_7920, _7932)}, {is_unit(_7930, _7918)}==>different(_7918, _7930)), (pfclog((glythed(_7650, _7652), glythed(_7662, _7664), {dif:dif(_7652, _7664)}, {is_unit(_7662, _7650)}==>different(_7650, _7662))), pt(pfclog((glythed(_7918, _7920), glythed(_7930, _7932), {dif:dif(_7920, _7932)}, {is_unit(_7930, _7918)}==>different(_7918, _7930))), rhs([(glythed(_7918, _7920), glythed(_7930, _7932), {dif:dif(_7920, _7932)}, {is_unit(_7930, _7918)}==>different(_7918, _7930))]))), none))).
- % Found positive trigger: pfclog((glythed(_7918,_7920),glythed(_7930,_7932),{dif:dif(_7920,_7932)},{is_unit(_7930,_7918)}==>different(_7918,_7930)))
- % body: compound(pfclog((glythed(_7918,_7920),glythed(_7930,_7932),{dif:dif(_7920,_7932)},{is_unit(_7930,_7918)}==>different(_7918,_7930)))),\+is_ftVar(pfclog((glythed(_7918,_7920),glythed(_7930,_7932),{dif:dif(_7920,_7932)},{is_unit(_7930,_7918)}==>different(_7918,_7930))))*->rhs([{with_current_why(pfclog((glythed(_7918,_7920),glythed(_7930,_7932),{dif:dif(_7920,_7932)},{is_unit(_7930,_7918)}==>different(_7918,_7930))),ignore(\+addAdmittedArguments(pfclog((glythed(_7918,_7920),glythed(_7930,_7932),{dif:dif(_7920,_7932)},{is_unit(_7930,_7918)}==>different(_7918,_7930))))))}])
- % gripe_CPUTIME(true, warn(2.0230437949999995>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, pfclog((glythed(_5996, _6014), glythed(_5998, _6030), {dif:dif(_6014, _6030)}, {is_unit(_5998, _5996)}==>different(_5996, _5998))), (boxlog((different(_5756, _5758):-proven_tru(glythed(_5756, _5774)), proven_tru(glythed(_5758, _5790)), proven_tru(different(_5774, _5790)))), pt(boxlog((different(_5996, _5998):-proven_tru(glythed(_5996, _6014)), proven_tru(glythed(_5998, _6030)), proven_tru(different(_6014, _6030)))), (delistify_last_arg((different(_5996, _5998):-proven_tru(glythed(_5996, _6014)), proven_tru(glythed(_5998, _6030)), proven_tru(different(_6014, _6030))), boxlog_to_pfc, (glythed(_5996, _6014), glythed(_5998, _6030), {dif:dif(_6014, _6030)}, {is_unit(_5998, _5996)}==>different(_5996, _5998))), must_be_unqualified((glythed(_5996, _6014), glythed(_5998, _6030), {dif:dif(_6014, _6030)}, {is_unit(_5998, _5996)}==>different(_5996, _5998)))*->rhs([pfclog((glythed(_5996, _6014), glythed(_5998, _6030), {dif:dif(_6014, _6030)}, {is_unit(_5998, _5996)}==>different(_5996, _5998)))])))), none))).
- % Found positive trigger: boxlog((different(_5996,_5998):-proven_tru(glythed(_5996,_6014)),proven_tru(glythed(_5998,_6030)),proven_tru(different(_6014,_6030))))
- % body: compound(boxlog((different(_5996,_5998):-proven_tru(glythed(_5996,_6014)),proven_tru(glythed(_5998,_6030)),proven_tru(different(_6014,_6030))))),\+is_ftVar(boxlog((different(_5996,_5998):-proven_tru(glythed(_5996,_6014)),proven_tru(glythed(_5998,_6030)),proven_tru(different(_6014,_6030)))))*->rhs([{with_current_why(boxlog((different(_5996,_5998):-proven_tru(glythed(_5996,_6014)),proven_tru(glythed(_5998,_6030)),proven_tru(different(_6014,_6030)))),ignore(\+addAdmittedArguments(boxlog((different(_5996,_5998):-proven_tru(glythed(_5996,_6014)),proven_tru(glythed(_5998,_6030)),proven_tru(different(_6014,_6030)))))))}])
- % gripe_CPUTIME(true, warn(2.040313695000002>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, boxlog((different(_3640, _3646):-proven_tru(glythed(_3640, _3652)), proven_tru(glythed(_3646, _3658)), proven_tru(different(_3652, _3658)))), (clif(forall([_3364, _3370, _3376, _3382], =>(&(&(glythed(_3364, _3376), glythed(_3370, _3382)), different(_3376, _3382)), different(_3364, _3370)))), pt(clif(forall([_3640, _3646, _3652, _3658], =>(&(&(glythed(_3640, _3652), glythed(_3646, _3658)), different(_3652, _3658)), different(_3640, _3646)))), (is_kif_clause(forall([_3640, _3646, _3652, _3658], =>(&(&(glythed(_3640, _3652), glythed(_3646, _3658)), different(_3652, _3658)), different(_3640, _3646))))*->rhs([{delistify_last_arg(forall([_3640, _3646, _3652, _3658], =>(&(&(glythed(_3640, _3652), glythed(_3646, _3658)), different(_3652, _3658)), different(_3640, _3646))), kif_to_boxlog, (different(_3640, _3646):-proven_tru(glythed(_3640, _3652)), proven_tru(glythed(_3646, _3658)), proven_tru(different(_3652, _3658))))}, boxlog((different(_3640, _3646):-proven_tru(glythed(_3640, _3652)), proven_tru(glythed(_3646, _3658)), proven_tru(different(_3652, _3658))))])))), none))).
- % Found positive trigger: clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))
- % body: compound(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646))))),\+is_ftVar(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))))*->rhs([{with_current_why(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))),ignore(\+addAdmittedArguments(clif(forall([_3640,_3646,_3652,_3658],=>(&(&(glythed(_3640,_3652),glythed(_3646,_3658)),different(_3652,_3658)),different(_3640,_3646)))))))}])
- % gripe_CPUTIME(true, warn(2.2820229869999977>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, clif(forall([_1776, _1782, _1788, _1794], =>(&(&(glythed(_1776, _1788), glythed(_1782, _1794)), different(_1788, _1794)), different(_1776, _1782)))), (forall([_1508, _1514, _1520, _1526], =>(&(&(glythed(_1508, _1520), glythed(_1514, _1526)), different(_1520, _1526)), different(_1508, _1514))), pt(forall([_1776, _1782, _1788, _1794], =>(&(&(glythed(_1776, _1788), glythed(_1782, _1794)), different(_1788, _1794)), different(_1776, _1782))), (is_kif_clause(forall([_1776, _1782, _1788, _1794], =>(&(&(glythed(_1776, _1788), glythed(_1782, _1794)), different(_1788, _1794)), different(_1776, _1782))))*->rhs([clif(forall([_1776, _1782, _1788, _1794], =>(&(&(glythed(_1776, _1788), glythed(_1782, _1794)), different(_1788, _1794)), different(_1776, _1782))))])))), none))).
- % Found positive trigger: forall([_1776,_1782,_1788,_1794],=>(&(&(glythed(_1776,_1788),glythed(_1782,_1794)),different(_1788,_1794)),different(_1776,_1782)))
- % body: compound(forall([_1776,_1782,_1788,_1794],=>(&(&(glythed(_1776,_1788),glythed(_1782,_1794)),different(_1788,_1794)),different(_1776,_1782)))),\+is_ftVar(forall([_1776,_1782,_1788,_1794],=>(&(&(glythed(_1776,_1788),glythed(_1782,_1794)),different(_1788,_1794)),different(_1776,_1782))))*->rhs([{with_current_why(forall([_1776,_1782,_1788,_1794],=>(&(&(glythed(_1776,_1788),glythed(_1782,_1794)),different(_1788,_1794)),different(_1776,_1782))),ignore(\+addAdmittedArguments(forall([_1776,_1782,_1788,_1794],=>(&(&(glythed(_1776,_1788),glythed(_1782,_1794)),different(_1788,_1794)),different(_1776,_1782))))))}])
- % gripe_CPUTIME(true, warn(2.294963213999999>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, forall([Key1, Key2, Label1, Label2], =>(&(&(glythed(Key1, Label1), glythed(Key2, Label2)), different(Label1, Label2)), different(Key1, Key2))), (mfl(header_sane, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc', 62), ax), none))).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:66
- % r_sane:mpred_fwc1(forall([_36950, _36956], =>(same(_36950, _36956), ~different(_36950, _36956)))).
- % Found positive trigger: forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484)))
- % body: compound(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484)))),\+is_ftVar(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))))*->rhs([{with_current_why(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))),ignore(\+addAdmittedArguments(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))))))}])
- % Found positive trigger: forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484)))
- % body: is_kif_clause(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))))*->rhs([clif(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))))])
- % RHS-Post1: clif(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))))
- % Support: forall([_1282,_1288],=>(same(_1282,_1288),~different(_1282,_1288))),pt(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))),(is_kif_clause(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))))*->rhs([clif(forall([_1478,_1484],=>(same(_1478,_1484),~different(_1478,_1484))))])))
- % r_sane:mpred_fwc1(clif(forall([_19588, _19594], =>(same(_19588, _19594), ~different(_19588, _19594))))).
- % Found positive trigger: clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))
- % body: compound(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))),\+is_ftVar(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))))*->rhs([{with_current_why(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))),ignore(\+addAdmittedArguments(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))))))}])
- % Found positive trigger: clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))}])
- % =clif=
- % forall([_2892, _2898], =>(same(_2892, _2898), ~different(_2892, _2898))).
- % Found positive trigger: clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))
- % body: is_kif_clause(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))))*->rhs([clif(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))))])
- % Found positive trigger: clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))
- % body: \+is_kif_clause(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))*->rhs([{delistify_last_arg(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))),kif_to_boxlog,_3184)},boxlog(_3184)])
- % Found positive trigger: clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))
- % body: is_kif_clause(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))*->rhs([{delistify_last_arg(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))),kif_to_boxlog,_6346)},boxlog(_6346)])
- % kif :-
- % all([_2892, _2898], =>(same(_2892, _2898), ~different(_2892, _2898))).
- % qualify_nesc :-
- % all([_2892, _2898], nesc(=>(same(_2892, _2898), ~different(_2892, _2898)))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_2892, all(_2898, nesc(b_d(KB, nesc, poss), =>(same(_2892, _2898), ~different(_2892, _2898))))), nesc(b_d(KB, nesc, poss), v(~same(_2892, _2898), ~different(_2892, _2898)))))).
- % nnf :-
- % nesc(v(~same(_2892, _2898), ~different(_2892, _2898))).
- % th_nnf_in :-
- % ( neg(same(_2892, _2898))
- % ; neg(different(_2892, _2898))
- % ).
- % th_nnf_out :-
- % ~ (n(neg(same(_2892, _2898))), n(neg(different(_2892, _2898)))).
- % RHS-Post1: boxlog((proven_neg(different(_2892,_2898)):-proven_not_neg(same(_2892,_2898))))
- % Support: clif(forall([_2688,_2694],=>(same(_2688,_2694),~different(_2688,_2694)))),pt(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))),(is_kif_clause(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))*->rhs([{delistify_last_arg(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))),kif_to_boxlog,(proven_neg(different(_2892,_2898)):-proven_not_neg(same(_2892,_2898))))},boxlog((proven_neg(different(_2892,_2898)):-proven_not_neg(same(_2892,_2898))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(different(_12760, _12762)):-proven_not_neg(same(_12760, _12762))))).
- % Found positive trigger: boxlog((proven_neg(different(_15450,_15452)):-proven_not_neg(same(_15450,_15452))))
- % body: compound(boxlog((proven_neg(different(_15450,_15452)):-proven_not_neg(same(_15450,_15452))))),\+is_ftVar(boxlog((proven_neg(different(_15450,_15452)):-proven_not_neg(same(_15450,_15452)))))*->rhs([{with_current_why(boxlog((proven_neg(different(_15450,_15452)):-proven_not_neg(same(_15450,_15452)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(different(_15450,_15452)):-proven_not_neg(same(_15450,_15452)))))))}])
- % Found positive trigger: boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658))))}])
- % =boxlog=
- % proven_neg(different(_4656, _4658)) :-
- % proven_not_neg(same(_4656, _4658)).
- % Found positive trigger: boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658))))
- % body: is_kif_clause(boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658)))))*->rhs([clif(boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658)))))])
- % Found positive trigger: boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658))))
- % body: delistify_last_arg((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658))),boxlog_to_pfc,_15314),must_be_unqualified(_15314)*->rhs([pfclog(_15314)])
- % RHS-Post1: pfclog((proven_not_neg(same(_4656,_4658)),{is_unit(_4658,_4656)}==>proven_neg(different(_4656,_4658))))
- % Support: boxlog((proven_neg(different(_4480,_4482)):-proven_not_neg(same(_4480,_4482)))),pt(boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658)))),(delistify_last_arg((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658))),boxlog_to_pfc,(proven_not_neg(same(_4656,_4658)),{is_unit(_4658,_4656)}==>proven_neg(different(_4656,_4658)))),must_be_unqualified((proven_not_neg(same(_4656,_4658)),{is_unit(_4658,_4656)}==>proven_neg(different(_4656,_4658))))*->rhs([pfclog((proven_not_neg(same(_4656,_4658)),{is_unit(_4658,_4656)}==>proven_neg(different(_4656,_4658))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(same(_15658, _15660)), {is_unit(_15660, _15658)}==>proven_neg(different(_15658, _15660))))).
- % Found positive trigger: pfclog((proven_not_neg(same(_18794,_18796)),{is_unit(_18796,_18794)}==>proven_neg(different(_18794,_18796))))
- % body: compound(pfclog((proven_not_neg(same(_18794,_18796)),{is_unit(_18796,_18794)}==>proven_neg(different(_18794,_18796))))),\+is_ftVar(pfclog((proven_not_neg(same(_18794,_18796)),{is_unit(_18796,_18794)}==>proven_neg(different(_18794,_18796)))))*->rhs([{with_current_why(pfclog((proven_not_neg(same(_18794,_18796)),{is_unit(_18796,_18794)}==>proven_neg(different(_18794,_18796)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(same(_18794,_18796)),{is_unit(_18796,_18794)}==>proven_neg(different(_18794,_18796)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154))))}])
- % =pfclog=
- % proven_not_neg(same(_6152, _6154)), {is_unit(_6154, _6152)}==>proven_neg(different(_6152, _6154)).
- % Found positive trigger: pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154))))
- % body: is_kif_clause(pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154)))))*->rhs([clif(pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154)))))])
- % Found positive trigger: pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154))))
- % body: rhs([(proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154)))])
- % RHS-Post1: proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154))
- % Support: pfclog((proven_not_neg(same(_5944,_5946)),{is_unit(_5946,_5944)}==>proven_neg(different(_5944,_5946)))),pt(pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154)))),rhs([(proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154)))]))
- % r_sane:mpred_fwc1((proven_not_neg(same(_37478, _37480)), {is_unit(_37480, _37478)}==>proven_neg(different(_37478, _37480)))).
- % Adding positive
- % trigger: proven_not_neg(same(_7366,_7368))
- % body: is_unit(_7368,_7366)*->rhs([proven_neg(different(_7366,_7368))])
- % Support: (proven_not_neg(same(_7580,_7582)),{is_unit(_7582,_7580)}==>proven_neg(different(_7580,_7582))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',66)
- % Found positive trigger: pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154))))
- % body: compound(pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154))))),\+is_ftVar(pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154)))))*->rhs([{with_current_why(pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(same(_6152,_6154)),{is_unit(_6154,_6152)}==>proven_neg(different(_6152,_6154)))))))}])
- % Found positive trigger: boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658))))
- % body: compound(boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658))))),\+is_ftVar(boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658)))))*->rhs([{with_current_why(boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(different(_4656,_4658)):-proven_not_neg(same(_4656,_4658)))))))}])
- % RHS-Post1: boxlog((proven_neg(same(_2892,_2898)):-proven_not_neg(different(_2892,_2898))))
- % Support: clif(forall([_2688,_2694],=>(same(_2688,_2694),~different(_2688,_2694)))),pt(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))),(is_kif_clause(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))*->rhs([{delistify_last_arg(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))),kif_to_boxlog,(proven_neg(same(_2892,_2898)):-proven_not_neg(different(_2892,_2898))))},boxlog((proven_neg(same(_2892,_2898)):-proven_not_neg(different(_2892,_2898))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(same(_41296, _41298)):-proven_not_neg(different(_41296, _41298))))).
- % Found positive trigger: boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))))
- % body: compound(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))))),\+is_ftVar(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))))*->rhs([{with_current_why(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))))))}])
- % Found positive trigger: boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))))}])
- % =boxlog=
- % proven_neg(same(_4548, _4550)) :-
- % proven_not_neg(different(_4548, _4550)).
- % Found positive trigger: boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))))
- % body: is_kif_clause(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))))*->rhs([clif(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))))])
- % Found positive trigger: boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))))
- % body: delistify_last_arg((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))),boxlog_to_pfc,_20444),must_be_unqualified(_20444)*->rhs([pfclog(_20444)])
- % RHS-Post1: pfclog((proven_not_neg(different(_4548,_4550)),{is_unit(_4550,_4548)}==>proven_neg(same(_4548,_4550))))
- % Support: boxlog((proven_neg(same(_4372,_4374)):-proven_not_neg(different(_4372,_4374)))),pt(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))),(delistify_last_arg((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))),boxlog_to_pfc,(proven_not_neg(different(_4548,_4550)),{is_unit(_4550,_4548)}==>proven_neg(same(_4548,_4550)))),must_be_unqualified((proven_not_neg(different(_4548,_4550)),{is_unit(_4550,_4548)}==>proven_neg(same(_4548,_4550))))*->rhs([pfclog((proven_not_neg(different(_4548,_4550)),{is_unit(_4550,_4548)}==>proven_neg(same(_4548,_4550))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(different(_15556, _15558)), {is_unit(_15558, _15556)}==>proven_neg(same(_15556, _15558))))).
- % Found positive trigger: pfclog((proven_not_neg(different(_18692,_18694)),{is_unit(_18694,_18692)}==>proven_neg(same(_18692,_18694))))
- % body: compound(pfclog((proven_not_neg(different(_18692,_18694)),{is_unit(_18694,_18692)}==>proven_neg(same(_18692,_18694))))),\+is_ftVar(pfclog((proven_not_neg(different(_18692,_18694)),{is_unit(_18694,_18692)}==>proven_neg(same(_18692,_18694)))))*->rhs([{with_current_why(pfclog((proven_not_neg(different(_18692,_18694)),{is_unit(_18694,_18692)}==>proven_neg(same(_18692,_18694)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(different(_18692,_18694)),{is_unit(_18694,_18692)}==>proven_neg(same(_18692,_18694)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046))))}])
- % =pfclog=
- % proven_not_neg(different(_6044, _6046)), {is_unit(_6046, _6044)}==>proven_neg(same(_6044, _6046)).
- % Found positive trigger: pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046))))
- % body: is_kif_clause(pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046)))))*->rhs([clif(pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046)))))])
- % Found positive trigger: pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046))))
- % body: rhs([(proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046)))])
- % RHS-Post1: proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046))
- % Support: pfclog((proven_not_neg(different(_5836,_5838)),{is_unit(_5838,_5836)}==>proven_neg(same(_5836,_5838)))),pt(pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046)))),rhs([(proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046)))]))
- % r_sane:mpred_fwc1((proven_not_neg(different(_37376, _37378)), {is_unit(_37378, _37376)}==>proven_neg(same(_37376, _37378)))).
- % Adding positive
- % trigger: proven_not_neg(different(_7258,_7260))
- % body: is_unit(_7260,_7258)*->rhs([proven_neg(same(_7258,_7260))])
- % Support: (proven_not_neg(different(_7472,_7474)),{is_unit(_7474,_7472)}==>proven_neg(same(_7472,_7474))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',66)
- % Found positive trigger: pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046))))
- % body: compound(pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046))))),\+is_ftVar(pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046)))))*->rhs([{with_current_why(pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(different(_6044,_6046)),{is_unit(_6046,_6044)}==>proven_neg(same(_6044,_6046)))))))}])
- % Found positive trigger: boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))))
- % body: compound(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550))))),\+is_ftVar(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))))*->rhs([{with_current_why(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(same(_4548,_4550)):-proven_not_neg(different(_4548,_4550)))))))}])
- % Found positive trigger: clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))
- % body: compound(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898))))),\+is_ftVar(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))))*->rhs([{with_current_why(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))),ignore(\+addAdmittedArguments(clif(forall([_2892,_2898],=>(same(_2892,_2898),~different(_2892,_2898)))))))}])
- % Found positive trigger: forall([_1460,_1466],=>(same(_1460,_1466),~different(_1460,_1466)))
- % body: compound(forall([_1460,_1466],=>(same(_1460,_1466),~different(_1460,_1466)))),\+is_ftVar(forall([_1460,_1466],=>(same(_1460,_1466),~different(_1460,_1466))))*->rhs([{with_current_why(forall([_1460,_1466],=>(same(_1460,_1466),~different(_1460,_1466))),ignore(\+addAdmittedArguments(forall([_1460,_1466],=>(same(_1460,_1466),~different(_1460,_1466))))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:69
- % r_sane:mpred_fwc1(=>(&(subclass(_11546, _11548), inst(_11552, _11546)), inst(_11552, _11548))).
- % Found positive trigger: =>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456))
- % body: compound(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456))),\+is_ftVar(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)))*->rhs([{with_current_why(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)),ignore(\+addAdmittedArguments(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)))))}])
- % Found positive trigger: =>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456))
- % body: is_kif_clause(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)))*->rhs([clif(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)))])
- % RHS-Post1: clif(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)))
- % Support: =>(&(subclass(_1274,_1276),inst(_1280,_1274)),inst(_1280,_1276)),pt(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)),(is_kif_clause(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)))*->rhs([clif(=>(&(subclass(_1454,_1456),inst(_1460,_1454)),inst(_1460,_1456)))])))
- % r_sane:mpred_fwc1(clif(=>(&(subclass(_18340, _18342), inst(_18346, _18340)), inst(_18346, _18342)))).
- % Found positive trigger: clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))
- % body: compound(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))),\+is_ftVar(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))))*->rhs([{with_current_why(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))),ignore(\+addAdmittedArguments(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))))))}])
- % Found positive trigger: clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))}])
- % =clif=
- % =>(&(subclass(_2778, _2780), inst(_2784, _2778)), inst(_2784, _2780)).
- % Found positive trigger: clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))
- % body: is_kif_clause(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))))*->rhs([clif(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))))])
- % Found positive trigger: clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))
- % body: \+is_kif_clause(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))*->rhs([{delistify_last_arg(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)),kif_to_boxlog,_3042)},boxlog(_3042)])
- % Found positive trigger: clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))
- % body: is_kif_clause(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))*->rhs([{delistify_last_arg(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)),kif_to_boxlog,_5368)},boxlog(_5368)])
- % kif :-
- % all(_2778,
- % all(_2784,
- % all(_2780,
- % =>(&(genls(_2778, _2780), inst(_2784, _2778)), inst(_2784, _2780))))).
- % qualify_nesc :-
- % all(_2778,
- % all(_2784,
- % all(_2780,
- % nesc(=>(&(genls(_2778, _2780), inst(_2784, _2778)), inst(_2784, _2780)))))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_2778, all(_2784, all(_2780, nesc(b_d(KB, nesc, poss), =>(&(genls(_2778, _2780), inst(_2784, _2778)), inst(_2784, _2780)))))), nesc(b_d(KB, nesc, poss), v(v(~genls(_2778, _2780), ~inst(_2784, _2778)), inst(_2784, _2780)))))).
- % nnf :-
- % nesc(v(v(~genls(_2778, _2780), ~inst(_2784, _2778)), inst(_2784, _2780))).
- % th_nnf_in :-
- % ( ( neg(genls(_2778, _2780))
- % ; neg(inst(_2784, _2778))
- % )
- % ; tru(inst(_2784, _2780))
- % ).
- % th_nnf_out :-
- % ~ ((n(neg(genls(_2778, _2780))), n(neg(inst(_2784, _2778)))), n(tru(inst(_2784, _2780)))).
- % RHS-Post1: boxlog((proven_neg(inst(_2784,_2778)):-proven_not_neg(genls(_2778,_2780)),proven_neg(inst(_2784,_2780))))
- % Support: clif(=>(&(subclass(_2590,_2592),inst(_2596,_2590)),inst(_2596,_2592))),pt(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))),(is_kif_clause(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))*->rhs([{delistify_last_arg(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)),kif_to_boxlog,(proven_neg(inst(_2784,_2778)):-proven_not_neg(genls(_2778,_2780)),proven_neg(inst(_2784,_2780))))},boxlog((proven_neg(inst(_2784,_2778)):-proven_not_neg(genls(_2778,_2780)),proven_neg(inst(_2784,_2780))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(inst(_13416, _13418)):-proven_not_neg(genls(_13418, _13434)), proven_neg(inst(_13416, _13434))))).
- % Found positive trigger: boxlog((proven_neg(inst(_16348,_16350)):-proven_not_neg(genls(_16350,_16366)),proven_neg(inst(_16348,_16366))))
- % body: compound(boxlog((proven_neg(inst(_16348,_16350)):-proven_not_neg(genls(_16350,_16366)),proven_neg(inst(_16348,_16366))))),\+is_ftVar(boxlog((proven_neg(inst(_16348,_16350)):-proven_not_neg(genls(_16350,_16366)),proven_neg(inst(_16348,_16366)))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_16348,_16350)):-proven_not_neg(genls(_16350,_16366)),proven_neg(inst(_16348,_16366)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_16348,_16350)):-proven_not_neg(genls(_16350,_16366)),proven_neg(inst(_16348,_16366)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794))))}])
- % =boxlog=
- % proven_neg(inst(_4776, _4778)) :-
- % proven_not_neg(genls(_4778, _4794)),
- % proven_neg(inst(_4776, _4794)).
- % Found positive trigger: boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794))))
- % body: is_kif_clause(boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794)))))*->rhs([clif(boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794)))))])
- % Found positive trigger: boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794))))
- % body: delistify_last_arg((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794))),boxlog_to_pfc,_16372),must_be_unqualified(_16372)*->rhs([pfclog(_16372)])
- % RHS-Post1: pfclog((proven_not_neg(genls(_4778,_4794)),~inst(_4776,_4794),{is_unit(_4778,_4776)}==>proven_neg(inst(_4776,_4778))))
- % Support: boxlog((proven_neg(inst(_4564,_4566)):-proven_not_neg(genls(_4566,_4582)),proven_neg(inst(_4564,_4582)))),pt(boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794)))),(delistify_last_arg((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794))),boxlog_to_pfc,(proven_not_neg(genls(_4778,_4794)),~inst(_4776,_4794),{is_unit(_4778,_4776)}==>proven_neg(inst(_4776,_4778)))),must_be_unqualified((proven_not_neg(genls(_4778,_4794)),~inst(_4776,_4794),{is_unit(_4778,_4776)}==>proven_neg(inst(_4776,_4778))))*->rhs([pfclog((proven_not_neg(genls(_4778,_4794)),~inst(_4776,_4794),{is_unit(_4778,_4776)}==>proven_neg(inst(_4776,_4778))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(genls(_16864, _16866)), ~inst(_16880, _16866), {is_unit(_16864, _16880)}==>proven_neg(inst(_16880, _16864))))).
- % Found positive trigger: pfclog((proven_not_neg(genls(_20236,_20238)),~inst(_20252,_20238),{is_unit(_20236,_20252)}==>proven_neg(inst(_20252,_20236))))
- % body: compound(pfclog((proven_not_neg(genls(_20236,_20238)),~inst(_20252,_20238),{is_unit(_20236,_20252)}==>proven_neg(inst(_20252,_20236))))),\+is_ftVar(pfclog((proven_not_neg(genls(_20236,_20238)),~inst(_20252,_20238),{is_unit(_20236,_20252)}==>proven_neg(inst(_20252,_20236)))))*->rhs([{with_current_why(pfclog((proven_not_neg(genls(_20236,_20238)),~inst(_20252,_20238),{is_unit(_20236,_20252)}==>proven_neg(inst(_20252,_20236)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(genls(_20236,_20238)),~inst(_20252,_20238),{is_unit(_20236,_20252)}==>proven_neg(inst(_20252,_20236)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520))))}])
- % =pfclog=
- % proven_not_neg(genls(_6520, _6522)), ~inst(_6536, _6522), {is_unit(_6520, _6536)}==>proven_neg(inst(_6536, _6520)).
- % Found positive trigger: pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520))))
- % body: is_kif_clause(pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520)))))*->rhs([clif(pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520)))))])
- % Found positive trigger: pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520))))
- % body: rhs([(proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520)))])
- % RHS-Post1: proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520))
- % Support: pfclog((proven_not_neg(genls(_6276,_6278)),~inst(_6292,_6278),{is_unit(_6276,_6292)}==>proven_neg(inst(_6292,_6276)))),pt(pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520)))),rhs([(proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520)))]))
- % r_sane:mpred_fwc1((proven_not_neg(genls(_40600, _40602)), ~inst(_40616, _40602), {is_unit(_40600, _40616)}==>proven_neg(inst(_40616, _40600)))).
- % Adding positive
- % trigger: proven_not_neg(genls(_7914,_7916))
- % body: pt(~inst(_7930,_7916),(is_unit(_7914,_7930)*->rhs([proven_neg(inst(_7930,_7914))])))
- % Support: (proven_not_neg(genls(_8164,_8166)),~inst(_8180,_8166),{is_unit(_8164,_8180)}==>proven_neg(inst(_8180,_8164))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',69)
- % Found positive trigger: pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520))))
- % body: compound(pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520))))),\+is_ftVar(pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520)))))*->rhs([{with_current_why(pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(genls(_6520,_6522)),~inst(_6536,_6522),{is_unit(_6520,_6536)}==>proven_neg(inst(_6536,_6520)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794))))
- % body: compound(boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794))))),\+is_ftVar(boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794)))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_4776,_4778)):-proven_not_neg(genls(_4778,_4794)),proven_neg(inst(_4776,_4794)))))))}])
- % RHS-Post1: boxlog((proven_neg(genls(_2778,_2780)):-proven_not_neg(inst(_2784,_2778)),proven_neg(inst(_2784,_2780))))
- % Support: clif(=>(&(subclass(_2590,_2592),inst(_2596,_2590)),inst(_2596,_2592))),pt(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))),(is_kif_clause(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))*->rhs([{delistify_last_arg(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)),kif_to_boxlog,(proven_neg(genls(_2778,_2780)):-proven_not_neg(inst(_2784,_2778)),proven_neg(inst(_2784,_2780))))},boxlog((proven_neg(genls(_2778,_2780)):-proven_not_neg(inst(_2784,_2778)),proven_neg(inst(_2784,_2780))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(genls(_44944, _44946)):-proven_not_neg(inst(_44960, _44944)), proven_neg(inst(_44960, _44946))))).
- % Found positive trigger: boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))))
- % body: compound(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))))),\+is_ftVar(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))))*->rhs([{with_current_why(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))))))}])
- % Found positive trigger: boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))))}])
- % =boxlog=
- % proven_neg(genls(_4856, _4858)) :-
- % proven_not_neg(inst(_4872, _4856)),
- % proven_neg(inst(_4872, _4858)).
- % Found positive trigger: boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))))
- % body: is_kif_clause(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))))*->rhs([clif(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))))])
- % Found positive trigger: boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))))
- % body: delistify_last_arg((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))),boxlog_to_pfc,_22168),must_be_unqualified(_22168)*->rhs([pfclog(_22168)])
- % RHS-Post1: pfclog((proven_not_neg(inst(_4872,_4856)),~inst(_4872,_4858),{is_unit(_4858,_4856)}==>proven_neg(genls(_4856,_4858))))
- % Support: boxlog((proven_neg(genls(_4644,_4646)):-proven_not_neg(inst(_4660,_4644)),proven_neg(inst(_4660,_4646)))),pt(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))),(delistify_last_arg((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))),boxlog_to_pfc,(proven_not_neg(inst(_4872,_4856)),~inst(_4872,_4858),{is_unit(_4858,_4856)}==>proven_neg(genls(_4856,_4858)))),must_be_unqualified((proven_not_neg(inst(_4872,_4856)),~inst(_4872,_4858),{is_unit(_4858,_4856)}==>proven_neg(genls(_4856,_4858))))*->rhs([pfclog((proven_not_neg(inst(_4872,_4856)),~inst(_4872,_4858),{is_unit(_4858,_4856)}==>proven_neg(genls(_4856,_4858))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(inst(_16944, _16946)), ~inst(_16944, _16962), {is_unit(_16962, _16946)}==>proven_neg(genls(_16946, _16962))))).
- % Found positive trigger: pfclog((proven_not_neg(inst(_20316,_20318)),~inst(_20316,_20334),{is_unit(_20334,_20318)}==>proven_neg(genls(_20318,_20334))))
- % body: compound(pfclog((proven_not_neg(inst(_20316,_20318)),~inst(_20316,_20334),{is_unit(_20334,_20318)}==>proven_neg(genls(_20318,_20334))))),\+is_ftVar(pfclog((proven_not_neg(inst(_20316,_20318)),~inst(_20316,_20334),{is_unit(_20334,_20318)}==>proven_neg(genls(_20318,_20334)))))*->rhs([{with_current_why(pfclog((proven_not_neg(inst(_20316,_20318)),~inst(_20316,_20334),{is_unit(_20334,_20318)}==>proven_neg(genls(_20318,_20334)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(inst(_20316,_20318)),~inst(_20316,_20334),{is_unit(_20334,_20318)}==>proven_neg(genls(_20318,_20334)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618))))}])
- % =pfclog=
- % proven_not_neg(inst(_6600, _6602)), ~inst(_6600, _6618), {is_unit(_6618, _6602)}==>proven_neg(genls(_6602, _6618)).
- % Found positive trigger: pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618))))
- % body: is_kif_clause(pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618)))))*->rhs([clif(pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618)))))])
- % Found positive trigger: pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618))))
- % body: rhs([(proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618)))])
- % RHS-Post1: proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618))
- % Support: pfclog((proven_not_neg(inst(_6356,_6358)),~inst(_6356,_6374),{is_unit(_6374,_6358)}==>proven_neg(genls(_6358,_6374)))),pt(pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618)))),rhs([(proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618)))]))
- % r_sane:mpred_fwc1((proven_not_neg(inst(_40680, _40682)), ~inst(_40680, _40698), {is_unit(_40698, _40682)}==>proven_neg(genls(_40682, _40698)))).
- % Adding positive
- % trigger: proven_not_neg(inst(_7994,_7996))
- % body: pt(~inst(_7994,_8012),(is_unit(_8012,_7996)*->rhs([proven_neg(genls(_7996,_8012))])))
- % Support: (proven_not_neg(inst(_8244,_8246)),~inst(_8244,_8262),{is_unit(_8262,_8246)}==>proven_neg(genls(_8246,_8262))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',69)
- % Found positive trigger: pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618))))
- % body: compound(pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618))))),\+is_ftVar(pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618)))))*->rhs([{with_current_why(pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(inst(_6600,_6602)),~inst(_6600,_6618),{is_unit(_6618,_6602)}==>proven_neg(genls(_6602,_6618)))))))}])
- % Found positive trigger: boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))))
- % body: compound(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858))))),\+is_ftVar(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))))*->rhs([{with_current_why(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(genls(_4856,_4858)):-proven_not_neg(inst(_4872,_4856)),proven_neg(inst(_4872,_4858)))))))}])
- % RHS-Post1: boxlog((inst(_2784,_2780):-proven_tru(genls(_2778,_2780)),proven_tru(inst(_2784,_2778))))
- % Support: clif(=>(&(subclass(_2590,_2592),inst(_2596,_2590)),inst(_2596,_2592))),pt(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))),(is_kif_clause(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))*->rhs([{delistify_last_arg(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)),kif_to_boxlog,(inst(_2784,_2780):-proven_tru(genls(_2778,_2780)),proven_tru(inst(_2784,_2778))))},boxlog((inst(_2784,_2780):-proven_tru(genls(_2778,_2780)),proven_tru(inst(_2784,_2778))))])))
- % r_sane:mpred_fwc1(boxlog((inst(_44684, _44686):-proven_tru(genls(_44700, _44686)), proven_tru(inst(_44684, _44700))))).
- % Found positive trigger: boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620))))
- % body: compound(boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620))))),\+is_ftVar(boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620)))))*->rhs([{with_current_why(boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620)))),ignore(\+addAdmittedArguments(boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620)))))))}])
- % Found positive trigger: boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620))))}])
- % =boxlog=
- % inst(_4604, _4606) :-
- % proven_tru(genls(_4620, _4606)),
- % proven_tru(inst(_4604, _4620)).
- % Found positive trigger: boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620))))
- % body: is_kif_clause(boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620)))))*->rhs([clif(boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620)))))])
- % Found positive trigger: boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620))))
- % body: delistify_last_arg((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620))),boxlog_to_pfc,_21532),must_be_unqualified(_21532)*->rhs([pfclog(_21532)])
- % RHS-Post1: pfclog((genls(_4620,_4606),inst(_4604,_4620),{is_unit(_4606,_4604)}==>inst(_4604,_4606)))
- % Support: boxlog((inst(_4400,_4402):-proven_tru(genls(_4416,_4402)),proven_tru(inst(_4400,_4416)))),pt(boxlog((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620)))),(delistify_last_arg((inst(_4604,_4606):-proven_tru(genls(_4620,_4606)),proven_tru(inst(_4604,_4620))),boxlog_to_pfc,(genls(_4620,_4606),inst(_4604,_4620),{is_unit(_4606,_4604)}==>inst(_4604,_4606))),must_be_unqualified((genls(_4620,_4606),inst(_4604,_4620),{is_unit(_4606,_4604)}==>inst(_4604,_4606)))*->rhs([pfclog((genls(_4620,_4606),inst(_4604,_4620),{is_unit(_4606,_4604)}==>inst(_4604,_4606)))])))
- % r_sane:mpred_fwc1(pfclog((genls(_15906, _15908), inst(_15918, _15906), {is_unit(_15908, _15918)}==>inst(_15918, _15908)))).
- % Found positive trigger: pfclog((genls(_19118,_19120),inst(_19130,_19118),{is_unit(_19120,_19130)}==>inst(_19130,_19120)))
- % body: compound(pfclog((genls(_19118,_19120),inst(_19130,_19118),{is_unit(_19120,_19130)}==>inst(_19130,_19120)))),\+is_ftVar(pfclog((genls(_19118,_19120),inst(_19130,_19118),{is_unit(_19120,_19130)}==>inst(_19130,_19120))))*->rhs([{with_current_why(pfclog((genls(_19118,_19120),inst(_19130,_19118),{is_unit(_19120,_19130)}==>inst(_19130,_19120))),ignore(\+addAdmittedArguments(pfclog((genls(_19118,_19120),inst(_19130,_19118),{is_unit(_19120,_19130)}==>inst(_19130,_19120))))))}])
- % Found positive trigger: pfclog((genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238)))}])
- % =pfclog=
- % genls(_6236, _6238), inst(_6248, _6236), {is_unit(_6238, _6248)}==>inst(_6248, _6238).
- % Found positive trigger: pfclog((genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238)))
- % body: is_kif_clause(pfclog((genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238))))*->rhs([clif(pfclog((genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238))))])
- % Found positive trigger: pfclog((genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238)))
- % body: rhs([(genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238))])
- % RHS-Post1: genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238)
- % Support: pfclog((genls(_6016,_6018),inst(_6028,_6016),{is_unit(_6018,_6028)}==>inst(_6028,_6018))),pt(pfclog((genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238))),rhs([(genls(_6236,_6238),inst(_6248,_6236),{is_unit(_6238,_6248)}==>inst(_6248,_6238))]))
- % r_sane:mpred_fwc1((genls(_37986, _37988), inst(_37998, _37986), {is_unit(_37988, _37998)}==>inst(_37998, _37988))).
- % Adding positive
- % trigger: genls(_7478,_7480)
- % body: pt(inst(_7490,_7478),(is_unit(_7480,_7490)*->rhs([inst(_7490,_7480)])))
- % Support: (genls(_7704,_7706),inst(_7716,_7704),{is_unit(_7706,_7716)}==>inst(_7716,_7706)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',69)
- % Adding positive
- % trigger: inst(_7490,ttTypeFacet)
- % body: is_unit(completelyAssertedCollection,_7490)*->rhs([inst(_7490,completelyAssertedCollection)])
- % Support: genls(ttTypeFacet,completelyAssertedCollection),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % uses_predicate(header_sane, baseKB, inst, 2).
- % Adding positive
- % trigger: inst(_7490,tSourceCode)
- % body: is_unit(tMicrotheory,_7490)*->rhs([inst(_7490,tMicrotheory)])
- % Support: genls(tSourceCode,tMicrotheory),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tSourceData)
- % body: is_unit(tMicrotheory,_7490)*->rhs([inst(_7490,tMicrotheory)])
- % Support: genls(tSourceData,tMicrotheory),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,ttTypeType)
- % body: is_unit(tCol,_7490)*->rhs([inst(_7490,tCol)])
- % Support: genls(ttTypeType,tCol),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,ttIndividualType)
- % body: is_unit(tCol,_7490)*->rhs([inst(_7490,tCol)])
- % Support: genls(ttIndividualType,tCol),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,ttExpressionType)
- % body: is_unit(tCol,_7490)*->rhs([inst(_7490,tCol)])
- % Support: genls(ttExpressionType,tCol),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tSet)
- % body: is_unit(tCol,_7490)*->rhs([inst(_7490,tCol)])
- % Support: genls(tSet,tCol),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,ttUnverifiableType)
- % body: is_unit(tCol,_7490)*->rhs([inst(_7490,tCol)])
- % Support: genls(ttUnverifiableType,tCol),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tAtemporalNecessarilyEssentialCollectionType)
- % body: is_unit(tCol,_7490)*->rhs([inst(_7490,tCol)])
- % Support: genls(tAtemporalNecessarilyEssentialCollectionType,tCol),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,completelyAssertedCollection)
- % body: is_unit(tCol,_7490)*->rhs([inst(_7490,tCol)])
- % Support: genls(completelyAssertedCollection,tCol),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tSpatialThing)
- % body: is_unit(tTemporalThing,_7490)*->rhs([inst(_7490,tTemporalThing)])
- % Support: genls(tSpatialThing,tTemporalThing),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,ttItemType)
- % body: is_unit(ttObjectType,_7490)*->rhs([inst(_7490,ttObjectType)])
- % Support: genls(ttItemType,ttObjectType),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,ttObjectType)
- % body: is_unit(ttSpatialType,_7490)*->rhs([inst(_7490,ttSpatialType)])
- % Support: genls(ttObjectType,ttSpatialType),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,ttRegionType)
- % body: is_unit(ttSpatialType,_7490)*->rhs([inst(_7490,ttSpatialType)])
- % Support: genls(ttRegionType,ttSpatialType),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,ttTemporalType)
- % body: is_unit(ttIndividualType,_7490)*->rhs([inst(_7490,ttIndividualType)])
- % Support: genls(ttTemporalType,ttIndividualType),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tTemporalThing)
- % body: is_unit(tIndividual,_7490)*->rhs([inst(_7490,tIndividual)])
- % Support: genls(tTemporalThing,tIndividual),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologBuiltin)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologBuiltin,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologDynamic)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologDynamic,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologHybrid)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologHybrid,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologKIF)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologKIF,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologPTTP)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologPTTP,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,pfcMustFC)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(pfcMustFC,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologListValued)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologListValued,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologMultiValued)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologMultiValued,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologSingleValued)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologSingleValued,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologOrdered)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologOrdered,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologEquality)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologEquality,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtArgsVerbatum)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(rtArgsVerbatum,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologSideEffects)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologSideEffects,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtNotForUnboundPredicates)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(rtNotForUnboundPredicates,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtAvoidForwardChain)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(rtAvoidForwardChain,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtSymmetricBinaryPredicate)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(rtSymmetricBinaryPredicate,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,predCanHaveSingletons)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(predCanHaveSingletons,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,pfcControlled)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(pfcControlled,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologNegByFailure)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologNegByFailure,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,prologIsFlag)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(prologIsFlag,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tFunction)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(tFunction,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tPred)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(tPred,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tHuman)
- % body: is_unit(tAgent,_7490)*->rhs([inst(_7490,tAgent)])
- % Support: genls(tHuman,tAgent),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tUnreifiableFunction)
- % body: is_unit(tFunction,_7490)*->rhs([inst(_7490,tFunction)])
- % Support: genls(tUnreifiableFunction,tFunction),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tReifiableFunction)
- % body: is_unit(tFunction,_7490)*->rhs([inst(_7490,tFunction)])
- % Support: genls(tReifiableFunction,tFunction),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,vtSize)
- % body: is_unit(vtValue,_7490)*->rhs([inst(_7490,vtValue)])
- % Support: genls(vtSize,vtValue),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,vtTexture)
- % body: is_unit(vtValue,_7490)*->rhs([inst(_7490,vtValue)])
- % Support: genls(vtTexture,vtValue),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,vtColor)
- % body: is_unit(vtValue,_7490)*->rhs([inst(_7490,vtValue)])
- % Support: genls(vtColor,vtValue),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,vtShape)
- % body: is_unit(vtValue,_7490)*->rhs([inst(_7490,vtValue)])
- % Support: genls(vtShape,vtValue),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,vtMaterial)
- % body: is_unit(vtValue,_7490)*->rhs([inst(_7490,vtValue)])
- % Support: genls(vtMaterial,vtValue),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,vtValue)
- % body: is_unit(vtValue,_7490)*->rhs([inst(_7490,vtValue)])
- % Support: genls(vtValue,vtValue),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtSententialRelation)
- % body: is_unit(rtSententialOperator,_7490)*->rhs([inst(_7490,rtSententialOperator)])
- % Support: genls(rtSententialRelation,rtSententialOperator),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtSententialOperator)
- % body: is_unit(rtAvoidForwardChain,_7490)*->rhs([inst(_7490,rtAvoidForwardChain)])
- % Support: genls(rtSententialOperator,rtAvoidForwardChain),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtVariableArityRelation)
- % body: is_unit(rtAvoidForwardChain,_7490)*->rhs([inst(_7490,rtAvoidForwardChain)])
- % Support: genls(rtVariableArityRelation,rtAvoidForwardChain),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtCommutativeRelation)
- % body: is_unit(rtAvoidForwardChain,_7490)*->rhs([inst(_7490,rtAvoidForwardChain)])
- % Support: genls(rtCommutativeRelation,rtAvoidForwardChain),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,tFunction)
- % body: is_unit(rtAvoidForwardChain,_7490)*->rhs([inst(_7490,rtAvoidForwardChain)])
- % Support: genls(tFunction,rtAvoidForwardChain),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtEvaluatableRelation)
- % body: is_unit(rtAvoidForwardChain,_7490)*->rhs([inst(_7490,rtAvoidForwardChain)])
- % Support: genls(rtEvaluatableRelation,rtAvoidForwardChain),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtBinaryPredicate)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(rtBinaryPredicate,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtUnaryPredicate)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(rtUnaryPredicate,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,mobPhilosopher)
- % body: is_unit(tAgent,_7490)*->rhs([inst(_7490,tAgent)])
- % Support: genls(mobPhilosopher,tAgent),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Adding positive
- % trigger: inst(_7490,rtCapabilityPredicate)
- % body: is_unit(tRelation,_7490)*->rhs([inst(_7490,tRelation)])
- % Support: genls(rtCapabilityPredicate,tRelation),pt(genls(_8240,_8242),pt(inst(_8252,_8240),(is_unit(_8242,_8252)*->rhs([inst(_8252,_8242)]))))
- % Found positive trigger: pfclog((genls(_6204,_6206),inst(_6216,_6204),{is_unit(_6206,_6216)}==>inst(_6216,_6206)))
- % body: compound(pfclog((genls(_6204,_6206),inst(_6216,_6204),{is_unit(_6206,_6216)}==>inst(_6216,_6206)))),\+is_ftVar(pfclog((genls(_6204,_6206),inst(_6216,_6204),{is_unit(_6206,_6216)}==>inst(_6216,_6206))))*->rhs([{with_current_why(pfclog((genls(_6204,_6206),inst(_6216,_6204),{is_unit(_6206,_6216)}==>inst(_6216,_6206))),ignore(\+addAdmittedArguments(pfclog((genls(_6204,_6206),inst(_6216,_6204),{is_unit(_6206,_6216)}==>inst(_6216,_6206))))))}])
- % Found positive trigger: boxlog((inst(_4572,_4574):-proven_tru(genls(_4588,_4574)),proven_tru(inst(_4572,_4588))))
- % body: compound(boxlog((inst(_4572,_4574):-proven_tru(genls(_4588,_4574)),proven_tru(inst(_4572,_4588))))),\+is_ftVar(boxlog((inst(_4572,_4574):-proven_tru(genls(_4588,_4574)),proven_tru(inst(_4572,_4588)))))*->rhs([{with_current_why(boxlog((inst(_4572,_4574):-proven_tru(genls(_4588,_4574)),proven_tru(inst(_4572,_4588)))),ignore(\+addAdmittedArguments(boxlog((inst(_4572,_4574):-proven_tru(genls(_4588,_4574)),proven_tru(inst(_4572,_4588)))))))}])
- % Found positive trigger: clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))
- % body: compound(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780)))),\+is_ftVar(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))))*->rhs([{with_current_why(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))),ignore(\+addAdmittedArguments(clif(=>(&(subclass(_2778,_2780),inst(_2784,_2778)),inst(_2784,_2780))))))}])
- % Found positive trigger: =>(&(subclass(_1442,_1444),inst(_1448,_1442)),inst(_1448,_1444))
- % body: compound(=>(&(subclass(_1442,_1444),inst(_1448,_1442)),inst(_1448,_1444))),\+is_ftVar(=>(&(subclass(_1442,_1444),inst(_1448,_1442)),inst(_1448,_1444)))*->rhs([{with_current_why(=>(&(subclass(_1442,_1444),inst(_1448,_1442)),inst(_1448,_1444)),ignore(\+addAdmittedArguments(=>(&(subclass(_1442,_1444),inst(_1448,_1442)),inst(_1448,_1444)))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:72
- % r_sane:mpred_fwc1(subclass(accumulator, numbuffer)).
- % Found positive trigger: subclass(accumulator,numbuffer)
- % body: compound(subclass(accumulator,numbuffer)),\+is_ftVar(subclass(accumulator,numbuffer))*->rhs([{with_current_why(subclass(accumulator,numbuffer),ignore(\+addAdmittedArguments(subclass(accumulator,numbuffer))))}])
- % r_sane:mpred_fwc1(admittedArgument(subclass, 2, numbuffer)).
- % Found positive trigger: admittedArgument(subclass,2,numbuffer)
- % body: compound(admittedArgument(subclass,2,numbuffer)),\+is_ftVar(admittedArgument(subclass,2,numbuffer))*->rhs([{with_current_why(admittedArgument(subclass,2,numbuffer),ignore(\+addAdmittedArguments(admittedArgument(subclass,2,numbuffer))))}])
- % Found positive trigger: admittedArgument(subclass,2,numbuffer)
- % body: is_kif_clause(admittedArgument(subclass,2,numbuffer))*->rhs([clif(admittedArgument(subclass,2,numbuffer))])
- % Found positive trigger: admittedArgument(subclass,2,numbuffer)
- % body: compound(admittedArgument(subclass,2,numbuffer)),\+is_ftVar(admittedArgument(subclass,2,numbuffer))*->rhs([{with_current_why(admittedArgument(subclass,2,numbuffer),ignore(\+addAdmittedArguments(admittedArgument(subclass,2,numbuffer))))}])
- % Found positive trigger: subclass(accumulator,numbuffer)
- % body: is_kif_clause(subclass(accumulator,numbuffer))*->rhs([clif(subclass(accumulator,numbuffer))])
- % Found positive trigger: subclass(accumulator,numbuffer)
- % body: compound(subclass(accumulator,numbuffer)),\+is_ftVar(subclass(accumulator,numbuffer))*->rhs([{with_current_why(subclass(accumulator,numbuffer),ignore(\+addAdmittedArguments(subclass(accumulator,numbuffer))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:75
- % r_sane:mpred_fwc1(subclass(display, numbuffer)).
- % Found positive trigger: subclass(display,numbuffer)
- % body: compound(subclass(display,numbuffer)),\+is_ftVar(subclass(display,numbuffer))*->rhs([{with_current_why(subclass(display,numbuffer),ignore(\+addAdmittedArguments(subclass(display,numbuffer))))}])
- % Found positive trigger: subclass(display,numbuffer)
- % body: is_kif_clause(subclass(display,numbuffer))*->rhs([clif(subclass(display,numbuffer))])
- % Found positive trigger: subclass(display,numbuffer)
- % body: compound(subclass(display,numbuffer)),\+is_ftVar(subclass(display,numbuffer))*->rhs([{with_current_why(subclass(display,numbuffer),ignore(\+addAdmittedArguments(subclass(display,numbuffer))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:78
- % r_sane:mpred_fwc1(subclass(numbuffer, buffer)).
- % Found positive trigger: subclass(numbuffer,buffer)
- % body: compound(subclass(numbuffer,buffer)),\+is_ftVar(subclass(numbuffer,buffer))*->rhs([{with_current_why(subclass(numbuffer,buffer),ignore(\+addAdmittedArguments(subclass(numbuffer,buffer))))}])
- % r_sane:mpred_fwc1(admittedArgument(subclass, 2, buffer)).
- % Found positive trigger: admittedArgument(subclass,2,buffer)
- % body: compound(admittedArgument(subclass,2,buffer)),\+is_ftVar(admittedArgument(subclass,2,buffer))*->rhs([{with_current_why(admittedArgument(subclass,2,buffer),ignore(\+addAdmittedArguments(admittedArgument(subclass,2,buffer))))}])
- % Found positive trigger: admittedArgument(subclass,2,buffer)
- % body: is_kif_clause(admittedArgument(subclass,2,buffer))*->rhs([clif(admittedArgument(subclass,2,buffer))])
- % Found positive trigger: admittedArgument(subclass,2,buffer)
- % body: compound(admittedArgument(subclass,2,buffer)),\+is_ftVar(admittedArgument(subclass,2,buffer))*->rhs([{with_current_why(admittedArgument(subclass,2,buffer),ignore(\+addAdmittedArguments(admittedArgument(subclass,2,buffer))))}])
- % Found positive trigger: subclass(numbuffer,buffer)
- % body: is_kif_clause(subclass(numbuffer,buffer))*->rhs([clif(subclass(numbuffer,buffer))])
- % Found positive trigger: subclass(numbuffer,buffer)
- % body: compound(subclass(numbuffer,buffer)),\+is_ftVar(subclass(numbuffer,buffer))*->rhs([{with_current_why(subclass(numbuffer,buffer),ignore(\+addAdmittedArguments(subclass(numbuffer,buffer))))}])
- % r_sane:mpred_fwc1(subclass(opbuffer, buffer)).
- % Found positive trigger: subclass(opbuffer,buffer)
- % body: compound(subclass(opbuffer,buffer)),\+is_ftVar(subclass(opbuffer,buffer))*->rhs([{with_current_why(subclass(opbuffer,buffer),ignore(\+addAdmittedArguments(subclass(opbuffer,buffer))))}])
- % Found positive trigger: subclass(opbuffer,buffer)
- % body: is_kif_clause(subclass(opbuffer,buffer))*->rhs([clif(subclass(opbuffer,buffer))])
- % Found positive trigger: subclass(opbuffer,buffer)
- % body: compound(subclass(opbuffer,buffer)),\+is_ftVar(subclass(opbuffer,buffer))*->rhs([{with_current_why(subclass(opbuffer,buffer),ignore(\+addAdmittedArguments(subclass(opbuffer,buffer))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:81
- % r_sane:mpred_fwc1(exists(_20654, inst(_20654, accumulator))).
- % Found positive trigger: exists(_1220,inst(_1220,accumulator))
- % body: compound(exists(_1220,inst(_1220,accumulator))),\+is_ftVar(exists(_1220,inst(_1220,accumulator)))*->rhs([{with_current_why(exists(_1220,inst(_1220,accumulator)),ignore(\+addAdmittedArguments(exists(_1220,inst(_1220,accumulator)))))}])
- % r_sane:mpred_fwc1(admittedArgument(inst, 2, accumulator)).
- % Found positive trigger: admittedArgument(inst,2,accumulator)
- % body: compound(admittedArgument(inst,2,accumulator)),\+is_ftVar(admittedArgument(inst,2,accumulator))*->rhs([{with_current_why(admittedArgument(inst,2,accumulator),ignore(\+addAdmittedArguments(admittedArgument(inst,2,accumulator))))}])
- % Found positive trigger: admittedArgument(inst,2,accumulator)
- % body: is_kif_clause(admittedArgument(inst,2,accumulator))*->rhs([clif(admittedArgument(inst,2,accumulator))])
- % Found positive trigger: admittedArgument(inst,2,accumulator)
- % body: compound(admittedArgument(inst,2,accumulator)),\+is_ftVar(admittedArgument(inst,2,accumulator))*->rhs([{with_current_why(admittedArgument(inst,2,accumulator),ignore(\+addAdmittedArguments(admittedArgument(inst,2,accumulator))))}])
- % Found positive trigger: exists(_1212,inst(_1212,accumulator))
- % body: is_kif_clause(exists(_1212,inst(_1212,accumulator)))*->rhs([clif(exists(_1212,inst(_1212,accumulator)))])
- % RHS-Post1: clif(exists(_1212,inst(_1212,accumulator)))
- % Support: exists(_1076,inst(_1076,accumulator)),pt(exists(_1212,inst(_1212,accumulator)),(is_kif_clause(exists(_1212,inst(_1212,accumulator)))*->rhs([clif(exists(_1212,inst(_1212,accumulator)))])))
- % r_sane:mpred_fwc1(clif(exists(_21612, inst(_21612, accumulator)))).
- % Found positive trigger: clif(exists(_2312,inst(_2312,accumulator)))
- % body: compound(clif(exists(_2312,inst(_2312,accumulator)))),\+is_ftVar(clif(exists(_2312,inst(_2312,accumulator))))*->rhs([{with_current_why(clif(exists(_2312,inst(_2312,accumulator))),ignore(\+addAdmittedArguments(clif(exists(_2312,inst(_2312,accumulator))))))}])
- % Found positive trigger: clif(exists(_2312,inst(_2312,accumulator)))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2312,inst(_2312,accumulator)))}])
- % =clif=
- % exists(_2312, inst(_2312, accumulator)).
- % Found positive trigger: clif(exists(_2312,inst(_2312,accumulator)))
- % body: is_kif_clause(clif(exists(_2312,inst(_2312,accumulator))))*->rhs([clif(clif(exists(_2312,inst(_2312,accumulator))))])
- % Found positive trigger: clif(exists(_2312,inst(_2312,accumulator)))
- % body: \+is_kif_clause(exists(_2312,inst(_2312,accumulator)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,accumulator)),kif_to_boxlog,_15462)},boxlog(_15462)])
- % Found positive trigger: clif(exists(_2312,inst(_2312,accumulator)))
- % body: is_kif_clause(exists(_2312,inst(_2312,accumulator)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,accumulator)),kif_to_boxlog,_2514)},boxlog(_2514)])
- % kif :-
- % exists(_2312, inst(_2312, accumulator)).
- % qualify_nesc :-
- % exists(_2312, nesc(inst(_2312, accumulator))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2312, nesc(b_d(KB, nesc, poss), inst(_2312, accumulator))), v(nesc(b_d(KB, nesc, poss), inst(_2312, accumulator)), v(nesc(b_d(KB, nesc, poss), inst(skInstAccumulatorExists_14FnSk, accumulator)), ~skolem(_2312, skInstAccumulatorExists_14FnSk)))))).
- % nnf :-
- % v(nesc(inst(_2312, accumulator)), v(nesc(inst(skInstAccumulatorExists_14FnSk, accumulator)), ~skolem(_2312, skInstAccumulatorExists_14FnSk))).
- % th_nnf_in :-
- % ( tru(inst(_2312, accumulator))
- % ; tru(inst(skInstAccumulatorExists_14FnSk, accumulator))
- % ; neg(skolem(_2312, skInstAccumulatorExists_14FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(inst(_2312, accumulator))), n(tru(inst(skInstAccumulatorExists_14FnSk, accumulator))), n(neg(skolem(_2312, skInstAccumulatorExists_14FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2312,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_2312,accumulator))))
- % Support: clif(exists(_2168,inst(_2168,accumulator))),pt(clif(exists(_2312,inst(_2312,accumulator))),(is_kif_clause(exists(_2312,inst(_2312,accumulator)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,accumulator)),kif_to_boxlog,(proven_neg(skolem(_2312,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_2312,accumulator))))},boxlog((proven_neg(skolem(_2312,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_2312,accumulator))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12842, skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk, accumulator)), proven_neg(inst(_12842, accumulator))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))))
- % body: compound(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))))),\+is_ftVar(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))))}])
- % =boxlog=
- % proven_neg(skolem(_4088, skInstAccumulatorExists_14FnSk)) :-
- % proven_neg(inst(skInstAccumulatorExists_14FnSk, accumulator)),
- % proven_neg(inst(_4088, accumulator)).
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))))*->rhs([clif(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))))
- % body: delistify_last_arg((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))),boxlog_to_pfc,_4322),must_be_unqualified(_4322)*->rhs([pfclog(_4322)])
- % RHS-Post1: pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_4088,accumulator),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk))))
- % Support: boxlog((proven_neg(skolem(_3904,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_3904,accumulator)))),pt(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))),(delistify_last_arg((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))),boxlog_to_pfc,(~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_4088,accumulator),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)))),must_be_unqualified((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_4088,accumulator),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk))))*->rhs([pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_4088,accumulator),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(skInstAccumulatorExists_14FnSk, accumulator), ~inst(_16056, accumulator), {is_unit(_16056)}==>proven_neg(skolem(_16056, skInstAccumulatorExists_14FnSk))))).
- % Found positive trigger: pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_19314,accumulator),{is_unit(_19314)}==>proven_neg(skolem(_19314,skInstAccumulatorExists_14FnSk))))
- % body: compound(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_19314,accumulator),{is_unit(_19314)}==>proven_neg(skolem(_19314,skInstAccumulatorExists_14FnSk))))),\+is_ftVar(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_19314,accumulator),{is_unit(_19314)}==>proven_neg(skolem(_19314,skInstAccumulatorExists_14FnSk)))))*->rhs([{with_current_why(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_19314,accumulator),{is_unit(_19314)}==>proven_neg(skolem(_19314,skInstAccumulatorExists_14FnSk)))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_19314,accumulator),{is_unit(_19314)}==>proven_neg(skolem(_19314,skInstAccumulatorExists_14FnSk)))))))}])
- % Found positive trigger: pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk))))}])
- % =pfclog=
- % ~inst(skInstAccumulatorExists_14FnSk, accumulator), ~inst(_5656, accumulator), {is_unit(_5656)}==>proven_neg(skolem(_5656, skInstAccumulatorExists_14FnSk)).
- % Found positive trigger: pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk))))
- % body: is_kif_clause(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk)))))*->rhs([clif(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk)))))])
- % Found positive trigger: pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk))))
- % body: rhs([(~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk)))])
- % RHS-Post1: ~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk))
- % Support: pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5444,accumulator),{is_unit(_5444)}==>proven_neg(skolem(_5444,skInstAccumulatorExists_14FnSk)))),pt(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk)))),rhs([(~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk)))]))
- % r_sane:mpred_fwc1((~inst(skInstAccumulatorExists_14FnSk, accumulator), ~inst(_39184, accumulator), {is_unit(_39184)}==>proven_neg(skolem(_39184, skInstAccumulatorExists_14FnSk)))).
- % Adding positive
- % trigger: ~inst(skInstAccumulatorExists_14FnSk,accumulator)
- % body: pt(~inst(_6900,accumulator),(is_unit(_6900)*->rhs([proven_neg(skolem(_6900,skInstAccumulatorExists_14FnSk))])))
- % Support: (~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_7118,accumulator),{is_unit(_7118)}==>proven_neg(skolem(_7118,skInstAccumulatorExists_14FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',81)
- % Found positive trigger: pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk))))
- % body: compound(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk))))),\+is_ftVar(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk)))))*->rhs([{with_current_why(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk)))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstAccumulatorExists_14FnSk,accumulator),~inst(_5656,accumulator),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstAccumulatorExists_14FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))))
- % body: compound(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator))))),\+is_ftVar(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4088,skInstAccumulatorExists_14FnSk)):-proven_neg(inst(skInstAccumulatorExists_14FnSk,accumulator)),proven_neg(inst(_4088,accumulator)))))))}])
- % RHS-Post1: boxlog((inst(_2312,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_2312=skInstAccumulatorExists_14FnSk}))
- % Support: clif(exists(_2168,inst(_2168,accumulator))),pt(clif(exists(_2312,inst(_2312,accumulator))),(is_kif_clause(exists(_2312,inst(_2312,accumulator)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,accumulator)),kif_to_boxlog,(inst(_2312,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_2312=skInstAccumulatorExists_14FnSk}))},boxlog((inst(_2312,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_2312=skInstAccumulatorExists_14FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((inst(_12438, accumulator):- \+inst(skInstAccumulatorExists_14FnSk, accumulator), {_12438=skInstAccumulatorExists_14FnSk}))).
- % Found positive trigger: boxlog((inst(_15218,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_15218=skInstAccumulatorExists_14FnSk}))
- % body: compound(boxlog((inst(_15218,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_15218=skInstAccumulatorExists_14FnSk}))),\+is_ftVar(boxlog((inst(_15218,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_15218=skInstAccumulatorExists_14FnSk})))*->rhs([{with_current_why(boxlog((inst(_15218,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_15218=skInstAccumulatorExists_14FnSk})),ignore(\+addAdmittedArguments(boxlog((inst(_15218,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_15218=skInstAccumulatorExists_14FnSk})))))}])
- % Found positive trigger: boxlog((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk}))}])
- % =boxlog=
- % inst(_4104, accumulator) :-
- % \+ inst(skInstAccumulatorExists_14FnSk, accumulator),
- % { _4104=skInstAccumulatorExists_14FnSk
- % }.
- % Found positive trigger: boxlog((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk}))
- % body: is_kif_clause(boxlog((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk})))*->rhs([clif(boxlog((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk})))])
- % Found positive trigger: boxlog((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk}))
- % body: delistify_last_arg((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk}),boxlog_to_pfc,_15344),must_be_unqualified(_15344)*->rhs([pfclog(_15344)])
- % RHS-Post1: pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk},{is_unit(_4104)}==>inst(_4104,accumulator)))
- % Support: boxlog((inst(_3928,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_3928=skInstAccumulatorExists_14FnSk})),pt(boxlog((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk})),(delistify_last_arg((inst(_4104,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk}),boxlog_to_pfc,(\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk},{is_unit(_4104)}==>inst(_4104,accumulator))),must_be_unqualified((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk},{is_unit(_4104)}==>inst(_4104,accumulator)))*->rhs([pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4104=skInstAccumulatorExists_14FnSk},{is_unit(_4104)}==>inst(_4104,accumulator)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(skInstAccumulatorExists_14FnSk, accumulator), {_15744=skInstAccumulatorExists_14FnSk}, {is_unit(_15744)}==>inst(_15744, accumulator)))).
- % Found positive trigger: pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_18946=skInstAccumulatorExists_14FnSk},{is_unit(_18946)}==>inst(_18946,accumulator)))
- % body: compound(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_18946=skInstAccumulatorExists_14FnSk},{is_unit(_18946)}==>inst(_18946,accumulator)))),\+is_ftVar(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_18946=skInstAccumulatorExists_14FnSk},{is_unit(_18946)}==>inst(_18946,accumulator))))*->rhs([{with_current_why(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_18946=skInstAccumulatorExists_14FnSk},{is_unit(_18946)}==>inst(_18946,accumulator))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_18946=skInstAccumulatorExists_14FnSk},{is_unit(_18946)}==>inst(_18946,accumulator))))))}])
- % Found positive trigger: pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator)))}])
- % =pfclog=
- % \+inst(skInstAccumulatorExists_14FnSk, accumulator), {_5620=skInstAccumulatorExists_14FnSk}, {is_unit(_5620)}==>inst(_5620, accumulator).
- % Found positive trigger: pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator)))
- % body: is_kif_clause(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator))))*->rhs([clif(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator))))])
- % Found positive trigger: pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator)))
- % body: rhs([(\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator))])
- % RHS-Post1: \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator)
- % Support: pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5416=skInstAccumulatorExists_14FnSk},{is_unit(_5416)}==>inst(_5416,accumulator))),pt(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator))),rhs([(\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5620=skInstAccumulatorExists_14FnSk},{is_unit(_5620)}==>inst(_5620,accumulator))]))
- % r_sane:mpred_fwc1((\+inst(skInstAccumulatorExists_14FnSk, accumulator), {_39064=skInstAccumulatorExists_14FnSk}, {is_unit(_39064)}==>inst(_39064, accumulator))).
- % Adding negative
- % trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % test: call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator))
- % body: _6796=skInstAccumulatorExists_14FnSk*->is_unit(_6796)*->rhs([inst(_6796,accumulator)])
- % Support: (\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_7006=skInstAccumulatorExists_14FnSk},{is_unit(_7006)}==>inst(_7006,accumulator)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',81)
- % RHS-Post1: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % Support: \+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % cond: call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator))
- % action: skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])
- % from: mpred_add_support_fast(inst(skInstAccumulatorExists_14FnSk,accumulator),(\+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))))
- % r_sane:mpred_fwc1(inst(skInstAccumulatorExists_14FnSk, accumulator)).
- % Found positive trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % body: compound(inst(skInstAccumulatorExists_14FnSk,accumulator)),\+is_ftVar(inst(skInstAccumulatorExists_14FnSk,accumulator))*->rhs([{with_current_why(inst(skInstAccumulatorExists_14FnSk,accumulator),ignore(\+addAdmittedArguments(inst(skInstAccumulatorExists_14FnSk,accumulator))))}])
- % Found positive trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % body: is_kif_clause(inst(skInstAccumulatorExists_14FnSk,accumulator))*->rhs([clif(inst(skInstAccumulatorExists_14FnSk,accumulator))])
- % Found positive trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % body: compound(inst(skInstAccumulatorExists_14FnSk,accumulator)),\+is_ftVar(inst(skInstAccumulatorExists_14FnSk,accumulator))*->rhs([{with_current_why(inst(skInstAccumulatorExists_14FnSk,accumulator),ignore(\+addAdmittedArguments(inst(skInstAccumulatorExists_14FnSk,accumulator))))}])
- % Found negative trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % cond: call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator))
- % body: skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])
- % Support: spft(inst(skInstAccumulatorExists_14FnSk,accumulator),\+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)]))))
- % moving(inherit_above(header_sane, inst(_35564, _35566))).
- % Removing (withdraw1)
- % term: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % support (was): \+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))
- % SUCCESS: retract_u(spft(inst(skInstAccumulatorExists_14FnSk,accumulator),\+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,accumulator),inst(skInstAccumulatorExists_14FnSk,accumulator),ax))
- % still_supported(admittedArgument(inst,2,accumulator))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,accumulator),inst(skInstAccumulatorExists_14FnSk,accumulator),ax))
- % still_supported(admittedArgument(inst,2,accumulator))
- % Couldn't retract_i: spft(admittedArgument(inst,2,accumulator),inst(skInstAccumulatorExists_14FnSk,accumulator),ax).
- % still_supported(admittedArgument(inst,2,accumulator))
- % Couldn't retract_i: spft(inst(skInstAccumulatorExists_14FnSk,accumulator),_14742,_14744).
- % show_failure(mpred_undo1, retract_u(inst(skInstAccumulatorExists_14FnSk, accumulator))).
- % Found positive trigger: pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5592=skInstAccumulatorExists_14FnSk},{is_unit(_5592)}==>inst(_5592,accumulator)))
- % body: compound(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5592=skInstAccumulatorExists_14FnSk},{is_unit(_5592)}==>inst(_5592,accumulator)))),\+is_ftVar(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5592=skInstAccumulatorExists_14FnSk},{is_unit(_5592)}==>inst(_5592,accumulator))))*->rhs([{with_current_why(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5592=skInstAccumulatorExists_14FnSk},{is_unit(_5592)}==>inst(_5592,accumulator))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstAccumulatorExists_14FnSk,accumulator),{_5592=skInstAccumulatorExists_14FnSk},{is_unit(_5592)}==>inst(_5592,accumulator))))))}])
- % Found positive trigger: boxlog((inst(_4076,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4076=skInstAccumulatorExists_14FnSk}))
- % body: compound(boxlog((inst(_4076,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4076=skInstAccumulatorExists_14FnSk}))),\+is_ftVar(boxlog((inst(_4076,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4076=skInstAccumulatorExists_14FnSk})))*->rhs([{with_current_why(boxlog((inst(_4076,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4076=skInstAccumulatorExists_14FnSk})),ignore(\+addAdmittedArguments(boxlog((inst(_4076,accumulator):- \+inst(skInstAccumulatorExists_14FnSk,accumulator),{_4076=skInstAccumulatorExists_14FnSk})))))}])
- % RHS-Post1: boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_2284,accumulator)))
- % Support: clif(exists(_2140,inst(_2140,accumulator))),pt(clif(exists(_2284,inst(_2284,accumulator))),(is_kif_clause(exists(_2284,inst(_2284,accumulator)))*->rhs([{delistify_last_arg(exists(_2284,inst(_2284,accumulator)),kif_to_boxlog,(inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_2284,accumulator)))},boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_2284,accumulator)))])))
- % r_sane:mpred_fwc1(boxlog((inst(skInstAccumulatorExists_14FnSk, accumulator):- \+inst(_19158, accumulator)))).
- % Found positive trigger: boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator)))
- % body: compound(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator)))),\+is_ftVar(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator))))*->rhs([{with_current_why(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator))),ignore(\+addAdmittedArguments(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator))))))}])
- % Found positive trigger: boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator)))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator)))}])
- % =boxlog=
- % inst(skInstAccumulatorExists_14FnSk, accumulator) :-
- % \+ inst(_3798, accumulator).
- % Found positive trigger: boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator)))
- % body: is_kif_clause(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator))))*->rhs([clif(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator))))])
- % Found positive trigger: boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator)))
- % body: delistify_last_arg((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator)),boxlog_to_pfc,_19262),must_be_unqualified(_19262)*->rhs([pfclog(_19262)])
- % RHS-Post1: pfclog((\+inst(_3798,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))
- % Support: boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3646,accumulator))),pt(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator))),(delistify_last_arg((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3798,accumulator)),boxlog_to_pfc,(\+inst(_3798,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))),must_be_unqualified((\+inst(_3798,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))*->rhs([pfclog((\+inst(_3798,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(_13656, accumulator)==>inst(skInstAccumulatorExists_14FnSk, accumulator)))).
- % Found positive trigger: pfclog((\+inst(_16494,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))
- % body: compound(pfclog((\+inst(_16494,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))),\+is_ftVar(pfclog((\+inst(_16494,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))))*->rhs([{with_current_why(pfclog((\+inst(_16494,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))),ignore(\+addAdmittedArguments(pfclog((\+inst(_16494,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))))))}])
- % Found positive trigger: pfclog((\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))}])
- % =pfclog=
- % \+inst(_5024, accumulator)==>inst(skInstAccumulatorExists_14FnSk, accumulator).
- % Found positive trigger: pfclog((\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))
- % body: is_kif_clause(pfclog((\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))))*->rhs([clif(pfclog((\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))))])
- % Found positive trigger: pfclog((\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))
- % body: rhs([(\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))])
- % RHS-Post1: \+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)
- % Support: pfclog((\+inst(_4872,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))),pt(pfclog((\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))),rhs([(\+inst(_5024,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))]))
- % r_sane:mpred_fwc1((\+inst(_31914, accumulator)==>inst(skInstAccumulatorExists_14FnSk, accumulator))).
- % Adding negative
- % trigger: inst(_5964,accumulator)
- % test: call_u_no_bc(inst(_5964,accumulator))
- % body: rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])
- % Support: (\+inst(_6122,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',81)
- % RHS-Post1: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % Support: \+inst(_5964,accumulator),nt(inst(_6482,accumulator),call_u_no_bc(inst(_5964,accumulator)),rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(_6482,accumulator)
- % cond: call_u_no_bc(inst(_5964,accumulator))
- % action: rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])
- % from: mpred_add_support_fast(inst(skInstAccumulatorExists_14FnSk,accumulator),(\+inst(_5964,accumulator),nt(inst(_6482,accumulator),call_u_no_bc(inst(_5964,accumulator)),rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)]))))
- % r_sane:mpred_fwc1(inst(skInstAccumulatorExists_14FnSk, accumulator)).
- % Found positive trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % body: compound(inst(skInstAccumulatorExists_14FnSk,accumulator)),\+is_ftVar(inst(skInstAccumulatorExists_14FnSk,accumulator))*->rhs([{with_current_why(inst(skInstAccumulatorExists_14FnSk,accumulator),ignore(\+addAdmittedArguments(inst(skInstAccumulatorExists_14FnSk,accumulator))))}])
- % Found positive trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % body: is_kif_clause(inst(skInstAccumulatorExists_14FnSk,accumulator))*->rhs([clif(inst(skInstAccumulatorExists_14FnSk,accumulator))])
- % Found positive trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % body: compound(inst(skInstAccumulatorExists_14FnSk,accumulator)),\+is_ftVar(inst(skInstAccumulatorExists_14FnSk,accumulator))*->rhs([{with_current_why(inst(skInstAccumulatorExists_14FnSk,accumulator),ignore(\+addAdmittedArguments(inst(skInstAccumulatorExists_14FnSk,accumulator))))}])
- % Found negative trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % cond: call_u_no_bc(inst(_29568,accumulator))
- % body: rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])
- % Support: spft(inst(skInstAccumulatorExists_14FnSk,accumulator),\+inst(_29568,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(_29568,accumulator)),rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))
- % moving(inherit_above(header_sane, inst(_33974, _33976))).
- % Removing (withdraw1)
- % term: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % support (was): \+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)]))
- % SUCCESS: retract_u(spft(inst(skInstAccumulatorExists_14FnSk,accumulator),\+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)]))))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,accumulator),inst(skInstAccumulatorExists_14FnSk,accumulator),ax))
- % still_supported(admittedArgument(inst,2,accumulator))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,accumulator),inst(skInstAccumulatorExists_14FnSk,accumulator),ax))
- % still_supported(admittedArgument(inst,2,accumulator))
- % Couldn't retract_i: spft(admittedArgument(inst,2,accumulator),inst(skInstAccumulatorExists_14FnSk,accumulator),ax).
- % still_supported(admittedArgument(inst,2,accumulator))
- % RHS-Post1: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % Support: \+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % cond: call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator))
- % action: skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])
- % from: mpred_add_support_fast(inst(skInstAccumulatorExists_14FnSk,accumulator),(\+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))))
- % moving(inherit_above(header_sane, inst(_31916, _31918))).
- % SUCCESS: retract_u(spft(inst(skInstAccumulatorExists_14FnSk,accumulator),\+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))))
- % RHS-Post1: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % Support: \+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstAccumulatorExists_14FnSk,accumulator)
- % cond: call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator))
- % action: skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])
- % from: mpred_add_support_fast(inst(skInstAccumulatorExists_14FnSk,accumulator),(\+inst(skInstAccumulatorExists_14FnSk,accumulator),nt(inst(skInstAccumulatorExists_14FnSk,accumulator),call_u_no_bc(inst(skInstAccumulatorExists_14FnSk,accumulator)),(skInstAccumulatorExists_14FnSk=skInstAccumulatorExists_14FnSk*->is_unit(skInstAccumulatorExists_14FnSk)*->rhs([inst(skInstAccumulatorExists_14FnSk,accumulator)])))))
- % moving(inherit_above(header_sane, inst(_29938, _29940))).
- % Found positive trigger: pfclog((\+inst(_5010,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))
- % body: compound(pfclog((\+inst(_5010,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator)))),\+is_ftVar(pfclog((\+inst(_5010,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))))*->rhs([{with_current_why(pfclog((\+inst(_5010,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))),ignore(\+addAdmittedArguments(pfclog((\+inst(_5010,accumulator)==>inst(skInstAccumulatorExists_14FnSk,accumulator))))))}])
- % Found positive trigger: boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3784,accumulator)))
- % body: compound(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3784,accumulator)))),\+is_ftVar(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3784,accumulator))))*->rhs([{with_current_why(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3784,accumulator))),ignore(\+addAdmittedArguments(boxlog((inst(skInstAccumulatorExists_14FnSk,accumulator):- \+inst(_3784,accumulator))))))}])
- % Found positive trigger: clif(exists(_2284,inst(_2284,accumulator)))
- % body: compound(clif(exists(_2284,inst(_2284,accumulator)))),\+is_ftVar(clif(exists(_2284,inst(_2284,accumulator))))*->rhs([{with_current_why(clif(exists(_2284,inst(_2284,accumulator))),ignore(\+addAdmittedArguments(clif(exists(_2284,inst(_2284,accumulator))))))}])
- % Found positive trigger: exists(_1212,inst(_1212,accumulator))
- % body: compound(exists(_1212,inst(_1212,accumulator))),\+is_ftVar(exists(_1212,inst(_1212,accumulator)))*->rhs([{with_current_why(exists(_1212,inst(_1212,accumulator)),ignore(\+addAdmittedArguments(exists(_1212,inst(_1212,accumulator)))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:82
- % r_sane:mpred_fwc1(exists(_32634, inst(_32634, display))).
- % Found positive trigger: exists(_1224,inst(_1224,display))
- % body: compound(exists(_1224,inst(_1224,display))),\+is_ftVar(exists(_1224,inst(_1224,display)))*->rhs([{with_current_why(exists(_1224,inst(_1224,display)),ignore(\+addAdmittedArguments(exists(_1224,inst(_1224,display)))))}])
- % r_sane:mpred_fwc1(admittedArgument(inst, 2, display)).
- % Found positive trigger: admittedArgument(inst,2,display)
- % body: compound(admittedArgument(inst,2,display)),\+is_ftVar(admittedArgument(inst,2,display))*->rhs([{with_current_why(admittedArgument(inst,2,display),ignore(\+addAdmittedArguments(admittedArgument(inst,2,display))))}])
- % Found positive trigger: admittedArgument(inst,2,display)
- % body: is_kif_clause(admittedArgument(inst,2,display))*->rhs([clif(admittedArgument(inst,2,display))])
- % Found positive trigger: admittedArgument(inst,2,display)
- % body: compound(admittedArgument(inst,2,display)),\+is_ftVar(admittedArgument(inst,2,display))*->rhs([{with_current_why(admittedArgument(inst,2,display),ignore(\+addAdmittedArguments(admittedArgument(inst,2,display))))}])
- % Found positive trigger: exists(_1212,inst(_1212,display))
- % body: is_kif_clause(exists(_1212,inst(_1212,display)))*->rhs([clif(exists(_1212,inst(_1212,display)))])
- % RHS-Post1: clif(exists(_1212,inst(_1212,display)))
- % Support: exists(_1076,inst(_1076,display)),pt(exists(_1212,inst(_1212,display)),(is_kif_clause(exists(_1212,inst(_1212,display)))*->rhs([clif(exists(_1212,inst(_1212,display)))])))
- % r_sane:mpred_fwc1(clif(exists(_21582, inst(_21582, display)))).
- % Found positive trigger: clif(exists(_2312,inst(_2312,display)))
- % body: compound(clif(exists(_2312,inst(_2312,display)))),\+is_ftVar(clif(exists(_2312,inst(_2312,display))))*->rhs([{with_current_why(clif(exists(_2312,inst(_2312,display))),ignore(\+addAdmittedArguments(clif(exists(_2312,inst(_2312,display))))))}])
- % Found positive trigger: clif(exists(_2312,inst(_2312,display)))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2312,inst(_2312,display)))}])
- % =clif=
- % exists(_2312, inst(_2312, display)).
- % Found positive trigger: clif(exists(_2312,inst(_2312,display)))
- % body: is_kif_clause(clif(exists(_2312,inst(_2312,display))))*->rhs([clif(clif(exists(_2312,inst(_2312,display))))])
- % Found positive trigger: clif(exists(_2312,inst(_2312,display)))
- % body: \+is_kif_clause(exists(_2312,inst(_2312,display)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,display)),kif_to_boxlog,_15446)},boxlog(_15446)])
- % Found positive trigger: clif(exists(_2312,inst(_2312,display)))
- % body: is_kif_clause(exists(_2312,inst(_2312,display)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,display)),kif_to_boxlog,_2514)},boxlog(_2514)])
- % kif :-
- % exists(_2312, inst(_2312, display)).
- % qualify_nesc :-
- % exists(_2312, nesc(inst(_2312, display))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2312, nesc(b_d(KB, nesc, poss), inst(_2312, display))), v(nesc(b_d(KB, nesc, poss), inst(_2312, display)), v(nesc(b_d(KB, nesc, poss), inst(skInstExists_15FnSk, display)), ~skolem(_2312, skInstExists_15FnSk)))))).
- % nnf :-
- % v(nesc(inst(_2312, display)), v(nesc(inst(skInstExists_15FnSk, display)), ~skolem(_2312, skInstExists_15FnSk))).
- % th_nnf_in :-
- % ( tru(inst(_2312, display))
- % ; tru(inst(skInstExists_15FnSk, display))
- % ; neg(skolem(_2312, skInstExists_15FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(inst(_2312, display))), n(tru(inst(skInstExists_15FnSk, display))), n(neg(skolem(_2312, skInstExists_15FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2312,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_2312,display))))
- % Support: clif(exists(_2168,inst(_2168,display))),pt(clif(exists(_2312,inst(_2312,display))),(is_kif_clause(exists(_2312,inst(_2312,display)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,display)),kif_to_boxlog,(proven_neg(skolem(_2312,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_2312,display))))},boxlog((proven_neg(skolem(_2312,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_2312,display))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12750, skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk, display)), proven_neg(inst(_12750, display))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15582,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_15582,display))))
- % body: compound(boxlog((proven_neg(skolem(_15582,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_15582,display))))),\+is_ftVar(boxlog((proven_neg(skolem(_15582,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_15582,display)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15582,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_15582,display)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15582,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_15582,display)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display))))}])
- % =boxlog=
- % proven_neg(skolem(_4088, skInstExists_15FnSk)) :-
- % proven_neg(inst(skInstExists_15FnSk, display)),
- % proven_neg(inst(_4088, display)).
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display)))))*->rhs([clif(boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display))))
- % body: delistify_last_arg((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display))),boxlog_to_pfc,_15536),must_be_unqualified(_15536)*->rhs([pfclog(_15536)])
- % RHS-Post1: pfclog((~inst(skInstExists_15FnSk,display),~inst(_4088,display),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstExists_15FnSk))))
- % Support: boxlog((proven_neg(skolem(_3904,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_3904,display)))),pt(boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display)))),(delistify_last_arg((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display))),boxlog_to_pfc,(~inst(skInstExists_15FnSk,display),~inst(_4088,display),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstExists_15FnSk)))),must_be_unqualified((~inst(skInstExists_15FnSk,display),~inst(_4088,display),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstExists_15FnSk))))*->rhs([pfclog((~inst(skInstExists_15FnSk,display),~inst(_4088,display),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstExists_15FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(skInstExists_15FnSk, display), ~inst(_16010, display), {is_unit(_16010)}==>proven_neg(skolem(_16010, skInstExists_15FnSk))))).
- % Found positive trigger: pfclog((~inst(skInstExists_15FnSk,display),~inst(_19256,display),{is_unit(_19256)}==>proven_neg(skolem(_19256,skInstExists_15FnSk))))
- % body: compound(pfclog((~inst(skInstExists_15FnSk,display),~inst(_19256,display),{is_unit(_19256)}==>proven_neg(skolem(_19256,skInstExists_15FnSk))))),\+is_ftVar(pfclog((~inst(skInstExists_15FnSk,display),~inst(_19256,display),{is_unit(_19256)}==>proven_neg(skolem(_19256,skInstExists_15FnSk)))))*->rhs([{with_current_why(pfclog((~inst(skInstExists_15FnSk,display),~inst(_19256,display),{is_unit(_19256)}==>proven_neg(skolem(_19256,skInstExists_15FnSk)))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstExists_15FnSk,display),~inst(_19256,display),{is_unit(_19256)}==>proven_neg(skolem(_19256,skInstExists_15FnSk)))))))}])
- % Found positive trigger: pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk))))}])
- % =pfclog=
- % ~inst(skInstExists_15FnSk, display), ~inst(_5656, display), {is_unit(_5656)}==>proven_neg(skolem(_5656, skInstExists_15FnSk)).
- % Found positive trigger: pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk))))
- % body: is_kif_clause(pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk)))))*->rhs([clif(pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk)))))])
- % Found positive trigger: pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk))))
- % body: rhs([(~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk)))])
- % RHS-Post1: ~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk))
- % Support: pfclog((~inst(skInstExists_15FnSk,display),~inst(_5444,display),{is_unit(_5444)}==>proven_neg(skolem(_5444,skInstExists_15FnSk)))),pt(pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk)))),rhs([(~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk)))]))
- % r_sane:mpred_fwc1((~inst(skInstExists_15FnSk, display), ~inst(_39026, display), {is_unit(_39026)}==>proven_neg(skolem(_39026, skInstExists_15FnSk)))).
- % Adding positive
- % trigger: ~inst(skInstExists_15FnSk,display)
- % body: pt(~inst(_6900,display),(is_unit(_6900)*->rhs([proven_neg(skolem(_6900,skInstExists_15FnSk))])))
- % Support: (~inst(skInstExists_15FnSk,display),~inst(_7118,display),{is_unit(_7118)}==>proven_neg(skolem(_7118,skInstExists_15FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',82)
- % Found positive trigger: pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk))))
- % body: compound(pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk))))),\+is_ftVar(pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk)))))*->rhs([{with_current_why(pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk)))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstExists_15FnSk,display),~inst(_5656,display),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstExists_15FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display))))
- % body: compound(boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display))))),\+is_ftVar(boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4088,skInstExists_15FnSk)):-proven_neg(inst(skInstExists_15FnSk,display)),proven_neg(inst(_4088,display)))))))}])
- % RHS-Post1: boxlog((inst(_2312,display):- \+inst(skInstExists_15FnSk,display),{_2312=skInstExists_15FnSk}))
- % Support: clif(exists(_2168,inst(_2168,display))),pt(clif(exists(_2312,inst(_2312,display))),(is_kif_clause(exists(_2312,inst(_2312,display)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,display)),kif_to_boxlog,(inst(_2312,display):- \+inst(skInstExists_15FnSk,display),{_2312=skInstExists_15FnSk}))},boxlog((inst(_2312,display):- \+inst(skInstExists_15FnSk,display),{_2312=skInstExists_15FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((inst(_12412, display):- \+inst(skInstExists_15FnSk, display), {_12412=skInstExists_15FnSk}))).
- % Found positive trigger: boxlog((inst(_15176,display):- \+inst(skInstExists_15FnSk,display),{_15176=skInstExists_15FnSk}))
- % body: compound(boxlog((inst(_15176,display):- \+inst(skInstExists_15FnSk,display),{_15176=skInstExists_15FnSk}))),\+is_ftVar(boxlog((inst(_15176,display):- \+inst(skInstExists_15FnSk,display),{_15176=skInstExists_15FnSk})))*->rhs([{with_current_why(boxlog((inst(_15176,display):- \+inst(skInstExists_15FnSk,display),{_15176=skInstExists_15FnSk})),ignore(\+addAdmittedArguments(boxlog((inst(_15176,display):- \+inst(skInstExists_15FnSk,display),{_15176=skInstExists_15FnSk})))))}])
- % Found positive trigger: boxlog((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk}))}])
- % =boxlog=
- % inst(_4104, display) :-
- % \+ inst(skInstExists_15FnSk, display),
- % { _4104=skInstExists_15FnSk
- % }.
- % Found positive trigger: boxlog((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk}))
- % body: is_kif_clause(boxlog((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk})))*->rhs([clif(boxlog((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk})))])
- % Found positive trigger: boxlog((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk}))
- % body: delistify_last_arg((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk}),boxlog_to_pfc,_15270),must_be_unqualified(_15270)*->rhs([pfclog(_15270)])
- % RHS-Post1: pfclog((\+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk},{is_unit(_4104)}==>inst(_4104,display)))
- % Support: boxlog((inst(_3928,display):- \+inst(skInstExists_15FnSk,display),{_3928=skInstExists_15FnSk})),pt(boxlog((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk})),(delistify_last_arg((inst(_4104,display):- \+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk}),boxlog_to_pfc,(\+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk},{is_unit(_4104)}==>inst(_4104,display))),must_be_unqualified((\+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk},{is_unit(_4104)}==>inst(_4104,display)))*->rhs([pfclog((\+inst(skInstExists_15FnSk,display),{_4104=skInstExists_15FnSk},{is_unit(_4104)}==>inst(_4104,display)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(skInstExists_15FnSk, display), {_15692=skInstExists_15FnSk}, {is_unit(_15692)}==>inst(_15692, display)))).
- % Found positive trigger: pfclog((\+inst(skInstExists_15FnSk,display),{_18878=skInstExists_15FnSk},{is_unit(_18878)}==>inst(_18878,display)))
- % body: compound(pfclog((\+inst(skInstExists_15FnSk,display),{_18878=skInstExists_15FnSk},{is_unit(_18878)}==>inst(_18878,display)))),\+is_ftVar(pfclog((\+inst(skInstExists_15FnSk,display),{_18878=skInstExists_15FnSk},{is_unit(_18878)}==>inst(_18878,display))))*->rhs([{with_current_why(pfclog((\+inst(skInstExists_15FnSk,display),{_18878=skInstExists_15FnSk},{is_unit(_18878)}==>inst(_18878,display))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstExists_15FnSk,display),{_18878=skInstExists_15FnSk},{is_unit(_18878)}==>inst(_18878,display))))))}])
- % Found positive trigger: pfclog((\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display)))}])
- % =pfclog=
- % \+inst(skInstExists_15FnSk, display), {_5620=skInstExists_15FnSk}, {is_unit(_5620)}==>inst(_5620, display).
- % Found positive trigger: pfclog((\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display)))
- % body: is_kif_clause(pfclog((\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display))))*->rhs([clif(pfclog((\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display))))])
- % Found positive trigger: pfclog((\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display)))
- % body: rhs([(\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display))])
- % RHS-Post1: \+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display)
- % Support: pfclog((\+inst(skInstExists_15FnSk,display),{_5416=skInstExists_15FnSk},{is_unit(_5416)}==>inst(_5416,display))),pt(pfclog((\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display))),rhs([(\+inst(skInstExists_15FnSk,display),{_5620=skInstExists_15FnSk},{is_unit(_5620)}==>inst(_5620,display))]))
- % r_sane:mpred_fwc1((\+inst(skInstExists_15FnSk, display), {_38900=skInstExists_15FnSk}, {is_unit(_38900)}==>inst(_38900, display))).
- % Adding negative
- % trigger: inst(skInstExists_15FnSk,display)
- % test: call_u_no_bc(inst(skInstExists_15FnSk,display))
- % body: _6824=skInstExists_15FnSk*->is_unit(_6824)*->rhs([inst(_6824,display)])
- % Support: (\+inst(skInstExists_15FnSk,display),{_7034=skInstExists_15FnSk},{is_unit(_7034)}==>inst(_7034,display)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',82)
- % RHS-Post1: inst(skInstExists_15FnSk,display)
- % Support: \+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstExists_15FnSk,display)
- % cond: call_u_no_bc(inst(skInstExists_15FnSk,display))
- % action: skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])
- % from: mpred_add_support_fast(inst(skInstExists_15FnSk,display),(\+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))))
- % r_sane:mpred_fwc1(inst(skInstExists_15FnSk, display)).
- % Found positive trigger: inst(skInstExists_15FnSk,display)
- % body: compound(inst(skInstExists_15FnSk,display)),\+is_ftVar(inst(skInstExists_15FnSk,display))*->rhs([{with_current_why(inst(skInstExists_15FnSk,display),ignore(\+addAdmittedArguments(inst(skInstExists_15FnSk,display))))}])
- % Found positive trigger: inst(skInstExists_15FnSk,display)
- % body: is_kif_clause(inst(skInstExists_15FnSk,display))*->rhs([clif(inst(skInstExists_15FnSk,display))])
- % Found positive trigger: inst(skInstExists_15FnSk,display)
- % body: compound(inst(skInstExists_15FnSk,display)),\+is_ftVar(inst(skInstExists_15FnSk,display))*->rhs([{with_current_why(inst(skInstExists_15FnSk,display),ignore(\+addAdmittedArguments(inst(skInstExists_15FnSk,display))))}])
- % Found negative trigger: inst(skInstExists_15FnSk,display)
- % cond: call_u_no_bc(inst(skInstExists_15FnSk,display))
- % body: skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])
- % Support: spft(inst(skInstExists_15FnSk,display),\+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)]))))
- % moving(inherit_above(header_sane, inst(_35400, _35402))).
- % Removing (withdraw1)
- % term: inst(skInstExists_15FnSk,display)
- % support (was): \+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))
- % SUCCESS: retract_u(spft(inst(skInstExists_15FnSk,display),\+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,display),inst(skInstExists_15FnSk,display),ax))
- % still_supported(admittedArgument(inst,2,display))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,display),inst(skInstExists_15FnSk,display),ax))
- % still_supported(admittedArgument(inst,2,display))
- % Couldn't retract_i: spft(admittedArgument(inst,2,display),inst(skInstExists_15FnSk,display),ax).
- % still_supported(admittedArgument(inst,2,display))
- % Couldn't retract_i: spft(inst(skInstExists_15FnSk,display),_14736,_14738).
- % show_failure(mpred_undo1, retract_u(inst(skInstExists_15FnSk, display))).
- % Found positive trigger: pfclog((\+inst(skInstExists_15FnSk,display),{_5592=skInstExists_15FnSk},{is_unit(_5592)}==>inst(_5592,display)))
- % body: compound(pfclog((\+inst(skInstExists_15FnSk,display),{_5592=skInstExists_15FnSk},{is_unit(_5592)}==>inst(_5592,display)))),\+is_ftVar(pfclog((\+inst(skInstExists_15FnSk,display),{_5592=skInstExists_15FnSk},{is_unit(_5592)}==>inst(_5592,display))))*->rhs([{with_current_why(pfclog((\+inst(skInstExists_15FnSk,display),{_5592=skInstExists_15FnSk},{is_unit(_5592)}==>inst(_5592,display))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstExists_15FnSk,display),{_5592=skInstExists_15FnSk},{is_unit(_5592)}==>inst(_5592,display))))))}])
- % Found positive trigger: boxlog((inst(_4076,display):- \+inst(skInstExists_15FnSk,display),{_4076=skInstExists_15FnSk}))
- % body: compound(boxlog((inst(_4076,display):- \+inst(skInstExists_15FnSk,display),{_4076=skInstExists_15FnSk}))),\+is_ftVar(boxlog((inst(_4076,display):- \+inst(skInstExists_15FnSk,display),{_4076=skInstExists_15FnSk})))*->rhs([{with_current_why(boxlog((inst(_4076,display):- \+inst(skInstExists_15FnSk,display),{_4076=skInstExists_15FnSk})),ignore(\+addAdmittedArguments(boxlog((inst(_4076,display):- \+inst(skInstExists_15FnSk,display),{_4076=skInstExists_15FnSk})))))}])
- % RHS-Post1: boxlog((inst(skInstExists_15FnSk,display):- \+inst(_2284,display)))
- % Support: clif(exists(_2140,inst(_2140,display))),pt(clif(exists(_2284,inst(_2284,display))),(is_kif_clause(exists(_2284,inst(_2284,display)))*->rhs([{delistify_last_arg(exists(_2284,inst(_2284,display)),kif_to_boxlog,(inst(skInstExists_15FnSk,display):- \+inst(_2284,display)))},boxlog((inst(skInstExists_15FnSk,display):- \+inst(_2284,display)))])))
- % r_sane:mpred_fwc1(boxlog((inst(skInstExists_15FnSk, display):- \+inst(_19084, display)))).
- % Found positive trigger: boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display)))
- % body: compound(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display)))),\+is_ftVar(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display))))*->rhs([{with_current_why(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display))),ignore(\+addAdmittedArguments(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display))))))}])
- % Found positive trigger: boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display)))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(skInstExists_15FnSk,display):- \+inst(_3798,display)))}])
- % =boxlog=
- % inst(skInstExists_15FnSk, display) :-
- % \+ inst(_3798, display).
- % Found positive trigger: boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display)))
- % body: is_kif_clause(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display))))*->rhs([clif(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display))))])
- % Found positive trigger: boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display)))
- % body: delistify_last_arg((inst(skInstExists_15FnSk,display):- \+inst(_3798,display)),boxlog_to_pfc,_19180),must_be_unqualified(_19180)*->rhs([pfclog(_19180)])
- % RHS-Post1: pfclog((\+inst(_3798,display)==>inst(skInstExists_15FnSk,display)))
- % Support: boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3646,display))),pt(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3798,display))),(delistify_last_arg((inst(skInstExists_15FnSk,display):- \+inst(_3798,display)),boxlog_to_pfc,(\+inst(_3798,display)==>inst(skInstExists_15FnSk,display))),must_be_unqualified((\+inst(_3798,display)==>inst(skInstExists_15FnSk,display)))*->rhs([pfclog((\+inst(_3798,display)==>inst(skInstExists_15FnSk,display)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(_13634, display)==>inst(skInstExists_15FnSk, display)))).
- % Found positive trigger: pfclog((\+inst(_16464,display)==>inst(skInstExists_15FnSk,display)))
- % body: compound(pfclog((\+inst(_16464,display)==>inst(skInstExists_15FnSk,display)))),\+is_ftVar(pfclog((\+inst(_16464,display)==>inst(skInstExists_15FnSk,display))))*->rhs([{with_current_why(pfclog((\+inst(_16464,display)==>inst(skInstExists_15FnSk,display))),ignore(\+addAdmittedArguments(pfclog((\+inst(_16464,display)==>inst(skInstExists_15FnSk,display))))))}])
- % Found positive trigger: pfclog((\+inst(_5024,display)==>inst(skInstExists_15FnSk,display)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(_5024,display)==>inst(skInstExists_15FnSk,display)))}])
- % =pfclog=
- % \+inst(_5024, display)==>inst(skInstExists_15FnSk, display).
- % Found positive trigger: pfclog((\+inst(_5024,display)==>inst(skInstExists_15FnSk,display)))
- % body: is_kif_clause(pfclog((\+inst(_5024,display)==>inst(skInstExists_15FnSk,display))))*->rhs([clif(pfclog((\+inst(_5024,display)==>inst(skInstExists_15FnSk,display))))])
- % Found positive trigger: pfclog((\+inst(_5024,display)==>inst(skInstExists_15FnSk,display)))
- % body: rhs([(\+inst(_5024,display)==>inst(skInstExists_15FnSk,display))])
- % RHS-Post1: \+inst(_5024,display)==>inst(skInstExists_15FnSk,display)
- % Support: pfclog((\+inst(_4872,display)==>inst(skInstExists_15FnSk,display))),pt(pfclog((\+inst(_5024,display)==>inst(skInstExists_15FnSk,display))),rhs([(\+inst(_5024,display)==>inst(skInstExists_15FnSk,display))]))
- % r_sane:mpred_fwc1((\+inst(_31806, display)==>inst(skInstExists_15FnSk, display))).
- % Adding negative
- % trigger: inst(_5964,display)
- % test: call_u_no_bc(inst(_5964,display))
- % body: rhs([inst(skInstExists_15FnSk,display)])
- % Support: (\+inst(_6122,display)==>inst(skInstExists_15FnSk,display)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',82)
- % RHS-Post1: inst(skInstExists_15FnSk,display)
- % Support: \+inst(_5964,display),nt(inst(_6482,display),call_u_no_bc(inst(_5964,display)),rhs([inst(skInstExists_15FnSk,display)]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(_6482,display)
- % cond: call_u_no_bc(inst(_5964,display))
- % action: rhs([inst(skInstExists_15FnSk,display)])
- % from: mpred_add_support_fast(inst(skInstExists_15FnSk,display),(\+inst(_5964,display),nt(inst(_6482,display),call_u_no_bc(inst(_5964,display)),rhs([inst(skInstExists_15FnSk,display)]))))
- % r_sane:mpred_fwc1(inst(skInstExists_15FnSk, display)).
- % Found positive trigger: inst(skInstExists_15FnSk,display)
- % body: compound(inst(skInstExists_15FnSk,display)),\+is_ftVar(inst(skInstExists_15FnSk,display))*->rhs([{with_current_why(inst(skInstExists_15FnSk,display),ignore(\+addAdmittedArguments(inst(skInstExists_15FnSk,display))))}])
- % Found positive trigger: inst(skInstExists_15FnSk,display)
- % body: is_kif_clause(inst(skInstExists_15FnSk,display))*->rhs([clif(inst(skInstExists_15FnSk,display))])
- % Found positive trigger: inst(skInstExists_15FnSk,display)
- % body: compound(inst(skInstExists_15FnSk,display)),\+is_ftVar(inst(skInstExists_15FnSk,display))*->rhs([{with_current_why(inst(skInstExists_15FnSk,display),ignore(\+addAdmittedArguments(inst(skInstExists_15FnSk,display))))}])
- % Found negative trigger: inst(skInstExists_15FnSk,display)
- % cond: call_u_no_bc(inst(_29492,display))
- % body: rhs([inst(skInstExists_15FnSk,display)])
- % Support: spft(inst(skInstExists_15FnSk,display),\+inst(_29492,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(_29492,display)),rhs([inst(skInstExists_15FnSk,display)])))
- % moving(inherit_above(header_sane, inst(_33854, _33856))).
- % Removing (withdraw1)
- % term: inst(skInstExists_15FnSk,display)
- % support (was): \+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),rhs([inst(skInstExists_15FnSk,display)]))
- % SUCCESS: retract_u(spft(inst(skInstExists_15FnSk,display),\+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),rhs([inst(skInstExists_15FnSk,display)]))))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,display),inst(skInstExists_15FnSk,display),ax))
- % still_supported(admittedArgument(inst,2,display))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,display),inst(skInstExists_15FnSk,display),ax))
- % still_supported(admittedArgument(inst,2,display))
- % Couldn't retract_i: spft(admittedArgument(inst,2,display),inst(skInstExists_15FnSk,display),ax).
- % still_supported(admittedArgument(inst,2,display))
- % RHS-Post1: inst(skInstExists_15FnSk,display)
- % Support: \+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstExists_15FnSk,display)
- % cond: call_u_no_bc(inst(skInstExists_15FnSk,display))
- % action: skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])
- % from: mpred_add_support_fast(inst(skInstExists_15FnSk,display),(\+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))))
- % moving(inherit_above(header_sane, inst(_31764, _31766))).
- % SUCCESS: retract_u(spft(inst(skInstExists_15FnSk,display),\+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))))
- % RHS-Post1: inst(skInstExists_15FnSk,display)
- % Support: \+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstExists_15FnSk,display)
- % cond: call_u_no_bc(inst(skInstExists_15FnSk,display))
- % action: skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])
- % from: mpred_add_support_fast(inst(skInstExists_15FnSk,display),(\+inst(skInstExists_15FnSk,display),nt(inst(skInstExists_15FnSk,display),call_u_no_bc(inst(skInstExists_15FnSk,display)),(skInstExists_15FnSk=skInstExists_15FnSk*->is_unit(skInstExists_15FnSk)*->rhs([inst(skInstExists_15FnSk,display)])))))
- % moving(inherit_above(header_sane, inst(_29772, _29774))).
- % Found positive trigger: pfclog((\+inst(_5010,display)==>inst(skInstExists_15FnSk,display)))
- % body: compound(pfclog((\+inst(_5010,display)==>inst(skInstExists_15FnSk,display)))),\+is_ftVar(pfclog((\+inst(_5010,display)==>inst(skInstExists_15FnSk,display))))*->rhs([{with_current_why(pfclog((\+inst(_5010,display)==>inst(skInstExists_15FnSk,display))),ignore(\+addAdmittedArguments(pfclog((\+inst(_5010,display)==>inst(skInstExists_15FnSk,display))))))}])
- % Found positive trigger: boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3784,display)))
- % body: compound(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3784,display)))),\+is_ftVar(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3784,display))))*->rhs([{with_current_why(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3784,display))),ignore(\+addAdmittedArguments(boxlog((inst(skInstExists_15FnSk,display):- \+inst(_3784,display))))))}])
- % Found positive trigger: clif(exists(_2284,inst(_2284,display)))
- % body: compound(clif(exists(_2284,inst(_2284,display)))),\+is_ftVar(clif(exists(_2284,inst(_2284,display))))*->rhs([{with_current_why(clif(exists(_2284,inst(_2284,display))),ignore(\+addAdmittedArguments(clif(exists(_2284,inst(_2284,display))))))}])
- % Found positive trigger: exists(_1212,inst(_1212,display))
- % body: compound(exists(_1212,inst(_1212,display))),\+is_ftVar(exists(_1212,inst(_1212,display)))*->rhs([{with_current_why(exists(_1212,inst(_1212,display)),ignore(\+addAdmittedArguments(exists(_1212,inst(_1212,display)))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:83
- % r_sane:mpred_fwc1(exists(_32544, inst(_32544, opbuffer))).
- % Found positive trigger: exists(_1224,inst(_1224,opbuffer))
- % body: compound(exists(_1224,inst(_1224,opbuffer))),\+is_ftVar(exists(_1224,inst(_1224,opbuffer)))*->rhs([{with_current_why(exists(_1224,inst(_1224,opbuffer)),ignore(\+addAdmittedArguments(exists(_1224,inst(_1224,opbuffer)))))}])
- % r_sane:mpred_fwc1(admittedArgument(inst, 2, opbuffer)).
- % Found positive trigger: admittedArgument(inst,2,opbuffer)
- % body: compound(admittedArgument(inst,2,opbuffer)),\+is_ftVar(admittedArgument(inst,2,opbuffer))*->rhs([{with_current_why(admittedArgument(inst,2,opbuffer),ignore(\+addAdmittedArguments(admittedArgument(inst,2,opbuffer))))}])
- % Found positive trigger: admittedArgument(inst,2,opbuffer)
- % body: is_kif_clause(admittedArgument(inst,2,opbuffer))*->rhs([clif(admittedArgument(inst,2,opbuffer))])
- % Found positive trigger: admittedArgument(inst,2,opbuffer)
- % body: compound(admittedArgument(inst,2,opbuffer)),\+is_ftVar(admittedArgument(inst,2,opbuffer))*->rhs([{with_current_why(admittedArgument(inst,2,opbuffer),ignore(\+addAdmittedArguments(admittedArgument(inst,2,opbuffer))))}])
- % Found positive trigger: exists(_1212,inst(_1212,opbuffer))
- % body: is_kif_clause(exists(_1212,inst(_1212,opbuffer)))*->rhs([clif(exists(_1212,inst(_1212,opbuffer)))])
- % RHS-Post1: clif(exists(_1212,inst(_1212,opbuffer)))
- % Support: exists(_1076,inst(_1076,opbuffer)),pt(exists(_1212,inst(_1212,opbuffer)),(is_kif_clause(exists(_1212,inst(_1212,opbuffer)))*->rhs([clif(exists(_1212,inst(_1212,opbuffer)))])))
- % r_sane:mpred_fwc1(clif(exists(_21590, inst(_21590, opbuffer)))).
- % Found positive trigger: clif(exists(_2312,inst(_2312,opbuffer)))
- % body: compound(clif(exists(_2312,inst(_2312,opbuffer)))),\+is_ftVar(clif(exists(_2312,inst(_2312,opbuffer))))*->rhs([{with_current_why(clif(exists(_2312,inst(_2312,opbuffer))),ignore(\+addAdmittedArguments(clif(exists(_2312,inst(_2312,opbuffer))))))}])
- % Found positive trigger: clif(exists(_2312,inst(_2312,opbuffer)))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2312,inst(_2312,opbuffer)))}])
- % =clif=
- % exists(_2312, inst(_2312, opbuffer)).
- % Found positive trigger: clif(exists(_2312,inst(_2312,opbuffer)))
- % body: is_kif_clause(clif(exists(_2312,inst(_2312,opbuffer))))*->rhs([clif(clif(exists(_2312,inst(_2312,opbuffer))))])
- % Found positive trigger: clif(exists(_2312,inst(_2312,opbuffer)))
- % body: \+is_kif_clause(exists(_2312,inst(_2312,opbuffer)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,opbuffer)),kif_to_boxlog,_15448)},boxlog(_15448)])
- % Found positive trigger: clif(exists(_2312,inst(_2312,opbuffer)))
- % body: is_kif_clause(exists(_2312,inst(_2312,opbuffer)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,opbuffer)),kif_to_boxlog,_2514)},boxlog(_2514)])
- % kif :-
- % exists(_2312, inst(_2312, opbuffer)).
- % qualify_nesc :-
- % exists(_2312, nesc(inst(_2312, opbuffer))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2312, nesc(b_d(KB, nesc, poss), inst(_2312, opbuffer))), v(nesc(b_d(KB, nesc, poss), inst(_2312, opbuffer)), v(nesc(b_d(KB, nesc, poss), inst(skInstOpbufferExists_16FnSk, opbuffer)), ~skolem(_2312, skInstOpbufferExists_16FnSk)))))).
- % nnf :-
- % v(nesc(inst(_2312, opbuffer)), v(nesc(inst(skInstOpbufferExists_16FnSk, opbuffer)), ~skolem(_2312, skInstOpbufferExists_16FnSk))).
- % th_nnf_in :-
- % ( tru(inst(_2312, opbuffer))
- % ; tru(inst(skInstOpbufferExists_16FnSk, opbuffer))
- % ; neg(skolem(_2312, skInstOpbufferExists_16FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(inst(_2312, opbuffer))), n(tru(inst(skInstOpbufferExists_16FnSk, opbuffer))), n(neg(skolem(_2312, skInstOpbufferExists_16FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2312,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_2312,opbuffer))))
- % Support: clif(exists(_2168,inst(_2168,opbuffer))),pt(clif(exists(_2312,inst(_2312,opbuffer))),(is_kif_clause(exists(_2312,inst(_2312,opbuffer)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,opbuffer)),kif_to_boxlog,(proven_neg(skolem(_2312,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_2312,opbuffer))))},boxlog((proven_neg(skolem(_2312,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_2312,opbuffer))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12812, skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk, opbuffer)), proven_neg(inst(_12812, opbuffer))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))))
- % body: compound(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))))),\+is_ftVar(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))))}])
- % =boxlog=
- % proven_neg(skolem(_4088, skInstOpbufferExists_16FnSk)) :-
- % proven_neg(inst(skInstOpbufferExists_16FnSk, opbuffer)),
- % proven_neg(inst(_4088, opbuffer)).
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))))*->rhs([clif(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))))
- % body: delistify_last_arg((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))),boxlog_to_pfc,_4322),must_be_unqualified(_4322)*->rhs([pfclog(_4322)])
- % RHS-Post1: pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_4088,opbuffer),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk))))
- % Support: boxlog((proven_neg(skolem(_3904,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_3904,opbuffer)))),pt(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))),(delistify_last_arg((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))),boxlog_to_pfc,(~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_4088,opbuffer),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)))),must_be_unqualified((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_4088,opbuffer),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk))))*->rhs([pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_4088,opbuffer),{is_unit(_4088)}==>proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(skInstOpbufferExists_16FnSk, opbuffer), ~inst(_16034, opbuffer), {is_unit(_16034)}==>proven_neg(skolem(_16034, skInstOpbufferExists_16FnSk))))).
- % Found positive trigger: pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_19288,opbuffer),{is_unit(_19288)}==>proven_neg(skolem(_19288,skInstOpbufferExists_16FnSk))))
- % body: compound(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_19288,opbuffer),{is_unit(_19288)}==>proven_neg(skolem(_19288,skInstOpbufferExists_16FnSk))))),\+is_ftVar(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_19288,opbuffer),{is_unit(_19288)}==>proven_neg(skolem(_19288,skInstOpbufferExists_16FnSk)))))*->rhs([{with_current_why(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_19288,opbuffer),{is_unit(_19288)}==>proven_neg(skolem(_19288,skInstOpbufferExists_16FnSk)))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_19288,opbuffer),{is_unit(_19288)}==>proven_neg(skolem(_19288,skInstOpbufferExists_16FnSk)))))))}])
- % Found positive trigger: pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk))))}])
- % =pfclog=
- % ~inst(skInstOpbufferExists_16FnSk, opbuffer), ~inst(_5656, opbuffer), {is_unit(_5656)}==>proven_neg(skolem(_5656, skInstOpbufferExists_16FnSk)).
- % Found positive trigger: pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk))))
- % body: is_kif_clause(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk)))))*->rhs([clif(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk)))))])
- % Found positive trigger: pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk))))
- % body: rhs([(~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk)))])
- % RHS-Post1: ~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk))
- % Support: pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5444,opbuffer),{is_unit(_5444)}==>proven_neg(skolem(_5444,skInstOpbufferExists_16FnSk)))),pt(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk)))),rhs([(~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk)))]))
- % r_sane:mpred_fwc1((~inst(skInstOpbufferExists_16FnSk, opbuffer), ~inst(_39128, opbuffer), {is_unit(_39128)}==>proven_neg(skolem(_39128, skInstOpbufferExists_16FnSk)))).
- % Adding positive
- % trigger: ~inst(skInstOpbufferExists_16FnSk,opbuffer)
- % body: pt(~inst(_6900,opbuffer),(is_unit(_6900)*->rhs([proven_neg(skolem(_6900,skInstOpbufferExists_16FnSk))])))
- % Support: (~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_7118,opbuffer),{is_unit(_7118)}==>proven_neg(skolem(_7118,skInstOpbufferExists_16FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',83)
- % Found positive trigger: pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk))))
- % body: compound(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk))))),\+is_ftVar(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk)))))*->rhs([{with_current_why(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk)))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstOpbufferExists_16FnSk,opbuffer),~inst(_5656,opbuffer),{is_unit(_5656)}==>proven_neg(skolem(_5656,skInstOpbufferExists_16FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))))
- % body: compound(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer))))),\+is_ftVar(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_4088,skInstOpbufferExists_16FnSk)):-proven_neg(inst(skInstOpbufferExists_16FnSk,opbuffer)),proven_neg(inst(_4088,opbuffer)))))))}])
- % RHS-Post1: boxlog((inst(_2312,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_2312=skInstOpbufferExists_16FnSk}))
- % Support: clif(exists(_2168,inst(_2168,opbuffer))),pt(clif(exists(_2312,inst(_2312,opbuffer))),(is_kif_clause(exists(_2312,inst(_2312,opbuffer)))*->rhs([{delistify_last_arg(exists(_2312,inst(_2312,opbuffer)),kif_to_boxlog,(inst(_2312,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_2312=skInstOpbufferExists_16FnSk}))},boxlog((inst(_2312,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_2312=skInstOpbufferExists_16FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((inst(_12426, opbuffer):- \+inst(skInstOpbufferExists_16FnSk, opbuffer), {_12426=skInstOpbufferExists_16FnSk}))).
- % Found positive trigger: boxlog((inst(_15198,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_15198=skInstOpbufferExists_16FnSk}))
- % body: compound(boxlog((inst(_15198,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_15198=skInstOpbufferExists_16FnSk}))),\+is_ftVar(boxlog((inst(_15198,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_15198=skInstOpbufferExists_16FnSk})))*->rhs([{with_current_why(boxlog((inst(_15198,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_15198=skInstOpbufferExists_16FnSk})),ignore(\+addAdmittedArguments(boxlog((inst(_15198,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_15198=skInstOpbufferExists_16FnSk})))))}])
- % Found positive trigger: boxlog((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk}))}])
- % =boxlog=
- % inst(_4104, opbuffer) :-
- % \+ inst(skInstOpbufferExists_16FnSk, opbuffer),
- % { _4104=skInstOpbufferExists_16FnSk
- % }.
- % Found positive trigger: boxlog((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk}))
- % body: is_kif_clause(boxlog((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk})))*->rhs([clif(boxlog((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk})))])
- % Found positive trigger: boxlog((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk}))
- % body: delistify_last_arg((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk}),boxlog_to_pfc,_15314),must_be_unqualified(_15314)*->rhs([pfclog(_15314)])
- % RHS-Post1: pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk},{is_unit(_4104)}==>inst(_4104,opbuffer)))
- % Support: boxlog((inst(_3928,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_3928=skInstOpbufferExists_16FnSk})),pt(boxlog((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk})),(delistify_last_arg((inst(_4104,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk}),boxlog_to_pfc,(\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk},{is_unit(_4104)}==>inst(_4104,opbuffer))),must_be_unqualified((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk},{is_unit(_4104)}==>inst(_4104,opbuffer)))*->rhs([pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4104=skInstOpbufferExists_16FnSk},{is_unit(_4104)}==>inst(_4104,opbuffer)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(skInstOpbufferExists_16FnSk, opbuffer), {_15724=skInstOpbufferExists_16FnSk}, {is_unit(_15724)}==>inst(_15724, opbuffer)))).
- % Found positive trigger: pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_18920=skInstOpbufferExists_16FnSk},{is_unit(_18920)}==>inst(_18920,opbuffer)))
- % body: compound(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_18920=skInstOpbufferExists_16FnSk},{is_unit(_18920)}==>inst(_18920,opbuffer)))),\+is_ftVar(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_18920=skInstOpbufferExists_16FnSk},{is_unit(_18920)}==>inst(_18920,opbuffer))))*->rhs([{with_current_why(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_18920=skInstOpbufferExists_16FnSk},{is_unit(_18920)}==>inst(_18920,opbuffer))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_18920=skInstOpbufferExists_16FnSk},{is_unit(_18920)}==>inst(_18920,opbuffer))))))}])
- % Found positive trigger: pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer)))}])
- % =pfclog=
- % \+inst(skInstOpbufferExists_16FnSk, opbuffer), {_5620=skInstOpbufferExists_16FnSk}, {is_unit(_5620)}==>inst(_5620, opbuffer).
- % Found positive trigger: pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer)))
- % body: is_kif_clause(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer))))*->rhs([clif(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer))))])
- % Found positive trigger: pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer)))
- % body: rhs([(\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer))])
- % RHS-Post1: \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer)
- % Support: pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5416=skInstOpbufferExists_16FnSk},{is_unit(_5416)}==>inst(_5416,opbuffer))),pt(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer))),rhs([(\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5620=skInstOpbufferExists_16FnSk},{is_unit(_5620)}==>inst(_5620,opbuffer))]))
- % r_sane:mpred_fwc1((\+inst(skInstOpbufferExists_16FnSk, opbuffer), {_38998=skInstOpbufferExists_16FnSk}, {is_unit(_38998)}==>inst(_38998, opbuffer))).
- % Adding negative
- % trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % test: call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer))
- % body: _6824=skInstOpbufferExists_16FnSk*->is_unit(_6824)*->rhs([inst(_6824,opbuffer)])
- % Support: (\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_7034=skInstOpbufferExists_16FnSk},{is_unit(_7034)}==>inst(_7034,opbuffer)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',83)
- % RHS-Post1: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % Support: \+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % cond: call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer))
- % action: skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])
- % from: mpred_add_support_fast(inst(skInstOpbufferExists_16FnSk,opbuffer),(\+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))))
- % r_sane:mpred_fwc1(inst(skInstOpbufferExists_16FnSk, opbuffer)).
- % Found positive trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % body: compound(inst(skInstOpbufferExists_16FnSk,opbuffer)),\+is_ftVar(inst(skInstOpbufferExists_16FnSk,opbuffer))*->rhs([{with_current_why(inst(skInstOpbufferExists_16FnSk,opbuffer),ignore(\+addAdmittedArguments(inst(skInstOpbufferExists_16FnSk,opbuffer))))}])
- % Found positive trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % body: is_kif_clause(inst(skInstOpbufferExists_16FnSk,opbuffer))*->rhs([clif(inst(skInstOpbufferExists_16FnSk,opbuffer))])
- % Found positive trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % body: compound(inst(skInstOpbufferExists_16FnSk,opbuffer)),\+is_ftVar(inst(skInstOpbufferExists_16FnSk,opbuffer))*->rhs([{with_current_why(inst(skInstOpbufferExists_16FnSk,opbuffer),ignore(\+addAdmittedArguments(inst(skInstOpbufferExists_16FnSk,opbuffer))))}])
- % Found negative trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % cond: call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer))
- % body: skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])
- % Support: spft(inst(skInstOpbufferExists_16FnSk,opbuffer),\+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)]))))
- % moving(inherit_above(header_sane, inst(_35498, _35500))).
- % Removing (withdraw1)
- % term: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % support (was): \+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))
- % SUCCESS: retract_u(spft(inst(skInstOpbufferExists_16FnSk,opbuffer),\+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,opbuffer),inst(skInstOpbufferExists_16FnSk,opbuffer),ax))
- % still_supported(admittedArgument(inst,2,opbuffer))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,opbuffer),inst(skInstOpbufferExists_16FnSk,opbuffer),ax))
- % still_supported(admittedArgument(inst,2,opbuffer))
- % Couldn't retract_i: spft(admittedArgument(inst,2,opbuffer),inst(skInstOpbufferExists_16FnSk,opbuffer),ax).
- % still_supported(admittedArgument(inst,2,opbuffer))
- % Couldn't retract_i: spft(inst(skInstOpbufferExists_16FnSk,opbuffer),_14740,_14742).
- % show_failure(mpred_undo1, retract_u(inst(skInstOpbufferExists_16FnSk, opbuffer))).
- % Found positive trigger: pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5592=skInstOpbufferExists_16FnSk},{is_unit(_5592)}==>inst(_5592,opbuffer)))
- % body: compound(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5592=skInstOpbufferExists_16FnSk},{is_unit(_5592)}==>inst(_5592,opbuffer)))),\+is_ftVar(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5592=skInstOpbufferExists_16FnSk},{is_unit(_5592)}==>inst(_5592,opbuffer))))*->rhs([{with_current_why(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5592=skInstOpbufferExists_16FnSk},{is_unit(_5592)}==>inst(_5592,opbuffer))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstOpbufferExists_16FnSk,opbuffer),{_5592=skInstOpbufferExists_16FnSk},{is_unit(_5592)}==>inst(_5592,opbuffer))))))}])
- % Found positive trigger: boxlog((inst(_4076,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4076=skInstOpbufferExists_16FnSk}))
- % body: compound(boxlog((inst(_4076,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4076=skInstOpbufferExists_16FnSk}))),\+is_ftVar(boxlog((inst(_4076,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4076=skInstOpbufferExists_16FnSk})))*->rhs([{with_current_why(boxlog((inst(_4076,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4076=skInstOpbufferExists_16FnSk})),ignore(\+addAdmittedArguments(boxlog((inst(_4076,opbuffer):- \+inst(skInstOpbufferExists_16FnSk,opbuffer),{_4076=skInstOpbufferExists_16FnSk})))))}])
- % RHS-Post1: boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_2284,opbuffer)))
- % Support: clif(exists(_2140,inst(_2140,opbuffer))),pt(clif(exists(_2284,inst(_2284,opbuffer))),(is_kif_clause(exists(_2284,inst(_2284,opbuffer)))*->rhs([{delistify_last_arg(exists(_2284,inst(_2284,opbuffer)),kif_to_boxlog,(inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_2284,opbuffer)))},boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_2284,opbuffer)))])))
- % r_sane:mpred_fwc1(boxlog((inst(skInstOpbufferExists_16FnSk, opbuffer):- \+inst(_19126, opbuffer)))).
- % Found positive trigger: boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer)))
- % body: compound(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer)))),\+is_ftVar(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer))))*->rhs([{with_current_why(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer))),ignore(\+addAdmittedArguments(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer))))))}])
- % Found positive trigger: boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer)))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer)))}])
- % =boxlog=
- % inst(skInstOpbufferExists_16FnSk, opbuffer) :-
- % \+ inst(_3798, opbuffer).
- % Found positive trigger: boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer)))
- % body: is_kif_clause(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer))))*->rhs([clif(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer))))])
- % Found positive trigger: boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer)))
- % body: delistify_last_arg((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer)),boxlog_to_pfc,_19220),must_be_unqualified(_19220)*->rhs([pfclog(_19220)])
- % RHS-Post1: pfclog((\+inst(_3798,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))
- % Support: boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3646,opbuffer))),pt(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer))),(delistify_last_arg((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3798,opbuffer)),boxlog_to_pfc,(\+inst(_3798,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))),must_be_unqualified((\+inst(_3798,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))*->rhs([pfclog((\+inst(_3798,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(_13646, opbuffer)==>inst(skInstOpbufferExists_16FnSk, opbuffer)))).
- % Found positive trigger: pfclog((\+inst(_16480,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))
- % body: compound(pfclog((\+inst(_16480,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))),\+is_ftVar(pfclog((\+inst(_16480,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))))*->rhs([{with_current_why(pfclog((\+inst(_16480,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))),ignore(\+addAdmittedArguments(pfclog((\+inst(_16480,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))))))}])
- % Found positive trigger: pfclog((\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))}])
- % =pfclog=
- % \+inst(_5024, opbuffer)==>inst(skInstOpbufferExists_16FnSk, opbuffer).
- % Found positive trigger: pfclog((\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))
- % body: is_kif_clause(pfclog((\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))))*->rhs([clif(pfclog((\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))))])
- % Found positive trigger: pfclog((\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))
- % body: rhs([(\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))])
- % RHS-Post1: \+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)
- % Support: pfclog((\+inst(_4872,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))),pt(pfclog((\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))),rhs([(\+inst(_5024,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))]))
- % r_sane:mpred_fwc1((\+inst(_31854, opbuffer)==>inst(skInstOpbufferExists_16FnSk, opbuffer))).
- % Adding negative
- % trigger: inst(_5964,opbuffer)
- % test: call_u_no_bc(inst(_5964,opbuffer))
- % body: rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])
- % Support: (\+inst(_6122,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',83)
- % RHS-Post1: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % Support: \+inst(_5964,opbuffer),nt(inst(_6482,opbuffer),call_u_no_bc(inst(_5964,opbuffer)),rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(_6482,opbuffer)
- % cond: call_u_no_bc(inst(_5964,opbuffer))
- % action: rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])
- % from: mpred_add_support_fast(inst(skInstOpbufferExists_16FnSk,opbuffer),(\+inst(_5964,opbuffer),nt(inst(_6482,opbuffer),call_u_no_bc(inst(_5964,opbuffer)),rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)]))))
- % r_sane:mpred_fwc1(inst(skInstOpbufferExists_16FnSk, opbuffer)).
- % Found positive trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % body: compound(inst(skInstOpbufferExists_16FnSk,opbuffer)),\+is_ftVar(inst(skInstOpbufferExists_16FnSk,opbuffer))*->rhs([{with_current_why(inst(skInstOpbufferExists_16FnSk,opbuffer),ignore(\+addAdmittedArguments(inst(skInstOpbufferExists_16FnSk,opbuffer))))}])
- % Found positive trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % body: is_kif_clause(inst(skInstOpbufferExists_16FnSk,opbuffer))*->rhs([clif(inst(skInstOpbufferExists_16FnSk,opbuffer))])
- % Found positive trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % body: compound(inst(skInstOpbufferExists_16FnSk,opbuffer)),\+is_ftVar(inst(skInstOpbufferExists_16FnSk,opbuffer))*->rhs([{with_current_why(inst(skInstOpbufferExists_16FnSk,opbuffer),ignore(\+addAdmittedArguments(inst(skInstOpbufferExists_16FnSk,opbuffer))))}])
- % Found negative trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % cond: call_u_no_bc(inst(_29530,opbuffer))
- % body: rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])
- % Support: spft(inst(skInstOpbufferExists_16FnSk,opbuffer),\+inst(_29530,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(_29530,opbuffer)),rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))
- % moving(inherit_above(header_sane, inst(_33916, _33918))).
- % Removing (withdraw1)
- % term: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % support (was): \+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)]))
- % SUCCESS: retract_u(spft(inst(skInstOpbufferExists_16FnSk,opbuffer),\+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)]))))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,opbuffer),inst(skInstOpbufferExists_16FnSk,opbuffer),ax))
- % still_supported(admittedArgument(inst,2,opbuffer))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,opbuffer),inst(skInstOpbufferExists_16FnSk,opbuffer),ax))
- % still_supported(admittedArgument(inst,2,opbuffer))
- % Couldn't retract_i: spft(admittedArgument(inst,2,opbuffer),inst(skInstOpbufferExists_16FnSk,opbuffer),ax).
- % still_supported(admittedArgument(inst,2,opbuffer))
- % RHS-Post1: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % Support: \+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % cond: call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer))
- % action: skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])
- % from: mpred_add_support_fast(inst(skInstOpbufferExists_16FnSk,opbuffer),(\+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))))
- % moving(inherit_above(header_sane, inst(_31862, _31864))).
- % SUCCESS: retract_u(spft(inst(skInstOpbufferExists_16FnSk,opbuffer),\+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))))
- % RHS-Post1: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % Support: \+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstOpbufferExists_16FnSk,opbuffer)
- % cond: call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer))
- % action: skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])
- % from: mpred_add_support_fast(inst(skInstOpbufferExists_16FnSk,opbuffer),(\+inst(skInstOpbufferExists_16FnSk,opbuffer),nt(inst(skInstOpbufferExists_16FnSk,opbuffer),call_u_no_bc(inst(skInstOpbufferExists_16FnSk,opbuffer)),(skInstOpbufferExists_16FnSk=skInstOpbufferExists_16FnSk*->is_unit(skInstOpbufferExists_16FnSk)*->rhs([inst(skInstOpbufferExists_16FnSk,opbuffer)])))))
- % moving(inherit_above(header_sane, inst(_29884, _29886))).
- % Found positive trigger: pfclog((\+inst(_5010,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))
- % body: compound(pfclog((\+inst(_5010,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer)))),\+is_ftVar(pfclog((\+inst(_5010,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))))*->rhs([{with_current_why(pfclog((\+inst(_5010,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))),ignore(\+addAdmittedArguments(pfclog((\+inst(_5010,opbuffer)==>inst(skInstOpbufferExists_16FnSk,opbuffer))))))}])
- % Found positive trigger: boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3784,opbuffer)))
- % body: compound(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3784,opbuffer)))),\+is_ftVar(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3784,opbuffer))))*->rhs([{with_current_why(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3784,opbuffer))),ignore(\+addAdmittedArguments(boxlog((inst(skInstOpbufferExists_16FnSk,opbuffer):- \+inst(_3784,opbuffer))))))}])
- % Found positive trigger: clif(exists(_2284,inst(_2284,opbuffer)))
- % body: compound(clif(exists(_2284,inst(_2284,opbuffer)))),\+is_ftVar(clif(exists(_2284,inst(_2284,opbuffer))))*->rhs([{with_current_why(clif(exists(_2284,inst(_2284,opbuffer))),ignore(\+addAdmittedArguments(clif(exists(_2284,inst(_2284,opbuffer))))))}])
- % Found positive trigger: exists(_1212,inst(_1212,opbuffer))
- % body: compound(exists(_1212,inst(_1212,opbuffer))),\+is_ftVar(exists(_1212,inst(_1212,opbuffer)))*->rhs([{with_current_why(exists(_1212,inst(_1212,opbuffer)),ignore(\+addAdmittedArguments(exists(_1212,inst(_1212,opbuffer)))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:94
- % r_sane:mpred_fwc1(forall(_33494, =>(inst(_33494, numbuffer), initalValue(_33494, 0)))).
- % Found positive trigger: forall(_1308,=>(inst(_1308,numbuffer),initalValue(_1308,0)))
- % body: compound(forall(_1308,=>(inst(_1308,numbuffer),initalValue(_1308,0)))),\+is_ftVar(forall(_1308,=>(inst(_1308,numbuffer),initalValue(_1308,0))))*->rhs([{with_current_why(forall(_1308,=>(inst(_1308,numbuffer),initalValue(_1308,0))),ignore(\+addAdmittedArguments(forall(_1308,=>(inst(_1308,numbuffer),initalValue(_1308,0))))))}])
- % r_sane:mpred_fwc1(admittedArgument(inst, 2, numbuffer)).
- % Found positive trigger: admittedArgument(inst,2,numbuffer)
- % body: compound(admittedArgument(inst,2,numbuffer)),\+is_ftVar(admittedArgument(inst,2,numbuffer))*->rhs([{with_current_why(admittedArgument(inst,2,numbuffer),ignore(\+addAdmittedArguments(admittedArgument(inst,2,numbuffer))))}])
- % Found positive trigger: admittedArgument(inst,2,numbuffer)
- % body: is_kif_clause(admittedArgument(inst,2,numbuffer))*->rhs([clif(admittedArgument(inst,2,numbuffer))])
- % Found positive trigger: admittedArgument(inst,2,numbuffer)
- % body: compound(admittedArgument(inst,2,numbuffer)),\+is_ftVar(admittedArgument(inst,2,numbuffer))*->rhs([{with_current_why(admittedArgument(inst,2,numbuffer),ignore(\+addAdmittedArguments(admittedArgument(inst,2,numbuffer))))}])
- % Found positive trigger: forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0)))
- % body: is_kif_clause(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))))*->rhs([clif(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))))])
- % RHS-Post1: clif(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))))
- % Support: forall(_1136,=>(inst(_1136,numbuffer),initalValue(_1136,0))),pt(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))),(is_kif_clause(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))))*->rhs([clif(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))))])))
- % r_sane:mpred_fwc1(clif(forall(_24232, =>(inst(_24232, numbuffer), initalValue(_24232, 0))))).
- % Found positive trigger: clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))
- % body: compound(clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))),\+is_ftVar(clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0)))))*->rhs([{with_current_why(clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0)))),ignore(\+addAdmittedArguments(clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0)))))))}])
- % Found positive trigger: clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))}])
- % =clif=
- % forall(_2540,
- % ( =>(inst(_2540, numbuffer), initalValue(_2540, 0))
- % )).
- % Found positive trigger: clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))
- % body: is_kif_clause(clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0)))))*->rhs([clif(clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0)))))])
- % Found positive trigger: clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))
- % body: \+is_kif_clause(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))*->rhs([{delistify_last_arg(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))),kif_to_boxlog,_2782)},boxlog(_2782)])
- % Found positive trigger: clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))
- % body: is_kif_clause(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))*->rhs([{delistify_last_arg(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))),kif_to_boxlog,_5816)},boxlog(_5816)])
- % kif :-
- % all(_2540, =>(inst(_2540, numbuffer), initalValue(_2540, 0))).
- % qualify_nesc :-
- % all(_2540, nesc(=>(inst(_2540, numbuffer), initalValue(_2540, 0)))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_2540, nesc(b_d(KB, nesc, poss), =>(inst(_2540, numbuffer), initalValue(_2540, 0)))), nesc(b_d(KB, nesc, poss), v(~inst(_2540, numbuffer), initalValue(_2540, 0)))))).
- % nnf :-
- % nesc(v(~inst(_2540, numbuffer), initalValue(_2540, 0))).
- % th_nnf_in :-
- % ( neg(inst(_2540, numbuffer))
- % ; tru(initalValue(_2540, 0))
- % ).
- % th_nnf_out :-
- % ~ (n(neg(inst(_2540, numbuffer))), n(tru(initalValue(_2540, 0)))).
- % RHS-Post1: boxlog((proven_neg(inst(_2540,numbuffer)):-proven_neg(initalValue(_2540,0))))
- % Support: clif(forall(_2372,=>(inst(_2372,numbuffer),initalValue(_2372,0)))),pt(clif(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0)))),(is_kif_clause(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))))*->rhs([{delistify_last_arg(forall(_2540,=>(inst(_2540,numbuffer),initalValue(_2540,0))),kif_to_boxlog,(proven_neg(inst(_2540,numbuffer)):-proven_neg(initalValue(_2540,0))))},boxlog((proven_neg(inst(_2540,numbuffer)):-proven_neg(initalValue(_2540,0))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(inst(_12118, numbuffer)):-proven_neg(initalValue(_12118, 0))))).
- % Found positive trigger: boxlog((proven_neg(inst(_14760,numbuffer)):-proven_neg(initalValue(_14760,0))))
- % body: compound(boxlog((proven_neg(inst(_14760,numbuffer)):-proven_neg(initalValue(_14760,0))))),\+is_ftVar(boxlog((proven_neg(inst(_14760,numbuffer)):-proven_neg(initalValue(_14760,0)))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_14760,numbuffer)):-proven_neg(initalValue(_14760,0)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_14760,numbuffer)):-proven_neg(initalValue(_14760,0)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0))))}])
- % =boxlog=
- % proven_neg(inst(_4166, numbuffer)) :-
- % proven_neg(initalValue(_4166, 0)).
- % Found positive trigger: boxlog((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0))))
- % body: is_kif_clause(boxlog((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0)))))*->rhs([clif(boxlog((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0)))))])
- % Found positive trigger: boxlog((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0))))
- % body: delistify_last_arg((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0))),boxlog_to_pfc,_14748),must_be_unqualified(_14748)*->rhs([pfclog(_14748)])
- % RHS-Post1: pfclog((~initalValue(_4166,0),{is_unit(_4166)}==>proven_neg(inst(_4166,numbuffer))))
- % Support: boxlog((proven_neg(inst(_3994,numbuffer)):-proven_neg(initalValue(_3994,0)))),pt(boxlog((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0)))),(delistify_last_arg((proven_neg(inst(_4166,numbuffer)):-proven_neg(initalValue(_4166,0))),boxlog_to_pfc,(~initalValue(_4166,0),{is_unit(_4166)}==>proven_neg(inst(_4166,numbuffer)))),must_be_unqualified((~initalValue(_4166,0),{is_unit(_4166)}==>proven_neg(inst(_4166,numbuffer))))*->rhs([pfclog((~initalValue(_4166,0),{is_unit(_4166)}==>proven_neg(inst(_4166,numbuffer))))])))
- % r_sane:mpred_fwc1(pfclog((~initalValue(_15046, 0), {is_unit(_15046)}==>proven_neg(inst(_15046, numbuffer))))).
- % Found positive trigger: pfclog((~initalValue(_18108,0),{is_unit(_18108)}==>proven_neg(inst(_18108,numbuffer))))
- % body: compound(pfclog((~initalValue(_18108,0),{is_unit(_18108)}==>proven_neg(inst(_18108,numbuffer))))),\+is_ftVar(pfclog((~initalValue(_18108,0),{is_unit(_18108)}==>proven_neg(inst(_18108,numbuffer)))))*->rhs([{with_current_why(pfclog((~initalValue(_18108,0),{is_unit(_18108)}==>proven_neg(inst(_18108,numbuffer)))),ignore(\+addAdmittedArguments(pfclog((~initalValue(_18108,0),{is_unit(_18108)}==>proven_neg(inst(_18108,numbuffer)))))))}])
- % Found positive trigger: pfclog((~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer))))}])
- % =pfclog=
- % ~initalValue(_5624, 0), {is_unit(_5624)}==>proven_neg(inst(_5624, numbuffer)).
- % Found positive trigger: pfclog((~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer))))
- % body: is_kif_clause(pfclog((~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer)))))*->rhs([clif(pfclog((~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer)))))])
- % Found positive trigger: pfclog((~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer))))
- % body: rhs([(~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer)))])
- % RHS-Post1: ~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer))
- % Support: pfclog((~initalValue(_5424,0),{is_unit(_5424)}==>proven_neg(inst(_5424,numbuffer)))),pt(pfclog((~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer)))),rhs([(~initalValue(_5624,0),{is_unit(_5624)}==>proven_neg(inst(_5624,numbuffer)))]))
- % r_sane:mpred_fwc1((~initalValue(_36278, 0), {is_unit(_36278)}==>proven_neg(inst(_36278, numbuffer)))).
- % Adding positive
- % trigger: ~initalValue(_6770,0)
- % body: is_unit(_6770)*->rhs([proven_neg(inst(_6770,numbuffer))])
- % Support: (~initalValue(_6976,0),{is_unit(_6976)}==>proven_neg(inst(_6976,numbuffer))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',94)
- % Found positive trigger: pfclog((~initalValue(_5596,0),{is_unit(_5596)}==>proven_neg(inst(_5596,numbuffer))))
- % body: compound(pfclog((~initalValue(_5596,0),{is_unit(_5596)}==>proven_neg(inst(_5596,numbuffer))))),\+is_ftVar(pfclog((~initalValue(_5596,0),{is_unit(_5596)}==>proven_neg(inst(_5596,numbuffer)))))*->rhs([{with_current_why(pfclog((~initalValue(_5596,0),{is_unit(_5596)}==>proven_neg(inst(_5596,numbuffer)))),ignore(\+addAdmittedArguments(pfclog((~initalValue(_5596,0),{is_unit(_5596)}==>proven_neg(inst(_5596,numbuffer)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_4138,numbuffer)):-proven_neg(initalValue(_4138,0))))
- % body: compound(boxlog((proven_neg(inst(_4138,numbuffer)):-proven_neg(initalValue(_4138,0))))),\+is_ftVar(boxlog((proven_neg(inst(_4138,numbuffer)):-proven_neg(initalValue(_4138,0)))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_4138,numbuffer)):-proven_neg(initalValue(_4138,0)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_4138,numbuffer)):-proven_neg(initalValue(_4138,0)))))))}])
- % RHS-Post1: boxlog((initalValue(_2512,0):-proven_tru(inst(_2512,numbuffer))))
- % Support: clif(forall(_2344,=>(inst(_2344,numbuffer),initalValue(_2344,0)))),pt(clif(forall(_2512,=>(inst(_2512,numbuffer),initalValue(_2512,0)))),(is_kif_clause(forall(_2512,=>(inst(_2512,numbuffer),initalValue(_2512,0))))*->rhs([{delistify_last_arg(forall(_2512,=>(inst(_2512,numbuffer),initalValue(_2512,0))),kif_to_boxlog,(initalValue(_2512,0):-proven_tru(inst(_2512,numbuffer))))},boxlog((initalValue(_2512,0):-proven_tru(inst(_2512,numbuffer))))])))
- % r_sane:mpred_fwc1(boxlog((initalValue(_11766, 0):-proven_tru(inst(_11766, numbuffer))))).
- % Found positive trigger: boxlog((initalValue(_14354,0):-proven_tru(inst(_14354,numbuffer))))
- % body: compound(boxlog((initalValue(_14354,0):-proven_tru(inst(_14354,numbuffer))))),\+is_ftVar(boxlog((initalValue(_14354,0):-proven_tru(inst(_14354,numbuffer)))))*->rhs([{with_current_why(boxlog((initalValue(_14354,0):-proven_tru(inst(_14354,numbuffer)))),ignore(\+addAdmittedArguments(boxlog((initalValue(_14354,0):-proven_tru(inst(_14354,numbuffer)))))))}])
- % Found positive trigger: boxlog((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer))))}])
- % =boxlog=
- % initalValue(_4030, 0) :-
- % proven_tru(inst(_4030, numbuffer)).
- % Found positive trigger: boxlog((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer))))
- % body: is_kif_clause(boxlog((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer)))))*->rhs([clif(boxlog((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer)))))])
- % Found positive trigger: boxlog((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer))))
- % body: delistify_last_arg((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer))),boxlog_to_pfc,_14378),must_be_unqualified(_14378)*->rhs([pfclog(_14378)])
- % RHS-Post1: pfclog((inst(_4030,numbuffer),{is_unit(_4030)}==>initalValue(_4030,0)))
- % Support: boxlog((initalValue(_3866,0):-proven_tru(inst(_3866,numbuffer)))),pt(boxlog((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer)))),(delistify_last_arg((initalValue(_4030,0):-proven_tru(inst(_4030,numbuffer))),boxlog_to_pfc,(inst(_4030,numbuffer),{is_unit(_4030)}==>initalValue(_4030,0))),must_be_unqualified((inst(_4030,numbuffer),{is_unit(_4030)}==>initalValue(_4030,0)))*->rhs([pfclog((inst(_4030,numbuffer),{is_unit(_4030)}==>initalValue(_4030,0)))])))
- % r_sane:mpred_fwc1(pfclog((inst(_14380, numbuffer), {is_unit(_14380)}==>initalValue(_14380, 0)))).
- % Found positive trigger: pfclog((inst(_17338,numbuffer),{is_unit(_17338)}==>initalValue(_17338,0)))
- % body: compound(pfclog((inst(_17338,numbuffer),{is_unit(_17338)}==>initalValue(_17338,0)))),\+is_ftVar(pfclog((inst(_17338,numbuffer),{is_unit(_17338)}==>initalValue(_17338,0))))*->rhs([{with_current_why(pfclog((inst(_17338,numbuffer),{is_unit(_17338)}==>initalValue(_17338,0))),ignore(\+addAdmittedArguments(pfclog((inst(_17338,numbuffer),{is_unit(_17338)}==>initalValue(_17338,0))))))}])
- % Found positive trigger: pfclog((inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0)))}])
- % =pfclog=
- % inst(_5404, numbuffer), {is_unit(_5404)}==>initalValue(_5404, 0).
- % Found positive trigger: pfclog((inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0)))
- % body: is_kif_clause(pfclog((inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0))))*->rhs([clif(pfclog((inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0))))])
- % Found positive trigger: pfclog((inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0)))
- % body: rhs([(inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0))])
- % RHS-Post1: inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0)
- % Support: pfclog((inst(_5220,numbuffer),{is_unit(_5220)}==>initalValue(_5220,0))),pt(pfclog((inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0))),rhs([(inst(_5404,numbuffer),{is_unit(_5404)}==>initalValue(_5404,0))]))
- % r_sane:mpred_fwc1((inst(_34564, numbuffer), {is_unit(_34564)}==>initalValue(_34564, 0))).
- % Adding positive
- % trigger: inst(_6466,numbuffer)
- % body: is_unit(_6466)*->rhs([initalValue(_6466,0)])
- % Support: (inst(_6656,numbuffer),{is_unit(_6656)}==>initalValue(_6656,0)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',94)
- % Found positive trigger: pfclog((inst(_5372,numbuffer),{is_unit(_5372)}==>initalValue(_5372,0)))
- % body: compound(pfclog((inst(_5372,numbuffer),{is_unit(_5372)}==>initalValue(_5372,0)))),\+is_ftVar(pfclog((inst(_5372,numbuffer),{is_unit(_5372)}==>initalValue(_5372,0))))*->rhs([{with_current_why(pfclog((inst(_5372,numbuffer),{is_unit(_5372)}==>initalValue(_5372,0))),ignore(\+addAdmittedArguments(pfclog((inst(_5372,numbuffer),{is_unit(_5372)}==>initalValue(_5372,0))))))}])
- % Found positive trigger: boxlog((initalValue(_3998,0):-proven_tru(inst(_3998,numbuffer))))
- % body: compound(boxlog((initalValue(_3998,0):-proven_tru(inst(_3998,numbuffer))))),\+is_ftVar(boxlog((initalValue(_3998,0):-proven_tru(inst(_3998,numbuffer)))))*->rhs([{with_current_why(boxlog((initalValue(_3998,0):-proven_tru(inst(_3998,numbuffer)))),ignore(\+addAdmittedArguments(boxlog((initalValue(_3998,0):-proven_tru(inst(_3998,numbuffer)))))))}])
- % Found positive trigger: clif(forall(_2512,=>(inst(_2512,numbuffer),initalValue(_2512,0))))
- % body: compound(clif(forall(_2512,=>(inst(_2512,numbuffer),initalValue(_2512,0))))),\+is_ftVar(clif(forall(_2512,=>(inst(_2512,numbuffer),initalValue(_2512,0)))))*->rhs([{with_current_why(clif(forall(_2512,=>(inst(_2512,numbuffer),initalValue(_2512,0)))),ignore(\+addAdmittedArguments(clif(forall(_2512,=>(inst(_2512,numbuffer),initalValue(_2512,0)))))))}])
- % Found positive trigger: forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0)))
- % body: compound(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0)))),\+is_ftVar(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))))*->rhs([{with_current_why(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))),ignore(\+addAdmittedArguments(forall(_1296,=>(inst(_1296,numbuffer),initalValue(_1296,0))))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:97
- % r_sane:mpred_fwc1(exists(_11176, initialWorld(_11176))).
- % Found positive trigger: exists(_1208,initialWorld(_1208))
- % body: compound(exists(_1208,initialWorld(_1208))),\+is_ftVar(exists(_1208,initialWorld(_1208)))*->rhs([{with_current_why(exists(_1208,initialWorld(_1208)),ignore(\+addAdmittedArguments(exists(_1208,initialWorld(_1208)))))}])
- % Found positive trigger: exists(_1208,initialWorld(_1208))
- % body: is_kif_clause(exists(_1208,initialWorld(_1208)))*->rhs([clif(exists(_1208,initialWorld(_1208)))])
- % RHS-Post1: clif(exists(_1208,initialWorld(_1208)))
- % Support: exists(_1076,initialWorld(_1076)),pt(exists(_1208,initialWorld(_1208)),(is_kif_clause(exists(_1208,initialWorld(_1208)))*->rhs([clif(exists(_1208,initialWorld(_1208)))])))
- % r_sane:mpred_fwc1(clif(exists(_15084, initialWorld(_15084)))).
- % Found positive trigger: clif(exists(_2246,initialWorld(_2246)))
- % body: compound(clif(exists(_2246,initialWorld(_2246)))),\+is_ftVar(clif(exists(_2246,initialWorld(_2246))))*->rhs([{with_current_why(clif(exists(_2246,initialWorld(_2246))),ignore(\+addAdmittedArguments(clif(exists(_2246,initialWorld(_2246))))))}])
- % Found positive trigger: clif(exists(_2246,initialWorld(_2246)))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2246,initialWorld(_2246)))}])
- % =clif=
- % exists(_2246, initialWorld(_2246)).
- % Found positive trigger: clif(exists(_2246,initialWorld(_2246)))
- % body: is_kif_clause(clif(exists(_2246,initialWorld(_2246))))*->rhs([clif(clif(exists(_2246,initialWorld(_2246))))])
- % Found positive trigger: clif(exists(_2246,initialWorld(_2246)))
- % body: \+is_kif_clause(exists(_2246,initialWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,initialWorld(_2246)),kif_to_boxlog,_15256)},boxlog(_15256)])
- % Found positive trigger: clif(exists(_2246,initialWorld(_2246)))
- % body: is_kif_clause(exists(_2246,initialWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,initialWorld(_2246)),kif_to_boxlog,_2442)},boxlog(_2442)])
- % kif :-
- % exists(_2246, initialWorld(_2246)).
- % qualify_nesc :-
- % exists(_2246, nesc(initialWorld(_2246))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2246, nesc(b_d(KB, nesc, poss), initialWorld(_2246))), v(nesc(b_d(KB, nesc, poss), initialWorld(_2246)), v(nesc(b_d(KB, nesc, poss), initialWorld(skIsInitialworldExists_17FnSk)), ~skolem(_2246, skIsInitialworldExists_17FnSk)))))).
- % nnf :-
- % v(nesc(initialWorld(_2246)), v(nesc(initialWorld(skIsInitialworldExists_17FnSk)), ~skolem(_2246, skIsInitialworldExists_17FnSk))).
- % moving(inherit_above(header_sane, ttExpressionType(_8818))).
- % th_nnf_in :-
- % ( tru(initialWorld(_2246))
- % ; tru(initialWorld(skIsInitialworldExists_17FnSk))
- % ; neg(skolem(_2246, skIsInitialworldExists_17FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(initialWorld(_2246))), n(tru(initialWorld(skIsInitialworldExists_17FnSk))), n(neg(skolem(_2246, skIsInitialworldExists_17FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2246,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_2246))))
- % Support: clif(exists(_2106,initialWorld(_2106))),pt(clif(exists(_2246,initialWorld(_2246))),(is_kif_clause(exists(_2246,initialWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,initialWorld(_2246)),kif_to_boxlog,(proven_neg(skolem(_2246,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_2246))))},boxlog((proven_neg(skolem(_2246,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_2246))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12500, skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)), proven_neg(initialWorld(_12500))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15310,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_15310))))
- % body: compound(boxlog((proven_neg(skolem(_15310,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_15310))))),\+is_ftVar(boxlog((proven_neg(skolem(_15310,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_15310)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15310,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_15310)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15310,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_15310)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978))))}])
- % =boxlog=
- % proven_neg(skolem(_3978, skIsInitialworldExists_17FnSk)) :-
- % proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),
- % proven_neg(initialWorld(_3978)).
- % Found positive trigger: boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978)))))*->rhs([clif(boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978))))
- % body: delistify_last_arg((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978))),boxlog_to_pfc,_15334),must_be_unqualified(_15334)*->rhs([pfclog(_15334)])
- % RHS-Post1: pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_3978),{is_unit(_3978)}==>proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk))))
- % Support: boxlog((proven_neg(skolem(_3798,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3798)))),pt(boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978)))),(delistify_last_arg((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978))),boxlog_to_pfc,(~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_3978),{is_unit(_3978)}==>proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)))),must_be_unqualified((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_3978),{is_unit(_3978)}==>proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk))))*->rhs([pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_3978),{is_unit(_3978)}==>proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~initialWorld(skIsInitialworldExists_17FnSk), ~initialWorld(_15664), {is_unit(_15664)}==>proven_neg(skolem(_15664, skIsInitialworldExists_17FnSk))))).
- % Found positive trigger: pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_18886),{is_unit(_18886)}==>proven_neg(skolem(_18886,skIsInitialworldExists_17FnSk))))
- % body: compound(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_18886),{is_unit(_18886)}==>proven_neg(skolem(_18886,skIsInitialworldExists_17FnSk))))),\+is_ftVar(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_18886),{is_unit(_18886)}==>proven_neg(skolem(_18886,skIsInitialworldExists_17FnSk)))))*->rhs([{with_current_why(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_18886),{is_unit(_18886)}==>proven_neg(skolem(_18886,skIsInitialworldExists_17FnSk)))),ignore(\+addAdmittedArguments(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_18886),{is_unit(_18886)}==>proven_neg(skolem(_18886,skIsInitialworldExists_17FnSk)))))))}])
- % Found positive trigger: pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk))))}])
- % =pfclog=
- % ~initialWorld(skIsInitialworldExists_17FnSk), ~initialWorld(_5514), {is_unit(_5514)}==>proven_neg(skolem(_5514, skIsInitialworldExists_17FnSk)).
- % Found positive trigger: pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk))))
- % body: is_kif_clause(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk)))))*->rhs([clif(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk)))))])
- % Found positive trigger: pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk))))
- % body: rhs([(~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk)))])
- % RHS-Post1: ~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk))
- % Support: pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5306),{is_unit(_5306)}==>proven_neg(skolem(_5306,skIsInitialworldExists_17FnSk)))),pt(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk)))),rhs([(~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk)))]))
- % r_sane:mpred_fwc1((~initialWorld(skIsInitialworldExists_17FnSk), ~initialWorld(_38280), {is_unit(_38280)}==>proven_neg(skolem(_38280, skIsInitialworldExists_17FnSk)))).
- % Adding positive
- % trigger: ~initialWorld(skIsInitialworldExists_17FnSk)
- % body: pt(~initialWorld(_6736),(is_unit(_6736)*->rhs([proven_neg(skolem(_6736,skIsInitialworldExists_17FnSk))])))
- % Support: (~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_6950),{is_unit(_6950)}==>proven_neg(skolem(_6950,skIsInitialworldExists_17FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',97)
- % Found positive trigger: pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk))))
- % body: compound(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk))))),\+is_ftVar(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk)))))*->rhs([{with_current_why(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk)))),ignore(\+addAdmittedArguments(pfclog((~initialWorld(skIsInitialworldExists_17FnSk),~initialWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsInitialworldExists_17FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978))))
- % body: compound(boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978))))),\+is_ftVar(boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_3978,skIsInitialworldExists_17FnSk)):-proven_neg(initialWorld(skIsInitialworldExists_17FnSk)),proven_neg(initialWorld(_3978)))))))}])
- % RHS-Post1: boxlog((initialWorld(_2246):- \+initialWorld(skIsInitialworldExists_17FnSk),{_2246=skIsInitialworldExists_17FnSk}))
- % Support: clif(exists(_2106,initialWorld(_2106))),pt(clif(exists(_2246,initialWorld(_2246))),(is_kif_clause(exists(_2246,initialWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,initialWorld(_2246)),kif_to_boxlog,(initialWorld(_2246):- \+initialWorld(skIsInitialworldExists_17FnSk),{_2246=skIsInitialworldExists_17FnSk}))},boxlog((initialWorld(_2246):- \+initialWorld(skIsInitialworldExists_17FnSk),{_2246=skIsInitialworldExists_17FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((initialWorld(_12128):- \+initialWorld(skIsInitialworldExists_17FnSk), {_12128=skIsInitialworldExists_17FnSk}))).
- % Found positive trigger: boxlog((initialWorld(_14870):- \+initialWorld(skIsInitialworldExists_17FnSk),{_14870=skIsInitialworldExists_17FnSk}))
- % body: compound(boxlog((initialWorld(_14870):- \+initialWorld(skIsInitialworldExists_17FnSk),{_14870=skIsInitialworldExists_17FnSk}))),\+is_ftVar(boxlog((initialWorld(_14870):- \+initialWorld(skIsInitialworldExists_17FnSk),{_14870=skIsInitialworldExists_17FnSk})))*->rhs([{with_current_why(boxlog((initialWorld(_14870):- \+initialWorld(skIsInitialworldExists_17FnSk),{_14870=skIsInitialworldExists_17FnSk})),ignore(\+addAdmittedArguments(boxlog((initialWorld(_14870):- \+initialWorld(skIsInitialworldExists_17FnSk),{_14870=skIsInitialworldExists_17FnSk})))))}])
- % Found positive trigger: boxlog((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk}))}])
- % =boxlog=
- % initialWorld(_4022) :-
- % \+ initialWorld(skIsInitialworldExists_17FnSk),
- % { _4022=skIsInitialworldExists_17FnSk
- % }.
- % Found positive trigger: boxlog((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk}))
- % body: is_kif_clause(boxlog((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk})))*->rhs([clif(boxlog((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk})))])
- % Found positive trigger: boxlog((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk}))
- % body: delistify_last_arg((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk}),boxlog_to_pfc,_15092),must_be_unqualified(_15092)*->rhs([pfclog(_15092)])
- % RHS-Post1: pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk},{is_unit(_4022)}==>initialWorld(_4022)))
- % Support: boxlog((initialWorld(_3850):- \+initialWorld(skIsInitialworldExists_17FnSk),{_3850=skIsInitialworldExists_17FnSk})),pt(boxlog((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk})),(delistify_last_arg((initialWorld(_4022):- \+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk}),boxlog_to_pfc,(\+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk},{is_unit(_4022)}==>initialWorld(_4022))),must_be_unqualified((\+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk},{is_unit(_4022)}==>initialWorld(_4022)))*->rhs([pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_4022=skIsInitialworldExists_17FnSk},{is_unit(_4022)}==>initialWorld(_4022)))])))
- % r_sane:mpred_fwc1(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk), {_15382=skIsInitialworldExists_17FnSk}, {is_unit(_15382)}==>initialWorld(_15382)))).
- % Found positive trigger: pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_18546=skIsInitialworldExists_17FnSk},{is_unit(_18546)}==>initialWorld(_18546)))
- % body: compound(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_18546=skIsInitialworldExists_17FnSk},{is_unit(_18546)}==>initialWorld(_18546)))),\+is_ftVar(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_18546=skIsInitialworldExists_17FnSk},{is_unit(_18546)}==>initialWorld(_18546))))*->rhs([{with_current_why(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_18546=skIsInitialworldExists_17FnSk},{is_unit(_18546)}==>initialWorld(_18546))),ignore(\+addAdmittedArguments(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_18546=skIsInitialworldExists_17FnSk},{is_unit(_18546)}==>initialWorld(_18546))))))}])
- % Found positive trigger: pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506)))}])
- % =pfclog=
- % \+initialWorld(skIsInitialworldExists_17FnSk), {_5506=skIsInitialworldExists_17FnSk}, {is_unit(_5506)}==>initialWorld(_5506).
- % Found positive trigger: pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506)))
- % body: is_kif_clause(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506))))*->rhs([clif(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506))))])
- % Found positive trigger: pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506)))
- % body: rhs([(\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506))])
- % RHS-Post1: \+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506)
- % Support: pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5306=skIsInitialworldExists_17FnSk},{is_unit(_5306)}==>initialWorld(_5306))),pt(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506))),rhs([(\+initialWorld(skIsInitialworldExists_17FnSk),{_5506=skIsInitialworldExists_17FnSk},{is_unit(_5506)}==>initialWorld(_5506))]))
- % r_sane:mpred_fwc1((\+initialWorld(skIsInitialworldExists_17FnSk), {_38180=skIsInitialworldExists_17FnSk}, {is_unit(_38180)}==>initialWorld(_38180))).
- % Adding negative
- % trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % test: call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk))
- % body: _6656=skIsInitialworldExists_17FnSk*->is_unit(_6656)*->rhs([initialWorld(_6656)])
- % Support: (\+initialWorld(skIsInitialworldExists_17FnSk),{_6862=skIsInitialworldExists_17FnSk},{is_unit(_6862)}==>initialWorld(_6862)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',97)
- % uses_predicate(header_sane, baseKB, initialWorld, 1).
- % RHS-Post1: initialWorld(skIsInitialworldExists_17FnSk)
- % Support: \+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % cond: call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk))
- % action: skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])
- % from: mpred_add_support_fast(initialWorld(skIsInitialworldExists_17FnSk),(\+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))))
- % r_sane:mpred_fwc1(initialWorld(skIsInitialworldExists_17FnSk)).
- % Found positive trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % body: compound(initialWorld(skIsInitialworldExists_17FnSk)),\+is_ftVar(initialWorld(skIsInitialworldExists_17FnSk))*->rhs([{with_current_why(initialWorld(skIsInitialworldExists_17FnSk),ignore(\+addAdmittedArguments(initialWorld(skIsInitialworldExists_17FnSk))))}])
- % Found positive trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % body: is_kif_clause(initialWorld(skIsInitialworldExists_17FnSk))*->rhs([clif(initialWorld(skIsInitialworldExists_17FnSk))])
- % Found positive trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % body: compound(initialWorld(skIsInitialworldExists_17FnSk)),\+is_ftVar(initialWorld(skIsInitialworldExists_17FnSk))*->rhs([{with_current_why(initialWorld(skIsInitialworldExists_17FnSk),ignore(\+addAdmittedArguments(initialWorld(skIsInitialworldExists_17FnSk))))}])
- % Found negative trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % cond: call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk))
- % body: skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])
- % Support: spft(initialWorld(skIsInitialworldExists_17FnSk),\+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)]))))
- % moving(inherit_above(header_sane, initialWorld(_28870))).
- % Removing (withdraw1)
- % term: initialWorld(skIsInitialworldExists_17FnSk)
- % support (was): \+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))
- % SUCCESS: retract_u(spft(initialWorld(skIsInitialworldExists_17FnSk),\+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))))
- % Couldn't retract_i: spft(initialWorld(skIsInitialworldExists_17FnSk),_12430,_12432).
- % show_failure(mpred_undo1, retract_u(initialWorld(skIsInitialworldExists_17FnSk))).
- % Found positive trigger: pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5474=skIsInitialworldExists_17FnSk},{is_unit(_5474)}==>initialWorld(_5474)))
- % body: compound(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5474=skIsInitialworldExists_17FnSk},{is_unit(_5474)}==>initialWorld(_5474)))),\+is_ftVar(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5474=skIsInitialworldExists_17FnSk},{is_unit(_5474)}==>initialWorld(_5474))))*->rhs([{with_current_why(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5474=skIsInitialworldExists_17FnSk},{is_unit(_5474)}==>initialWorld(_5474))),ignore(\+addAdmittedArguments(pfclog((\+initialWorld(skIsInitialworldExists_17FnSk),{_5474=skIsInitialworldExists_17FnSk},{is_unit(_5474)}==>initialWorld(_5474))))))}])
- % Found positive trigger: boxlog((initialWorld(_3990):- \+initialWorld(skIsInitialworldExists_17FnSk),{_3990=skIsInitialworldExists_17FnSk}))
- % body: compound(boxlog((initialWorld(_3990):- \+initialWorld(skIsInitialworldExists_17FnSk),{_3990=skIsInitialworldExists_17FnSk}))),\+is_ftVar(boxlog((initialWorld(_3990):- \+initialWorld(skIsInitialworldExists_17FnSk),{_3990=skIsInitialworldExists_17FnSk})))*->rhs([{with_current_why(boxlog((initialWorld(_3990):- \+initialWorld(skIsInitialworldExists_17FnSk),{_3990=skIsInitialworldExists_17FnSk})),ignore(\+addAdmittedArguments(boxlog((initialWorld(_3990):- \+initialWorld(skIsInitialworldExists_17FnSk),{_3990=skIsInitialworldExists_17FnSk})))))}])
- % RHS-Post1: boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_2246)))
- % Support: clif(exists(_2106,initialWorld(_2106))),pt(clif(exists(_2246,initialWorld(_2246))),(is_kif_clause(exists(_2246,initialWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,initialWorld(_2246)),kif_to_boxlog,(initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_2246)))},boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_2246)))])))
- % r_sane:mpred_fwc1(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_18648)))).
- % Found positive trigger: boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728)))
- % body: compound(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728)))),\+is_ftVar(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728))))*->rhs([{with_current_why(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728))),ignore(\+addAdmittedArguments(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728))))))}])
- % Found positive trigger: boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728)))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728)))}])
- % =boxlog=
- % initialWorld(skIsInitialworldExists_17FnSk) :-
- % \+ initialWorld(_3728).
- % Found positive trigger: boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728)))
- % body: is_kif_clause(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728))))*->rhs([clif(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728))))])
- % Found positive trigger: boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728)))
- % body: delistify_last_arg((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728)),boxlog_to_pfc,_18924),must_be_unqualified(_18924)*->rhs([pfclog(_18924)])
- % RHS-Post1: pfclog((\+initialWorld(_3728)==>initialWorld(skIsInitialworldExists_17FnSk)))
- % Support: boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3580))),pt(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728))),(delistify_last_arg((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3728)),boxlog_to_pfc,(\+initialWorld(_3728)==>initialWorld(skIsInitialworldExists_17FnSk))),must_be_unqualified((\+initialWorld(_3728)==>initialWorld(skIsInitialworldExists_17FnSk)))*->rhs([pfclog((\+initialWorld(_3728)==>initialWorld(skIsInitialworldExists_17FnSk)))])))
- % r_sane:mpred_fwc1(pfclog((\+initialWorld(_13312)==>initialWorld(skIsInitialworldExists_17FnSk)))).
- % Found positive trigger: pfclog((\+initialWorld(_16114)==>initialWorld(skIsInitialworldExists_17FnSk)))
- % body: compound(pfclog((\+initialWorld(_16114)==>initialWorld(skIsInitialworldExists_17FnSk)))),\+is_ftVar(pfclog((\+initialWorld(_16114)==>initialWorld(skIsInitialworldExists_17FnSk))))*->rhs([{with_current_why(pfclog((\+initialWorld(_16114)==>initialWorld(skIsInitialworldExists_17FnSk))),ignore(\+addAdmittedArguments(pfclog((\+initialWorld(_16114)==>initialWorld(skIsInitialworldExists_17FnSk))))))}])
- % Found positive trigger: pfclog((\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk)))}])
- % =pfclog=
- % \+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk).
- % Found positive trigger: pfclog((\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk)))
- % body: is_kif_clause(pfclog((\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk))))*->rhs([clif(pfclog((\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk))))])
- % Found positive trigger: pfclog((\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk)))
- % body: rhs([(\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk))])
- % RHS-Post1: \+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk)
- % Support: pfclog((\+initialWorld(_4774)==>initialWorld(skIsInitialworldExists_17FnSk))),pt(pfclog((\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk))),rhs([(\+initialWorld(_4922)==>initialWorld(skIsInitialworldExists_17FnSk))]))
- % r_sane:mpred_fwc1((\+initialWorld(_31038)==>initialWorld(skIsInitialworldExists_17FnSk))).
- % Adding negative
- % trigger: initialWorld(_5840)
- % test: call_u_no_bc(initialWorld(_5840))
- % body: rhs([initialWorld(skIsInitialworldExists_17FnSk)])
- % Support: (\+initialWorld(_5994)==>initialWorld(skIsInitialworldExists_17FnSk)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',97)
- % RHS-Post1: initialWorld(skIsInitialworldExists_17FnSk)
- % Support: \+initialWorld(_5840),nt(initialWorld(_6346),call_u_no_bc(initialWorld(_5840)),rhs([initialWorld(skIsInitialworldExists_17FnSk)]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: initialWorld(_6346)
- % cond: call_u_no_bc(initialWorld(_5840))
- % action: rhs([initialWorld(skIsInitialworldExists_17FnSk)])
- % from: mpred_add_support_fast(initialWorld(skIsInitialworldExists_17FnSk),(\+initialWorld(_5840),nt(initialWorld(_6346),call_u_no_bc(initialWorld(_5840)),rhs([initialWorld(skIsInitialworldExists_17FnSk)]))))
- % r_sane:mpred_fwc1(initialWorld(skIsInitialworldExists_17FnSk)).
- % Found positive trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % body: compound(initialWorld(skIsInitialworldExists_17FnSk)),\+is_ftVar(initialWorld(skIsInitialworldExists_17FnSk))*->rhs([{with_current_why(initialWorld(skIsInitialworldExists_17FnSk),ignore(\+addAdmittedArguments(initialWorld(skIsInitialworldExists_17FnSk))))}])
- % Found positive trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % body: is_kif_clause(initialWorld(skIsInitialworldExists_17FnSk))*->rhs([clif(initialWorld(skIsInitialworldExists_17FnSk))])
- % Found positive trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % body: compound(initialWorld(skIsInitialworldExists_17FnSk)),\+is_ftVar(initialWorld(skIsInitialworldExists_17FnSk))*->rhs([{with_current_why(initialWorld(skIsInitialworldExists_17FnSk),ignore(\+addAdmittedArguments(initialWorld(skIsInitialworldExists_17FnSk))))}])
- % Found negative trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % cond: call_u_no_bc(initialWorld(_23036))
- % body: rhs([initialWorld(skIsInitialworldExists_17FnSk)])
- % Support: spft(initialWorld(skIsInitialworldExists_17FnSk),\+initialWorld(_23036),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(_23036)),rhs([initialWorld(skIsInitialworldExists_17FnSk)])))
- % moving(inherit_above(header_sane, initialWorld(_27292))).
- % Removing (withdraw1)
- % term: initialWorld(skIsInitialworldExists_17FnSk)
- % support (was): \+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),rhs([initialWorld(skIsInitialworldExists_17FnSk)]))
- % SUCCESS: retract_u(spft(initialWorld(skIsInitialworldExists_17FnSk),\+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),rhs([initialWorld(skIsInitialworldExists_17FnSk)]))))
- % RHS-Post1: initialWorld(skIsInitialworldExists_17FnSk)
- % Support: \+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % cond: call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk))
- % action: skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])
- % from: mpred_add_support_fast(initialWorld(skIsInitialworldExists_17FnSk),(\+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))))
- % moving(inherit_above(header_sane, initialWorld(_27490))).
- % SUCCESS: retract_u(spft(initialWorld(skIsInitialworldExists_17FnSk),\+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))))
- % RHS-Post1: initialWorld(skIsInitialworldExists_17FnSk)
- % Support: \+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: initialWorld(skIsInitialworldExists_17FnSk)
- % cond: call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk))
- % action: skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])
- % from: mpred_add_support_fast(initialWorld(skIsInitialworldExists_17FnSk),(\+initialWorld(skIsInitialworldExists_17FnSk),nt(initialWorld(skIsInitialworldExists_17FnSk),call_u_no_bc(initialWorld(skIsInitialworldExists_17FnSk)),(skIsInitialworldExists_17FnSk=skIsInitialworldExists_17FnSk*->is_unit(skIsInitialworldExists_17FnSk)*->rhs([initialWorld(skIsInitialworldExists_17FnSk)])))))
- % moving(inherit_above(header_sane, initialWorld(_27648))).
- % Found positive trigger: pfclog((\+initialWorld(_4902)==>initialWorld(skIsInitialworldExists_17FnSk)))
- % body: compound(pfclog((\+initialWorld(_4902)==>initialWorld(skIsInitialworldExists_17FnSk)))),\+is_ftVar(pfclog((\+initialWorld(_4902)==>initialWorld(skIsInitialworldExists_17FnSk))))*->rhs([{with_current_why(pfclog((\+initialWorld(_4902)==>initialWorld(skIsInitialworldExists_17FnSk))),ignore(\+addAdmittedArguments(pfclog((\+initialWorld(_4902)==>initialWorld(skIsInitialworldExists_17FnSk))))))}])
- % Found positive trigger: boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3708)))
- % body: compound(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3708)))),\+is_ftVar(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3708))))*->rhs([{with_current_why(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3708))),ignore(\+addAdmittedArguments(boxlog((initialWorld(skIsInitialworldExists_17FnSk):- \+initialWorld(_3708))))))}])
- % Found positive trigger: clif(exists(_2246,initialWorld(_2246)))
- % body: compound(clif(exists(_2246,initialWorld(_2246)))),\+is_ftVar(clif(exists(_2246,initialWorld(_2246))))*->rhs([{with_current_why(clif(exists(_2246,initialWorld(_2246))),ignore(\+addAdmittedArguments(clif(exists(_2246,initialWorld(_2246))))))}])
- % Found positive trigger: exists(_1198,initialWorld(_1198))
- % body: compound(exists(_1198,initialWorld(_1198))),\+is_ftVar(exists(_1198,initialWorld(_1198)))*->rhs([{with_current_why(exists(_1198,initialWorld(_1198)),ignore(\+addAdmittedArguments(exists(_1198,initialWorld(_1198)))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:100
- % r_sane:mpred_fwc1(=>(&(initalValue(_32188, _32190), initialWorld(_32194)), currentValue(_32194, _32188, _32190))).
- % Found positive trigger: =>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456))
- % body: compound(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456))),\+is_ftVar(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)))*->rhs([{with_current_why(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)),ignore(\+addAdmittedArguments(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)))))}])
- % Found positive trigger: =>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456))
- % body: is_kif_clause(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)))*->rhs([clif(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)))])
- % RHS-Post1: clif(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)))
- % Support: =>(&(initalValue(_1274,_1276),initialWorld(_1280)),currentValue(_1280,_1274,_1276)),pt(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)),(is_kif_clause(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)))*->rhs([clif(=>(&(initalValue(_1454,_1456),initialWorld(_1460)),currentValue(_1460,_1454,_1456)))])))
- % r_sane:mpred_fwc1(clif(=>(&(initalValue(_18446, _18448), initialWorld(_18452)), currentValue(_18452, _18446, _18448)))).
- % Found positive trigger: clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))
- % body: compound(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))),\+is_ftVar(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))))*->rhs([{with_current_why(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))),ignore(\+addAdmittedArguments(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))))))}])
- % Found positive trigger: clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))}])
- % =clif=
- % =>(&(initalValue(_2778, _2780), initialWorld(_2784)), currentValue(_2784, _2778, _2780)).
- % Found positive trigger: clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))
- % body: is_kif_clause(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))))*->rhs([clif(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))))])
- % Found positive trigger: clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))
- % body: \+is_kif_clause(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))*->rhs([{delistify_last_arg(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)),kif_to_boxlog,_3042)},boxlog(_3042)])
- % Found positive trigger: clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))
- % body: is_kif_clause(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))*->rhs([{delistify_last_arg(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)),kif_to_boxlog,_5382)},boxlog(_5382)])
- % kif :-
- % all(_2784,
- % all(_2778,
- % all(_2780,
- % =>(&(initalValue(_2778, _2780), initialWorld(_2784)), currentValue(_2784, _2778, _2780))))).
- % qualify_nesc :-
- % all(_2784,
- % all(_2778,
- % all(_2780,
- % nesc(=>(&(initalValue(_2778, _2780), initialWorld(_2784)), currentValue(_2784, _2778, _2780)))))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_2784, all(_2778, all(_2780, nesc(b_d(KB, nesc, poss), =>(&(initalValue(_2778, _2780), initialWorld(_2784)), currentValue(_2784, _2778, _2780)))))), nesc(b_d(KB, nesc, poss), v(v(~initalValue(_2778, _2780), ~initialWorld(_2784)), currentValue(_2784, _2778, _2780)))))).
- % nnf :-
- % nesc(v(v(~initalValue(_2778, _2780), ~initialWorld(_2784)), currentValue(_2784, _2778, _2780))).
- % th_nnf_in :-
- % ( ( neg(initalValue(_2778, _2780))
- % ; neg(initialWorld(_2784))
- % )
- % ; tru(currentValue(_2784, _2778, _2780))
- % ).
- % th_nnf_out :-
- % ~ ((n(neg(initalValue(_2778, _2780))), n(neg(initialWorld(_2784)))), n(tru(currentValue(_2784, _2778, _2780)))).
- % RHS-Post1: boxlog((proven_neg(initialWorld(_2784)):-proven_not_neg(initalValue(_2778,_2780)),proven_neg(currentValue(_2784,_2778,_2780))))
- % Support: clif(=>(&(initalValue(_2590,_2592),initialWorld(_2596)),currentValue(_2596,_2590,_2592))),pt(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))),(is_kif_clause(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))*->rhs([{delistify_last_arg(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)),kif_to_boxlog,(proven_neg(initialWorld(_2784)):-proven_not_neg(initalValue(_2778,_2780)),proven_neg(currentValue(_2784,_2778,_2780))))},boxlog((proven_neg(initialWorld(_2784)):-proven_not_neg(initalValue(_2778,_2780)),proven_neg(currentValue(_2784,_2778,_2780))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(initialWorld(_13444)):-proven_not_neg(initalValue(_13458, _13460)), proven_neg(currentValue(_13444, _13458, _13460))))).
- % Found positive trigger: boxlog((proven_neg(initialWorld(_16386)):-proven_not_neg(initalValue(_16400,_16402)),proven_neg(currentValue(_16386,_16400,_16402))))
- % body: compound(boxlog((proven_neg(initialWorld(_16386)):-proven_not_neg(initalValue(_16400,_16402)),proven_neg(currentValue(_16386,_16400,_16402))))),\+is_ftVar(boxlog((proven_neg(initialWorld(_16386)):-proven_not_neg(initalValue(_16400,_16402)),proven_neg(currentValue(_16386,_16400,_16402)))))*->rhs([{with_current_why(boxlog((proven_neg(initialWorld(_16386)):-proven_not_neg(initalValue(_16400,_16402)),proven_neg(currentValue(_16386,_16400,_16402)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(initialWorld(_16386)):-proven_not_neg(initalValue(_16400,_16402)),proven_neg(currentValue(_16386,_16400,_16402)))))))}])
- % Found positive trigger: boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790))))}])
- % =boxlog=
- % proven_neg(initialWorld(_4774)) :-
- % proven_not_neg(initalValue(_4788, _4790)),
- % proven_neg(currentValue(_4774, _4788, _4790)).
- % Found positive trigger: boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790))))
- % body: is_kif_clause(boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790)))))*->rhs([clif(boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790)))))])
- % Found positive trigger: boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790))))
- % body: delistify_last_arg((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790))),boxlog_to_pfc,_16426),must_be_unqualified(_16426)*->rhs([pfclog(_16426)])
- % RHS-Post1: pfclog((proven_not_neg(initalValue(_4788,_4790)),~currentValue(_4774,_4788,_4790),{is_unit(_4774)}==>proven_neg(initialWorld(_4774))))
- % Support: boxlog((proven_neg(initialWorld(_4562)):-proven_not_neg(initalValue(_4576,_4578)),proven_neg(currentValue(_4562,_4576,_4578)))),pt(boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790)))),(delistify_last_arg((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790))),boxlog_to_pfc,(proven_not_neg(initalValue(_4788,_4790)),~currentValue(_4774,_4788,_4790),{is_unit(_4774)}==>proven_neg(initialWorld(_4774)))),must_be_unqualified((proven_not_neg(initalValue(_4788,_4790)),~currentValue(_4774,_4788,_4790),{is_unit(_4774)}==>proven_neg(initialWorld(_4774))))*->rhs([pfclog((proven_not_neg(initalValue(_4788,_4790)),~currentValue(_4774,_4788,_4790),{is_unit(_4774)}==>proven_neg(initialWorld(_4774))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(initalValue(_16790, _16792)), ~currentValue(_16806, _16790, _16792), {is_unit(_16806)}==>proven_neg(initialWorld(_16806))))).
- % Found positive trigger: pfclog((proven_not_neg(initalValue(_20152,_20154)),~currentValue(_20168,_20152,_20154),{is_unit(_20168)}==>proven_neg(initialWorld(_20168))))
- % body: compound(pfclog((proven_not_neg(initalValue(_20152,_20154)),~currentValue(_20168,_20152,_20154),{is_unit(_20168)}==>proven_neg(initialWorld(_20168))))),\+is_ftVar(pfclog((proven_not_neg(initalValue(_20152,_20154)),~currentValue(_20168,_20152,_20154),{is_unit(_20168)}==>proven_neg(initialWorld(_20168)))))*->rhs([{with_current_why(pfclog((proven_not_neg(initalValue(_20152,_20154)),~currentValue(_20168,_20152,_20154),{is_unit(_20168)}==>proven_neg(initialWorld(_20168)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(initalValue(_20152,_20154)),~currentValue(_20168,_20152,_20154),{is_unit(_20168)}==>proven_neg(initialWorld(_20168)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520))))}])
- % =pfclog=
- % proven_not_neg(initalValue(_6504, _6506)), ~currentValue(_6520, _6504, _6506), {is_unit(_6520)}==>proven_neg(initialWorld(_6520)).
- % Found positive trigger: pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520))))
- % body: is_kif_clause(pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520)))))*->rhs([clif(pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520)))))])
- % Found positive trigger: pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520))))
- % body: rhs([(proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520)))])
- % RHS-Post1: proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520))
- % Support: pfclog((proven_not_neg(initalValue(_6264,_6266)),~currentValue(_6280,_6264,_6266),{is_unit(_6280)}==>proven_neg(initialWorld(_6280)))),pt(pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520)))),rhs([(proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520)))]))
- % r_sane:mpred_fwc1((proven_not_neg(initalValue(_40164, _40166)), ~currentValue(_40180, _40164, _40166), {is_unit(_40180)}==>proven_neg(initialWorld(_40180)))).
- % Adding positive
- % trigger: proven_not_neg(initalValue(_7878,_7880))
- % body: pt(~currentValue(_7894,_7878,_7880),(is_unit(_7894)*->rhs([proven_neg(initialWorld(_7894))])))
- % Support: (proven_not_neg(initalValue(_8124,_8126)),~currentValue(_8140,_8124,_8126),{is_unit(_8140)}==>proven_neg(initialWorld(_8140))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',100)
- % Found positive trigger: pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520))))
- % body: compound(pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520))))),\+is_ftVar(pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520)))))*->rhs([{with_current_why(pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(initalValue(_6504,_6506)),~currentValue(_6520,_6504,_6506),{is_unit(_6520)}==>proven_neg(initialWorld(_6520)))))))}])
- % Found positive trigger: boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790))))
- % body: compound(boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790))))),\+is_ftVar(boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790)))))*->rhs([{with_current_why(boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(initialWorld(_4774)):-proven_not_neg(initalValue(_4788,_4790)),proven_neg(currentValue(_4774,_4788,_4790)))))))}])
- % RHS-Post1: boxlog((proven_neg(initalValue(_2778,_2780)):-proven_not_neg(initialWorld(_2784)),proven_neg(currentValue(_2784,_2778,_2780))))
- % Support: clif(=>(&(initalValue(_2590,_2592),initialWorld(_2596)),currentValue(_2596,_2590,_2592))),pt(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))),(is_kif_clause(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))*->rhs([{delistify_last_arg(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)),kif_to_boxlog,(proven_neg(initalValue(_2778,_2780)):-proven_not_neg(initialWorld(_2784)),proven_neg(currentValue(_2784,_2778,_2780))))},boxlog((proven_neg(initalValue(_2778,_2780)):-proven_not_neg(initialWorld(_2784)),proven_neg(currentValue(_2784,_2778,_2780))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(initalValue(_44986, _44988)):-proven_not_neg(initialWorld(_45002)), proven_neg(currentValue(_45002, _44986, _44988))))).
- % Found positive trigger: boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))))
- % body: compound(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))))),\+is_ftVar(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))))*->rhs([{with_current_why(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))))))}])
- % Found positive trigger: boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))))}])
- % =boxlog=
- % proven_neg(initalValue(_4854, _4856)) :-
- % proven_not_neg(initialWorld(_4870)),
- % proven_neg(currentValue(_4870, _4854, _4856)).
- % Found positive trigger: boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))))
- % body: is_kif_clause(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))))*->rhs([clif(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))))])
- % Found positive trigger: boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))))
- % body: delistify_last_arg((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))),boxlog_to_pfc,_22260),must_be_unqualified(_22260)*->rhs([pfclog(_22260)])
- % RHS-Post1: pfclog((proven_not_neg(initialWorld(_4870)),~currentValue(_4870,_4854,_4856),{is_unit(_4856,_4854)}==>proven_neg(initalValue(_4854,_4856))))
- % Support: boxlog((proven_neg(initalValue(_4642,_4644)):-proven_not_neg(initialWorld(_4658)),proven_neg(currentValue(_4658,_4642,_4644)))),pt(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))),(delistify_last_arg((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))),boxlog_to_pfc,(proven_not_neg(initialWorld(_4870)),~currentValue(_4870,_4854,_4856),{is_unit(_4856,_4854)}==>proven_neg(initalValue(_4854,_4856)))),must_be_unqualified((proven_not_neg(initialWorld(_4870)),~currentValue(_4870,_4854,_4856),{is_unit(_4856,_4854)}==>proven_neg(initalValue(_4854,_4856))))*->rhs([pfclog((proven_not_neg(initialWorld(_4870)),~currentValue(_4870,_4854,_4856),{is_unit(_4856,_4854)}==>proven_neg(initalValue(_4854,_4856))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(initialWorld(_16974)), ~currentValue(_16974, _16990, _16992), {is_unit(_16992, _16990)}==>proven_neg(initalValue(_16990, _16992))))).
- % Found positive trigger: pfclog((proven_not_neg(initialWorld(_20358)),~currentValue(_20358,_20374,_20376),{is_unit(_20376,_20374)}==>proven_neg(initalValue(_20374,_20376))))
- % body: compound(pfclog((proven_not_neg(initialWorld(_20358)),~currentValue(_20358,_20374,_20376),{is_unit(_20376,_20374)}==>proven_neg(initalValue(_20374,_20376))))),\+is_ftVar(pfclog((proven_not_neg(initialWorld(_20358)),~currentValue(_20358,_20374,_20376),{is_unit(_20376,_20374)}==>proven_neg(initalValue(_20374,_20376)))))*->rhs([{with_current_why(pfclog((proven_not_neg(initialWorld(_20358)),~currentValue(_20358,_20374,_20376),{is_unit(_20376,_20374)}==>proven_neg(initalValue(_20374,_20376)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(initialWorld(_20358)),~currentValue(_20358,_20374,_20376),{is_unit(_20376,_20374)}==>proven_neg(initalValue(_20374,_20376)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616))))}])
- % =pfclog=
- % proven_not_neg(initialWorld(_6598)), ~currentValue(_6598, _6614, _6616), {is_unit(_6616, _6614)}==>proven_neg(initalValue(_6614, _6616)).
- % Found positive trigger: pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616))))
- % body: is_kif_clause(pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616)))))*->rhs([clif(pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616)))))])
- % Found positive trigger: pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616))))
- % body: rhs([(proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616)))])
- % RHS-Post1: proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616))
- % Support: pfclog((proven_not_neg(initialWorld(_6354)),~currentValue(_6354,_6370,_6372),{is_unit(_6372,_6370)}==>proven_neg(initalValue(_6370,_6372)))),pt(pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616)))),rhs([(proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616)))]))
- % r_sane:mpred_fwc1((proven_not_neg(initialWorld(_40736)), ~currentValue(_40736, _40752, _40754), {is_unit(_40754, _40752)}==>proven_neg(initalValue(_40752, _40754)))).
- % Adding positive
- % trigger: proven_not_neg(initialWorld(_7992))
- % body: pt(~currentValue(_7992,_8008,_8010),(is_unit(_8010,_8008)*->rhs([proven_neg(initalValue(_8008,_8010))])))
- % Support: (proven_not_neg(initialWorld(_8242)),~currentValue(_8242,_8258,_8260),{is_unit(_8260,_8258)}==>proven_neg(initalValue(_8258,_8260))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',100)
- % Found positive trigger: pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616))))
- % body: compound(pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616))))),\+is_ftVar(pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616)))))*->rhs([{with_current_why(pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(initialWorld(_6598)),~currentValue(_6598,_6614,_6616),{is_unit(_6616,_6614)}==>proven_neg(initalValue(_6614,_6616)))))))}])
- % Found positive trigger: boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))))
- % body: compound(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856))))),\+is_ftVar(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))))*->rhs([{with_current_why(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(initalValue(_4854,_4856)):-proven_not_neg(initialWorld(_4870)),proven_neg(currentValue(_4870,_4854,_4856)))))))}])
- % RHS-Post1: boxlog((currentValue(_2784,_2778,_2780):-proven_tru(initalValue(_2778,_2780)),proven_tru(initialWorld(_2784))))
- % Support: clif(=>(&(initalValue(_2590,_2592),initialWorld(_2596)),currentValue(_2596,_2590,_2592))),pt(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))),(is_kif_clause(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))*->rhs([{delistify_last_arg(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)),kif_to_boxlog,(currentValue(_2784,_2778,_2780):-proven_tru(initalValue(_2778,_2780)),proven_tru(initialWorld(_2784))))},boxlog((currentValue(_2784,_2778,_2780):-proven_tru(initalValue(_2778,_2780)),proven_tru(initialWorld(_2784))))])))
- % r_sane:mpred_fwc1(boxlog((currentValue(_44870, _44872, _44874):-proven_tru(initalValue(_44872, _44874)), proven_tru(initialWorld(_44870))))).
- % Found positive trigger: boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604))))
- % body: compound(boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604))))),\+is_ftVar(boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604)))))*->rhs([{with_current_why(boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604)))),ignore(\+addAdmittedArguments(boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604)))))))}])
- % Found positive trigger: boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604))))}])
- % =boxlog=
- % currentValue(_4604, _4606, _4608) :-
- % proven_tru(initalValue(_4606, _4608)),
- % proven_tru(initialWorld(_4604)).
- % Found positive trigger: boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604))))
- % body: is_kif_clause(boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604)))))*->rhs([clif(boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604)))))])
- % Found positive trigger: boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604))))
- % body: delistify_last_arg((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604))),boxlog_to_pfc,_21626),must_be_unqualified(_21626)*->rhs([pfclog(_21626)])
- % RHS-Post1: pfclog((initalValue(_4606,_4608),initialWorld(_4604),{is_unit(_4608,_4606,_4604)}==>currentValue(_4604,_4606,_4608)))
- % Support: boxlog((currentValue(_4400,_4402,_4404):-proven_tru(initalValue(_4402,_4404)),proven_tru(initialWorld(_4400)))),pt(boxlog((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604)))),(delistify_last_arg((currentValue(_4604,_4606,_4608):-proven_tru(initalValue(_4606,_4608)),proven_tru(initialWorld(_4604))),boxlog_to_pfc,(initalValue(_4606,_4608),initialWorld(_4604),{is_unit(_4608,_4606,_4604)}==>currentValue(_4604,_4606,_4608))),must_be_unqualified((initalValue(_4606,_4608),initialWorld(_4604),{is_unit(_4608,_4606,_4604)}==>currentValue(_4604,_4606,_4608)))*->rhs([pfclog((initalValue(_4606,_4608),initialWorld(_4604),{is_unit(_4608,_4606,_4604)}==>currentValue(_4604,_4606,_4608)))])))
- % r_sane:mpred_fwc1(pfclog((initalValue(_16056, _16058), initialWorld(_16068), {is_unit(_16058, _16056, _16068)}==>currentValue(_16068, _16056, _16058)))).
- % Found positive trigger: pfclog((initalValue(_19302,_19304),initialWorld(_19314),{is_unit(_19304,_19302,_19314)}==>currentValue(_19314,_19302,_19304)))
- % body: compound(pfclog((initalValue(_19302,_19304),initialWorld(_19314),{is_unit(_19304,_19302,_19314)}==>currentValue(_19314,_19302,_19304)))),\+is_ftVar(pfclog((initalValue(_19302,_19304),initialWorld(_19314),{is_unit(_19304,_19302,_19314)}==>currentValue(_19314,_19302,_19304))))*->rhs([{with_current_why(pfclog((initalValue(_19302,_19304),initialWorld(_19314),{is_unit(_19304,_19302,_19314)}==>currentValue(_19314,_19302,_19304))),ignore(\+addAdmittedArguments(pfclog((initalValue(_19302,_19304),initialWorld(_19314),{is_unit(_19304,_19302,_19314)}==>currentValue(_19314,_19302,_19304))))))}])
- % Found positive trigger: pfclog((initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252)))}])
- % =pfclog=
- % initalValue(_6250, _6252), initialWorld(_6262), {is_unit(_6252, _6250, _6262)}==>currentValue(_6262, _6250, _6252).
- % Found positive trigger: pfclog((initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252)))
- % body: is_kif_clause(pfclog((initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252))))*->rhs([clif(pfclog((initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252))))])
- % Found positive trigger: pfclog((initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252)))
- % body: rhs([(initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252))])
- % RHS-Post1: initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252)
- % Support: pfclog((initalValue(_6026,_6028),initialWorld(_6038),{is_unit(_6028,_6026,_6038)}==>currentValue(_6038,_6026,_6028))),pt(pfclog((initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252))),rhs([(initalValue(_6250,_6252),initialWorld(_6262),{is_unit(_6252,_6250,_6262)}==>currentValue(_6262,_6250,_6252))]))
- % r_sane:mpred_fwc1((initalValue(_38468, _38470), initialWorld(_38480), {is_unit(_38470, _38468, _38480)}==>currentValue(_38480, _38468, _38470))).
- % Adding positive
- % trigger: initalValue(_7512,_7514)
- % body: pt(initialWorld(_7524),(is_unit(_7514,_7512,_7524)*->rhs([currentValue(_7524,_7512,_7514)])))
- % Support: (initalValue(_7742,_7744),initialWorld(_7754),{is_unit(_7744,_7742,_7754)}==>currentValue(_7754,_7742,_7744)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',100)
- % uses_predicate(header_sane, baseKB, initalValue, 2).
- % Found positive trigger: pfclog((initalValue(_6218,_6220),initialWorld(_6230),{is_unit(_6220,_6218,_6230)}==>currentValue(_6230,_6218,_6220)))
- % body: compound(pfclog((initalValue(_6218,_6220),initialWorld(_6230),{is_unit(_6220,_6218,_6230)}==>currentValue(_6230,_6218,_6220)))),\+is_ftVar(pfclog((initalValue(_6218,_6220),initialWorld(_6230),{is_unit(_6220,_6218,_6230)}==>currentValue(_6230,_6218,_6220))))*->rhs([{with_current_why(pfclog((initalValue(_6218,_6220),initialWorld(_6230),{is_unit(_6220,_6218,_6230)}==>currentValue(_6230,_6218,_6220))),ignore(\+addAdmittedArguments(pfclog((initalValue(_6218,_6220),initialWorld(_6230),{is_unit(_6220,_6218,_6230)}==>currentValue(_6230,_6218,_6220))))))}])
- % Found positive trigger: boxlog((currentValue(_4572,_4574,_4576):-proven_tru(initalValue(_4574,_4576)),proven_tru(initialWorld(_4572))))
- % body: compound(boxlog((currentValue(_4572,_4574,_4576):-proven_tru(initalValue(_4574,_4576)),proven_tru(initialWorld(_4572))))),\+is_ftVar(boxlog((currentValue(_4572,_4574,_4576):-proven_tru(initalValue(_4574,_4576)),proven_tru(initialWorld(_4572)))))*->rhs([{with_current_why(boxlog((currentValue(_4572,_4574,_4576):-proven_tru(initalValue(_4574,_4576)),proven_tru(initialWorld(_4572)))),ignore(\+addAdmittedArguments(boxlog((currentValue(_4572,_4574,_4576):-proven_tru(initalValue(_4574,_4576)),proven_tru(initialWorld(_4572)))))))}])
- % Found positive trigger: clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))
- % body: compound(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780)))),\+is_ftVar(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))))*->rhs([{with_current_why(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))),ignore(\+addAdmittedArguments(clif(=>(&(initalValue(_2778,_2780),initialWorld(_2784)),currentValue(_2784,_2778,_2780))))))}])
- % Found positive trigger: =>(&(initalValue(_1442,_1444),initialWorld(_1448)),currentValue(_1448,_1442,_1444))
- % body: compound(=>(&(initalValue(_1442,_1444),initialWorld(_1448)),currentValue(_1448,_1442,_1444))),\+is_ftVar(=>(&(initalValue(_1442,_1444),initialWorld(_1448)),currentValue(_1448,_1442,_1444)))*->rhs([{with_current_why(=>(&(initalValue(_1442,_1444),initialWorld(_1448)),currentValue(_1448,_1442,_1444)),ignore(\+addAdmittedArguments(=>(&(initalValue(_1442,_1444),initialWorld(_1448)),currentValue(_1448,_1442,_1444)))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:103
- % r_sane:mpred_fwc1(forall(_19958, forall(_19964, exists(_19970, =>(&(inst(_19964, numbuffer), world(_19958)), currentValue(_19958, _19964, _19970)))))).
- % Found positive trigger: forall(_1570,forall(_1576,exists(_1582,=>(&(inst(_1576,numbuffer),world(_1570)),currentValue(_1570,_1576,_1582)))))
- % body: compound(forall(_1570,forall(_1576,exists(_1582,=>(&(inst(_1576,numbuffer),world(_1570)),currentValue(_1570,_1576,_1582)))))),\+is_ftVar(forall(_1570,forall(_1576,exists(_1582,=>(&(inst(_1576,numbuffer),world(_1570)),currentValue(_1570,_1576,_1582))))))*->rhs([{with_current_why(forall(_1570,forall(_1576,exists(_1582,=>(&(inst(_1576,numbuffer),world(_1570)),currentValue(_1570,_1576,_1582))))),ignore(\+addAdmittedArguments(forall(_1570,forall(_1576,exists(_1582,=>(&(inst(_1576,numbuffer),world(_1570)),currentValue(_1570,_1576,_1582))))))))}])
- % Found positive trigger: forall(_1570,forall(_1576,exists(_1582,=>(&(inst(_1576,numbuffer),world(_1570)),currentValue(_1570,_1576,_1582)))))
- % body: is_kif_clause(forall(_1570,forall(_1576,exists(_1582,=>(&(inst(_1576,numbuffer),world(_1570)),currentValue(_1570,_1576,_1582))))))*->rhs([clif(forall(_1570,forall(_1576,exists(_1582,=>(&(inst(_1576,numbuffer),world(_1570)),currentValue(_1570,_1576,_1582))))))])
- % RHS-Post1: clif(forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568))))))
- % Support: forall(_1340,forall(_1346,exists(_1352,=>(&(inst(_1346,numbuffer),world(_1340)),currentValue(_1340,_1346,_1352))))),pt(forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568))))),(is_kif_clause(forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568))))))*->rhs([clif(forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568))))))])))
- % r_sane:mpred_fwc1(clif(forall(_11234, forall(_11240, exists(_11246, =>(&(inst(_11240, numbuffer), world(_11234)), currentValue(_11234, _11240, _11246))))))).
- % Found positive trigger: clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))
- % body: compound(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))),\+is_ftVar(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))))*->rhs([{with_current_why(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))),ignore(\+addAdmittedArguments(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))))))}])
- % Found positive trigger: clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))}])
- % =clif=
- % forall(_3114,
- % forall(_3120,
- % exists(_3126,
- % =>(&(inst(_3120, numbuffer), world(_3114)), currentValue(_3114, _3120, _3126))))).
- % Found positive trigger: clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))
- % body: is_kif_clause(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))))*->rhs([clif(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))))])
- % Found positive trigger: clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))
- % body: \+is_kif_clause(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))*->rhs([{delistify_last_arg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))),kif_to_boxlog,_3444)},boxlog(_3444)])
- % Found positive trigger: clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))
- % body: is_kif_clause(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))*->rhs([{delistify_last_arg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))),kif_to_boxlog,_5916)},boxlog(_5916)])
- % kif :-
- % all(_3114,
- % all(_3120,
- % exists(_3126,
- % =>(&(inst(_3120, numbuffer), world(_3114)), currentValue(_3114, _3120, _3126))))).
- % qualify_nesc :-
- % all(_3114,
- % all(_3120,
- % exists(_3126,
- % nesc(=>(&(inst(_3120, numbuffer), world(_3114)), currentValue(_3114, _3120, _3126)))))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_3114, all(_3120, exists(_3126, nesc(b_d(KB, nesc, poss), =>(&(inst(_3120, numbuffer), world(_3114)), currentValue(_3114, _3120, _3126)))))), v(nesc(b_d(KB, nesc, poss), v(v(~inst(_3120, numbuffer), ~world(_3114)), currentValue(_3114, _3120, _3126))), v(~skolem(_3126, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120, _3114)), nesc(b_d(KB, nesc, poss), v(v(~inst(_3120, numbuffer), ~world(_3114)), currentValue(_3114, _3120, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120, _3114))))))))).
- % nnf :-
- % v(nesc(v(v(~inst(_3120, numbuffer), ~world(_3114)), currentValue(_3114, _3120, _3126))), v(~skolem(_3126, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120, _3114)), nesc(v(v(~inst(_3120, numbuffer), ~world(_3114)), currentValue(_3114, _3120, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120, _3114)))))).
- % th_nnf_in :-
- % ( ( ( neg(inst(_3120, numbuffer))
- % ; neg(world(_3114))
- % )
- % ; tru(currentValue(_3114, _3120, _3126))
- % )
- % ; neg(skolem(_3126,
- % skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,
- % _3114)))
- % ; ( neg(inst(_3120, numbuffer))
- % ; neg(world(_3114))
- % )
- % ; tru(currentValue(_3114,
- % _3120,
- % skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,
- % _3114)))
- % ).
- % th_nnf_out :-
- % ~ (((n(neg(inst(_3120, numbuffer))), n(neg(world(_3114)))), n(tru(currentValue(_3114, _3120, _3126)))), n(neg(skolem(_3126, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120, _3114)))), (n(neg(inst(_3120, numbuffer))), n(neg(world(_3114)))), n(tru(currentValue(_3114, _3120, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120, _3114))))).
- % RHS-Post1: boxlog((proven_neg(world(_3114)):-proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,_3126))))
- % Support: clif(forall(_2890,forall(_2896,exists(_2902,=>(&(inst(_2896,numbuffer),world(_2890)),currentValue(_2890,_2896,_2902)))))),pt(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))),(is_kif_clause(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))*->rhs([{delistify_last_arg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))),kif_to_boxlog,(proven_neg(world(_3114)):-proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,_3126))))},boxlog((proven_neg(world(_3114)):-proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,_3126))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(world(_18754)):-proven_not_neg(inst(_18768, numbuffer)), proven_neg(currentValue(_18754, _18768, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_18768, _18754))), {ignore(_18812=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_18768, _18754))}, proven_not_neg(world(_18754)), proven_neg(currentValue(_18754, _18768, _18812))))).
- % Found positive trigger: boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))))
- % body: compound(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))))),\+is_ftVar(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))))*->rhs([{with_current_why(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))))))}])
- % Found positive trigger: boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))))}])
- % =boxlog=
- % proven_neg(world(_6726)) :-
- % proven_not_neg(inst(_6740, numbuffer)),
- % proven_neg(currentValue(_6726,
- % _6740,
- % skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,
- % _6726))),
- % { ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740, _6726))
- % },
- % proven_not_neg(world(_6726)),
- % proven_neg(currentValue(_6726, _6740, _6784)).
- % Found positive trigger: boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))))
- % body: is_kif_clause(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))))*->rhs([clif(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))))])
- % Found positive trigger: boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))))
- % body: delistify_last_arg((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))),boxlog_to_pfc,_7198),must_be_unqualified(_7198)*->rhs([pfclog(_7198)])
- % RHS-Post1: pfclog((proven_not_neg(inst(_6740,numbuffer)),~currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726)),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),~currentValue(_6726,_6740,_6784),{is_unit(_6726)}==>proven_neg(world(_6726))))
- % Support: boxlog((proven_neg(world(_6386)):-proven_not_neg(inst(_6400,numbuffer)),proven_neg(currentValue(_6386,_6400,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6400,_6386))),{ignore(_6444=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6400,_6386))},proven_not_neg(world(_6386)),proven_neg(currentValue(_6386,_6400,_6444)))),pt(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))),(delistify_last_arg((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))),boxlog_to_pfc,(proven_not_neg(inst(_6740,numbuffer)),~currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726)),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),~currentValue(_6726,_6740,_6784),{is_unit(_6726)}==>proven_neg(world(_6726)))),must_be_unqualified((proven_not_neg(inst(_6740,numbuffer)),~currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726)),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),~currentValue(_6726,_6740,_6784),{is_unit(_6726)}==>proven_neg(world(_6726))))*->rhs([pfclog((proven_not_neg(inst(_6740,numbuffer)),~currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726)),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),~currentValue(_6726,_6740,_6784),{is_unit(_6726)}==>proven_neg(world(_6726))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(inst(_23282, numbuffer)), ~currentValue(_23298, _23282, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_23282, _23298)), {ignore(_23326=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_23282, _23298))}, proven_not_neg(world(_23298)), ~currentValue(_23298, _23282, _23326), {is_unit(_23298)}==>proven_neg(world(_23298))))).
- % Found positive trigger: pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))))
- % body: compound(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))))),\+is_ftVar(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))))*->rhs([{with_current_why(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))))}])
- % =pfclog=
- % proven_not_neg(inst(_9352, numbuffer)), ~currentValue(_9368, _9352, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352, _9368)), {ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352, _9368))}, proven_not_neg(world(_9368)), ~currentValue(_9368, _9352, _9396), {is_unit(_9368)}==>proven_neg(world(_9368)).
- % Found positive trigger: pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))))
- % body: is_kif_clause(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))))*->rhs([clif(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))))])
- % Found positive trigger: pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))))
- % body: rhs([(proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))])
- % RHS-Post1: proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))
- % Support: pfclog((proven_not_neg(inst(_8984,numbuffer)),~currentValue(_9000,_8984,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_8984,_9000)),{ignore(_9028=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_8984,_9000))},proven_not_neg(world(_9000)),~currentValue(_9000,_8984,_9028),{is_unit(_9000)}==>proven_neg(world(_9000)))),pt(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))),rhs([(proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))]))
- % r_sane:mpred_fwc1((proven_not_neg(inst(_28014, numbuffer)), ~currentValue(_28030, _28014, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_28014, _28030)), {ignore(_28058=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_28014, _28030))}, proven_not_neg(world(_28030)), ~currentValue(_28030, _28014, _28058), {is_unit(_28030)}==>proven_neg(world(_28030)))).
- % Adding positive
- % trigger: proven_not_neg(inst(_28014,numbuffer))
- % body: pt(~currentValue(_28030,_28014,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_28014,_28030)),(ignore(_28058=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_28014,_28030))*->pt(proven_not_neg(world(_28030)),pt(~currentValue(_28030,_28014,_28058),(is_unit(_28030)*->rhs([proven_neg(world(_28030))]))))))
- % Support: (proven_not_neg(inst(_32416,numbuffer)),~currentValue(_32432,_32416,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_32416,_32432)),{ignore(_32460=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_32416,_32432))},proven_not_neg(world(_32432)),~currentValue(_32432,_32416,_32460),{is_unit(_32432)}==>proven_neg(world(_32432))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',103)
- % Found positive trigger: pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))))
- % body: compound(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368))))),\+is_ftVar(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))))*->rhs([{with_current_why(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(inst(_9352,numbuffer)),~currentValue(_9368,_9352,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368)),{ignore(_9396=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9352,_9368))},proven_not_neg(world(_9368)),~currentValue(_9368,_9352,_9396),{is_unit(_9368)}==>proven_neg(world(_9368)))))))}])
- % Found positive trigger: boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))))
- % body: compound(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784))))),\+is_ftVar(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))))*->rhs([{with_current_why(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(world(_6726)):-proven_not_neg(inst(_6740,numbuffer)),proven_neg(currentValue(_6726,_6740,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))),{ignore(_6784=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6740,_6726))},proven_not_neg(world(_6726)),proven_neg(currentValue(_6726,_6740,_6784)))))))}])
- % RHS-Post1: boxlog((proven_neg(inst(_3120,numbuffer)):-proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,_3126))))
- % Support: clif(forall(_2890,forall(_2896,exists(_2902,=>(&(inst(_2896,numbuffer),world(_2890)),currentValue(_2890,_2896,_2902)))))),pt(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))),(is_kif_clause(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))*->rhs([{delistify_last_arg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))),kif_to_boxlog,(proven_neg(inst(_3120,numbuffer)):-proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,_3126))))},boxlog((proven_neg(inst(_3120,numbuffer)):-proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,_3126))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(inst(_46360, numbuffer)):-proven_not_neg(world(_46376)), proven_neg(currentValue(_46376, _46360, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_46360, _46376))), {ignore(_46418=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_46360, _46376))}, proven_not_neg(inst(_46360, numbuffer)), proven_neg(currentValue(_46376, _46360, _46418))))).
- % Found positive trigger: boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))))
- % body: compound(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))))),\+is_ftVar(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))))}])
- % =boxlog=
- % proven_neg(inst(_6852, numbuffer)) :-
- % proven_not_neg(world(_6868)),
- % proven_neg(currentValue(_6868,
- % _6852,
- % skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,
- % _6868))),
- % { ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852, _6868))
- % },
- % proven_not_neg(inst(_6852, numbuffer)),
- % proven_neg(currentValue(_6868, _6852, _6910)).
- % Found positive trigger: boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))))
- % body: is_kif_clause(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))))*->rhs([clif(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))))])
- % Found positive trigger: boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))))
- % body: delistify_last_arg((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))),boxlog_to_pfc,_7330),must_be_unqualified(_7330)*->rhs([pfclog(_7330)])
- % RHS-Post1: pfclog((proven_not_neg(world(_6868)),~currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868)),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),~currentValue(_6868,_6852,_6910),{is_unit(_6852)}==>proven_neg(inst(_6852,numbuffer))))
- % Support: boxlog((proven_neg(inst(_6508,numbuffer)):-proven_not_neg(world(_6524)),proven_neg(currentValue(_6524,_6508,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6508,_6524))),{ignore(_6566=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6508,_6524))},proven_not_neg(inst(_6508,numbuffer)),proven_neg(currentValue(_6524,_6508,_6566)))),pt(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))),(delistify_last_arg((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))),boxlog_to_pfc,(proven_not_neg(world(_6868)),~currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868)),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),~currentValue(_6868,_6852,_6910),{is_unit(_6852)}==>proven_neg(inst(_6852,numbuffer)))),must_be_unqualified((proven_not_neg(world(_6868)),~currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868)),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),~currentValue(_6868,_6852,_6910),{is_unit(_6852)}==>proven_neg(inst(_6852,numbuffer))))*->rhs([pfclog((proven_not_neg(world(_6868)),~currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868)),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),~currentValue(_6868,_6852,_6910),{is_unit(_6852)}==>proven_neg(inst(_6852,numbuffer))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(world(_23564)), ~currentValue(_23564, _23580, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_23580, _23564)), {ignore(_23606=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_23580, _23564))}, proven_not_neg(inst(_23580, numbuffer)), ~currentValue(_23564, _23580, _23606), {is_unit(_23580)}==>proven_neg(inst(_23580, numbuffer))))).
- % Found positive trigger: pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))))
- % body: compound(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))))),\+is_ftVar(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))))*->rhs([{with_current_why(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))))}])
- % =pfclog=
- % proven_not_neg(world(_9506)), ~currentValue(_9506, _9522, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522, _9506)), {ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522, _9506))}, proven_not_neg(inst(_9522, numbuffer)), ~currentValue(_9506, _9522, _9548), {is_unit(_9522)}==>proven_neg(inst(_9522, numbuffer)).
- % Found positive trigger: pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))))
- % body: is_kif_clause(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))))*->rhs([clif(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))))])
- % Found positive trigger: pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))))
- % body: rhs([(proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))])
- % RHS-Post1: proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))
- % Support: pfclog((proven_not_neg(world(_9134)),~currentValue(_9134,_9150,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9150,_9134)),{ignore(_9176=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9150,_9134))},proven_not_neg(inst(_9150,numbuffer)),~currentValue(_9134,_9150,_9176),{is_unit(_9150)}==>proven_neg(inst(_9150,numbuffer)))),pt(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))),rhs([(proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))]))
- % r_sane:mpred_fwc1((proven_not_neg(world(_28408)), ~currentValue(_28408, _28424, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_28424, _28408)), {ignore(_28450=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_28424, _28408))}, proven_not_neg(inst(_28424, numbuffer)), ~currentValue(_28408, _28424, _28450), {is_unit(_28424)}==>proven_neg(inst(_28424, numbuffer)))).
- % Adding positive
- % trigger: proven_not_neg(world(_28408))
- % body: pt(~currentValue(_28408,_28424,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_28424,_28408)),(ignore(_28450=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_28424,_28408))*->pt(proven_not_neg(inst(_28424,numbuffer)),pt(~currentValue(_28408,_28424,_28450),(is_unit(_28424)*->rhs([proven_neg(inst(_28424,numbuffer))]))))))
- % Support: (proven_not_neg(world(_32834)),~currentValue(_32834,_32850,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_32850,_32834)),{ignore(_32876=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_32850,_32834))},proven_not_neg(inst(_32850,numbuffer)),~currentValue(_32834,_32850,_32876),{is_unit(_32850)}==>proven_neg(inst(_32850,numbuffer))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',103)
- % Found positive trigger: pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))))
- % body: compound(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer))))),\+is_ftVar(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))))*->rhs([{with_current_why(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(world(_9506)),~currentValue(_9506,_9522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506)),{ignore(_9548=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9522,_9506))},proven_not_neg(inst(_9522,numbuffer)),~currentValue(_9506,_9522,_9548),{is_unit(_9522)}==>proven_neg(inst(_9522,numbuffer)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))))
- % body: compound(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910))))),\+is_ftVar(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_6852,numbuffer)):-proven_not_neg(world(_6868)),proven_neg(currentValue(_6868,_6852,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))),{ignore(_6910=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6852,_6868))},proven_not_neg(inst(_6852,numbuffer)),proven_neg(currentValue(_6868,_6852,_6910)))))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3126,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))):-proven_not_neg(inst(_3120,numbuffer)),proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),proven_neg(currentValue(_3114,_3120,_3126))))
- % Support: clif(forall(_2890,forall(_2896,exists(_2902,=>(&(inst(_2896,numbuffer),world(_2890)),currentValue(_2890,_2896,_2902)))))),pt(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))),(is_kif_clause(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))*->rhs([{delistify_last_arg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))),kif_to_boxlog,(proven_neg(skolem(_3126,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))):-proven_not_neg(inst(_3120,numbuffer)),proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),proven_neg(currentValue(_3114,_3120,_3126))))},boxlog((proven_neg(skolem(_3126,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))):-proven_not_neg(inst(_3120,numbuffer)),proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))),proven_neg(currentValue(_3114,_3120,_3126))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_45220, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_45226, _45228))):-proven_not_neg(inst(_45226, numbuffer)), proven_not_neg(world(_45228)), proven_neg(currentValue(_45228, _45226, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_45226, _45228))), proven_neg(currentValue(_45228, _45226, _45220))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))))
- % body: compound(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))))),\+is_ftVar(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))))}])
- % =boxlog=
- % proven_neg(skolem(_6826, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832, _6834))) :-
- % proven_not_neg(inst(_6832, numbuffer)),
- % proven_not_neg(world(_6834)),
- % proven_neg(currentValue(_6834,
- % _6832,
- % skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,
- % _6834))),
- % proven_neg(currentValue(_6834, _6832, _6826)).
- % Found positive trigger: boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))))*->rhs([clif(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))))
- % body: delistify_last_arg((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))),boxlog_to_pfc,_28520),must_be_unqualified(_28520)*->rhs([pfclog(_28520)])
- % RHS-Post1: pfclog((proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),~currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834)),~currentValue(_6834,_6832,_6826),{is_unit(_6834,_6832,_6826)}==>proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834)))))
- % Support: boxlog((proven_neg(skolem(_6522,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6528,_6530))):-proven_not_neg(inst(_6528,numbuffer)),proven_not_neg(world(_6530)),proven_neg(currentValue(_6530,_6528,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6528,_6530))),proven_neg(currentValue(_6530,_6528,_6522)))),pt(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))),(delistify_last_arg((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))),boxlog_to_pfc,(proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),~currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834)),~currentValue(_6834,_6832,_6826),{is_unit(_6834,_6832,_6826)}==>proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))))),must_be_unqualified((proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),~currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834)),~currentValue(_6834,_6832,_6826),{is_unit(_6834,_6832,_6826)}==>proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834)))))*->rhs([pfclog((proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),~currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834)),~currentValue(_6834,_6832,_6826),{is_unit(_6834,_6832,_6826)}==>proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834)))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(inst(_22382, numbuffer)), proven_not_neg(world(_22398)), ~currentValue(_22398, _22382, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_22382, _22398)), ~currentValue(_22398, _22382, _22440), {is_unit(_22398, _22382, _22440)}==>proven_neg(skolem(_22440, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_22382, _22398)))))).
- % Found positive trigger: pfclog((proven_not_neg(inst(_26384,numbuffer)),proven_not_neg(world(_26400)),~currentValue(_26400,_26384,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400)),~currentValue(_26400,_26384,_26442),{is_unit(_26400,_26384,_26442)}==>proven_neg(skolem(_26442,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400)))))
- % body: compound(pfclog((proven_not_neg(inst(_26384,numbuffer)),proven_not_neg(world(_26400)),~currentValue(_26400,_26384,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400)),~currentValue(_26400,_26384,_26442),{is_unit(_26400,_26384,_26442)}==>proven_neg(skolem(_26442,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400)))))),\+is_ftVar(pfclog((proven_not_neg(inst(_26384,numbuffer)),proven_not_neg(world(_26400)),~currentValue(_26400,_26384,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400)),~currentValue(_26400,_26384,_26442),{is_unit(_26400,_26384,_26442)}==>proven_neg(skolem(_26442,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400))))))*->rhs([{with_current_why(pfclog((proven_not_neg(inst(_26384,numbuffer)),proven_not_neg(world(_26400)),~currentValue(_26400,_26384,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400)),~currentValue(_26400,_26384,_26442),{is_unit(_26400,_26384,_26442)}==>proven_neg(skolem(_26442,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400))))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(inst(_26384,numbuffer)),proven_not_neg(world(_26400)),~currentValue(_26400,_26384,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400)),~currentValue(_26400,_26384,_26442),{is_unit(_26400,_26384,_26442)}==>proven_neg(skolem(_26442,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_26384,_26400))))))))}])
- % Found positive trigger: pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)))))}])
- % =pfclog=
- % proven_not_neg(inst(_9228, numbuffer)), proven_not_neg(world(_9244)), ~currentValue(_9244, _9228, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228, _9244)), ~currentValue(_9244, _9228, _9286), {is_unit(_9244, _9228, _9286)}==>proven_neg(skolem(_9286, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228, _9244))).
- % Found positive trigger: pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)))))
- % body: is_kif_clause(pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244))))))*->rhs([clif(pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244))))))])
- % Found positive trigger: pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)))))
- % body: rhs([(proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244))))])
- % RHS-Post1: proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)))
- % Support: pfclog((proven_not_neg(inst(_8888,numbuffer)),proven_not_neg(world(_8904)),~currentValue(_8904,_8888,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_8888,_8904)),~currentValue(_8904,_8888,_8946),{is_unit(_8904,_8888,_8946)}==>proven_neg(skolem(_8946,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_8888,_8904))))),pt(pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244))))),rhs([(proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244))))]))
- % r_sane:mpred_fwc1((proven_not_neg(inst(_52352, numbuffer)), proven_not_neg(world(_52368)), ~currentValue(_52368, _52352, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_52352, _52368)), ~currentValue(_52368, _52352, _52410), {is_unit(_52368, _52352, _52410)}==>proven_neg(skolem(_52410, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_52352, _52368))))).
- % Adding positive
- % trigger: proven_not_neg(inst(_11102,numbuffer))
- % body: pt(proven_not_neg(world(_11118)),pt(~currentValue(_11118,_11102,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11102,_11118)),pt(~currentValue(_11118,_11102,_11160),(is_unit(_11118,_11102,_11160)*->rhs([proven_neg(skolem(_11160,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11102,_11118)))])))))
- % Support: (proven_not_neg(inst(_11448,numbuffer)),proven_not_neg(world(_11464)),~currentValue(_11464,_11448,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11448,_11464)),~currentValue(_11464,_11448,_11506),{is_unit(_11464,_11448,_11506)}==>proven_neg(skolem(_11506,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11448,_11464)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',103)
- % Found positive trigger: pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)))))
- % body: compound(pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)))))),\+is_ftVar(pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244))))))*->rhs([{with_current_why(pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244))))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(inst(_9228,numbuffer)),proven_not_neg(world(_9244)),~currentValue(_9244,_9228,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244)),~currentValue(_9244,_9228,_9286),{is_unit(_9244,_9228,_9286)}==>proven_neg(skolem(_9286,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9228,_9244))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))))
- % body: compound(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826))))),\+is_ftVar(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_6826,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))):-proven_not_neg(inst(_6832,numbuffer)),proven_not_neg(world(_6834)),proven_neg(currentValue(_6834,_6832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6832,_6834))),proven_neg(currentValue(_6834,_6832,_6826)))))))}])
- % RHS-Post1: boxlog((proven_neg(world(_3114)):-proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,_3126)),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)))))
- % Support: clif(forall(_2890,forall(_2896,exists(_2902,=>(&(inst(_2896,numbuffer),world(_2890)),currentValue(_2890,_2896,_2902)))))),pt(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))),(is_kif_clause(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))*->rhs([{delistify_last_arg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))),kif_to_boxlog,(proven_neg(world(_3114)):-proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,_3126)),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)))))},boxlog((proven_neg(world(_3114)):-proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,_3126)),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(world(_18460)):-proven_not_neg(inst(_18474, numbuffer)), proven_neg(currentValue(_18460, _18474, _18494)), {ignore(_18494=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_18474, _18460))}, proven_not_neg(world(_18460)), proven_neg(currentValue(_18460, _18474, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_18474, _18460)))))).
- % Found positive trigger: boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))))
- % body: compound(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))))),\+is_ftVar(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))))*->rhs([{with_current_why(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))),ignore(\+addAdmittedArguments(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))))))}])
- % Found positive trigger: boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))))}])
- % =boxlog=
- % proven_neg(world(_7060)) :-
- % proven_not_neg(inst(_7074, numbuffer)),
- % proven_neg(currentValue(_7060, _7074, _7094)),
- % { ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074, _7060))
- % },
- % proven_not_neg(world(_7060)),
- % proven_neg(currentValue(_7060,
- % _7074,
- % skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,
- % _7060))).
- % Found positive trigger: boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))))
- % body: is_kif_clause(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))))*->rhs([clif(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))))])
- % Found positive trigger: boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))))
- % body: delistify_last_arg((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))),boxlog_to_pfc,_30262),must_be_unqualified(_30262)*->rhs([pfclog(_30262)])
- % RHS-Post1: pfclog((proven_not_neg(inst(_7074,numbuffer)),~currentValue(_7060,_7074,_7094),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),~currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)),{is_unit(_7060)}==>proven_neg(world(_7060))))
- % Support: boxlog((proven_neg(world(_6720)):-proven_not_neg(inst(_6734,numbuffer)),proven_neg(currentValue(_6720,_6734,_6754)),{ignore(_6754=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6734,_6720))},proven_not_neg(world(_6720)),proven_neg(currentValue(_6720,_6734,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6734,_6720))))),pt(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))),(delistify_last_arg((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))),boxlog_to_pfc,(proven_not_neg(inst(_7074,numbuffer)),~currentValue(_7060,_7074,_7094),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),~currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)),{is_unit(_7060)}==>proven_neg(world(_7060)))),must_be_unqualified((proven_not_neg(inst(_7074,numbuffer)),~currentValue(_7060,_7074,_7094),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),~currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)),{is_unit(_7060)}==>proven_neg(world(_7060))))*->rhs([pfclog((proven_not_neg(inst(_7074,numbuffer)),~currentValue(_7060,_7074,_7094),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),~currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)),{is_unit(_7060)}==>proven_neg(world(_7060))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(inst(_23270, numbuffer)), ~currentValue(_23286, _23270, _23290), {ignore(_23290=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_23270, _23286))}, proven_not_neg(world(_23286)), ~currentValue(_23286, _23270, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_23270, _23286)), {is_unit(_23286)}==>proven_neg(world(_23286))))).
- % Found positive trigger: pfclog((proven_not_neg(inst(_27448,numbuffer)),~currentValue(_27464,_27448,_27468),{ignore(_27468=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464))},proven_not_neg(world(_27464)),~currentValue(_27464,_27448,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464)),{is_unit(_27464)}==>proven_neg(world(_27464))))
- % body: compound(pfclog((proven_not_neg(inst(_27448,numbuffer)),~currentValue(_27464,_27448,_27468),{ignore(_27468=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464))},proven_not_neg(world(_27464)),~currentValue(_27464,_27448,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464)),{is_unit(_27464)}==>proven_neg(world(_27464))))),\+is_ftVar(pfclog((proven_not_neg(inst(_27448,numbuffer)),~currentValue(_27464,_27448,_27468),{ignore(_27468=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464))},proven_not_neg(world(_27464)),~currentValue(_27464,_27448,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464)),{is_unit(_27464)}==>proven_neg(world(_27464)))))*->rhs([{with_current_why(pfclog((proven_not_neg(inst(_27448,numbuffer)),~currentValue(_27464,_27448,_27468),{ignore(_27468=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464))},proven_not_neg(world(_27464)),~currentValue(_27464,_27448,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464)),{is_unit(_27464)}==>proven_neg(world(_27464)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(inst(_27448,numbuffer)),~currentValue(_27464,_27448,_27468),{ignore(_27468=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464))},proven_not_neg(world(_27464)),~currentValue(_27464,_27448,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27448,_27464)),{is_unit(_27464)}==>proven_neg(world(_27464)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716))))}])
- % =pfclog=
- % proven_not_neg(inst(_9700, numbuffer)), ~currentValue(_9716, _9700, _9720), {ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700, _9716))}, proven_not_neg(world(_9716)), ~currentValue(_9716, _9700, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700, _9716)), {is_unit(_9716)}==>proven_neg(world(_9716)).
- % Found positive trigger: pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716))))
- % body: is_kif_clause(pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716)))))*->rhs([clif(pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716)))))])
- % Found positive trigger: pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716))))
- % body: rhs([(proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716)))])
- % RHS-Post1: proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716))
- % Support: pfclog((proven_not_neg(inst(_9332,numbuffer)),~currentValue(_9348,_9332,_9352),{ignore(_9352=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9332,_9348))},proven_not_neg(world(_9348)),~currentValue(_9348,_9332,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9332,_9348)),{is_unit(_9348)}==>proven_neg(world(_9348)))),pt(pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716)))),rhs([(proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716)))]))
- % r_sane:mpred_fwc1((proven_not_neg(inst(_55636, numbuffer)), ~currentValue(_55652, _55636, _55656), {ignore(_55656=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_55636, _55652))}, proven_not_neg(world(_55652)), ~currentValue(_55652, _55636, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_55636, _55652)), {is_unit(_55652)}==>proven_neg(world(_55652)))).
- % Adding positive
- % trigger: proven_not_neg(inst(_11728,numbuffer))
- % body: pt(~currentValue(_11744,_11728,_11748),(ignore(_11748=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11728,_11744))*->pt(proven_not_neg(world(_11744)),pt(~currentValue(_11744,_11728,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11728,_11744)),(is_unit(_11744)*->rhs([proven_neg(world(_11744))]))))))
- % Support: (proven_not_neg(inst(_12102,numbuffer)),~currentValue(_12118,_12102,_12122),{ignore(_12122=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_12102,_12118))},proven_not_neg(world(_12118)),~currentValue(_12118,_12102,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_12102,_12118)),{is_unit(_12118)}==>proven_neg(world(_12118))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',103)
- % Found positive trigger: pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716))))
- % body: compound(pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716))))),\+is_ftVar(pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716)))))*->rhs([{with_current_why(pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(inst(_9700,numbuffer)),~currentValue(_9716,_9700,_9720),{ignore(_9720=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716))},proven_not_neg(world(_9716)),~currentValue(_9716,_9700,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9700,_9716)),{is_unit(_9716)}==>proven_neg(world(_9716)))))))}])
- % Found positive trigger: boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))))
- % body: compound(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060)))))),\+is_ftVar(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))))*->rhs([{with_current_why(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))),ignore(\+addAdmittedArguments(boxlog((proven_neg(world(_7060)):-proven_not_neg(inst(_7074,numbuffer)),proven_neg(currentValue(_7060,_7074,_7094)),{ignore(_7094=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))},proven_not_neg(world(_7060)),proven_neg(currentValue(_7060,_7074,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7074,_7060))))))))}])
- % RHS-Post1: boxlog((proven_neg(inst(_3120,numbuffer)):-proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,_3126)),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)))))
- % Support: clif(forall(_2890,forall(_2896,exists(_2902,=>(&(inst(_2896,numbuffer),world(_2890)),currentValue(_2890,_2896,_2902)))))),pt(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))),(is_kif_clause(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))*->rhs([{delistify_last_arg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))),kif_to_boxlog,(proven_neg(inst(_3120,numbuffer)):-proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,_3126)),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)))))},boxlog((proven_neg(inst(_3120,numbuffer)):-proven_not_neg(world(_3114)),proven_neg(currentValue(_3114,_3120,_3126)),{ignore(_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))},proven_not_neg(inst(_3120,numbuffer)),proven_neg(currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(inst(_18692, numbuffer)):-proven_not_neg(world(_18708)), proven_neg(currentValue(_18708, _18692, _18726)), {ignore(_18726=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_18692, _18708))}, proven_not_neg(inst(_18692, numbuffer)), proven_neg(currentValue(_18708, _18692, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_18692, _18708)))))).
- % Found positive trigger: boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))))
- % body: compound(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))))),\+is_ftVar(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))))}])
- % =boxlog=
- % proven_neg(inst(_7186, numbuffer)) :-
- % proven_not_neg(world(_7202)),
- % proven_neg(currentValue(_7202, _7186, _7220)),
- % { ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186, _7202))
- % },
- % proven_not_neg(inst(_7186, numbuffer)),
- % proven_neg(currentValue(_7202,
- % _7186,
- % skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,
- % _7202))).
- % Found positive trigger: boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))))
- % body: is_kif_clause(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))))*->rhs([clif(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))))])
- % Found positive trigger: boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))))
- % body: delistify_last_arg((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))),boxlog_to_pfc,_30548),must_be_unqualified(_30548)*->rhs([pfclog(_30548)])
- % RHS-Post1: pfclog((proven_not_neg(world(_7202)),~currentValue(_7202,_7186,_7220),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),~currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)),{is_unit(_7186)}==>proven_neg(inst(_7186,numbuffer))))
- % Support: boxlog((proven_neg(inst(_6842,numbuffer)):-proven_not_neg(world(_6858)),proven_neg(currentValue(_6858,_6842,_6876)),{ignore(_6876=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6842,_6858))},proven_not_neg(inst(_6842,numbuffer)),proven_neg(currentValue(_6858,_6842,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6842,_6858))))),pt(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))),(delistify_last_arg((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))),boxlog_to_pfc,(proven_not_neg(world(_7202)),~currentValue(_7202,_7186,_7220),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),~currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)),{is_unit(_7186)}==>proven_neg(inst(_7186,numbuffer)))),must_be_unqualified((proven_not_neg(world(_7202)),~currentValue(_7202,_7186,_7220),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),~currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)),{is_unit(_7186)}==>proven_neg(inst(_7186,numbuffer))))*->rhs([pfclog((proven_not_neg(world(_7202)),~currentValue(_7202,_7186,_7220),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),~currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)),{is_unit(_7186)}==>proven_neg(inst(_7186,numbuffer))))])))
- % r_sane:mpred_fwc1(pfclog((proven_not_neg(world(_23566)), ~currentValue(_23566, _23582, _23584), {ignore(_23584=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_23582, _23566))}, proven_not_neg(inst(_23582, numbuffer)), ~currentValue(_23566, _23582, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_23582, _23566)), {is_unit(_23582)}==>proven_neg(inst(_23582, numbuffer))))).
- % Found positive trigger: pfclog((proven_not_neg(world(_27768)),~currentValue(_27768,_27784,_27786),{ignore(_27786=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768))},proven_not_neg(inst(_27784,numbuffer)),~currentValue(_27768,_27784,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768)),{is_unit(_27784)}==>proven_neg(inst(_27784,numbuffer))))
- % body: compound(pfclog((proven_not_neg(world(_27768)),~currentValue(_27768,_27784,_27786),{ignore(_27786=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768))},proven_not_neg(inst(_27784,numbuffer)),~currentValue(_27768,_27784,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768)),{is_unit(_27784)}==>proven_neg(inst(_27784,numbuffer))))),\+is_ftVar(pfclog((proven_not_neg(world(_27768)),~currentValue(_27768,_27784,_27786),{ignore(_27786=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768))},proven_not_neg(inst(_27784,numbuffer)),~currentValue(_27768,_27784,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768)),{is_unit(_27784)}==>proven_neg(inst(_27784,numbuffer)))))*->rhs([{with_current_why(pfclog((proven_not_neg(world(_27768)),~currentValue(_27768,_27784,_27786),{ignore(_27786=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768))},proven_not_neg(inst(_27784,numbuffer)),~currentValue(_27768,_27784,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768)),{is_unit(_27784)}==>proven_neg(inst(_27784,numbuffer)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(world(_27768)),~currentValue(_27768,_27784,_27786),{ignore(_27786=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768))},proven_not_neg(inst(_27784,numbuffer)),~currentValue(_27768,_27784,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_27784,_27768)),{is_unit(_27784)}==>proven_neg(inst(_27784,numbuffer)))))))}])
- % Found positive trigger: pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer))))}])
- % =pfclog=
- % proven_not_neg(world(_9854)), ~currentValue(_9854, _9870, _9872), {ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870, _9854))}, proven_not_neg(inst(_9870, numbuffer)), ~currentValue(_9854, _9870, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870, _9854)), {is_unit(_9870)}==>proven_neg(inst(_9870, numbuffer)).
- % Found positive trigger: pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer))))
- % body: is_kif_clause(pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer)))))*->rhs([clif(pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer)))))])
- % Found positive trigger: pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer))))
- % body: rhs([(proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer)))])
- % RHS-Post1: proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer))
- % Support: pfclog((proven_not_neg(world(_9482)),~currentValue(_9482,_9498,_9500),{ignore(_9500=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9498,_9482))},proven_not_neg(inst(_9498,numbuffer)),~currentValue(_9482,_9498,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9498,_9482)),{is_unit(_9498)}==>proven_neg(inst(_9498,numbuffer)))),pt(pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer)))),rhs([(proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer)))]))
- % r_sane:mpred_fwc1((proven_not_neg(world(_56216)), ~currentValue(_56216, _56232, _56234), {ignore(_56234=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_56232, _56216))}, proven_not_neg(inst(_56232, numbuffer)), ~currentValue(_56216, _56232, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_56232, _56216)), {is_unit(_56232)}==>proven_neg(inst(_56232, numbuffer)))).
- % Adding positive
- % trigger: proven_not_neg(world(_11902))
- % body: pt(~currentValue(_11902,_11918,_11920),(ignore(_11920=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11918,_11902))*->pt(proven_not_neg(inst(_11918,numbuffer)),pt(~currentValue(_11902,_11918,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11918,_11902)),(is_unit(_11918)*->rhs([proven_neg(inst(_11918,numbuffer))]))))))
- % Support: (proven_not_neg(world(_12280)),~currentValue(_12280,_12296,_12298),{ignore(_12298=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_12296,_12280))},proven_not_neg(inst(_12296,numbuffer)),~currentValue(_12280,_12296,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_12296,_12280)),{is_unit(_12296)}==>proven_neg(inst(_12296,numbuffer))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',103)
- % Found positive trigger: pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer))))
- % body: compound(pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer))))),\+is_ftVar(pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer)))))*->rhs([{with_current_why(pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer)))),ignore(\+addAdmittedArguments(pfclog((proven_not_neg(world(_9854)),~currentValue(_9854,_9870,_9872),{ignore(_9872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854))},proven_not_neg(inst(_9870,numbuffer)),~currentValue(_9854,_9870,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9870,_9854)),{is_unit(_9870)}==>proven_neg(inst(_9870,numbuffer)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))))
- % body: compound(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202)))))),\+is_ftVar(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_7186,numbuffer)):-proven_not_neg(world(_7202)),proven_neg(currentValue(_7202,_7186,_7220)),{ignore(_7220=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))},proven_not_neg(inst(_7186,numbuffer)),proven_neg(currentValue(_7202,_7186,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7186,_7202))))))))}])
- % RHS-Post1: boxlog((currentValue(_3114,_3120,_3126):-proven_tru(inst(_3120,numbuffer)),proven_tru(world(_3114)),{_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)},\+currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))))
- % Support: clif(forall(_2890,forall(_2896,exists(_2902,=>(&(inst(_2896,numbuffer),world(_2890)),currentValue(_2890,_2896,_2902)))))),pt(clif(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126)))))),(is_kif_clause(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))))*->rhs([{delistify_last_arg(forall(_3114,forall(_3120,exists(_3126,=>(&(inst(_3120,numbuffer),world(_3114)),currentValue(_3114,_3120,_3126))))),kif_to_boxlog,(currentValue(_3114,_3120,_3126):-proven_tru(inst(_3120,numbuffer)),proven_tru(world(_3114)),{_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)},\+currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))))},boxlog((currentValue(_3114,_3120,_3126):-proven_tru(inst(_3120,numbuffer)),proven_tru(world(_3114)),{_3126=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114)},\+currentValue(_3114,_3120,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3120,_3114))))])))
- % r_sane:mpred_fwc1(boxlog((currentValue(_17830, _17832, _17834):-proven_tru(inst(_17832, numbuffer)), proven_tru(world(_17830)), {_17834=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_17832, _17830)}, \+currentValue(_17830, _17832, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_17832, _17830))))).
- % Found positive trigger: boxlog((currentValue(_21304,_21306,_21308):-proven_tru(inst(_21306,numbuffer)),proven_tru(world(_21304)),{_21308=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304)},\+currentValue(_21304,_21306,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304))))
- % body: compound(boxlog((currentValue(_21304,_21306,_21308):-proven_tru(inst(_21306,numbuffer)),proven_tru(world(_21304)),{_21308=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304)},\+currentValue(_21304,_21306,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304))))),\+is_ftVar(boxlog((currentValue(_21304,_21306,_21308):-proven_tru(inst(_21306,numbuffer)),proven_tru(world(_21304)),{_21308=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304)},\+currentValue(_21304,_21306,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304)))))*->rhs([{with_current_why(boxlog((currentValue(_21304,_21306,_21308):-proven_tru(inst(_21306,numbuffer)),proven_tru(world(_21304)),{_21308=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304)},\+currentValue(_21304,_21306,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304)))),ignore(\+addAdmittedArguments(boxlog((currentValue(_21304,_21306,_21308):-proven_tru(inst(_21306,numbuffer)),proven_tru(world(_21304)),{_21308=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304)},\+currentValue(_21304,_21306,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21306,_21304)))))))}])
- % Found positive trigger: boxlog((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114))))}])
- % =boxlog=
- % currentValue(_7114, _7116, _7118) :-
- % proven_tru(inst(_7116, numbuffer)),
- % proven_tru(world(_7114)),
- % { _7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116, _7114)
- % },
- % \+ currentValue(_7114,
- % _7116,
- % skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,
- % _7114)).
- % Found positive trigger: boxlog((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114))))
- % body: is_kif_clause(boxlog((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)))))*->rhs([clif(boxlog((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)))))])
- % Found positive trigger: boxlog((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114))))
- % body: delistify_last_arg((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114))),boxlog_to_pfc,_21228),must_be_unqualified(_21228)*->rhs([pfclog(_21228)])
- % RHS-Post1: pfclog((inst(_7116,numbuffer),world(_7114),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)),{is_unit(_7118,_7116,_7114)}==>currentValue(_7114,_7116,_7118)))
- % Support: boxlog((currentValue(_6818,_6820,_6822):-proven_tru(inst(_6820,numbuffer)),proven_tru(world(_6818)),{_6822=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6820,_6818)},\+currentValue(_6818,_6820,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_6820,_6818)))),pt(boxlog((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)))),(delistify_last_arg((currentValue(_7114,_7116,_7118):-proven_tru(inst(_7116,numbuffer)),proven_tru(world(_7114)),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114))),boxlog_to_pfc,(inst(_7116,numbuffer),world(_7114),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)),{is_unit(_7118,_7116,_7114)}==>currentValue(_7114,_7116,_7118))),must_be_unqualified((inst(_7116,numbuffer),world(_7114),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)),{is_unit(_7118,_7116,_7114)}==>currentValue(_7114,_7116,_7118)))*->rhs([pfclog((inst(_7116,numbuffer),world(_7114),{_7118=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)},\+currentValue(_7114,_7116,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7116,_7114)),{is_unit(_7118,_7116,_7114)}==>currentValue(_7114,_7116,_7118)))])))
- % r_sane:mpred_fwc1(pfclog((inst(_21846, numbuffer), world(_21858), {_21872=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21846, _21858)}, \+currentValue(_21858, _21846, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_21846, _21858)), {is_unit(_21872, _21846, _21858)}==>currentValue(_21858, _21846, _21872)))).
- % Found positive trigger: pfclog((inst(_25680,numbuffer),world(_25692),{_25706=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)},\+currentValue(_25692,_25680,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)),{is_unit(_25706,_25680,_25692)}==>currentValue(_25692,_25680,_25706)))
- % body: compound(pfclog((inst(_25680,numbuffer),world(_25692),{_25706=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)},\+currentValue(_25692,_25680,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)),{is_unit(_25706,_25680,_25692)}==>currentValue(_25692,_25680,_25706)))),\+is_ftVar(pfclog((inst(_25680,numbuffer),world(_25692),{_25706=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)},\+currentValue(_25692,_25680,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)),{is_unit(_25706,_25680,_25692)}==>currentValue(_25692,_25680,_25706))))*->rhs([{with_current_why(pfclog((inst(_25680,numbuffer),world(_25692),{_25706=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)},\+currentValue(_25692,_25680,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)),{is_unit(_25706,_25680,_25692)}==>currentValue(_25692,_25680,_25706))),ignore(\+addAdmittedArguments(pfclog((inst(_25680,numbuffer),world(_25692),{_25706=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)},\+currentValue(_25692,_25680,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_25680,_25692)),{is_unit(_25706,_25680,_25692)}==>currentValue(_25692,_25680,_25706))))))}])
- % Found positive trigger: pfclog((inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430)))}])
- % =pfclog=
- % inst(_9404, numbuffer), world(_9416), {_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404, _9416)}, \+currentValue(_9416, _9404, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404, _9416)), {is_unit(_9430, _9404, _9416)}==>currentValue(_9416, _9404, _9430).
- % Found positive trigger: pfclog((inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430)))
- % body: is_kif_clause(pfclog((inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430))))*->rhs([clif(pfclog((inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430))))])
- % Found positive trigger: pfclog((inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430)))
- % body: rhs([(inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430))])
- % RHS-Post1: inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430)
- % Support: pfclog((inst(_9088,numbuffer),world(_9100),{_9114=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9088,_9100)},\+currentValue(_9100,_9088,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9088,_9100)),{is_unit(_9114,_9088,_9100)}==>currentValue(_9100,_9088,_9114))),pt(pfclog((inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430))),rhs([(inst(_9404,numbuffer),world(_9416),{_9430=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)},\+currentValue(_9416,_9404,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9404,_9416)),{is_unit(_9430,_9404,_9416)}==>currentValue(_9416,_9404,_9430))]))
- % r_sane:mpred_fwc1((inst(_50922, numbuffer), world(_50934), {_50948=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_50922, _50934)}, \+currentValue(_50934, _50922, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_50922, _50934)), {is_unit(_50948, _50922, _50934)}==>currentValue(_50934, _50922, _50948))).
- % Adding positive
- % trigger: inst(_11144,numbuffer)
- % body: pt(world(_11156),(_11170=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11144,_11156)*->nt(currentValue(_11156,_11144,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11144,_11156)),call_u_no_bc(currentValue(_11156,_11144,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11144,_11156))),(is_unit(_11170,_11144,_11156)*->rhs([currentValue(_11156,_11144,_11170)])))))
- % Support: (inst(_11466,numbuffer),world(_11478),{_11492=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11466,_11478)},\+currentValue(_11478,_11466,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_11466,_11478)),{is_unit(_11492,_11466,_11478)}==>currentValue(_11478,_11466,_11492)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',103)
- % Found positive trigger: pfclog((inst(_9390,numbuffer),world(_9402),{_9416=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)},\+currentValue(_9402,_9390,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)),{is_unit(_9416,_9390,_9402)}==>currentValue(_9402,_9390,_9416)))
- % body: compound(pfclog((inst(_9390,numbuffer),world(_9402),{_9416=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)},\+currentValue(_9402,_9390,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)),{is_unit(_9416,_9390,_9402)}==>currentValue(_9402,_9390,_9416)))),\+is_ftVar(pfclog((inst(_9390,numbuffer),world(_9402),{_9416=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)},\+currentValue(_9402,_9390,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)),{is_unit(_9416,_9390,_9402)}==>currentValue(_9402,_9390,_9416))))*->rhs([{with_current_why(pfclog((inst(_9390,numbuffer),world(_9402),{_9416=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)},\+currentValue(_9402,_9390,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)),{is_unit(_9416,_9390,_9402)}==>currentValue(_9402,_9390,_9416))),ignore(\+addAdmittedArguments(pfclog((inst(_9390,numbuffer),world(_9402),{_9416=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)},\+currentValue(_9402,_9390,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9390,_9402)),{is_unit(_9416,_9390,_9402)}==>currentValue(_9402,_9390,_9416))))))}])
- % Found positive trigger: boxlog((currentValue(_7100,_7102,_7104):-proven_tru(inst(_7102,numbuffer)),proven_tru(world(_7100)),{_7104=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100)},\+currentValue(_7100,_7102,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100))))
- % body: compound(boxlog((currentValue(_7100,_7102,_7104):-proven_tru(inst(_7102,numbuffer)),proven_tru(world(_7100)),{_7104=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100)},\+currentValue(_7100,_7102,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100))))),\+is_ftVar(boxlog((currentValue(_7100,_7102,_7104):-proven_tru(inst(_7102,numbuffer)),proven_tru(world(_7100)),{_7104=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100)},\+currentValue(_7100,_7102,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100)))))*->rhs([{with_current_why(boxlog((currentValue(_7100,_7102,_7104):-proven_tru(inst(_7102,numbuffer)),proven_tru(world(_7100)),{_7104=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100)},\+currentValue(_7100,_7102,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100)))),ignore(\+addAdmittedArguments(boxlog((currentValue(_7100,_7102,_7104):-proven_tru(inst(_7102,numbuffer)),proven_tru(world(_7100)),{_7104=skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100)},\+currentValue(_7100,_7102,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7102,_7100)))))))}])
- % RHS-Post1: boxlog((currentValue(_3100,_3106,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3106,_3100)):-proven_tru(inst(_3106,numbuffer)),proven_tru(world(_3100)),\+currentValue(_3100,_3106,_3112)))
- % Support: clif(forall(_2876,forall(_2882,exists(_2888,=>(&(inst(_2882,numbuffer),world(_2876)),currentValue(_2876,_2882,_2888)))))),pt(clif(forall(_3100,forall(_3106,exists(_3112,=>(&(inst(_3106,numbuffer),world(_3100)),currentValue(_3100,_3106,_3112)))))),(is_kif_clause(forall(_3100,forall(_3106,exists(_3112,=>(&(inst(_3106,numbuffer),world(_3100)),currentValue(_3100,_3106,_3112))))))*->rhs([{delistify_last_arg(forall(_3100,forall(_3106,exists(_3112,=>(&(inst(_3106,numbuffer),world(_3100)),currentValue(_3100,_3106,_3112))))),kif_to_boxlog,(currentValue(_3100,_3106,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3106,_3100)):-proven_tru(inst(_3106,numbuffer)),proven_tru(world(_3100)),\+currentValue(_3100,_3106,_3112)))},boxlog((currentValue(_3100,_3106,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_3106,_3100)):-proven_tru(inst(_3106,numbuffer)),proven_tru(world(_3100)),\+currentValue(_3100,_3106,_3112)))])))
- % r_sane:mpred_fwc1(boxlog((currentValue(_56282, _56284, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_56284, _56282)):-proven_tru(inst(_56284, numbuffer)), proven_tru(world(_56282)), \+currentValue(_56282, _56284, _56334)))).
- % Found positive trigger: boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)))
- % body: compound(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)))),\+is_ftVar(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))))*->rhs([{with_current_why(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))),ignore(\+addAdmittedArguments(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))))))}])
- % Found positive trigger: boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)))}])
- % =boxlog=
- % currentValue(_5864, _5866, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866, _5864)) :-
- % proven_tru(inst(_5866, numbuffer)),
- % proven_tru(world(_5864)),
- % \+ currentValue(_5864, _5866, _5916).
- % Found positive trigger: boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)))
- % body: is_kif_clause(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))))*->rhs([clif(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))))])
- % Found positive trigger: boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)))
- % body: delistify_last_arg((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)),boxlog_to_pfc,_25018),must_be_unqualified(_25018)*->rhs([pfclog(_25018)])
- % RHS-Post1: pfclog((inst(_5866,numbuffer),world(_5864),\+currentValue(_5864,_5866,_5916),{is_unit(_5864,_5866)}==>currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864))))
- % Support: boxlog((currentValue(_5612,_5614,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5614,_5612)):-proven_tru(inst(_5614,numbuffer)),proven_tru(world(_5612)),\+currentValue(_5612,_5614,_5664))),pt(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))),(delistify_last_arg((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)),boxlog_to_pfc,(inst(_5866,numbuffer),world(_5864),\+currentValue(_5864,_5866,_5916),{is_unit(_5864,_5866)}==>currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)))),must_be_unqualified((inst(_5866,numbuffer),world(_5864),\+currentValue(_5864,_5866,_5916),{is_unit(_5864,_5866)}==>currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864))))*->rhs([pfclog((inst(_5866,numbuffer),world(_5864),\+currentValue(_5864,_5866,_5916),{is_unit(_5864,_5866)}==>currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864))))])))
- % r_sane:mpred_fwc1(pfclog((inst(_18940, numbuffer), world(_18952), \+currentValue(_18952, _18940, _18970), {is_unit(_18952, _18940)}==>currentValue(_18952, _18940, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_18940, _18952))))).
- % Found positive trigger: pfclog((inst(_22470,numbuffer),world(_22482),\+currentValue(_22482,_22470,_22500),{is_unit(_22482,_22470)}==>currentValue(_22482,_22470,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_22470,_22482))))
- % body: compound(pfclog((inst(_22470,numbuffer),world(_22482),\+currentValue(_22482,_22470,_22500),{is_unit(_22482,_22470)}==>currentValue(_22482,_22470,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_22470,_22482))))),\+is_ftVar(pfclog((inst(_22470,numbuffer),world(_22482),\+currentValue(_22482,_22470,_22500),{is_unit(_22482,_22470)}==>currentValue(_22482,_22470,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_22470,_22482)))))*->rhs([{with_current_why(pfclog((inst(_22470,numbuffer),world(_22482),\+currentValue(_22482,_22470,_22500),{is_unit(_22482,_22470)}==>currentValue(_22482,_22470,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_22470,_22482)))),ignore(\+addAdmittedArguments(pfclog((inst(_22470,numbuffer),world(_22482),\+currentValue(_22482,_22470,_22500),{is_unit(_22482,_22470)}==>currentValue(_22482,_22470,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_22470,_22482)))))))}])
- % Found positive trigger: pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844))))}])
- % =pfclog=
- % inst(_7832, numbuffer), world(_7844), \+currentValue(_7844, _7832, _7862), {is_unit(_7844, _7832)}==>currentValue(_7844, _7832, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832, _7844)).
- % Found positive trigger: pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844))))
- % body: is_kif_clause(pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844)))))*->rhs([clif(pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844)))))])
- % Found positive trigger: pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844))))
- % body: rhs([(inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844)))])
- % RHS-Post1: inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844))
- % Support: pfclog((inst(_7564,numbuffer),world(_7576),\+currentValue(_7576,_7564,_7594),{is_unit(_7576,_7564)}==>currentValue(_7576,_7564,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7564,_7576)))),pt(pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844)))),rhs([(inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844)))]))
- % r_sane:mpred_fwc1((inst(_44024, numbuffer), world(_44036), \+currentValue(_44036, _44024, _44054), {is_unit(_44036, _44024)}==>currentValue(_44036, _44024, skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_44024, _44036)))).
- % Adding positive
- % trigger: inst(_9346,numbuffer)
- % body: pt(world(_9358),nt(currentValue(_9358,_9346,_9376),call_u_no_bc(currentValue(_9358,_9346,_9376)),(is_unit(_9358,_9346)*->rhs([currentValue(_9358,_9346,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9346,_9358))]))))
- % Support: (inst(_9620,numbuffer),world(_9632),\+currentValue(_9632,_9620,_9650),{is_unit(_9632,_9620)}==>currentValue(_9632,_9620,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_9620,_9632))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',103)
- % Found positive trigger: pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844))))
- % body: compound(pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844))))),\+is_ftVar(pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844)))))*->rhs([{with_current_why(pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844)))),ignore(\+addAdmittedArguments(pfclog((inst(_7832,numbuffer),world(_7844),\+currentValue(_7844,_7832,_7862),{is_unit(_7844,_7832)}==>currentValue(_7844,_7832,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_7832,_7844)))))))}])
- % Found positive trigger: boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)))
- % body: compound(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916)))),\+is_ftVar(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))))*->rhs([{with_current_why(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))),ignore(\+addAdmittedArguments(boxlog((currentValue(_5864,_5866,skIsWorldInstNumbufferExistsCurrentValue_18FnSk(_5866,_5864)):-proven_tru(inst(_5866,numbuffer)),proven_tru(world(_5864)),\+currentValue(_5864,_5866,_5916))))))}])
- % Found positive trigger: clif(forall(_3100,forall(_3106,exists(_3112,=>(&(inst(_3106,numbuffer),world(_3100)),currentValue(_3100,_3106,_3112))))))
- % body: compound(clif(forall(_3100,forall(_3106,exists(_3112,=>(&(inst(_3106,numbuffer),world(_3100)),currentValue(_3100,_3106,_3112))))))),\+is_ftVar(clif(forall(_3100,forall(_3106,exists(_3112,=>(&(inst(_3106,numbuffer),world(_3100)),currentValue(_3100,_3106,_3112)))))))*->rhs([{with_current_why(clif(forall(_3100,forall(_3106,exists(_3112,=>(&(inst(_3106,numbuffer),world(_3100)),currentValue(_3100,_3106,_3112)))))),ignore(\+addAdmittedArguments(clif(forall(_3100,forall(_3106,exists(_3112,=>(&(inst(_3106,numbuffer),world(_3100)),currentValue(_3100,_3106,_3112)))))))))}])
- % gripe_CPUTIME(true, warn(0.428960429>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, clif(forall(_1556, forall(_1562, exists(_1568, =>(&(inst(_1562, numbuffer), world(_1556)), currentValue(_1556, _1562, _1568)))))), (forall(_1340, forall(_1346, exists(_1352, =>(&(inst(_1346, numbuffer), world(_1340)), currentValue(_1340, _1346, _1352))))), pt(forall(_1556, forall(_1562, exists(_1568, =>(&(inst(_1562, numbuffer), world(_1556)), currentValue(_1556, _1562, _1568))))), (is_kif_clause(forall(_1556, forall(_1562, exists(_1568, =>(&(inst(_1562, numbuffer), world(_1556)), currentValue(_1556, _1562, _1568))))))*->rhs([clif(forall(_1556, forall(_1562, exists(_1568, =>(&(inst(_1562, numbuffer), world(_1556)), currentValue(_1556, _1562, _1568))))))])))), none))).
- % Found positive trigger: forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568)))))
- % body: compound(forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568)))))),\+is_ftVar(forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568))))))*->rhs([{with_current_why(forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568))))),ignore(\+addAdmittedArguments(forall(_1556,forall(_1562,exists(_1568,=>(&(inst(_1562,numbuffer),world(_1556)),currentValue(_1556,_1562,_1568))))))))}])
- % gripe_CPUTIME(true, warn(0.43961746200000107>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, forall(W, forall(N, exists(V, =>(&(inst(N, numbuffer), world(W)), currentValue(W, N, V))))), (mfl(header_sane, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc', 103), ax), none))).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:106
- % r_sane:mpred_fwc1(forall(_23138, =>(inst(_23138, opbuffer), initalValue(_23138, null)))).
- % Found positive trigger: forall(_1310,=>(inst(_1310,opbuffer),initalValue(_1310,null)))
- % body: compound(forall(_1310,=>(inst(_1310,opbuffer),initalValue(_1310,null)))),\+is_ftVar(forall(_1310,=>(inst(_1310,opbuffer),initalValue(_1310,null))))*->rhs([{with_current_why(forall(_1310,=>(inst(_1310,opbuffer),initalValue(_1310,null))),ignore(\+addAdmittedArguments(forall(_1310,=>(inst(_1310,opbuffer),initalValue(_1310,null))))))}])
- % r_sane:mpred_fwc1(admittedArgument(initalValue, 2, null)).
- % Found positive trigger: admittedArgument(initalValue,2,null)
- % body: compound(admittedArgument(initalValue,2,null)),\+is_ftVar(admittedArgument(initalValue,2,null))*->rhs([{with_current_why(admittedArgument(initalValue,2,null),ignore(\+addAdmittedArguments(admittedArgument(initalValue,2,null))))}])
- % Found positive trigger: admittedArgument(initalValue,2,null)
- % body: is_kif_clause(admittedArgument(initalValue,2,null))*->rhs([clif(admittedArgument(initalValue,2,null))])
- % Found positive trigger: admittedArgument(initalValue,2,null)
- % body: compound(admittedArgument(initalValue,2,null)),\+is_ftVar(admittedArgument(initalValue,2,null))*->rhs([{with_current_why(admittedArgument(initalValue,2,null),ignore(\+addAdmittedArguments(admittedArgument(initalValue,2,null))))}])
- % Found positive trigger: forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null)))
- % body: is_kif_clause(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))))*->rhs([clif(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))))])
- % RHS-Post1: clif(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))))
- % Support: forall(_1136,=>(inst(_1136,opbuffer),initalValue(_1136,null))),pt(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))),(is_kif_clause(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))))*->rhs([clif(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))))])))
- % r_sane:mpred_fwc1(clif(forall(_9412, =>(inst(_9412, opbuffer), initalValue(_9412, null))))).
- % Found positive trigger: clif(forall(_11768,=>(inst(_11768,opbuffer),initalValue(_11768,null))))
- % body: compound(clif(forall(_11768,=>(inst(_11768,opbuffer),initalValue(_11768,null))))),\+is_ftVar(clif(forall(_11768,=>(inst(_11768,opbuffer),initalValue(_11768,null)))))*->rhs([{with_current_why(clif(forall(_11768,=>(inst(_11768,opbuffer),initalValue(_11768,null)))),ignore(\+addAdmittedArguments(clif(forall(_11768,=>(inst(_11768,opbuffer),initalValue(_11768,null)))))))}])
- % Found positive trigger: clif(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))}])
- % =clif=
- % forall(_2532,
- % ( =>(inst(_2532, opbuffer), initalValue(_2532, null))
- % )).
- % Found positive trigger: clif(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))
- % body: is_kif_clause(clif(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null)))))*->rhs([clif(clif(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null)))))])
- % Found positive trigger: clif(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))
- % body: \+is_kif_clause(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))*->rhs([{delistify_last_arg(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))),kif_to_boxlog,_12006)},boxlog(_12006)])
- % Found positive trigger: clif(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))
- % body: is_kif_clause(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))*->rhs([{delistify_last_arg(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))),kif_to_boxlog,_2770)},boxlog(_2770)])
- % kif :-
- % all(_2532, =>(inst(_2532, opbuffer), initalValue(_2532, null))).
- % qualify_nesc :-
- % all(_2532, nesc(=>(inst(_2532, opbuffer), initalValue(_2532, null)))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_2532, nesc(b_d(KB, nesc, poss), =>(inst(_2532, opbuffer), initalValue(_2532, null)))), nesc(b_d(KB, nesc, poss), v(~inst(_2532, opbuffer), initalValue(_2532, null)))))).
- % nnf :-
- % nesc(v(~inst(_2532, opbuffer), initalValue(_2532, null))).
- % th_nnf_in :-
- % ( neg(inst(_2532, opbuffer))
- % ; tru(initalValue(_2532, null))
- % ).
- % th_nnf_out :-
- % ~ (n(neg(inst(_2532, opbuffer))), n(tru(initalValue(_2532, null)))).
- % RHS-Post1: boxlog((proven_neg(inst(_2532,opbuffer)):-proven_neg(initalValue(_2532,null))))
- % Support: clif(forall(_2364,=>(inst(_2364,opbuffer),initalValue(_2364,null)))),pt(clif(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null)))),(is_kif_clause(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))*->rhs([{delistify_last_arg(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))),kif_to_boxlog,(proven_neg(inst(_2532,opbuffer)):-proven_neg(initalValue(_2532,null))))},boxlog((proven_neg(inst(_2532,opbuffer)):-proven_neg(initalValue(_2532,null))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(inst(_12132, opbuffer)):-proven_neg(initalValue(_12132, null))))).
- % Found positive trigger: boxlog((proven_neg(inst(_14776,opbuffer)):-proven_neg(initalValue(_14776,null))))
- % body: compound(boxlog((proven_neg(inst(_14776,opbuffer)):-proven_neg(initalValue(_14776,null))))),\+is_ftVar(boxlog((proven_neg(inst(_14776,opbuffer)):-proven_neg(initalValue(_14776,null)))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_14776,opbuffer)):-proven_neg(initalValue(_14776,null)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_14776,opbuffer)):-proven_neg(initalValue(_14776,null)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null))))}])
- % =boxlog=
- % proven_neg(inst(_4158, opbuffer)) :-
- % proven_neg(initalValue(_4158, null)).
- % Found positive trigger: boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null))))
- % body: is_kif_clause(boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null)))))*->rhs([clif(boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null)))))])
- % Found positive trigger: boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null))))
- % body: delistify_last_arg((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null))),boxlog_to_pfc,_14746),must_be_unqualified(_14746)*->rhs([pfclog(_14746)])
- % RHS-Post1: pfclog((~initalValue(_4158,null),{is_unit(_4158)}==>proven_neg(inst(_4158,opbuffer))))
- % Support: boxlog((proven_neg(inst(_3986,opbuffer)):-proven_neg(initalValue(_3986,null)))),pt(boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null)))),(delistify_last_arg((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null))),boxlog_to_pfc,(~initalValue(_4158,null),{is_unit(_4158)}==>proven_neg(inst(_4158,opbuffer)))),must_be_unqualified((~initalValue(_4158,null),{is_unit(_4158)}==>proven_neg(inst(_4158,opbuffer))))*->rhs([pfclog((~initalValue(_4158,null),{is_unit(_4158)}==>proven_neg(inst(_4158,opbuffer))))])))
- % r_sane:mpred_fwc1(pfclog((~initalValue(_15054, null), {is_unit(_15054)}==>proven_neg(inst(_15054, opbuffer))))).
- % Found positive trigger: pfclog((~initalValue(_18116,null),{is_unit(_18116)}==>proven_neg(inst(_18116,opbuffer))))
- % body: compound(pfclog((~initalValue(_18116,null),{is_unit(_18116)}==>proven_neg(inst(_18116,opbuffer))))),\+is_ftVar(pfclog((~initalValue(_18116,null),{is_unit(_18116)}==>proven_neg(inst(_18116,opbuffer)))))*->rhs([{with_current_why(pfclog((~initalValue(_18116,null),{is_unit(_18116)}==>proven_neg(inst(_18116,opbuffer)))),ignore(\+addAdmittedArguments(pfclog((~initalValue(_18116,null),{is_unit(_18116)}==>proven_neg(inst(_18116,opbuffer)))))))}])
- % Found positive trigger: pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer))))}])
- % =pfclog=
- % ~initalValue(_5616, null), {is_unit(_5616)}==>proven_neg(inst(_5616, opbuffer)).
- % Found positive trigger: pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer))))
- % body: is_kif_clause(pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer)))))*->rhs([clif(pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer)))))])
- % Found positive trigger: pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer))))
- % body: rhs([(~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer)))])
- % RHS-Post1: ~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer))
- % Support: pfclog((~initalValue(_5416,null),{is_unit(_5416)}==>proven_neg(inst(_5416,opbuffer)))),pt(pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer)))),rhs([(~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer)))]))
- % r_sane:mpred_fwc1((~initalValue(_36300, null), {is_unit(_36300)}==>proven_neg(inst(_36300, opbuffer)))).
- % Adding positive
- % trigger: ~initalValue(_6790,null)
- % body: is_unit(_6790)*->rhs([proven_neg(inst(_6790,opbuffer))])
- % Support: (~initalValue(_6996,null),{is_unit(_6996)}==>proven_neg(inst(_6996,opbuffer))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',106)
- % Found positive trigger: pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer))))
- % body: compound(pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer))))),\+is_ftVar(pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer)))))*->rhs([{with_current_why(pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer)))),ignore(\+addAdmittedArguments(pfclog((~initalValue(_5616,null),{is_unit(_5616)}==>proven_neg(inst(_5616,opbuffer)))))))}])
- % Found positive trigger: boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null))))
- % body: compound(boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null))))),\+is_ftVar(boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null)))))*->rhs([{with_current_why(boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(inst(_4158,opbuffer)):-proven_neg(initalValue(_4158,null)))))))}])
- % RHS-Post1: boxlog((initalValue(_2532,null):-proven_tru(inst(_2532,opbuffer))))
- % Support: clif(forall(_2364,=>(inst(_2364,opbuffer),initalValue(_2364,null)))),pt(clif(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null)))),(is_kif_clause(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))))*->rhs([{delistify_last_arg(forall(_2532,=>(inst(_2532,opbuffer),initalValue(_2532,null))),kif_to_boxlog,(initalValue(_2532,null):-proven_tru(inst(_2532,opbuffer))))},boxlog((initalValue(_2532,null):-proven_tru(inst(_2532,opbuffer))))])))
- % r_sane:mpred_fwc1(boxlog((initalValue(_11776, null):-proven_tru(inst(_11776, opbuffer))))).
- % Found positive trigger: boxlog((initalValue(_14366,null):-proven_tru(inst(_14366,opbuffer))))
- % body: compound(boxlog((initalValue(_14366,null):-proven_tru(inst(_14366,opbuffer))))),\+is_ftVar(boxlog((initalValue(_14366,null):-proven_tru(inst(_14366,opbuffer)))))*->rhs([{with_current_why(boxlog((initalValue(_14366,null):-proven_tru(inst(_14366,opbuffer)))),ignore(\+addAdmittedArguments(boxlog((initalValue(_14366,null):-proven_tru(inst(_14366,opbuffer)))))))}])
- % Found positive trigger: boxlog((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer))))}])
- % =boxlog=
- % initalValue(_4018, null) :-
- % proven_tru(inst(_4018, opbuffer)).
- % Found positive trigger: boxlog((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer))))
- % body: is_kif_clause(boxlog((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer)))))*->rhs([clif(boxlog((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer)))))])
- % Found positive trigger: boxlog((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer))))
- % body: delistify_last_arg((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer))),boxlog_to_pfc,_14372),must_be_unqualified(_14372)*->rhs([pfclog(_14372)])
- % RHS-Post1: pfclog((inst(_4018,opbuffer),{is_unit(_4018)}==>initalValue(_4018,null)))
- % Support: boxlog((initalValue(_3854,null):-proven_tru(inst(_3854,opbuffer)))),pt(boxlog((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer)))),(delistify_last_arg((initalValue(_4018,null):-proven_tru(inst(_4018,opbuffer))),boxlog_to_pfc,(inst(_4018,opbuffer),{is_unit(_4018)}==>initalValue(_4018,null))),must_be_unqualified((inst(_4018,opbuffer),{is_unit(_4018)}==>initalValue(_4018,null)))*->rhs([pfclog((inst(_4018,opbuffer),{is_unit(_4018)}==>initalValue(_4018,null)))])))
- % r_sane:mpred_fwc1(pfclog((inst(_14390, opbuffer), {is_unit(_14390)}==>initalValue(_14390, null)))).
- % Found positive trigger: pfclog((inst(_17350,opbuffer),{is_unit(_17350)}==>initalValue(_17350,null)))
- % body: compound(pfclog((inst(_17350,opbuffer),{is_unit(_17350)}==>initalValue(_17350,null)))),\+is_ftVar(pfclog((inst(_17350,opbuffer),{is_unit(_17350)}==>initalValue(_17350,null))))*->rhs([{with_current_why(pfclog((inst(_17350,opbuffer),{is_unit(_17350)}==>initalValue(_17350,null))),ignore(\+addAdmittedArguments(pfclog((inst(_17350,opbuffer),{is_unit(_17350)}==>initalValue(_17350,null))))))}])
- % Found positive trigger: pfclog((inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null)))}])
- % =pfclog=
- % inst(_5392, opbuffer), {is_unit(_5392)}==>initalValue(_5392, null).
- % Found positive trigger: pfclog((inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null)))
- % body: is_kif_clause(pfclog((inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null))))*->rhs([clif(pfclog((inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null))))])
- % Found positive trigger: pfclog((inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null)))
- % body: rhs([(inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null))])
- % RHS-Post1: inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null)
- % Support: pfclog((inst(_5208,opbuffer),{is_unit(_5208)}==>initalValue(_5208,null))),pt(pfclog((inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null))),rhs([(inst(_5392,opbuffer),{is_unit(_5392)}==>initalValue(_5392,null))]))
- % r_sane:mpred_fwc1((inst(_34572, opbuffer), {is_unit(_34572)}==>initalValue(_34572, null))).
- % Adding positive
- % trigger: inst(_6486,opbuffer)
- % body: is_unit(_6486)*->rhs([initalValue(_6486,null)])
- % Support: (inst(_6676,opbuffer),{is_unit(_6676)}==>initalValue(_6676,null)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',106)
- % RHS-Post1: initalValue(skInstOpbufferExists_16FnSk,null)
- % Support: inst(skInstOpbufferExists_16FnSk,opbuffer),pt(inst(_12532,opbuffer),(is_unit(_12532)*->rhs([initalValue(_12532,null)])))
- % r_sane:mpred_fwc1(initalValue(skInstOpbufferExists_16FnSk, null)).
- % Found positive trigger: initalValue(skInstOpbufferExists_16FnSk,null)
- % body: compound(initalValue(skInstOpbufferExists_16FnSk,null)),\+is_ftVar(initalValue(skInstOpbufferExists_16FnSk,null))*->rhs([{with_current_why(initalValue(skInstOpbufferExists_16FnSk,null),ignore(\+addAdmittedArguments(initalValue(skInstOpbufferExists_16FnSk,null))))}])
- % Found positive trigger: initalValue(skInstOpbufferExists_16FnSk,null)
- % body: is_kif_clause(initalValue(skInstOpbufferExists_16FnSk,null))*->rhs([clif(initalValue(skInstOpbufferExists_16FnSk,null))])
- % Found positive trigger: initalValue(skInstOpbufferExists_16FnSk,null)
- % body: compound(initalValue(skInstOpbufferExists_16FnSk,null)),\+is_ftVar(initalValue(skInstOpbufferExists_16FnSk,null))*->rhs([{with_current_why(initalValue(skInstOpbufferExists_16FnSk,null),ignore(\+addAdmittedArguments(initalValue(skInstOpbufferExists_16FnSk,null))))}])
- % Found positive trigger: initalValue(skInstOpbufferExists_16FnSk,null)
- % body: pt(initialWorld(_21508),(is_unit(null,skInstOpbufferExists_16FnSk,_21508)*->rhs([currentValue(_21508,skInstOpbufferExists_16FnSk,null)])))
- % Adding positive
- % trigger: initialWorld(_21508)
- % body: is_unit(null,skInstOpbufferExists_16FnSk,_21508)*->rhs([currentValue(_21508,skInstOpbufferExists_16FnSk,null)])
- % Support: initalValue(skInstOpbufferExists_16FnSk,null),pt(initalValue(skInstOpbufferExists_16FnSk,null),pt(initialWorld(_21508),(is_unit(null,skInstOpbufferExists_16FnSk,_21508)*->rhs([currentValue(_21508,skInstOpbufferExists_16FnSk,null)]))))
- % RHS-Post1: currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null)
- % Support: initialWorld(skIsInitialworldExists_17FnSk),pt(initialWorld(_8348),(is_unit(null,skInstOpbufferExists_16FnSk,_8348)*->rhs([currentValue(_8348,skInstOpbufferExists_16FnSk,null)])))
- % r_sane:mpred_fwc1(currentValue(skIsInitialworldExists_17FnSk, skInstOpbufferExists_16FnSk, null)).
- % Found positive trigger: currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null)
- % body: compound(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null)),\+is_ftVar(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null))*->rhs([{with_current_why(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null),ignore(\+addAdmittedArguments(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null))))}])
- % r_sane:mpred_fwc1(admittedArgument(currentValue, 2, skInstOpbufferExists_16FnSk)).
- % Found positive trigger: admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk)
- % body: compound(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk)),\+is_ftVar(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk))*->rhs([{with_current_why(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk),ignore(\+addAdmittedArguments(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk))))}])
- % Found positive trigger: admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk)
- % body: is_kif_clause(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk))*->rhs([clif(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk))])
- % Found positive trigger: admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk)
- % body: compound(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk)),\+is_ftVar(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk))*->rhs([{with_current_why(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk),ignore(\+addAdmittedArguments(admittedArgument(currentValue,2,skInstOpbufferExists_16FnSk))))}])
- % r_sane:mpred_fwc1(admittedArgument(currentValue, 3, null)).
- % Found positive trigger: admittedArgument(currentValue,3,null)
- % body: compound(admittedArgument(currentValue,3,null)),\+is_ftVar(admittedArgument(currentValue,3,null))*->rhs([{with_current_why(admittedArgument(currentValue,3,null),ignore(\+addAdmittedArguments(admittedArgument(currentValue,3,null))))}])
- % Found positive trigger: admittedArgument(currentValue,3,null)
- % body: is_kif_clause(admittedArgument(currentValue,3,null))*->rhs([clif(admittedArgument(currentValue,3,null))])
- % Found positive trigger: admittedArgument(currentValue,3,null)
- % body: compound(admittedArgument(currentValue,3,null)),\+is_ftVar(admittedArgument(currentValue,3,null))*->rhs([{with_current_why(admittedArgument(currentValue,3,null),ignore(\+addAdmittedArguments(admittedArgument(currentValue,3,null))))}])
- % Found positive trigger: currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null)
- % body: is_kif_clause(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null))*->rhs([clif(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null))])
- % Found positive trigger: currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null)
- % body: compound(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null)),\+is_ftVar(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null))*->rhs([{with_current_why(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null),ignore(\+addAdmittedArguments(currentValue(skIsInitialworldExists_17FnSk,skInstOpbufferExists_16FnSk,null))))}])
- % Found positive trigger: pfclog((inst(_5364,opbuffer),{is_unit(_5364)}==>initalValue(_5364,null)))
- % body: compound(pfclog((inst(_5364,opbuffer),{is_unit(_5364)}==>initalValue(_5364,null)))),\+is_ftVar(pfclog((inst(_5364,opbuffer),{is_unit(_5364)}==>initalValue(_5364,null))))*->rhs([{with_current_why(pfclog((inst(_5364,opbuffer),{is_unit(_5364)}==>initalValue(_5364,null))),ignore(\+addAdmittedArguments(pfclog((inst(_5364,opbuffer),{is_unit(_5364)}==>initalValue(_5364,null))))))}])
- % Found positive trigger: boxlog((initalValue(_3990,null):-proven_tru(inst(_3990,opbuffer))))
- % body: compound(boxlog((initalValue(_3990,null):-proven_tru(inst(_3990,opbuffer))))),\+is_ftVar(boxlog((initalValue(_3990,null):-proven_tru(inst(_3990,opbuffer)))))*->rhs([{with_current_why(boxlog((initalValue(_3990,null):-proven_tru(inst(_3990,opbuffer)))),ignore(\+addAdmittedArguments(boxlog((initalValue(_3990,null):-proven_tru(inst(_3990,opbuffer)))))))}])
- % Found positive trigger: clif(forall(_2504,=>(inst(_2504,opbuffer),initalValue(_2504,null))))
- % body: compound(clif(forall(_2504,=>(inst(_2504,opbuffer),initalValue(_2504,null))))),\+is_ftVar(clif(forall(_2504,=>(inst(_2504,opbuffer),initalValue(_2504,null)))))*->rhs([{with_current_why(clif(forall(_2504,=>(inst(_2504,opbuffer),initalValue(_2504,null)))),ignore(\+addAdmittedArguments(clif(forall(_2504,=>(inst(_2504,opbuffer),initalValue(_2504,null)))))))}])
- % Found positive trigger: forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null)))
- % body: compound(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null)))),\+is_ftVar(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))))*->rhs([{with_current_why(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))),ignore(\+addAdmittedArguments(forall(_1296,=>(inst(_1296,opbuffer),initalValue(_1296,null))))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:109
- % r_sane:mpred_fwc1(exists(_37044, currentWorld(_37044))).
- % Found positive trigger: exists(_1210,currentWorld(_1210))
- % body: compound(exists(_1210,currentWorld(_1210))),\+is_ftVar(exists(_1210,currentWorld(_1210)))*->rhs([{with_current_why(exists(_1210,currentWorld(_1210)),ignore(\+addAdmittedArguments(exists(_1210,currentWorld(_1210)))))}])
- % Found positive trigger: exists(_1210,currentWorld(_1210))
- % body: is_kif_clause(exists(_1210,currentWorld(_1210)))*->rhs([clif(exists(_1210,currentWorld(_1210)))])
- % RHS-Post1: clif(exists(_1210,currentWorld(_1210)))
- % Support: exists(_1078,currentWorld(_1078)),pt(exists(_1210,currentWorld(_1210)),(is_kif_clause(exists(_1210,currentWorld(_1210)))*->rhs([clif(exists(_1210,currentWorld(_1210)))])))
- % r_sane:mpred_fwc1(clif(exists(_15092, currentWorld(_15092)))).
- % Found positive trigger: clif(exists(_2246,currentWorld(_2246)))
- % body: compound(clif(exists(_2246,currentWorld(_2246)))),\+is_ftVar(clif(exists(_2246,currentWorld(_2246))))*->rhs([{with_current_why(clif(exists(_2246,currentWorld(_2246))),ignore(\+addAdmittedArguments(clif(exists(_2246,currentWorld(_2246))))))}])
- % Found positive trigger: clif(exists(_2246,currentWorld(_2246)))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(exists(_2246,currentWorld(_2246)))}])
- % =clif=
- % exists(_2246, currentWorld(_2246)).
- % Found positive trigger: clif(exists(_2246,currentWorld(_2246)))
- % body: is_kif_clause(clif(exists(_2246,currentWorld(_2246))))*->rhs([clif(clif(exists(_2246,currentWorld(_2246))))])
- % Found positive trigger: clif(exists(_2246,currentWorld(_2246)))
- % body: \+is_kif_clause(exists(_2246,currentWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,currentWorld(_2246)),kif_to_boxlog,_15256)},boxlog(_15256)])
- % Found positive trigger: clif(exists(_2246,currentWorld(_2246)))
- % body: is_kif_clause(exists(_2246,currentWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,currentWorld(_2246)),kif_to_boxlog,_2442)},boxlog(_2442)])
- % kif :-
- % exists(_2246, currentWorld(_2246)).
- % qualify_nesc :-
- % exists(_2246, nesc(currentWorld(_2246))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, exists(_2246, nesc(b_d(KB, nesc, poss), currentWorld(_2246))), v(nesc(b_d(KB, nesc, poss), currentWorld(_2246)), v(nesc(b_d(KB, nesc, poss), currentWorld(skIsCurrentworldExists_19FnSk)), ~skolem(_2246, skIsCurrentworldExists_19FnSk)))))).
- % nnf :-
- % v(nesc(currentWorld(_2246)), v(nesc(currentWorld(skIsCurrentworldExists_19FnSk)), ~skolem(_2246, skIsCurrentworldExists_19FnSk))).
- % th_nnf_in :-
- % ( tru(currentWorld(_2246))
- % ; tru(currentWorld(skIsCurrentworldExists_19FnSk))
- % ; neg(skolem(_2246, skIsCurrentworldExists_19FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(tru(currentWorld(_2246))), n(tru(currentWorld(skIsCurrentworldExists_19FnSk))), n(neg(skolem(_2246, skIsCurrentworldExists_19FnSk)))).
- % RHS-Post1: boxlog((proven_neg(skolem(_2246,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_2246))))
- % Support: clif(exists(_2106,currentWorld(_2106))),pt(clif(exists(_2246,currentWorld(_2246))),(is_kif_clause(exists(_2246,currentWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,currentWorld(_2246)),kif_to_boxlog,(proven_neg(skolem(_2246,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_2246))))},boxlog((proven_neg(skolem(_2246,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_2246))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_12500, skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)), proven_neg(currentWorld(_12500))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_15310,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_15310))))
- % body: compound(boxlog((proven_neg(skolem(_15310,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_15310))))),\+is_ftVar(boxlog((proven_neg(skolem(_15310,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_15310)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_15310,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_15310)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_15310,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_15310)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978))))}])
- % =boxlog=
- % proven_neg(skolem(_3978, skIsCurrentworldExists_19FnSk)) :-
- % proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),
- % proven_neg(currentWorld(_3978)).
- % Found positive trigger: boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978)))))*->rhs([clif(boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978))))
- % body: delistify_last_arg((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978))),boxlog_to_pfc,_15334),must_be_unqualified(_15334)*->rhs([pfclog(_15334)])
- % RHS-Post1: pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_3978),{is_unit(_3978)}==>proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk))))
- % Support: boxlog((proven_neg(skolem(_3798,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3798)))),pt(boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978)))),(delistify_last_arg((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978))),boxlog_to_pfc,(~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_3978),{is_unit(_3978)}==>proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)))),must_be_unqualified((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_3978),{is_unit(_3978)}==>proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk))))*->rhs([pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_3978),{is_unit(_3978)}==>proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk))))])))
- % r_sane:mpred_fwc1(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk), ~currentWorld(_15670), {is_unit(_15670)}==>proven_neg(skolem(_15670, skIsCurrentworldExists_19FnSk))))).
- % Found positive trigger: pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_18892),{is_unit(_18892)}==>proven_neg(skolem(_18892,skIsCurrentworldExists_19FnSk))))
- % body: compound(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_18892),{is_unit(_18892)}==>proven_neg(skolem(_18892,skIsCurrentworldExists_19FnSk))))),\+is_ftVar(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_18892),{is_unit(_18892)}==>proven_neg(skolem(_18892,skIsCurrentworldExists_19FnSk)))))*->rhs([{with_current_why(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_18892),{is_unit(_18892)}==>proven_neg(skolem(_18892,skIsCurrentworldExists_19FnSk)))),ignore(\+addAdmittedArguments(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_18892),{is_unit(_18892)}==>proven_neg(skolem(_18892,skIsCurrentworldExists_19FnSk)))))))}])
- % Found positive trigger: pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk))))}])
- % =pfclog=
- % ~currentWorld(skIsCurrentworldExists_19FnSk), ~currentWorld(_5514), {is_unit(_5514)}==>proven_neg(skolem(_5514, skIsCurrentworldExists_19FnSk)).
- % Found positive trigger: pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk))))
- % body: is_kif_clause(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk)))))*->rhs([clif(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk)))))])
- % Found positive trigger: pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk))))
- % body: rhs([(~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk)))])
- % RHS-Post1: ~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk))
- % Support: pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5306),{is_unit(_5306)}==>proven_neg(skolem(_5306,skIsCurrentworldExists_19FnSk)))),pt(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk)))),rhs([(~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk)))]))
- % r_sane:mpred_fwc1((~currentWorld(skIsCurrentworldExists_19FnSk), ~currentWorld(_38274), {is_unit(_38274)}==>proven_neg(skolem(_38274, skIsCurrentworldExists_19FnSk)))).
- % Adding positive
- % trigger: ~currentWorld(skIsCurrentworldExists_19FnSk)
- % body: pt(~currentWorld(_6736),(is_unit(_6736)*->rhs([proven_neg(skolem(_6736,skIsCurrentworldExists_19FnSk))])))
- % Support: (~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_6950),{is_unit(_6950)}==>proven_neg(skolem(_6950,skIsCurrentworldExists_19FnSk))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',109)
- % Found positive trigger: pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk))))
- % body: compound(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk))))),\+is_ftVar(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk)))))*->rhs([{with_current_why(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk)))),ignore(\+addAdmittedArguments(pfclog((~currentWorld(skIsCurrentworldExists_19FnSk),~currentWorld(_5514),{is_unit(_5514)}==>proven_neg(skolem(_5514,skIsCurrentworldExists_19FnSk)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978))))
- % body: compound(boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978))))),\+is_ftVar(boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_3978,skIsCurrentworldExists_19FnSk)):-proven_neg(currentWorld(skIsCurrentworldExists_19FnSk)),proven_neg(currentWorld(_3978)))))))}])
- % RHS-Post1: boxlog((currentWorld(_2246):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_2246=skIsCurrentworldExists_19FnSk}))
- % Support: clif(exists(_2106,currentWorld(_2106))),pt(clif(exists(_2246,currentWorld(_2246))),(is_kif_clause(exists(_2246,currentWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,currentWorld(_2246)),kif_to_boxlog,(currentWorld(_2246):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_2246=skIsCurrentworldExists_19FnSk}))},boxlog((currentWorld(_2246):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_2246=skIsCurrentworldExists_19FnSk}))])))
- % r_sane:mpred_fwc1(boxlog((currentWorld(_12128):- \+currentWorld(skIsCurrentworldExists_19FnSk), {_12128=skIsCurrentworldExists_19FnSk}))).
- % Found positive trigger: boxlog((currentWorld(_14870):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_14870=skIsCurrentworldExists_19FnSk}))
- % body: compound(boxlog((currentWorld(_14870):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_14870=skIsCurrentworldExists_19FnSk}))),\+is_ftVar(boxlog((currentWorld(_14870):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_14870=skIsCurrentworldExists_19FnSk})))*->rhs([{with_current_why(boxlog((currentWorld(_14870):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_14870=skIsCurrentworldExists_19FnSk})),ignore(\+addAdmittedArguments(boxlog((currentWorld(_14870):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_14870=skIsCurrentworldExists_19FnSk})))))}])
- % Found positive trigger: boxlog((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk}))}])
- % =boxlog=
- % currentWorld(_4022) :-
- % \+ currentWorld(skIsCurrentworldExists_19FnSk),
- % { _4022=skIsCurrentworldExists_19FnSk
- % }.
- % Found positive trigger: boxlog((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk}))
- % body: is_kif_clause(boxlog((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk})))*->rhs([clif(boxlog((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk})))])
- % Found positive trigger: boxlog((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk}))
- % body: delistify_last_arg((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk}),boxlog_to_pfc,_15092),must_be_unqualified(_15092)*->rhs([pfclog(_15092)])
- % RHS-Post1: pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk},{is_unit(_4022)}==>currentWorld(_4022)))
- % Support: boxlog((currentWorld(_3850):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_3850=skIsCurrentworldExists_19FnSk})),pt(boxlog((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk})),(delistify_last_arg((currentWorld(_4022):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk}),boxlog_to_pfc,(\+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk},{is_unit(_4022)}==>currentWorld(_4022))),must_be_unqualified((\+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk},{is_unit(_4022)}==>currentWorld(_4022)))*->rhs([pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_4022=skIsCurrentworldExists_19FnSk},{is_unit(_4022)}==>currentWorld(_4022)))])))
- % r_sane:mpred_fwc1(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk), {_15388=skIsCurrentworldExists_19FnSk}, {is_unit(_15388)}==>currentWorld(_15388)))).
- % Found positive trigger: pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_18552=skIsCurrentworldExists_19FnSk},{is_unit(_18552)}==>currentWorld(_18552)))
- % body: compound(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_18552=skIsCurrentworldExists_19FnSk},{is_unit(_18552)}==>currentWorld(_18552)))),\+is_ftVar(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_18552=skIsCurrentworldExists_19FnSk},{is_unit(_18552)}==>currentWorld(_18552))))*->rhs([{with_current_why(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_18552=skIsCurrentworldExists_19FnSk},{is_unit(_18552)}==>currentWorld(_18552))),ignore(\+addAdmittedArguments(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_18552=skIsCurrentworldExists_19FnSk},{is_unit(_18552)}==>currentWorld(_18552))))))}])
- % Found positive trigger: pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506)))}])
- % =pfclog=
- % \+currentWorld(skIsCurrentworldExists_19FnSk), {_5506=skIsCurrentworldExists_19FnSk}, {is_unit(_5506)}==>currentWorld(_5506).
- % Found positive trigger: pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506)))
- % body: is_kif_clause(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506))))*->rhs([clif(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506))))])
- % Found positive trigger: pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506)))
- % body: rhs([(\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506))])
- % RHS-Post1: \+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506)
- % Support: pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5306=skIsCurrentworldExists_19FnSk},{is_unit(_5306)}==>currentWorld(_5306))),pt(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506))),rhs([(\+currentWorld(skIsCurrentworldExists_19FnSk),{_5506=skIsCurrentworldExists_19FnSk},{is_unit(_5506)}==>currentWorld(_5506))]))
- % r_sane:mpred_fwc1((\+currentWorld(skIsCurrentworldExists_19FnSk), {_38174=skIsCurrentworldExists_19FnSk}, {is_unit(_38174)}==>currentWorld(_38174))).
- % Adding negative
- % trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % test: call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk))
- % body: _6656=skIsCurrentworldExists_19FnSk*->is_unit(_6656)*->rhs([currentWorld(_6656)])
- % Support: (\+currentWorld(skIsCurrentworldExists_19FnSk),{_6862=skIsCurrentworldExists_19FnSk},{is_unit(_6862)}==>currentWorld(_6862)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',109)
- % uses_predicate(header_sane, baseKB, currentWorld, 1).
- % RHS-Post1: currentWorld(skIsCurrentworldExists_19FnSk)
- % Support: \+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % cond: call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk))
- % action: skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])
- % from: mpred_add_support_fast(currentWorld(skIsCurrentworldExists_19FnSk),(\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))))
- % r_sane:mpred_fwc1(currentWorld(skIsCurrentworldExists_19FnSk)).
- % Found positive trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % body: compound(currentWorld(skIsCurrentworldExists_19FnSk)),\+is_ftVar(currentWorld(skIsCurrentworldExists_19FnSk))*->rhs([{with_current_why(currentWorld(skIsCurrentworldExists_19FnSk),ignore(\+addAdmittedArguments(currentWorld(skIsCurrentworldExists_19FnSk))))}])
- % Found positive trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % body: is_kif_clause(currentWorld(skIsCurrentworldExists_19FnSk))*->rhs([clif(currentWorld(skIsCurrentworldExists_19FnSk))])
- % Found positive trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % body: compound(currentWorld(skIsCurrentworldExists_19FnSk)),\+is_ftVar(currentWorld(skIsCurrentworldExists_19FnSk))*->rhs([{with_current_why(currentWorld(skIsCurrentworldExists_19FnSk),ignore(\+addAdmittedArguments(currentWorld(skIsCurrentworldExists_19FnSk))))}])
- % Found negative trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % cond: call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk))
- % body: skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])
- % Support: spft(currentWorld(skIsCurrentworldExists_19FnSk),\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)]))))
- % moving(inherit_above(header_sane, currentWorld(_28870))).
- % Removing (withdraw1)
- % term: currentWorld(skIsCurrentworldExists_19FnSk)
- % support (was): \+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))
- % SUCCESS: retract_u(spft(currentWorld(skIsCurrentworldExists_19FnSk),\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))))
- % Couldn't retract_i: spft(currentWorld(skIsCurrentworldExists_19FnSk),_12430,_12432).
- % show_failure(mpred_undo1, retract_u(currentWorld(skIsCurrentworldExists_19FnSk))).
- % Found positive trigger: pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5474=skIsCurrentworldExists_19FnSk},{is_unit(_5474)}==>currentWorld(_5474)))
- % body: compound(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5474=skIsCurrentworldExists_19FnSk},{is_unit(_5474)}==>currentWorld(_5474)))),\+is_ftVar(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5474=skIsCurrentworldExists_19FnSk},{is_unit(_5474)}==>currentWorld(_5474))))*->rhs([{with_current_why(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5474=skIsCurrentworldExists_19FnSk},{is_unit(_5474)}==>currentWorld(_5474))),ignore(\+addAdmittedArguments(pfclog((\+currentWorld(skIsCurrentworldExists_19FnSk),{_5474=skIsCurrentworldExists_19FnSk},{is_unit(_5474)}==>currentWorld(_5474))))))}])
- % Found positive trigger: boxlog((currentWorld(_3990):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_3990=skIsCurrentworldExists_19FnSk}))
- % body: compound(boxlog((currentWorld(_3990):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_3990=skIsCurrentworldExists_19FnSk}))),\+is_ftVar(boxlog((currentWorld(_3990):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_3990=skIsCurrentworldExists_19FnSk})))*->rhs([{with_current_why(boxlog((currentWorld(_3990):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_3990=skIsCurrentworldExists_19FnSk})),ignore(\+addAdmittedArguments(boxlog((currentWorld(_3990):- \+currentWorld(skIsCurrentworldExists_19FnSk),{_3990=skIsCurrentworldExists_19FnSk})))))}])
- % RHS-Post1: boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_2246)))
- % Support: clif(exists(_2106,currentWorld(_2106))),pt(clif(exists(_2246,currentWorld(_2246))),(is_kif_clause(exists(_2246,currentWorld(_2246)))*->rhs([{delistify_last_arg(exists(_2246,currentWorld(_2246)),kif_to_boxlog,(currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_2246)))},boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_2246)))])))
- % r_sane:mpred_fwc1(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_18648)))).
- % Found positive trigger: boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728)))
- % body: compound(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728)))),\+is_ftVar(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728))))*->rhs([{with_current_why(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728))),ignore(\+addAdmittedArguments(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728))))))}])
- % Found positive trigger: boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728)))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728)))}])
- % =boxlog=
- % currentWorld(skIsCurrentworldExists_19FnSk) :-
- % \+ currentWorld(_3728).
- % Found positive trigger: boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728)))
- % body: is_kif_clause(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728))))*->rhs([clif(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728))))])
- % Found positive trigger: boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728)))
- % body: delistify_last_arg((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728)),boxlog_to_pfc,_18924),must_be_unqualified(_18924)*->rhs([pfclog(_18924)])
- % RHS-Post1: pfclog((\+currentWorld(_3728)==>currentWorld(skIsCurrentworldExists_19FnSk)))
- % Support: boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3580))),pt(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728))),(delistify_last_arg((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3728)),boxlog_to_pfc,(\+currentWorld(_3728)==>currentWorld(skIsCurrentworldExists_19FnSk))),must_be_unqualified((\+currentWorld(_3728)==>currentWorld(skIsCurrentworldExists_19FnSk)))*->rhs([pfclog((\+currentWorld(_3728)==>currentWorld(skIsCurrentworldExists_19FnSk)))])))
- % r_sane:mpred_fwc1(pfclog((\+currentWorld(_13312)==>currentWorld(skIsCurrentworldExists_19FnSk)))).
- % Found positive trigger: pfclog((\+currentWorld(_16114)==>currentWorld(skIsCurrentworldExists_19FnSk)))
- % body: compound(pfclog((\+currentWorld(_16114)==>currentWorld(skIsCurrentworldExists_19FnSk)))),\+is_ftVar(pfclog((\+currentWorld(_16114)==>currentWorld(skIsCurrentworldExists_19FnSk))))*->rhs([{with_current_why(pfclog((\+currentWorld(_16114)==>currentWorld(skIsCurrentworldExists_19FnSk))),ignore(\+addAdmittedArguments(pfclog((\+currentWorld(_16114)==>currentWorld(skIsCurrentworldExists_19FnSk))))))}])
- % Found positive trigger: pfclog((\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk)))}])
- % =pfclog=
- % \+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk).
- % Found positive trigger: pfclog((\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk)))
- % body: is_kif_clause(pfclog((\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk))))*->rhs([clif(pfclog((\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk))))])
- % Found positive trigger: pfclog((\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk)))
- % body: rhs([(\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk))])
- % RHS-Post1: \+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk)
- % Support: pfclog((\+currentWorld(_4774)==>currentWorld(skIsCurrentworldExists_19FnSk))),pt(pfclog((\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk))),rhs([(\+currentWorld(_4922)==>currentWorld(skIsCurrentworldExists_19FnSk))]))
- % r_sane:mpred_fwc1((\+currentWorld(_31038)==>currentWorld(skIsCurrentworldExists_19FnSk))).
- % Adding negative
- % trigger: currentWorld(_5840)
- % test: call_u_no_bc(currentWorld(_5840))
- % body: rhs([currentWorld(skIsCurrentworldExists_19FnSk)])
- % Support: (\+currentWorld(_5994)==>currentWorld(skIsCurrentworldExists_19FnSk)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',109)
- % RHS-Post1: currentWorld(skIsCurrentworldExists_19FnSk)
- % Support: \+currentWorld(_5840),nt(currentWorld(_6346),call_u_no_bc(currentWorld(_5840)),rhs([currentWorld(skIsCurrentworldExists_19FnSk)]))
- % Adding NEG mpred_do_fcnt via support
- % trigger: currentWorld(_6346)
- % cond: call_u_no_bc(currentWorld(_5840))
- % action: rhs([currentWorld(skIsCurrentworldExists_19FnSk)])
- % from: mpred_add_support_fast(currentWorld(skIsCurrentworldExists_19FnSk),(\+currentWorld(_5840),nt(currentWorld(_6346),call_u_no_bc(currentWorld(_5840)),rhs([currentWorld(skIsCurrentworldExists_19FnSk)]))))
- % r_sane:mpred_fwc1(currentWorld(skIsCurrentworldExists_19FnSk)).
- % Found positive trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % body: compound(currentWorld(skIsCurrentworldExists_19FnSk)),\+is_ftVar(currentWorld(skIsCurrentworldExists_19FnSk))*->rhs([{with_current_why(currentWorld(skIsCurrentworldExists_19FnSk),ignore(\+addAdmittedArguments(currentWorld(skIsCurrentworldExists_19FnSk))))}])
- % Found positive trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % body: is_kif_clause(currentWorld(skIsCurrentworldExists_19FnSk))*->rhs([clif(currentWorld(skIsCurrentworldExists_19FnSk))])
- % Found positive trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % body: compound(currentWorld(skIsCurrentworldExists_19FnSk)),\+is_ftVar(currentWorld(skIsCurrentworldExists_19FnSk))*->rhs([{with_current_why(currentWorld(skIsCurrentworldExists_19FnSk),ignore(\+addAdmittedArguments(currentWorld(skIsCurrentworldExists_19FnSk))))}])
- % Found negative trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % cond: call_u_no_bc(currentWorld(_23036))
- % body: rhs([currentWorld(skIsCurrentworldExists_19FnSk)])
- % Support: spft(currentWorld(skIsCurrentworldExists_19FnSk),\+currentWorld(_23036),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(_23036)),rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))
- % moving(inherit_above(header_sane, currentWorld(_27292))).
- % Removing (withdraw1)
- % term: currentWorld(skIsCurrentworldExists_19FnSk)
- % support (was): \+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),rhs([currentWorld(skIsCurrentworldExists_19FnSk)]))
- % SUCCESS: retract_u(spft(currentWorld(skIsCurrentworldExists_19FnSk),\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),rhs([currentWorld(skIsCurrentworldExists_19FnSk)]))))
- % RHS-Post1: currentWorld(skIsCurrentworldExists_19FnSk)
- % Support: \+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % cond: call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk))
- % action: skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])
- % from: mpred_add_support_fast(currentWorld(skIsCurrentworldExists_19FnSk),(\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))))
- % moving(inherit_above(header_sane, currentWorld(_27490))).
- % SUCCESS: retract_u(spft(currentWorld(skIsCurrentworldExists_19FnSk),\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))))
- % RHS-Post1: currentWorld(skIsCurrentworldExists_19FnSk)
- % Support: \+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))
- % Adding NEG mpred_do_fcnt via support
- % trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % cond: call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk))
- % action: skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])
- % from: mpred_add_support_fast(currentWorld(skIsCurrentworldExists_19FnSk),(\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))))
- % moving(inherit_above(header_sane, currentWorld(_27642))).
- % Found positive trigger: pfclog((\+currentWorld(_4902)==>currentWorld(skIsCurrentworldExists_19FnSk)))
- % body: compound(pfclog((\+currentWorld(_4902)==>currentWorld(skIsCurrentworldExists_19FnSk)))),\+is_ftVar(pfclog((\+currentWorld(_4902)==>currentWorld(skIsCurrentworldExists_19FnSk))))*->rhs([{with_current_why(pfclog((\+currentWorld(_4902)==>currentWorld(skIsCurrentworldExists_19FnSk))),ignore(\+addAdmittedArguments(pfclog((\+currentWorld(_4902)==>currentWorld(skIsCurrentworldExists_19FnSk))))))}])
- % Found positive trigger: boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3708)))
- % body: compound(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3708)))),\+is_ftVar(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3708))))*->rhs([{with_current_why(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3708))),ignore(\+addAdmittedArguments(boxlog((currentWorld(skIsCurrentworldExists_19FnSk):- \+currentWorld(_3708))))))}])
- % Found positive trigger: clif(exists(_2246,currentWorld(_2246)))
- % body: compound(clif(exists(_2246,currentWorld(_2246)))),\+is_ftVar(clif(exists(_2246,currentWorld(_2246))))*->rhs([{with_current_why(clif(exists(_2246,currentWorld(_2246))),ignore(\+addAdmittedArguments(clif(exists(_2246,currentWorld(_2246))))))}])
- % Found positive trigger: exists(_1198,currentWorld(_1198))
- % body: compound(exists(_1198,currentWorld(_1198))),\+is_ftVar(exists(_1198,currentWorld(_1198)))*->rhs([{with_current_why(exists(_1198,currentWorld(_1198)),ignore(\+addAdmittedArguments(exists(_1198,currentWorld(_1198)))))}])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:112
- % r_sane:mpred_fwc1(=>(nextWorld(_32202, _32204), &(inst(_32202, world), inst(_32204, world)))).
- % Found positive trigger: =>(nextWorld(_1402,_1404),&(inst(_1402,world),inst(_1404,world)))
- % body: compound(=>(nextWorld(_1402,_1404),&(inst(_1402,world),inst(_1404,world)))),\+is_ftVar(=>(nextWorld(_1402,_1404),&(inst(_1402,world),inst(_1404,world))))*->rhs([{with_current_why(=>(nextWorld(_1402,_1404),&(inst(_1402,world),inst(_1404,world))),ignore(\+addAdmittedArguments(=>(nextWorld(_1402,_1404),&(inst(_1402,world),inst(_1404,world))))))}])
- % r_sane:mpred_fwc1(admittedArgument(inst, 2, world)).
- % Found positive trigger: admittedArgument(inst,2,world)
- % body: compound(admittedArgument(inst,2,world)),\+is_ftVar(admittedArgument(inst,2,world))*->rhs([{with_current_why(admittedArgument(inst,2,world),ignore(\+addAdmittedArguments(admittedArgument(inst,2,world))))}])
- % Found positive trigger: admittedArgument(inst,2,world)
- % body: is_kif_clause(admittedArgument(inst,2,world))*->rhs([clif(admittedArgument(inst,2,world))])
- % Found positive trigger: admittedArgument(inst,2,world)
- % body: compound(admittedArgument(inst,2,world)),\+is_ftVar(admittedArgument(inst,2,world))*->rhs([{with_current_why(admittedArgument(inst,2,world),ignore(\+addAdmittedArguments(admittedArgument(inst,2,world))))}])
- % Found positive trigger: =>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world)))
- % body: is_kif_clause(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))))*->rhs([clif(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))))])
- % RHS-Post1: clif(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))))
- % Support: =>(nextWorld(_1214,_1216),&(inst(_1214,world),inst(_1216,world))),pt(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))),(is_kif_clause(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))))*->rhs([clif(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))))])))
- % r_sane:mpred_fwc1(clif(=>(nextWorld(_25786, _25788), &(inst(_25786, world), inst(_25788, world))))).
- % Found positive trigger: clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))
- % body: compound(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))),\+is_ftVar(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world)))))*->rhs([{with_current_why(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world)))),ignore(\+addAdmittedArguments(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world)))))))}])
- % Found positive trigger: clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))}])
- % =clif=
- % =>(nextWorld(_2716, _2718), &(inst(_2716, world), inst(_2718, world))).
- % Found positive trigger: clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))
- % body: is_kif_clause(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world)))))*->rhs([clif(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world)))))])
- % Found positive trigger: clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))
- % body: \+is_kif_clause(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))*->rhs([{delistify_last_arg(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))),kif_to_boxlog,_2978)},boxlog(_2978)])
- % Found positive trigger: clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))
- % body: is_kif_clause(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))*->rhs([{delistify_last_arg(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))),kif_to_boxlog,_5298)},boxlog(_5298)])
- % kif :-
- % all(_2716,
- % all(_2718,
- % =>(nextWorld(_2716, _2718), &(inst(_2716, world), inst(_2718, world))))).
- % qualify_nesc :-
- % all(_2716,
- % all(_2718,
- % nesc(=>(nextWorld(_2716, _2718), &(inst(_2716, world), inst(_2718, world)))))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_2716, all(_2718, nesc(b_d(KB, nesc, poss), =>(nextWorld(_2716, _2718), &(inst(_2716, world), inst(_2718, world)))))), &(nesc(b_d(KB, nesc, poss), v(~nextWorld(_2716, _2718), inst(_2716, world))), nesc(b_d(KB, nesc, poss), v(~nextWorld(_2716, _2718), inst(_2718, world))))))).
- % nnf :-
- % &(nesc(v(~nextWorld(_2716, _2718), inst(_2716, world))), nesc(v(~nextWorld(_2716, _2718), inst(_2718, world)))).
- % th_nnf_in :-
- % ( neg(nextWorld(_2716, _2718))
- % ; tru(inst(_2716, world))
- % ),
- % ( neg(nextWorld(_2716, _2718))
- % ; tru(inst(_2718, world))
- % ).
- % th_nnf_out :-
- % ~ (n(neg(nextWorld(_2716, _2718))), n(tru(inst(_2716, world)));n(neg(nextWorld(_2716, _2718))), n(tru(inst(_2718, world)))).
- % RHS-Post1: boxlog((proven_neg(nextWorld(_2716,_2718)):-proven_neg(inst(_2718,world))))
- % Support: clif(=>(nextWorld(_2532,_2534),&(inst(_2532,world),inst(_2534,world)))),pt(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world)))),(is_kif_clause(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))*->rhs([{delistify_last_arg(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))),kif_to_boxlog,(proven_neg(nextWorld(_2716,_2718)):-proven_neg(inst(_2718,world))))},boxlog((proven_neg(nextWorld(_2716,_2718)):-proven_neg(inst(_2718,world))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(nextWorld(_12528, _12530)):-proven_neg(inst(_12530, world))))).
- % Found positive trigger: boxlog((proven_neg(nextWorld(_15216,_15218)):-proven_neg(inst(_15218,world))))
- % body: compound(boxlog((proven_neg(nextWorld(_15216,_15218)):-proven_neg(inst(_15218,world))))),\+is_ftVar(boxlog((proven_neg(nextWorld(_15216,_15218)):-proven_neg(inst(_15218,world)))))*->rhs([{with_current_why(boxlog((proven_neg(nextWorld(_15216,_15218)):-proven_neg(inst(_15218,world)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(nextWorld(_15216,_15218)):-proven_neg(inst(_15218,world)))))))}])
- % Found positive trigger: boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world))))}])
- % =boxlog=
- % proven_neg(nextWorld(_4522, _4524)) :-
- % proven_neg(inst(_4524, world)).
- % Found positive trigger: boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world))))
- % body: is_kif_clause(boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world)))))*->rhs([clif(boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world)))))])
- % Found positive trigger: boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world))))
- % body: delistify_last_arg((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world))),boxlog_to_pfc,_15170),must_be_unqualified(_15170)*->rhs([pfclog(_15170)])
- % RHS-Post1: pfclog((~inst(_4524,world),{is_unit(_4524)}==>proven_neg(nextWorld(_4522,_4524))))
- % Support: boxlog((proven_neg(nextWorld(_4346,_4348)):-proven_neg(inst(_4348,world)))),pt(boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world)))),(delistify_last_arg((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world))),boxlog_to_pfc,(~inst(_4524,world),{is_unit(_4524)}==>proven_neg(nextWorld(_4522,_4524)))),must_be_unqualified((~inst(_4524,world),{is_unit(_4524)}==>proven_neg(nextWorld(_4522,_4524))))*->rhs([pfclog((~inst(_4524,world),{is_unit(_4524)}==>proven_neg(nextWorld(_4522,_4524))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(_15420, world), {is_unit(_15420)}==>proven_neg(nextWorld(_15438, _15420))))).
- % Found positive trigger: pfclog((~inst(_18526,world),{is_unit(_18526)}==>proven_neg(nextWorld(_18544,_18526))))
- % body: compound(pfclog((~inst(_18526,world),{is_unit(_18526)}==>proven_neg(nextWorld(_18544,_18526))))),\+is_ftVar(pfclog((~inst(_18526,world),{is_unit(_18526)}==>proven_neg(nextWorld(_18544,_18526)))))*->rhs([{with_current_why(pfclog((~inst(_18526,world),{is_unit(_18526)}==>proven_neg(nextWorld(_18544,_18526)))),ignore(\+addAdmittedArguments(pfclog((~inst(_18526,world),{is_unit(_18526)}==>proven_neg(nextWorld(_18544,_18526)))))))}])
- % Found positive trigger: pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004))))}])
- % =pfclog=
- % ~inst(_6004, world), {is_unit(_6004)}==>proven_neg(nextWorld(_6022, _6004)).
- % Found positive trigger: pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004))))
- % body: is_kif_clause(pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004)))))*->rhs([clif(pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004)))))])
- % Found positive trigger: pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004))))
- % body: rhs([(~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004)))])
- % RHS-Post1: ~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004))
- % Support: pfclog((~inst(_5800,world),{is_unit(_5800)}==>proven_neg(nextWorld(_5818,_5800)))),pt(pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004)))),rhs([(~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004)))]))
- % r_sane:mpred_fwc1((~inst(_36730, world), {is_unit(_36730)}==>proven_neg(nextWorld(_36748, _36730)))).
- % Adding positive
- % trigger: ~inst(_7198,world)
- % body: is_unit(_7198)*->rhs([proven_neg(nextWorld(_7216,_7198))])
- % Support: (~inst(_7408,world),{is_unit(_7408)}==>proven_neg(nextWorld(_7426,_7408))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',112)
- % Found positive trigger: pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004))))
- % body: compound(pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004))))),\+is_ftVar(pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004)))))*->rhs([{with_current_why(pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004)))),ignore(\+addAdmittedArguments(pfclog((~inst(_6004,world),{is_unit(_6004)}==>proven_neg(nextWorld(_6022,_6004)))))))}])
- % Found positive trigger: boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world))))
- % body: compound(boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world))))),\+is_ftVar(boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world)))))*->rhs([{with_current_why(boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(nextWorld(_4522,_4524)):-proven_neg(inst(_4524,world)))))))}])
- % RHS-Post1: boxlog((proven_neg(nextWorld(_2716,_2718)):-proven_neg(inst(_2716,world))))
- % Support: clif(=>(nextWorld(_2532,_2534),&(inst(_2532,world),inst(_2534,world)))),pt(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world)))),(is_kif_clause(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))*->rhs([{delistify_last_arg(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))),kif_to_boxlog,(proven_neg(nextWorld(_2716,_2718)):-proven_neg(inst(_2716,world))))},boxlog((proven_neg(nextWorld(_2716,_2718)):-proven_neg(inst(_2716,world))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(nextWorld(_12184, _12186)):-proven_neg(inst(_12184, world))))).
- % Found positive trigger: boxlog((proven_neg(nextWorld(_14872,_14874)):-proven_neg(inst(_14872,world))))
- % body: compound(boxlog((proven_neg(nextWorld(_14872,_14874)):-proven_neg(inst(_14872,world))))),\+is_ftVar(boxlog((proven_neg(nextWorld(_14872,_14874)):-proven_neg(inst(_14872,world)))))*->rhs([{with_current_why(boxlog((proven_neg(nextWorld(_14872,_14874)):-proven_neg(inst(_14872,world)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(nextWorld(_14872,_14874)):-proven_neg(inst(_14872,world)))))))}])
- % Found positive trigger: boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world))))}])
- % =boxlog=
- % proven_neg(nextWorld(_4558, _4560)) :-
- % proven_neg(inst(_4558, world)).
- % Found positive trigger: boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world))))
- % body: is_kif_clause(boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world)))))*->rhs([clif(boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world)))))])
- % Found positive trigger: boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world))))
- % body: delistify_last_arg((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world))),boxlog_to_pfc,_15206),must_be_unqualified(_15206)*->rhs([pfclog(_15206)])
- % RHS-Post1: pfclog((~inst(_4558,world),{is_unit(_4558)}==>proven_neg(nextWorld(_4558,_4560))))
- % Support: boxlog((proven_neg(nextWorld(_4382,_4384)):-proven_neg(inst(_4382,world)))),pt(boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world)))),(delistify_last_arg((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world))),boxlog_to_pfc,(~inst(_4558,world),{is_unit(_4558)}==>proven_neg(nextWorld(_4558,_4560)))),must_be_unqualified((~inst(_4558,world),{is_unit(_4558)}==>proven_neg(nextWorld(_4558,_4560))))*->rhs([pfclog((~inst(_4558,world),{is_unit(_4558)}==>proven_neg(nextWorld(_4558,_4560))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(_15036, world), {is_unit(_15036)}==>proven_neg(nextWorld(_15036, _15056))))).
- % Found positive trigger: pfclog((~inst(_18142,world),{is_unit(_18142)}==>proven_neg(nextWorld(_18142,_18162))))
- % body: compound(pfclog((~inst(_18142,world),{is_unit(_18142)}==>proven_neg(nextWorld(_18142,_18162))))),\+is_ftVar(pfclog((~inst(_18142,world),{is_unit(_18142)}==>proven_neg(nextWorld(_18142,_18162)))))*->rhs([{with_current_why(pfclog((~inst(_18142,world),{is_unit(_18142)}==>proven_neg(nextWorld(_18142,_18162)))),ignore(\+addAdmittedArguments(pfclog((~inst(_18142,world),{is_unit(_18142)}==>proven_neg(nextWorld(_18142,_18162)))))))}])
- % Found positive trigger: pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064))))}])
- % =pfclog=
- % ~inst(_6044, world), {is_unit(_6044)}==>proven_neg(nextWorld(_6044, _6064)).
- % Found positive trigger: pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064))))
- % body: is_kif_clause(pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064)))))*->rhs([clif(pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064)))))])
- % Found positive trigger: pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064))))
- % body: rhs([(~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064)))])
- % RHS-Post1: ~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064))
- % Support: pfclog((~inst(_5840,world),{is_unit(_5840)}==>proven_neg(nextWorld(_5840,_5860)))),pt(pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064)))),rhs([(~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064)))]))
- % r_sane:mpred_fwc1((~inst(_36286, world), {is_unit(_36286)}==>proven_neg(nextWorld(_36286, _36306)))).
- % Adding positive
- % trigger: ~inst(_7242,world)
- % body: is_unit(_7242)*->rhs([proven_neg(nextWorld(_7242,_7262))])
- % Support: (~inst(_7452,world),{is_unit(_7452)}==>proven_neg(nextWorld(_7452,_7472))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',112)
- % Found positive trigger: pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064))))
- % body: compound(pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064))))),\+is_ftVar(pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064)))))*->rhs([{with_current_why(pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064)))),ignore(\+addAdmittedArguments(pfclog((~inst(_6044,world),{is_unit(_6044)}==>proven_neg(nextWorld(_6044,_6064)))))))}])
- % Found positive trigger: boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world))))
- % body: compound(boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world))))),\+is_ftVar(boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world)))))*->rhs([{with_current_why(boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(nextWorld(_4558,_4560)):-proven_neg(inst(_4558,world)))))))}])
- % RHS-Post1: boxlog((inst(_2718,world):-proven_tru(nextWorld(_2716,_2718))))
- % Support: clif(=>(nextWorld(_2532,_2534),&(inst(_2532,world),inst(_2534,world)))),pt(clif(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world)))),(is_kif_clause(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))))*->rhs([{delistify_last_arg(=>(nextWorld(_2716,_2718),&(inst(_2716,world),inst(_2718,world))),kif_to_boxlog,(inst(_2718,world):-proven_tru(nextWorld(_2716,_2718))))},boxlog((inst(_2718,world):-proven_tru(nextWorld(_2716,_2718))))])))
- % r_sane:mpred_fwc1(boxlog((inst(_12350, world):-proven_tru(nextWorld(_12360, _12350))))).
- % Found positive trigger: boxlog((inst(_14984,world):-proven_tru(nextWorld(_14994,_14984))))
- % body: compound(boxlog((inst(_14984,world):-proven_tru(nextWorld(_14994,_14984))))),\+is_ftVar(boxlog((inst(_14984,world):-proven_tru(nextWorld(_14994,_14984)))))*->rhs([{with_current_why(boxlog((inst(_14984,world):-proven_tru(nextWorld(_14994,_14984)))),ignore(\+addAdmittedArguments(boxlog((inst(_14984,world):-proven_tru(nextWorld(_14994,_14984)))))))}])
- % Found positive trigger: boxlog((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554))))}])
- % =boxlog=
- % inst(_4554, world) :-
- % proven_tru(nextWorld(_4564, _4554)).
- % Found positive trigger: boxlog((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554))))
- % body: is_kif_clause(boxlog((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554)))))*->rhs([clif(boxlog((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554)))))])
- % Found positive trigger: boxlog((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554))))
- % body: delistify_last_arg((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554))),boxlog_to_pfc,_14968),must_be_unqualified(_14968)*->rhs([pfclog(_14968)])
- % RHS-Post1: pfclog((nextWorld(_4564,_4554),{is_unit(_4554)}==>inst(_4554,world)))
- % Support: boxlog((inst(_4386,world):-proven_tru(nextWorld(_4396,_4386)))),pt(boxlog((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554)))),(delistify_last_arg((inst(_4554,world):-proven_tru(nextWorld(_4564,_4554))),boxlog_to_pfc,(nextWorld(_4564,_4554),{is_unit(_4554)}==>inst(_4554,world))),must_be_unqualified((nextWorld(_4564,_4554),{is_unit(_4554)}==>inst(_4554,world)))*->rhs([pfclog((nextWorld(_4564,_4554),{is_unit(_4554)}==>inst(_4554,world)))])))
- % r_sane:mpred_fwc1(pfclog((nextWorld(_14922, _14924), {is_unit(_14924)}==>inst(_14924, world)))).
- % Found positive trigger: pfclog((nextWorld(_17926,_17928),{is_unit(_17928)}==>inst(_17928,world)))
- % body: compound(pfclog((nextWorld(_17926,_17928),{is_unit(_17928)}==>inst(_17928,world)))),\+is_ftVar(pfclog((nextWorld(_17926,_17928),{is_unit(_17928)}==>inst(_17928,world))))*->rhs([{with_current_why(pfclog((nextWorld(_17926,_17928),{is_unit(_17928)}==>inst(_17928,world))),ignore(\+addAdmittedArguments(pfclog((nextWorld(_17926,_17928),{is_unit(_17928)}==>inst(_17928,world))))))}])
- % Found positive trigger: pfclog((nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world)))}])
- % =pfclog=
- % nextWorld(_5952, _5954), {is_unit(_5954)}==>inst(_5954, world).
- % Found positive trigger: pfclog((nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world)))
- % body: is_kif_clause(pfclog((nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world))))*->rhs([clif(pfclog((nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world))))])
- % Found positive trigger: pfclog((nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world)))
- % body: rhs([(nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world))])
- % RHS-Post1: nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world)
- % Support: pfclog((nextWorld(_5764,_5766),{is_unit(_5766)}==>inst(_5766,world))),pt(pfclog((nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world))),rhs([(nextWorld(_5952,_5954),{is_unit(_5954)}==>inst(_5954,world))]))
- % r_sane:mpred_fwc1((nextWorld(_35174, _35176), {is_unit(_35176)}==>inst(_35176, world))).
- % Adding positive
- % trigger: nextWorld(_7052,_7054)
- % body: is_unit(_7054)*->rhs([inst(_7054,world)])
- % Support: (nextWorld(_7246,_7248),{is_unit(_7248)}==>inst(_7248,world)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',112)
- % uses_predicate(header_sane, baseKB, nextWorld, 2).
- % Found positive trigger: pfclog((nextWorld(_5938,_5940),{is_unit(_5940)}==>inst(_5940,world)))
- % body: compound(pfclog((nextWorld(_5938,_5940),{is_unit(_5940)}==>inst(_5940,world)))),\+is_ftVar(pfclog((nextWorld(_5938,_5940),{is_unit(_5940)}==>inst(_5940,world))))*->rhs([{with_current_why(pfclog((nextWorld(_5938,_5940),{is_unit(_5940)}==>inst(_5940,world))),ignore(\+addAdmittedArguments(pfclog((nextWorld(_5938,_5940),{is_unit(_5940)}==>inst(_5940,world))))))}])
- % Found positive trigger: boxlog((inst(_4540,world):-proven_tru(nextWorld(_4550,_4540))))
- % body: compound(boxlog((inst(_4540,world):-proven_tru(nextWorld(_4550,_4540))))),\+is_ftVar(boxlog((inst(_4540,world):-proven_tru(nextWorld(_4550,_4540)))))*->rhs([{with_current_why(boxlog((inst(_4540,world):-proven_tru(nextWorld(_4550,_4540)))),ignore(\+addAdmittedArguments(boxlog((inst(_4540,world):-proven_tru(nextWorld(_4550,_4540)))))))}])
- % RHS-Post1: boxlog((inst(_2702,world):-proven_tru(nextWorld(_2702,_2704))))
- % Support: clif(=>(nextWorld(_2518,_2520),&(inst(_2518,world),inst(_2520,world)))),pt(clif(=>(nextWorld(_2702,_2704),&(inst(_2702,world),inst(_2704,world)))),(is_kif_clause(=>(nextWorld(_2702,_2704),&(inst(_2702,world),inst(_2704,world))))*->rhs([{delistify_last_arg(=>(nextWorld(_2702,_2704),&(inst(_2702,world),inst(_2704,world))),kif_to_boxlog,(inst(_2702,world):-proven_tru(nextWorld(_2702,_2704))))},boxlog((inst(_2702,world):-proven_tru(nextWorld(_2702,_2704))))])))
- % r_sane:mpred_fwc1(boxlog((inst(_11798, world):-proven_tru(nextWorld(_11798, _11810))))).
- % Found positive trigger: boxlog((inst(_14432,world):-proven_tru(nextWorld(_14432,_14444))))
- % body: compound(boxlog((inst(_14432,world):-proven_tru(nextWorld(_14432,_14444))))),\+is_ftVar(boxlog((inst(_14432,world):-proven_tru(nextWorld(_14432,_14444)))))*->rhs([{with_current_why(boxlog((inst(_14432,world):-proven_tru(nextWorld(_14432,_14444)))),ignore(\+addAdmittedArguments(boxlog((inst(_14432,world):-proven_tru(nextWorld(_14432,_14444)))))))}])
- % Found positive trigger: boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384))))}])
- % =boxlog=
- % inst(_4372, world) :-
- % proven_tru(nextWorld(_4372, _4384)).
- % Found positive trigger: boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384))))
- % body: is_kif_clause(boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384)))))*->rhs([clif(boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384)))))])
- % Found positive trigger: boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384))))
- % body: delistify_last_arg((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384))),boxlog_to_pfc,_14786),must_be_unqualified(_14786)*->rhs([pfclog(_14786)])
- % RHS-Post1: pfclog((nextWorld(_4372,_4384),{is_unit(_4372)}==>inst(_4372,world)))
- % Support: boxlog((inst(_4204,world):-proven_tru(nextWorld(_4204,_4216)))),pt(boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384)))),(delistify_last_arg((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384))),boxlog_to_pfc,(nextWorld(_4372,_4384),{is_unit(_4372)}==>inst(_4372,world))),must_be_unqualified((nextWorld(_4372,_4384),{is_unit(_4372)}==>inst(_4372,world)))*->rhs([pfclog((nextWorld(_4372,_4384),{is_unit(_4372)}==>inst(_4372,world)))])))
- % r_sane:mpred_fwc1(pfclog((nextWorld(_14312, _14314), {is_unit(_14312)}==>inst(_14312, world)))).
- % Found positive trigger: pfclog((nextWorld(_17316,_17318),{is_unit(_17316)}==>inst(_17316,world)))
- % body: compound(pfclog((nextWorld(_17316,_17318),{is_unit(_17316)}==>inst(_17316,world)))),\+is_ftVar(pfclog((nextWorld(_17316,_17318),{is_unit(_17316)}==>inst(_17316,world))))*->rhs([{with_current_why(pfclog((nextWorld(_17316,_17318),{is_unit(_17316)}==>inst(_17316,world))),ignore(\+addAdmittedArguments(pfclog((nextWorld(_17316,_17318),{is_unit(_17316)}==>inst(_17316,world))))))}])
- % Found positive trigger: pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world)))}])
- % =pfclog=
- % nextWorld(_5774, _5776), {is_unit(_5774)}==>inst(_5774, world).
- % Found positive trigger: pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world)))
- % body: is_kif_clause(pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world))))*->rhs([clif(pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world))))])
- % Found positive trigger: pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world)))
- % body: rhs([(nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world))])
- % RHS-Post1: nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world)
- % Support: pfclog((nextWorld(_5586,_5588),{is_unit(_5586)}==>inst(_5586,world))),pt(pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world))),rhs([(nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world))]))
- % r_sane:mpred_fwc1((nextWorld(_34510, _34512), {is_unit(_34510)}==>inst(_34510, world))).
- % Adding positive
- % trigger: nextWorld(_6892,_6894)
- % body: is_unit(_6892)*->rhs([inst(_6892,world)])
- % Support: (nextWorld(_7086,_7088),{is_unit(_7086)}==>inst(_7086,world)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',112)
- % Found positive trigger: pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world)))
- % body: compound(pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world)))),\+is_ftVar(pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world))))*->rhs([{with_current_why(pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world))),ignore(\+addAdmittedArguments(pfclog((nextWorld(_5774,_5776),{is_unit(_5774)}==>inst(_5774,world))))))}])
- % Found positive trigger: boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384))))
- % body: compound(boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384))))),\+is_ftVar(boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384)))))*->rhs([{with_current_why(boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384)))),ignore(\+addAdmittedArguments(boxlog((inst(_4372,world):-proven_tru(nextWorld(_4372,_4384)))))))}])
- % Found positive trigger: clif(=>(nextWorld(_2702,_2704),&(inst(_2702,world),inst(_2704,world))))
- % body: compound(clif(=>(nextWorld(_2702,_2704),&(inst(_2702,world),inst(_2704,world))))),\+is_ftVar(clif(=>(nextWorld(_2702,_2704),&(inst(_2702,world),inst(_2704,world)))))*->rhs([{with_current_why(clif(=>(nextWorld(_2702,_2704),&(inst(_2702,world),inst(_2704,world)))),ignore(\+addAdmittedArguments(clif(=>(nextWorld(_2702,_2704),&(inst(_2702,world),inst(_2704,world)))))))}])
- % Found positive trigger: =>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world)))
- % body: compound(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world)))),\+is_ftVar(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))))*->rhs([{with_current_why(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))),ignore(\+addAdmittedArguments(=>(nextWorld(_1390,_1392),&(inst(_1390,world),inst(_1392,world))))))}])
- Warning: /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:117:
- Singleton variables: [Evt]
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:117
- % r_sane:mpred_fwc1(=>(onEvent(_16194, _16196), (currentWorld(_16206), exists(_16210, &(&(inst(_16210, world), nextWorld(_16206, _16210)), true_in_world(_16196, _16210)))))).
- % Found positive trigger: =>(onEvent(_1690,_1692),(currentWorld(_1702),exists(_1706,&(&(inst(_1706,world),nextWorld(_1702,_1706)),true_in_world(_1692,_1706)))))
- % body: compound(=>(onEvent(_1690,_1692),(currentWorld(_1702),exists(_1706,&(&(inst(_1706,world),nextWorld(_1702,_1706)),true_in_world(_1692,_1706)))))),\+is_ftVar(=>(onEvent(_1690,_1692),(currentWorld(_1702),exists(_1706,&(&(inst(_1706,world),nextWorld(_1702,_1706)),true_in_world(_1692,_1706))))))*->rhs([{with_current_why(=>(onEvent(_1690,_1692),(currentWorld(_1702),exists(_1706,&(&(inst(_1706,world),nextWorld(_1702,_1706)),true_in_world(_1692,_1706))))),ignore(\+addAdmittedArguments(=>(onEvent(_1690,_1692),(currentWorld(_1702),exists(_1706,&(&(inst(_1706,world),nextWorld(_1702,_1706)),true_in_world(_1692,_1706))))))))}])
- % Found positive trigger: =>(onEvent(_1690,_1692),(currentWorld(_1702),exists(_1706,&(&(inst(_1706,world),nextWorld(_1702,_1706)),true_in_world(_1692,_1706)))))
- % body: is_kif_clause(=>(onEvent(_1690,_1692),(currentWorld(_1702),exists(_1706,&(&(inst(_1706,world),nextWorld(_1702,_1706)),true_in_world(_1692,_1706))))))*->rhs([clif(=>(onEvent(_1690,_1692),(currentWorld(_1702),exists(_1706,&(&(inst(_1706,world),nextWorld(_1702,_1706)),true_in_world(_1692,_1706))))))])
- % RHS-Post1: clif(=>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694))))))
- % Support: =>(onEvent(_1438,_1440),(currentWorld(_1450),exists(_1454,&(&(inst(_1454,world),nextWorld(_1450,_1454)),true_in_world(_1440,_1454))))),pt(=>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694))))),(is_kif_clause(=>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694))))))*->rhs([clif(=>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694))))))])))
- % r_sane:mpred_fwc1(clif(=>(onEvent(_11942, _11944), (currentWorld(_11954), exists(_11958, &(&(inst(_11958, world), nextWorld(_11954, _11958)), true_in_world(_11944, _11958))))))).
- % Found positive trigger: clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))
- % body: compound(clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))),\+is_ftVar(clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396)))))))*->rhs([{with_current_why(clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396)))))),ignore(\+addAdmittedArguments(clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396)))))))))}])
- % Found positive trigger: clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))
- % body: rhs([{write('% ='),write(clif),write(=),nl,flush_output,wdmsg(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))}])
- % =clif=
- % =>(onEvent(_3380, _3382), (currentWorld(_3392), exists(_3396, &(&(inst(_3396, world), nextWorld(_3392, _3396)), true_in_world(_3382, _3396))))).
- % Found positive trigger: clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))
- % body: is_kif_clause(clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396)))))))*->rhs([clif(clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396)))))))])
- % Found positive trigger: clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))
- % body: \+is_kif_clause(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))*->rhs([{delistify_last_arg(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))),kif_to_boxlog,_3742)},boxlog(_3742)])
- % Found positive trigger: clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))
- % body: is_kif_clause(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))*->rhs([{delistify_last_arg(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))),kif_to_boxlog,_6298)},boxlog(_6298)])
- % kif :-
- % all(_3392,
- % all(_3382,
- % all(_3380,
- % =>(onEvent(_3380, _3382), &(currentWorld(_3392), exists(_3396, &(&(inst(_3396, world), nextWorld(_3392, _3396)), true_in_world(_3382, _3396)))))))).
- % qualify_nesc :-
- % all(_3392,
- % all(_3382,
- % all(_3380,
- % nesc(=>(onEvent(_3380, _3382), &(currentWorld(_3392), exists(_3396, &(&(inst(_3396, world), nextWorld(_3392, _3396)), true_in_world(_3382, _3396))))))))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, all(_3392, all(_3382, all(_3380, nesc(b_d(KB, nesc, poss), =>(onEvent(_3380, _3382), &(currentWorld(_3392), exists(_3396, &(&(inst(_3396, world), nextWorld(_3392, _3396)), true_in_world(_3382, _3396))))))))), &(nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), currentWorld(_3392))), &(&(&(&(nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(inst(_3396, world), v(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))), nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(inst(_3396, world), v(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))), nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(inst(_3396, world), v(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))), &(&(nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(nextWorld(_3392, _3396), v(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))), nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(nextWorld(_3392, _3396), v(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))), nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(nextWorld(_3392, _3396), v(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))))), &(&(nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(true_in_world(_3382, _3396), v(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))), nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(true_in_world(_3382, _3396), v(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))), nesc(b_d(KB, nesc, poss), v(~onEvent(_3380, _3382), v(true_in_world(_3382, _3396), v(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))))))))).
- % nnf :-
- % &(nesc(v(~onEvent(_3380, _3382), currentWorld(_3392))), &(&(&(&(nesc(v(~onEvent(_3380, _3382), v(inst(_3396, world), v(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))), nesc(v(~onEvent(_3380, _3382), v(inst(_3396, world), v(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))), nesc(v(~onEvent(_3380, _3382), v(inst(_3396, world), v(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))), &(&(nesc(v(~onEvent(_3380, _3382), v(nextWorld(_3392, _3396), v(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))), nesc(v(~onEvent(_3380, _3382), v(nextWorld(_3392, _3396), v(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))), nesc(v(~onEvent(_3380, _3382), v(nextWorld(_3392, _3396), v(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))))), &(&(nesc(v(~onEvent(_3380, _3382), v(true_in_world(_3382, _3396), v(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))))), nesc(v(~onEvent(_3380, _3382), v(true_in_world(_3382, _3396), v(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))), nesc(v(~onEvent(_3380, _3382), v(true_in_world(_3382, _3396), v(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)), ~skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))))))).
- % th_nnf_in :-
- % ( neg(onEvent(_3380, _3382))
- % ; tru(currentWorld(_3392))
- % ),
- % ( ( ( ( neg(onEvent(_3380, _3382))
- % ; tru(inst(_3396, world))
- % ; tru(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380),
- % world))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ),
- % ( neg(onEvent(_3380, _3382))
- % ; tru(inst(_3396, world))
- % ; tru(nextWorld(_3392,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % )
- % ),
- % ( neg(onEvent(_3380, _3382))
- % ; tru(inst(_3396, world))
- % ; tru(true_in_world(_3382,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % )
- % ),
- % ( ( neg(onEvent(_3380, _3382))
- % ; tru(nextWorld(_3392, _3396))
- % ; tru(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380),
- % world))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ),
- % ( neg(onEvent(_3380, _3382))
- % ; tru(nextWorld(_3392, _3396))
- % ; tru(nextWorld(_3392,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % )
- % ),
- % ( neg(onEvent(_3380, _3382))
- % ; tru(nextWorld(_3392, _3396))
- % ; tru(true_in_world(_3382,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % )
- % ),
- % ( ( neg(onEvent(_3380, _3382))
- % ; tru(true_in_world(_3382, _3396))
- % ; tru(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380),
- % world))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ),
- % ( neg(onEvent(_3380, _3382))
- % ; tru(true_in_world(_3382, _3396))
- % ; tru(nextWorld(_3392,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % )
- % ),
- % ( neg(onEvent(_3380, _3382))
- % ; tru(true_in_world(_3382, _3396))
- % ; tru(true_in_world(_3382,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ; neg(skolem(_3396,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_3392,
- % _3382,
- % _3380)))
- % ).
- % th_nnf_out :-
- % ~ (n(neg(onEvent(_3380, _3382))), n(tru(currentWorld(_3392)));(((n(neg(onEvent(_3380, _3382))), n(tru(inst(_3396, world))), n(tru(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))));n(neg(onEvent(_3380, _3382))), n(tru(inst(_3396, world))), n(tru(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))));n(neg(onEvent(_3380, _3382))), n(tru(inst(_3396, world))), n(tru(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))));(n(neg(onEvent(_3380, _3382))), n(tru(nextWorld(_3392, _3396))), n(tru(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))));n(neg(onEvent(_3380, _3382))), n(tru(nextWorld(_3392, _3396))), n(tru(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))));n(neg(onEvent(_3380, _3382))), n(tru(nextWorld(_3392, _3396))), n(tru(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))));(n(neg(onEvent(_3380, _3382))), n(tru(true_in_world(_3382, _3396))), n(tru(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380), world))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))));n(neg(onEvent(_3380, _3382))), n(tru(true_in_world(_3382, _3396))), n(tru(nextWorld(_3392, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))));n(neg(onEvent(_3380, _3382))), n(tru(true_in_world(_3382, _3396))), n(tru(true_in_world(_3382, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380)))), n(neg(skolem(_3396, skInstExistsNextWorldTrueInWorld_20FnSk(_3392, _3382, _3380))))).
- % RHS-Post1: boxlog((proven_neg(skolem(_3396,skInstExistsNextWorldTrueInWorld_20FnSk(_3392,_3382,_3380))):-proven_neg(true_in_world(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3392,_3382,_3380))),proven_neg(true_in_world(_3382,_3396)),proven_not_neg(onEvent(_3380,_3382))))
- % Support: clif(=>(onEvent(_3132,_3134),(currentWorld(_3144),exists(_3148,&(&(inst(_3148,world),nextWorld(_3144,_3148)),true_in_world(_3134,_3148)))))),pt(clif(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396)))))),(is_kif_clause(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))))*->rhs([{delistify_last_arg(=>(onEvent(_3380,_3382),(currentWorld(_3392),exists(_3396,&(&(inst(_3396,world),nextWorld(_3392,_3396)),true_in_world(_3382,_3396))))),kif_to_boxlog,(proven_neg(skolem(_3396,skInstExistsNextWorldTrueInWorld_20FnSk(_3392,_3382,_3380))):-proven_neg(true_in_world(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3392,_3382,_3380))),proven_neg(true_in_world(_3382,_3396)),proven_not_neg(onEvent(_3380,_3382))))},boxlog((proven_neg(skolem(_3396,skInstExistsNextWorldTrueInWorld_20FnSk(_3392,_3382,_3380))):-proven_neg(true_in_world(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3392,_3382,_3380))),proven_neg(true_in_world(_3382,_3396)),proven_not_neg(onEvent(_3380,_3382))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_20150, skInstExistsNextWorldTrueInWorld_20FnSk(_20156, _20158, _20160))):-proven_neg(true_in_world(_20158, skInstExistsNextWorldTrueInWorld_20FnSk(_20156, _20158, _20160))), proven_neg(true_in_world(_20158, _20150)), proven_not_neg(onEvent(_20160, _20158))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))):-proven_neg(true_in_world(_23566,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))),proven_neg(true_in_world(_23566,_23558)),proven_not_neg(onEvent(_23568,_23566))))
- % body: compound(boxlog((proven_neg(skolem(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))):-proven_neg(true_in_world(_23566,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))),proven_neg(true_in_world(_23566,_23558)),proven_not_neg(onEvent(_23568,_23566))))),\+is_ftVar(boxlog((proven_neg(skolem(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))):-proven_neg(true_in_world(_23566,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))),proven_neg(true_in_world(_23566,_23558)),proven_not_neg(onEvent(_23568,_23566)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))):-proven_neg(true_in_world(_23566,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))),proven_neg(true_in_world(_23566,_23558)),proven_not_neg(onEvent(_23568,_23566)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))):-proven_neg(true_in_world(_23566,skInstExistsNextWorldTrueInWorld_20FnSk(_23564,_23566,_23568))),proven_neg(true_in_world(_23566,_23558)),proven_not_neg(onEvent(_23568,_23566)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388))))}])
- % =boxlog=
- % proven_neg(skolem(_9380, skInstExistsNextWorldTrueInWorld_20FnSk(_9386, _9388, _9390))) :-
- % proven_neg(true_in_world(_9388,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_9386,
- % _9388,
- % _9390))),
- % proven_neg(true_in_world(_9388, _9380)),
- % proven_not_neg(onEvent(_9390, _9388)).
- % Found positive trigger: boxlog((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388)))))*->rhs([clif(boxlog((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388))))
- % body: delistify_last_arg((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388))),boxlog_to_pfc,_23042),must_be_unqualified(_23042)*->rhs([pfclog(_23042)])
- % RHS-Post1: pfclog((~true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390)),~true_in_world(_9388,_9380),proven_not_neg(onEvent(_9390,_9388)),{is_unit(_9390,_9388,_9386,_9380)}==>proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390)))))
- % Support: boxlog((proven_neg(skolem(_9100,skInstExistsNextWorldTrueInWorld_20FnSk(_9106,_9108,_9110))):-proven_neg(true_in_world(_9108,skInstExistsNextWorldTrueInWorld_20FnSk(_9106,_9108,_9110))),proven_neg(true_in_world(_9108,_9100)),proven_not_neg(onEvent(_9110,_9108)))),pt(boxlog((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388)))),(delistify_last_arg((proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))):-proven_neg(true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))),proven_neg(true_in_world(_9388,_9380)),proven_not_neg(onEvent(_9390,_9388))),boxlog_to_pfc,(~true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390)),~true_in_world(_9388,_9380),proven_not_neg(onEvent(_9390,_9388)),{is_unit(_9390,_9388,_9386,_9380)}==>proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390))))),must_be_unqualified((~true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390)),~true_in_world(_9388,_9380),proven_not_neg(onEvent(_9390,_9388)),{is_unit(_9390,_9388,_9386,_9380)}==>proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390)))))*->rhs([pfclog((~true_in_world(_9388,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390)),~true_in_world(_9388,_9380),proven_not_neg(onEvent(_9390,_9388)),{is_unit(_9390,_9388,_9386,_9380)}==>proven_neg(skolem(_9380,skInstExistsNextWorldTrueInWorld_20FnSk(_9386,_9388,_9390)))))])))
- % r_sane:mpred_fwc1(pfclog((~true_in_world(_24068, skInstExistsNextWorldTrueInWorld_20FnSk(_24074, _24068, _24078)), ~true_in_world(_24068, _24094), proven_not_neg(onEvent(_24078, _24068)), {is_unit(_24078, _24068, _24074, _24094)}==>proven_neg(skolem(_24094, skInstExistsNextWorldTrueInWorld_20FnSk(_24074, _24068, _24078)))))).
- % Found positive trigger: pfclog((~true_in_world(_27956,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966)),~true_in_world(_27956,_27982),proven_not_neg(onEvent(_27966,_27956)),{is_unit(_27966,_27956,_27962,_27982)}==>proven_neg(skolem(_27982,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966)))))
- % body: compound(pfclog((~true_in_world(_27956,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966)),~true_in_world(_27956,_27982),proven_not_neg(onEvent(_27966,_27956)),{is_unit(_27966,_27956,_27962,_27982)}==>proven_neg(skolem(_27982,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966)))))),\+is_ftVar(pfclog((~true_in_world(_27956,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966)),~true_in_world(_27956,_27982),proven_not_neg(onEvent(_27966,_27956)),{is_unit(_27966,_27956,_27962,_27982)}==>proven_neg(skolem(_27982,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966))))))*->rhs([{with_current_why(pfclog((~true_in_world(_27956,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966)),~true_in_world(_27956,_27982),proven_not_neg(onEvent(_27966,_27956)),{is_unit(_27966,_27956,_27962,_27982)}==>proven_neg(skolem(_27982,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966))))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_27956,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966)),~true_in_world(_27956,_27982),proven_not_neg(onEvent(_27966,_27956)),{is_unit(_27966,_27956,_27962,_27982)}==>proven_neg(skolem(_27982,skInstExistsNextWorldTrueInWorld_20FnSk(_27962,_27956,_27966))))))))}])
- % Found positive trigger: pfclog((~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)))))}])
- % =pfclog=
- % ~true_in_world(_11624, skInstExistsNextWorldTrueInWorld_20FnSk(_11630, _11624, _11634)), ~true_in_world(_11624, _11650), proven_not_neg(onEvent(_11634, _11624)), {is_unit(_11634, _11624, _11630, _11650)}==>proven_neg(skolem(_11650, skInstExistsNextWorldTrueInWorld_20FnSk(_11630, _11624, _11634))).
- % Found positive trigger: pfclog((~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)))))
- % body: is_kif_clause(pfclog((~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634))))))*->rhs([clif(pfclog((~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634))))))])
- % Found positive trigger: pfclog((~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)))))
- % body: rhs([(~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634))))])
- % RHS-Post1: ~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)))
- % Support: pfclog((~true_in_world(_11304,skInstExistsNextWorldTrueInWorld_20FnSk(_11310,_11304,_11314)),~true_in_world(_11304,_11330),proven_not_neg(onEvent(_11314,_11304)),{is_unit(_11314,_11304,_11310,_11330)}==>proven_neg(skolem(_11330,skInstExistsNextWorldTrueInWorld_20FnSk(_11310,_11304,_11314))))),pt(pfclog((~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634))))),rhs([(~true_in_world(_11624,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634)),~true_in_world(_11624,_11650),proven_not_neg(onEvent(_11634,_11624)),{is_unit(_11634,_11624,_11630,_11650)}==>proven_neg(skolem(_11650,skInstExistsNextWorldTrueInWorld_20FnSk(_11630,_11624,_11634))))]))
- % r_sane:mpred_fwc1((~true_in_world(_52766, skInstExistsNextWorldTrueInWorld_20FnSk(_52772, _52766, _52776)), ~true_in_world(_52766, _52792), proven_not_neg(onEvent(_52776, _52766)), {is_unit(_52776, _52766, _52772, _52792)}==>proven_neg(skolem(_52792, skInstExistsNextWorldTrueInWorld_20FnSk(_52772, _52766, _52776))))).
- % Adding positive
- % trigger: ~true_in_world(_13384,skInstExistsNextWorldTrueInWorld_20FnSk(_13390,_13384,_13394))
- % body: pt(~true_in_world(_13384,_13410),pt(proven_not_neg(onEvent(_13394,_13384)),(is_unit(_13394,_13384,_13390,_13410)*->rhs([proven_neg(skolem(_13410,skInstExistsNextWorldTrueInWorld_20FnSk(_13390,_13384,_13394)))]))))
- % Support: (~true_in_world(_13710,skInstExistsNextWorldTrueInWorld_20FnSk(_13716,_13710,_13720)),~true_in_world(_13710,_13736),proven_not_neg(onEvent(_13720,_13710)),{is_unit(_13720,_13710,_13716,_13736)}==>proven_neg(skolem(_13736,skInstExistsNextWorldTrueInWorld_20FnSk(_13716,_13710,_13720)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~true_in_world(_11610,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620)),~true_in_world(_11610,_11636),proven_not_neg(onEvent(_11620,_11610)),{is_unit(_11620,_11610,_11616,_11636)}==>proven_neg(skolem(_11636,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620)))))
- % body: compound(pfclog((~true_in_world(_11610,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620)),~true_in_world(_11610,_11636),proven_not_neg(onEvent(_11620,_11610)),{is_unit(_11620,_11610,_11616,_11636)}==>proven_neg(skolem(_11636,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620)))))),\+is_ftVar(pfclog((~true_in_world(_11610,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620)),~true_in_world(_11610,_11636),proven_not_neg(onEvent(_11620,_11610)),{is_unit(_11620,_11610,_11616,_11636)}==>proven_neg(skolem(_11636,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620))))))*->rhs([{with_current_why(pfclog((~true_in_world(_11610,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620)),~true_in_world(_11610,_11636),proven_not_neg(onEvent(_11620,_11610)),{is_unit(_11620,_11610,_11616,_11636)}==>proven_neg(skolem(_11636,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620))))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_11610,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620)),~true_in_world(_11610,_11636),proven_not_neg(onEvent(_11620,_11610)),{is_unit(_11620,_11610,_11616,_11636)}==>proven_neg(skolem(_11636,skInstExistsNextWorldTrueInWorld_20FnSk(_11616,_11610,_11620))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_9366,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))):-proven_neg(true_in_world(_9374,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))),proven_neg(true_in_world(_9374,_9366)),proven_not_neg(onEvent(_9376,_9374))))
- % body: compound(boxlog((proven_neg(skolem(_9366,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))):-proven_neg(true_in_world(_9374,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))),proven_neg(true_in_world(_9374,_9366)),proven_not_neg(onEvent(_9376,_9374))))),\+is_ftVar(boxlog((proven_neg(skolem(_9366,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))):-proven_neg(true_in_world(_9374,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))),proven_neg(true_in_world(_9374,_9366)),proven_not_neg(onEvent(_9376,_9374)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_9366,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))):-proven_neg(true_in_world(_9374,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))),proven_neg(true_in_world(_9374,_9366)),proven_not_neg(onEvent(_9376,_9374)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_9366,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))):-proven_neg(true_in_world(_9374,skInstExistsNextWorldTrueInWorld_20FnSk(_9372,_9374,_9376))),proven_neg(true_in_world(_9374,_9366)),proven_not_neg(onEvent(_9376,_9374)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_62010, _62012)):-proven_neg(true_in_world(_62012, _62028)), proven_neg(true_in_world(_62012, skInstExistsNextWorldTrueInWorld_20FnSk(_62048, _62012, _62010))), {ignore(_62028=skInstExistsNextWorldTrueInWorld_20FnSk(_62048, _62012, _62010))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}))
- % body: compound(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}))}])
- % =boxlog=
- % proven_neg(onEvent(_9506, _9508)) :-
- % proven_neg(true_in_world(_9508, _9524)),
- % proven_neg(true_in_world(_9508,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_9544,
- % _9508,
- % _9506))),
- % { ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544, _9508, _9506))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})))*->rhs([clif(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}))
- % body: delistify_last_arg((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}),boxlog_to_pfc,_30270),must_be_unqualified(_30270)*->rhs([pfclog(_30270)])
- % RHS-Post1: pfclog((~true_in_world(_9508,_9524),~true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506)),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))},{is_unit(_9508,_9506)}==>proven_neg(onEvent(_9506,_9508))))
- % Support: boxlog((proven_neg(onEvent(_9218,_9220)):-proven_neg(true_in_world(_9220,_9236)),proven_neg(true_in_world(_9220,skInstExistsNextWorldTrueInWorld_20FnSk(_9256,_9220,_9218))),{ignore(_9236=skInstExistsNextWorldTrueInWorld_20FnSk(_9256,_9220,_9218))})),pt(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})),(delistify_last_arg((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}),boxlog_to_pfc,(~true_in_world(_9508,_9524),~true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506)),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))},{is_unit(_9508,_9506)}==>proven_neg(onEvent(_9506,_9508)))),must_be_unqualified((~true_in_world(_9508,_9524),~true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506)),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))},{is_unit(_9508,_9506)}==>proven_neg(onEvent(_9506,_9508))))*->rhs([pfclog((~true_in_world(_9508,_9524),~true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506)),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))},{is_unit(_9508,_9506)}==>proven_neg(onEvent(_9506,_9508))))])))
- % r_sane:mpred_fwc1(pfclog((~true_in_world(_24244, _24246), ~true_in_world(_24244, skInstExistsNextWorldTrueInWorld_20FnSk(_24266, _24244, _24270)), {ignore(_24246=skInstExistsNextWorldTrueInWorld_20FnSk(_24266, _24244, _24270))}, {is_unit(_24244, _24270)}==>proven_neg(onEvent(_24270, _24244))))).
- % Found positive trigger: pfclog((~true_in_world(_28128,_28130),~true_in_world(_28128,skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154)),{ignore(_28130=skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154))},{is_unit(_28128,_28154)}==>proven_neg(onEvent(_28154,_28128))))
- % body: compound(pfclog((~true_in_world(_28128,_28130),~true_in_world(_28128,skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154)),{ignore(_28130=skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154))},{is_unit(_28128,_28154)}==>proven_neg(onEvent(_28154,_28128))))),\+is_ftVar(pfclog((~true_in_world(_28128,_28130),~true_in_world(_28128,skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154)),{ignore(_28130=skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154))},{is_unit(_28128,_28154)}==>proven_neg(onEvent(_28154,_28128)))))*->rhs([{with_current_why(pfclog((~true_in_world(_28128,_28130),~true_in_world(_28128,skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154)),{ignore(_28130=skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154))},{is_unit(_28128,_28154)}==>proven_neg(onEvent(_28154,_28128)))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_28128,_28130),~true_in_world(_28128,skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154)),{ignore(_28130=skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154))},{is_unit(_28128,_28154)}==>proven_neg(onEvent(_28154,_28128)))))))}])
- % Found positive trigger: pfclog((~true_in_world(_28128,_28130),~true_in_world(_28128,skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154)),{ignore(_28130=skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154))},{is_unit(_28128,_28154)}==>proven_neg(onEvent(_28154,_28128))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~true_in_world(_28128,_28130),~true_in_world(_28128,skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154)),{ignore(_28130=skInstExistsNextWorldTrueInWorld_20FnSk(_28150,_28128,_28154))},{is_unit(_28128,_28154)}==>proven_neg(onEvent(_28154,_28128))))}])
- % =pfclog=
- % ~true_in_world(_28128, _28130), ~true_in_world(_28128, skInstExistsNextWorldTrueInWorld_20FnSk(_28150, _28128, _28154)), {ignore(_28130=skInstExistsNextWorldTrueInWorld_20FnSk(_28150, _28128, _28154))}, {is_unit(_28128, _28154)}==>proven_neg(onEvent(_28154, _28128)).
- % Found positive trigger: pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778))))
- % body: is_kif_clause(pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778)))))*->rhs([clif(pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778)))))])
- % Found positive trigger: pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778))))
- % body: rhs([(~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778)))])
- % RHS-Post1: ~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778))
- % Support: pfclog((~true_in_world(_11458,_11460),~true_in_world(_11458,skInstExistsNextWorldTrueInWorld_20FnSk(_11480,_11458,_11484)),{ignore(_11460=skInstExistsNextWorldTrueInWorld_20FnSk(_11480,_11458,_11484))},{is_unit(_11458,_11484)}==>proven_neg(onEvent(_11484,_11458)))),pt(pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778)))),rhs([(~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778)))]))
- % r_sane:mpred_fwc1((~true_in_world(_43290, _43292), ~true_in_world(_43290, skInstExistsNextWorldTrueInWorld_20FnSk(_43312, _43290, _43316)), {ignore(_43292=skInstExistsNextWorldTrueInWorld_20FnSk(_43312, _43290, _43316))}, {is_unit(_43290, _43316)}==>proven_neg(onEvent(_43316, _43290)))).
- % Adding positive
- % trigger: ~true_in_world(_13556,_13558)
- % body: pt(~true_in_world(_13556,skInstExistsNextWorldTrueInWorld_20FnSk(_13578,_13556,_13582)),(ignore(_13558=skInstExistsNextWorldTrueInWorld_20FnSk(_13578,_13556,_13582))*->is_unit(_13556,_13582)*->rhs([proven_neg(onEvent(_13582,_13556))])))
- % Support: (~true_in_world(_13882,_13884),~true_in_world(_13882,skInstExistsNextWorldTrueInWorld_20FnSk(_13904,_13882,_13908)),{ignore(_13884=skInstExistsNextWorldTrueInWorld_20FnSk(_13904,_13882,_13908))},{is_unit(_13882,_13908)}==>proven_neg(onEvent(_13908,_13882))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778))))
- % body: compound(pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778))))),\+is_ftVar(pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778)))))*->rhs([{with_current_why(pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778)))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_11778,_11780),~true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804)),{ignore(_11780=skInstExistsNextWorldTrueInWorld_20FnSk(_11800,_11778,_11804))},{is_unit(_11778,_11804)}==>proven_neg(onEvent(_11804,_11778)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}))
- % body: compound(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_9506,_9508)):-proven_neg(true_in_world(_9508,_9524)),proven_neg(true_in_world(_9508,skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))),{ignore(_9524=skInstExistsNextWorldTrueInWorld_20FnSk(_9544,_9508,_9506))})))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(true_in_world(_3368,_3382)),proven_not_neg(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(true_in_world(_3368,_3382)),proven_not_neg(onEvent(_3366,_3368))))},boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(true_in_world(_3368,_3382)),proven_not_neg(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_62064, skInstExistsNextWorldTrueInWorld_20FnSk(_62070, _62072, _62074))):-proven_neg(nextWorld(_62070, skInstExistsNextWorldTrueInWorld_20FnSk(_62070, _62072, _62074))), proven_neg(true_in_world(_62072, _62064)), proven_not_neg(onEvent(_62074, _62072))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))))
- % body: compound(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))))),\+is_ftVar(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))))}])
- % =boxlog=
- % proven_neg(skolem(_9562, skInstExistsNextWorldTrueInWorld_20FnSk(_9568, _9570, _9572))) :-
- % proven_neg(nextWorld(_9568,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_9568,
- % _9570,
- % _9572))),
- % proven_neg(true_in_world(_9570, _9562)),
- % proven_not_neg(onEvent(_9572, _9570)).
- % Found positive trigger: boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))))*->rhs([clif(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))))
- % body: delistify_last_arg((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))),boxlog_to_pfc,_30032),must_be_unqualified(_30032)*->rhs([pfclog(_30032)])
- % RHS-Post1: pfclog((~nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572)),~true_in_world(_9570,_9562),proven_not_neg(onEvent(_9572,_9570)),{is_unit(_9572,_9570,_9568,_9562)}==>proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572)))))
- % Support: boxlog((proven_neg(skolem(_9282,skInstExistsNextWorldTrueInWorld_20FnSk(_9288,_9290,_9292))):-proven_neg(nextWorld(_9288,skInstExistsNextWorldTrueInWorld_20FnSk(_9288,_9290,_9292))),proven_neg(true_in_world(_9290,_9282)),proven_not_neg(onEvent(_9292,_9290)))),pt(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))),(delistify_last_arg((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))),boxlog_to_pfc,(~nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572)),~true_in_world(_9570,_9562),proven_not_neg(onEvent(_9572,_9570)),{is_unit(_9572,_9570,_9568,_9562)}==>proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))))),must_be_unqualified((~nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572)),~true_in_world(_9570,_9562),proven_not_neg(onEvent(_9572,_9570)),{is_unit(_9572,_9570,_9568,_9562)}==>proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572)))))*->rhs([pfclog((~nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572)),~true_in_world(_9570,_9562),proven_not_neg(onEvent(_9572,_9570)),{is_unit(_9572,_9570,_9568,_9562)}==>proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572)))))])))
- % r_sane:mpred_fwc1(pfclog((~nextWorld(_24242, skInstExistsNextWorldTrueInWorld_20FnSk(_24242, _24250, _24252)), ~true_in_world(_24250, _24268), proven_not_neg(onEvent(_24252, _24250)), {is_unit(_24252, _24250, _24242, _24268)}==>proven_neg(skolem(_24268, skInstExistsNextWorldTrueInWorld_20FnSk(_24242, _24250, _24252)))))).
- % Found positive trigger: pfclog((~nextWorld(_28126,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)),~true_in_world(_28134,_28152),proven_not_neg(onEvent(_28136,_28134)),{is_unit(_28136,_28134,_28126,_28152)}==>proven_neg(skolem(_28152,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)))))
- % body: compound(pfclog((~nextWorld(_28126,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)),~true_in_world(_28134,_28152),proven_not_neg(onEvent(_28136,_28134)),{is_unit(_28136,_28134,_28126,_28152)}==>proven_neg(skolem(_28152,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)))))),\+is_ftVar(pfclog((~nextWorld(_28126,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)),~true_in_world(_28134,_28152),proven_not_neg(onEvent(_28136,_28134)),{is_unit(_28136,_28134,_28126,_28152)}==>proven_neg(skolem(_28152,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136))))))*->rhs([{with_current_why(pfclog((~nextWorld(_28126,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)),~true_in_world(_28134,_28152),proven_not_neg(onEvent(_28136,_28134)),{is_unit(_28136,_28134,_28126,_28152)}==>proven_neg(skolem(_28152,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136))))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_28126,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)),~true_in_world(_28134,_28152),proven_not_neg(onEvent(_28136,_28134)),{is_unit(_28136,_28134,_28126,_28152)}==>proven_neg(skolem(_28152,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136))))))))}])
- % Found positive trigger: pfclog((~nextWorld(_28126,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)),~true_in_world(_28134,_28152),proven_not_neg(onEvent(_28136,_28134)),{is_unit(_28136,_28134,_28126,_28152)}==>proven_neg(skolem(_28152,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~nextWorld(_28126,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)),~true_in_world(_28134,_28152),proven_not_neg(onEvent(_28136,_28134)),{is_unit(_28136,_28134,_28126,_28152)}==>proven_neg(skolem(_28152,skInstExistsNextWorldTrueInWorld_20FnSk(_28126,_28134,_28136)))))}])
- % =pfclog=
- % ~nextWorld(_28126, skInstExistsNextWorldTrueInWorld_20FnSk(_28126, _28134, _28136)), ~true_in_world(_28134, _28152), proven_not_neg(onEvent(_28136, _28134)), {is_unit(_28136, _28134, _28126, _28152)}==>proven_neg(skolem(_28152, skInstExistsNextWorldTrueInWorld_20FnSk(_28126, _28134, _28136))).
- % Found positive trigger: pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)))))
- % body: is_kif_clause(pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816))))))*->rhs([clif(pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816))))))])
- % Found positive trigger: pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)))))
- % body: rhs([(~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816))))])
- % RHS-Post1: ~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)))
- % Support: pfclog((~nextWorld(_11486,skInstExistsNextWorldTrueInWorld_20FnSk(_11486,_11494,_11496)),~true_in_world(_11494,_11512),proven_not_neg(onEvent(_11496,_11494)),{is_unit(_11496,_11494,_11486,_11512)}==>proven_neg(skolem(_11512,skInstExistsNextWorldTrueInWorld_20FnSk(_11486,_11494,_11496))))),pt(pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816))))),rhs([(~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816))))]))
- % r_sane:mpred_fwc1((~nextWorld(_42466, skInstExistsNextWorldTrueInWorld_20FnSk(_42466, _42474, _42476)), ~true_in_world(_42474, _42492), proven_not_neg(onEvent(_42476, _42474)), {is_unit(_42476, _42474, _42466, _42492)}==>proven_neg(skolem(_42492, skInstExistsNextWorldTrueInWorld_20FnSk(_42466, _42474, _42476))))).
- % Adding positive
- % trigger: ~nextWorld(_13584,skInstExistsNextWorldTrueInWorld_20FnSk(_13584,_13592,_13594))
- % body: pt(~true_in_world(_13592,_13610),pt(proven_not_neg(onEvent(_13594,_13592)),(is_unit(_13594,_13592,_13584,_13610)*->rhs([proven_neg(skolem(_13610,skInstExistsNextWorldTrueInWorld_20FnSk(_13584,_13592,_13594)))]))))
- % Support: (~nextWorld(_13910,skInstExistsNextWorldTrueInWorld_20FnSk(_13910,_13918,_13920)),~true_in_world(_13918,_13936),proven_not_neg(onEvent(_13920,_13918)),{is_unit(_13920,_13918,_13910,_13936)}==>proven_neg(skolem(_13936,skInstExistsNextWorldTrueInWorld_20FnSk(_13910,_13918,_13920)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)))))
- % body: compound(pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)))))),\+is_ftVar(pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816))))))*->rhs([{with_current_why(pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816))))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_11806,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816)),~true_in_world(_11814,_11832),proven_not_neg(onEvent(_11816,_11814)),{is_unit(_11816,_11814,_11806,_11832)}==>proven_neg(skolem(_11832,skInstExistsNextWorldTrueInWorld_20FnSk(_11806,_11814,_11816))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))))
- % body: compound(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570))))),\+is_ftVar(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_9562,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))):-proven_neg(nextWorld(_9568,skInstExistsNextWorldTrueInWorld_20FnSk(_9568,_9570,_9572))),proven_neg(true_in_world(_9570,_9562)),proven_not_neg(onEvent(_9572,_9570)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_62316, _62318)):-proven_neg(true_in_world(_62318, _62334)), proven_neg(nextWorld(_62348, skInstExistsNextWorldTrueInWorld_20FnSk(_62348, _62318, _62316))), {ignore(_62334=skInstExistsNextWorldTrueInWorld_20FnSk(_62348, _62318, _62316))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}))
- % body: compound(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}))}])
- % =boxlog=
- % proven_neg(onEvent(_9670, _9672)) :-
- % proven_neg(true_in_world(_9672, _9688)),
- % proven_neg(nextWorld(_9702,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_9702,
- % _9672,
- % _9670))),
- % { ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702, _9672, _9670))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})))*->rhs([clif(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}))
- % body: delistify_last_arg((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}),boxlog_to_pfc,_30418),must_be_unqualified(_30418)*->rhs([pfclog(_30418)])
- % RHS-Post1: pfclog((~true_in_world(_9672,_9688),~nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670)),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))},{is_unit(_9672,_9670)}==>proven_neg(onEvent(_9670,_9672))))
- % Support: boxlog((proven_neg(onEvent(_9382,_9384)):-proven_neg(true_in_world(_9384,_9400)),proven_neg(nextWorld(_9414,skInstExistsNextWorldTrueInWorld_20FnSk(_9414,_9384,_9382))),{ignore(_9400=skInstExistsNextWorldTrueInWorld_20FnSk(_9414,_9384,_9382))})),pt(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})),(delistify_last_arg((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}),boxlog_to_pfc,(~true_in_world(_9672,_9688),~nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670)),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))},{is_unit(_9672,_9670)}==>proven_neg(onEvent(_9670,_9672)))),must_be_unqualified((~true_in_world(_9672,_9688),~nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670)),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))},{is_unit(_9672,_9670)}==>proven_neg(onEvent(_9670,_9672))))*->rhs([pfclog((~true_in_world(_9672,_9688),~nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670)),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))},{is_unit(_9672,_9670)}==>proven_neg(onEvent(_9670,_9672))))])))
- % r_sane:mpred_fwc1(pfclog((~true_in_world(_24396, _24398), ~nextWorld(_24412, skInstExistsNextWorldTrueInWorld_20FnSk(_24412, _24396, _24422)), {ignore(_24398=skInstExistsNextWorldTrueInWorld_20FnSk(_24412, _24396, _24422))}, {is_unit(_24396, _24422)}==>proven_neg(onEvent(_24422, _24396))))).
- % Found positive trigger: pfclog((~true_in_world(_28278,_28280),~nextWorld(_28294,skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304)),{ignore(_28280=skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304))},{is_unit(_28278,_28304)}==>proven_neg(onEvent(_28304,_28278))))
- % body: compound(pfclog((~true_in_world(_28278,_28280),~nextWorld(_28294,skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304)),{ignore(_28280=skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304))},{is_unit(_28278,_28304)}==>proven_neg(onEvent(_28304,_28278))))),\+is_ftVar(pfclog((~true_in_world(_28278,_28280),~nextWorld(_28294,skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304)),{ignore(_28280=skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304))},{is_unit(_28278,_28304)}==>proven_neg(onEvent(_28304,_28278)))))*->rhs([{with_current_why(pfclog((~true_in_world(_28278,_28280),~nextWorld(_28294,skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304)),{ignore(_28280=skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304))},{is_unit(_28278,_28304)}==>proven_neg(onEvent(_28304,_28278)))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_28278,_28280),~nextWorld(_28294,skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304)),{ignore(_28280=skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304))},{is_unit(_28278,_28304)}==>proven_neg(onEvent(_28304,_28278)))))))}])
- % Found positive trigger: pfclog((~true_in_world(_28278,_28280),~nextWorld(_28294,skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304)),{ignore(_28280=skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304))},{is_unit(_28278,_28304)}==>proven_neg(onEvent(_28304,_28278))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~true_in_world(_28278,_28280),~nextWorld(_28294,skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304)),{ignore(_28280=skInstExistsNextWorldTrueInWorld_20FnSk(_28294,_28278,_28304))},{is_unit(_28278,_28304)}==>proven_neg(onEvent(_28304,_28278))))}])
- % =pfclog=
- % ~true_in_world(_28278, _28280), ~nextWorld(_28294, skInstExistsNextWorldTrueInWorld_20FnSk(_28294, _28278, _28304)), {ignore(_28280=skInstExistsNextWorldTrueInWorld_20FnSk(_28294, _28278, _28304))}, {is_unit(_28278, _28304)}==>proven_neg(onEvent(_28304, _28278)).
- % Found positive trigger: pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942))))
- % body: is_kif_clause(pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942)))))*->rhs([clif(pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942)))))])
- % Found positive trigger: pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942))))
- % body: rhs([(~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942)))])
- % RHS-Post1: ~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942))
- % Support: pfclog((~true_in_world(_11622,_11624),~nextWorld(_11638,skInstExistsNextWorldTrueInWorld_20FnSk(_11638,_11622,_11648)),{ignore(_11624=skInstExistsNextWorldTrueInWorld_20FnSk(_11638,_11622,_11648))},{is_unit(_11622,_11648)}==>proven_neg(onEvent(_11648,_11622)))),pt(pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942)))),rhs([(~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942)))]))
- % r_sane:mpred_fwc1((~true_in_world(_43440, _43442), ~nextWorld(_43456, skInstExistsNextWorldTrueInWorld_20FnSk(_43456, _43440, _43466)), {ignore(_43442=skInstExistsNextWorldTrueInWorld_20FnSk(_43456, _43440, _43466))}, {is_unit(_43440, _43466)}==>proven_neg(onEvent(_43466, _43440)))).
- % Adding positive
- % trigger: ~true_in_world(_13720,_13722)
- % body: pt(~nextWorld(_13736,skInstExistsNextWorldTrueInWorld_20FnSk(_13736,_13720,_13746)),(ignore(_13722=skInstExistsNextWorldTrueInWorld_20FnSk(_13736,_13720,_13746))*->is_unit(_13720,_13746)*->rhs([proven_neg(onEvent(_13746,_13720))])))
- % Support: (~true_in_world(_14046,_14048),~nextWorld(_14062,skInstExistsNextWorldTrueInWorld_20FnSk(_14062,_14046,_14072)),{ignore(_14048=skInstExistsNextWorldTrueInWorld_20FnSk(_14062,_14046,_14072))},{is_unit(_14046,_14072)}==>proven_neg(onEvent(_14072,_14046))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942))))
- % body: compound(pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942))))),\+is_ftVar(pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942)))))*->rhs([{with_current_why(pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942)))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_11942,_11944),~nextWorld(_11958,skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968)),{ignore(_11944=skInstExistsNextWorldTrueInWorld_20FnSk(_11958,_11942,_11968))},{is_unit(_11942,_11968)}==>proven_neg(onEvent(_11968,_11942)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}))
- % body: compound(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_9670,_9672)):-proven_neg(true_in_world(_9672,_9688)),proven_neg(nextWorld(_9702,skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))),{ignore(_9688=skInstExistsNextWorldTrueInWorld_20FnSk(_9702,_9672,_9670))})))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(true_in_world(_3368,_3382)),proven_not_neg(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(true_in_world(_3368,_3382)),proven_not_neg(onEvent(_3366,_3368))))},boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(true_in_world(_3368,_3382)),proven_not_neg(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_62382, skInstExistsNextWorldTrueInWorld_20FnSk(_62388, _62390, _62392))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_62388, _62390, _62392), world)), proven_neg(true_in_world(_62390, _62382)), proven_not_neg(onEvent(_62392, _62390))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))))
- % body: compound(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))))),\+is_ftVar(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))))}])
- % =boxlog=
- % proven_neg(skolem(_9726, skInstExistsNextWorldTrueInWorld_20FnSk(_9732, _9734, _9736))) :-
- % proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,
- % _9734,
- % _9736),
- % world)),
- % proven_neg(true_in_world(_9734, _9726)),
- % proven_not_neg(onEvent(_9736, _9734)).
- % Found positive trigger: boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))))*->rhs([clif(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))))
- % body: delistify_last_arg((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))),boxlog_to_pfc,_30174),must_be_unqualified(_30174)*->rhs([pfclog(_30174)])
- % RHS-Post1: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world),~true_in_world(_9734,_9726),proven_not_neg(onEvent(_9736,_9734)),{is_unit(_9736,_9734,_9732,_9726)}==>proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736)))))
- % Support: boxlog((proven_neg(skolem(_9446,skInstExistsNextWorldTrueInWorld_20FnSk(_9452,_9454,_9456))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9452,_9454,_9456),world)),proven_neg(true_in_world(_9454,_9446)),proven_not_neg(onEvent(_9456,_9454)))),pt(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))),(delistify_last_arg((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))),boxlog_to_pfc,(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world),~true_in_world(_9734,_9726),proven_not_neg(onEvent(_9736,_9734)),{is_unit(_9736,_9734,_9732,_9726)}==>proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))))),must_be_unqualified((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world),~true_in_world(_9734,_9726),proven_not_neg(onEvent(_9736,_9734)),{is_unit(_9736,_9734,_9732,_9726)}==>proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736)))))*->rhs([pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world),~true_in_world(_9734,_9726),proven_not_neg(onEvent(_9736,_9734)),{is_unit(_9736,_9734,_9732,_9726)}==>proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736)))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24416, _24418, _24420), world), ~true_in_world(_24418, _24436), proven_not_neg(onEvent(_24420, _24418)), {is_unit(_24420, _24418, _24416, _24436)}==>proven_neg(skolem(_24436, skInstExistsNextWorldTrueInWorld_20FnSk(_24416, _24418, _24420)))))).
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300),world),~true_in_world(_28298,_28316),proven_not_neg(onEvent(_28300,_28298)),{is_unit(_28300,_28298,_28296,_28316)}==>proven_neg(skolem(_28316,skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300)))))
- % body: compound(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300),world),~true_in_world(_28298,_28316),proven_not_neg(onEvent(_28300,_28298)),{is_unit(_28300,_28298,_28296,_28316)}==>proven_neg(skolem(_28316,skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300)))))),\+is_ftVar(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300),world),~true_in_world(_28298,_28316),proven_not_neg(onEvent(_28300,_28298)),{is_unit(_28300,_28298,_28296,_28316)}==>proven_neg(skolem(_28316,skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300))))))*->rhs([{with_current_why(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300),world),~true_in_world(_28298,_28316),proven_not_neg(onEvent(_28300,_28298)),{is_unit(_28300,_28298,_28296,_28316)}==>proven_neg(skolem(_28316,skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300))))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300),world),~true_in_world(_28298,_28316),proven_not_neg(onEvent(_28300,_28298)),{is_unit(_28300,_28298,_28296,_28316)}==>proven_neg(skolem(_28316,skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300))))))))}])
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300),world),~true_in_world(_28298,_28316),proven_not_neg(onEvent(_28300,_28298)),{is_unit(_28300,_28298,_28296,_28316)}==>proven_neg(skolem(_28316,skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300),world),~true_in_world(_28298,_28316),proven_not_neg(onEvent(_28300,_28298)),{is_unit(_28300,_28298,_28296,_28316)}==>proven_neg(skolem(_28316,skInstExistsNextWorldTrueInWorld_20FnSk(_28296,_28298,_28300)))))}])
- % =pfclog=
- % ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28296, _28298, _28300), world), ~true_in_world(_28298, _28316), proven_not_neg(onEvent(_28300, _28298)), {is_unit(_28300, _28298, _28296, _28316)}==>proven_neg(skolem(_28316, skInstExistsNextWorldTrueInWorld_20FnSk(_28296, _28298, _28300))).
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980)))))
- % body: is_kif_clause(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980))))))*->rhs([clif(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980))))))])
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980)))))
- % body: rhs([(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980))))])
- % RHS-Post1: ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980)))
- % Support: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11658,_11660),world),~true_in_world(_11658,_11676),proven_not_neg(onEvent(_11660,_11658)),{is_unit(_11660,_11658,_11656,_11676)}==>proven_neg(skolem(_11676,skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11658,_11660))))),pt(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980))))),rhs([(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980))))]))
- % r_sane:mpred_fwc1((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_42634, _42636, _42638), world), ~true_in_world(_42636, _42654), proven_not_neg(onEvent(_42638, _42636)), {is_unit(_42638, _42636, _42634, _42654)}==>proven_neg(skolem(_42654, skInstExistsNextWorldTrueInWorld_20FnSk(_42634, _42636, _42638))))).
- % Adding positive
- % trigger: ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13754,_13756,_13758),world)
- % body: pt(~true_in_world(_13756,_13774),pt(proven_not_neg(onEvent(_13758,_13756)),(is_unit(_13758,_13756,_13754,_13774)*->rhs([proven_neg(skolem(_13774,skInstExistsNextWorldTrueInWorld_20FnSk(_13754,_13756,_13758)))]))))
- % Support: (~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14080,_14082,_14084),world),~true_in_world(_14082,_14100),proven_not_neg(onEvent(_14084,_14082)),{is_unit(_14084,_14082,_14080,_14100)}==>proven_neg(skolem(_14100,skInstExistsNextWorldTrueInWorld_20FnSk(_14080,_14082,_14084)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980)))))
- % body: compound(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980)))))),\+is_ftVar(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980))))))*->rhs([{with_current_why(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980))))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980),world),~true_in_world(_11978,_11996),proven_not_neg(onEvent(_11980,_11978)),{is_unit(_11980,_11978,_11976,_11996)}==>proven_neg(skolem(_11996,skInstExistsNextWorldTrueInWorld_20FnSk(_11976,_11978,_11980))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))))
- % body: compound(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734))))),\+is_ftVar(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_9726,skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9732,_9734,_9736),world)),proven_neg(true_in_world(_9734,_9726)),proven_not_neg(onEvent(_9736,_9734)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(true_in_world(_3368,_3382)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_62624, _62626)):-proven_neg(true_in_world(_62626, _62642)), proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_62662, _62626, _62624), world)), {ignore(_62642=skInstExistsNextWorldTrueInWorld_20FnSk(_62662, _62626, _62624))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}))
- % body: compound(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}))}])
- % =boxlog=
- % proven_neg(onEvent(_9834, _9836)) :-
- % proven_neg(true_in_world(_9836, _9852)),
- % proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,
- % _9836,
- % _9834),
- % world)),
- % { ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872, _9836, _9834))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})))*->rhs([clif(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}))
- % body: delistify_last_arg((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}),boxlog_to_pfc,_30556),must_be_unqualified(_30556)*->rhs([pfclog(_30556)])
- % RHS-Post1: pfclog((~true_in_world(_9836,_9852),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))},{is_unit(_9836,_9834)}==>proven_neg(onEvent(_9834,_9836))))
- % Support: boxlog((proven_neg(onEvent(_9546,_9548)):-proven_neg(true_in_world(_9548,_9564)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9584,_9548,_9546),world)),{ignore(_9564=skInstExistsNextWorldTrueInWorld_20FnSk(_9584,_9548,_9546))})),pt(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})),(delistify_last_arg((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}),boxlog_to_pfc,(~true_in_world(_9836,_9852),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))},{is_unit(_9836,_9834)}==>proven_neg(onEvent(_9834,_9836)))),must_be_unqualified((~true_in_world(_9836,_9852),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))},{is_unit(_9836,_9834)}==>proven_neg(onEvent(_9834,_9836))))*->rhs([pfclog((~true_in_world(_9836,_9852),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))},{is_unit(_9836,_9834)}==>proven_neg(onEvent(_9834,_9836))))])))
- % r_sane:mpred_fwc1(pfclog((~true_in_world(_24562, _24564), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24584, _24562, _24588), world), {ignore(_24564=skInstExistsNextWorldTrueInWorld_20FnSk(_24584, _24562, _24588))}, {is_unit(_24562, _24588)}==>proven_neg(onEvent(_24588, _24562))))).
- % Found positive trigger: pfclog((~true_in_world(_28442,_28444),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468),world),{ignore(_28444=skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468))},{is_unit(_28442,_28468)}==>proven_neg(onEvent(_28468,_28442))))
- % body: compound(pfclog((~true_in_world(_28442,_28444),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468),world),{ignore(_28444=skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468))},{is_unit(_28442,_28468)}==>proven_neg(onEvent(_28468,_28442))))),\+is_ftVar(pfclog((~true_in_world(_28442,_28444),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468),world),{ignore(_28444=skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468))},{is_unit(_28442,_28468)}==>proven_neg(onEvent(_28468,_28442)))))*->rhs([{with_current_why(pfclog((~true_in_world(_28442,_28444),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468),world),{ignore(_28444=skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468))},{is_unit(_28442,_28468)}==>proven_neg(onEvent(_28468,_28442)))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_28442,_28444),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468),world),{ignore(_28444=skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468))},{is_unit(_28442,_28468)}==>proven_neg(onEvent(_28468,_28442)))))))}])
- % Found positive trigger: pfclog((~true_in_world(_28442,_28444),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468),world),{ignore(_28444=skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468))},{is_unit(_28442,_28468)}==>proven_neg(onEvent(_28468,_28442))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~true_in_world(_28442,_28444),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468),world),{ignore(_28444=skInstExistsNextWorldTrueInWorld_20FnSk(_28464,_28442,_28468))},{is_unit(_28442,_28468)}==>proven_neg(onEvent(_28468,_28442))))}])
- % =pfclog=
- % ~true_in_world(_28442, _28444), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28464, _28442, _28468), world), {ignore(_28444=skInstExistsNextWorldTrueInWorld_20FnSk(_28464, _28442, _28468))}, {is_unit(_28442, _28468)}==>proven_neg(onEvent(_28468, _28442)).
- % Found positive trigger: pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106))))
- % body: is_kif_clause(pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106)))))*->rhs([clif(pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106)))))])
- % Found positive trigger: pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106))))
- % body: rhs([(~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106)))])
- % RHS-Post1: ~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106))
- % Support: pfclog((~true_in_world(_11786,_11788),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11808,_11786,_11812),world),{ignore(_11788=skInstExistsNextWorldTrueInWorld_20FnSk(_11808,_11786,_11812))},{is_unit(_11786,_11812)}==>proven_neg(onEvent(_11812,_11786)))),pt(pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106)))),rhs([(~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106)))]))
- % r_sane:mpred_fwc1((~true_in_world(_43608, _43610), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_43630, _43608, _43634), world), {ignore(_43610=skInstExistsNextWorldTrueInWorld_20FnSk(_43630, _43608, _43634))}, {is_unit(_43608, _43634)}==>proven_neg(onEvent(_43634, _43608)))).
- % Adding positive
- % trigger: ~true_in_world(_13884,_13886)
- % body: pt(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13906,_13884,_13910),world),(ignore(_13886=skInstExistsNextWorldTrueInWorld_20FnSk(_13906,_13884,_13910))*->is_unit(_13884,_13910)*->rhs([proven_neg(onEvent(_13910,_13884))])))
- % Support: (~true_in_world(_14210,_14212),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14232,_14210,_14236),world),{ignore(_14212=skInstExistsNextWorldTrueInWorld_20FnSk(_14232,_14210,_14236))},{is_unit(_14210,_14236)}==>proven_neg(onEvent(_14236,_14210))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106))))
- % body: compound(pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106))))),\+is_ftVar(pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106)))))*->rhs([{with_current_why(pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106)))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_12106,_12108),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132),world),{ignore(_12108=skInstExistsNextWorldTrueInWorld_20FnSk(_12128,_12106,_12132))},{is_unit(_12106,_12132)}==>proven_neg(onEvent(_12132,_12106)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}))
- % body: compound(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_9834,_9836)):-proven_neg(true_in_world(_9836,_9852)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834),world)),{ignore(_9852=skInstExistsNextWorldTrueInWorld_20FnSk(_9872,_9836,_9834))})))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))},boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_62664, skInstExistsNextWorldTrueInWorld_20FnSk(_62670, _62672, _62674))):-proven_neg(true_in_world(_62672, skInstExistsNextWorldTrueInWorld_20FnSk(_62670, _62672, _62674))), proven_neg(nextWorld(_62670, _62664)), proven_not_neg(onEvent(_62674, _62672))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))))
- % body: compound(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))))),\+is_ftVar(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))))}])
- % =boxlog=
- % proven_neg(skolem(_9890, skInstExistsNextWorldTrueInWorld_20FnSk(_9896, _9898, _9900))) :-
- % proven_neg(true_in_world(_9898,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_9896,
- % _9898,
- % _9900))),
- % proven_neg(nextWorld(_9896, _9890)),
- % proven_not_neg(onEvent(_9900, _9898)).
- % Found positive trigger: boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))))*->rhs([clif(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))))
- % body: delistify_last_arg((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))),boxlog_to_pfc,_30358),must_be_unqualified(_30358)*->rhs([pfclog(_30358)])
- % RHS-Post1: pfclog((~true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900)),~nextWorld(_9896,_9890),proven_not_neg(onEvent(_9900,_9898)),{is_unit(_9900,_9898,_9896,_9890)}==>proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900)))))
- % Support: boxlog((proven_neg(skolem(_9610,skInstExistsNextWorldTrueInWorld_20FnSk(_9616,_9618,_9620))):-proven_neg(true_in_world(_9618,skInstExistsNextWorldTrueInWorld_20FnSk(_9616,_9618,_9620))),proven_neg(nextWorld(_9616,_9610)),proven_not_neg(onEvent(_9620,_9618)))),pt(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))),(delistify_last_arg((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))),boxlog_to_pfc,(~true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900)),~nextWorld(_9896,_9890),proven_not_neg(onEvent(_9900,_9898)),{is_unit(_9900,_9898,_9896,_9890)}==>proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))))),must_be_unqualified((~true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900)),~nextWorld(_9896,_9890),proven_not_neg(onEvent(_9900,_9898)),{is_unit(_9900,_9898,_9896,_9890)}==>proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900)))))*->rhs([pfclog((~true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900)),~nextWorld(_9896,_9890),proven_not_neg(onEvent(_9900,_9898)),{is_unit(_9900,_9898,_9896,_9890)}==>proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900)))))])))
- % r_sane:mpred_fwc1(pfclog((~true_in_world(_24570, skInstExistsNextWorldTrueInWorld_20FnSk(_24576, _24570, _24580)), ~nextWorld(_24576, _24596), proven_not_neg(onEvent(_24580, _24570)), {is_unit(_24580, _24570, _24576, _24596)}==>proven_neg(skolem(_24596, skInstExistsNextWorldTrueInWorld_20FnSk(_24576, _24570, _24580)))))).
- % Found positive trigger: pfclog((~true_in_world(_28454,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)),~nextWorld(_28460,_28480),proven_not_neg(onEvent(_28464,_28454)),{is_unit(_28464,_28454,_28460,_28480)}==>proven_neg(skolem(_28480,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)))))
- % body: compound(pfclog((~true_in_world(_28454,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)),~nextWorld(_28460,_28480),proven_not_neg(onEvent(_28464,_28454)),{is_unit(_28464,_28454,_28460,_28480)}==>proven_neg(skolem(_28480,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)))))),\+is_ftVar(pfclog((~true_in_world(_28454,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)),~nextWorld(_28460,_28480),proven_not_neg(onEvent(_28464,_28454)),{is_unit(_28464,_28454,_28460,_28480)}==>proven_neg(skolem(_28480,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464))))))*->rhs([{with_current_why(pfclog((~true_in_world(_28454,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)),~nextWorld(_28460,_28480),proven_not_neg(onEvent(_28464,_28454)),{is_unit(_28464,_28454,_28460,_28480)}==>proven_neg(skolem(_28480,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464))))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_28454,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)),~nextWorld(_28460,_28480),proven_not_neg(onEvent(_28464,_28454)),{is_unit(_28464,_28454,_28460,_28480)}==>proven_neg(skolem(_28480,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464))))))))}])
- % Found positive trigger: pfclog((~true_in_world(_28454,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)),~nextWorld(_28460,_28480),proven_not_neg(onEvent(_28464,_28454)),{is_unit(_28464,_28454,_28460,_28480)}==>proven_neg(skolem(_28480,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~true_in_world(_28454,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)),~nextWorld(_28460,_28480),proven_not_neg(onEvent(_28464,_28454)),{is_unit(_28464,_28454,_28460,_28480)}==>proven_neg(skolem(_28480,skInstExistsNextWorldTrueInWorld_20FnSk(_28460,_28454,_28464)))))}])
- % =pfclog=
- % ~true_in_world(_28454, skInstExistsNextWorldTrueInWorld_20FnSk(_28460, _28454, _28464)), ~nextWorld(_28460, _28480), proven_not_neg(onEvent(_28464, _28454)), {is_unit(_28464, _28454, _28460, _28480)}==>proven_neg(skolem(_28480, skInstExistsNextWorldTrueInWorld_20FnSk(_28460, _28454, _28464))).
- % Found positive trigger: pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)))))
- % body: is_kif_clause(pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144))))))*->rhs([clif(pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144))))))])
- % Found positive trigger: pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)))))
- % body: rhs([(~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144))))])
- % RHS-Post1: ~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)))
- % Support: pfclog((~true_in_world(_11814,skInstExistsNextWorldTrueInWorld_20FnSk(_11820,_11814,_11824)),~nextWorld(_11820,_11840),proven_not_neg(onEvent(_11824,_11814)),{is_unit(_11824,_11814,_11820,_11840)}==>proven_neg(skolem(_11840,skInstExistsNextWorldTrueInWorld_20FnSk(_11820,_11814,_11824))))),pt(pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144))))),rhs([(~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144))))]))
- % r_sane:mpred_fwc1((~true_in_world(_42794, skInstExistsNextWorldTrueInWorld_20FnSk(_42800, _42794, _42804)), ~nextWorld(_42800, _42820), proven_not_neg(onEvent(_42804, _42794)), {is_unit(_42804, _42794, _42800, _42820)}==>proven_neg(skolem(_42820, skInstExistsNextWorldTrueInWorld_20FnSk(_42800, _42794, _42804))))).
- % Adding positive
- % trigger: ~true_in_world(_13912,skInstExistsNextWorldTrueInWorld_20FnSk(_13918,_13912,_13922))
- % body: pt(~nextWorld(_13918,_13938),pt(proven_not_neg(onEvent(_13922,_13912)),(is_unit(_13922,_13912,_13918,_13938)*->rhs([proven_neg(skolem(_13938,skInstExistsNextWorldTrueInWorld_20FnSk(_13918,_13912,_13922)))]))))
- % Support: (~true_in_world(_14238,skInstExistsNextWorldTrueInWorld_20FnSk(_14244,_14238,_14248)),~nextWorld(_14244,_14264),proven_not_neg(onEvent(_14248,_14238)),{is_unit(_14248,_14238,_14244,_14264)}==>proven_neg(skolem(_14264,skInstExistsNextWorldTrueInWorld_20FnSk(_14244,_14238,_14248)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)))))
- % body: compound(pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)))))),\+is_ftVar(pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144))))))*->rhs([{with_current_why(pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144))))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_12134,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144)),~nextWorld(_12140,_12160),proven_not_neg(onEvent(_12144,_12134)),{is_unit(_12144,_12134,_12140,_12160)}==>proven_neg(skolem(_12160,skInstExistsNextWorldTrueInWorld_20FnSk(_12140,_12134,_12144))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))))
- % body: compound(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898))))),\+is_ftVar(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))):-proven_neg(true_in_world(_9898,skInstExistsNextWorldTrueInWorld_20FnSk(_9896,_9898,_9900))),proven_neg(nextWorld(_9896,_9890)),proven_not_neg(onEvent(_9900,_9898)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_62972, _62974)):-proven_neg(nextWorld(_62988, _62990)), proven_neg(true_in_world(_62974, skInstExistsNextWorldTrueInWorld_20FnSk(_62988, _62974, _62972))), {ignore(_62990=skInstExistsNextWorldTrueInWorld_20FnSk(_62988, _62974, _62972))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}))
- % body: compound(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}))}])
- % =boxlog=
- % proven_neg(onEvent(_9998, _10000)) :-
- % proven_neg(nextWorld(_10014, _10016)),
- % proven_neg(true_in_world(_10000,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10014,
- % _10000,
- % _9998))),
- % { ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014, _10000, _9998))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})))*->rhs([clif(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}))
- % body: delistify_last_arg((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}),boxlog_to_pfc,_30786),must_be_unqualified(_30786)*->rhs([pfclog(_30786)])
- % RHS-Post1: pfclog((~nextWorld(_10014,_10016),~true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998)),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))},{is_unit(_10000,_9998)}==>proven_neg(onEvent(_9998,_10000))))
- % Support: boxlog((proven_neg(onEvent(_9710,_9712)):-proven_neg(nextWorld(_9726,_9728)),proven_neg(true_in_world(_9712,skInstExistsNextWorldTrueInWorld_20FnSk(_9726,_9712,_9710))),{ignore(_9728=skInstExistsNextWorldTrueInWorld_20FnSk(_9726,_9712,_9710))})),pt(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})),(delistify_last_arg((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}),boxlog_to_pfc,(~nextWorld(_10014,_10016),~true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998)),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))},{is_unit(_10000,_9998)}==>proven_neg(onEvent(_9998,_10000)))),must_be_unqualified((~nextWorld(_10014,_10016),~true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998)),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))},{is_unit(_10000,_9998)}==>proven_neg(onEvent(_9998,_10000))))*->rhs([pfclog((~nextWorld(_10014,_10016),~true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998)),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))},{is_unit(_10000,_9998)}==>proven_neg(onEvent(_9998,_10000))))])))
- % r_sane:mpred_fwc1(pfclog((~nextWorld(_24744, _24746), ~true_in_world(_24760, skInstExistsNextWorldTrueInWorld_20FnSk(_24744, _24760, _24770)), {ignore(_24746=skInstExistsNextWorldTrueInWorld_20FnSk(_24744, _24760, _24770))}, {is_unit(_24760, _24770)}==>proven_neg(onEvent(_24770, _24760))))).
- % Found positive trigger: pfclog((~nextWorld(_28626,_28628),~true_in_world(_28642,skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652)),{ignore(_28628=skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652))},{is_unit(_28642,_28652)}==>proven_neg(onEvent(_28652,_28642))))
- % body: compound(pfclog((~nextWorld(_28626,_28628),~true_in_world(_28642,skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652)),{ignore(_28628=skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652))},{is_unit(_28642,_28652)}==>proven_neg(onEvent(_28652,_28642))))),\+is_ftVar(pfclog((~nextWorld(_28626,_28628),~true_in_world(_28642,skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652)),{ignore(_28628=skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652))},{is_unit(_28642,_28652)}==>proven_neg(onEvent(_28652,_28642)))))*->rhs([{with_current_why(pfclog((~nextWorld(_28626,_28628),~true_in_world(_28642,skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652)),{ignore(_28628=skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652))},{is_unit(_28642,_28652)}==>proven_neg(onEvent(_28652,_28642)))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_28626,_28628),~true_in_world(_28642,skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652)),{ignore(_28628=skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652))},{is_unit(_28642,_28652)}==>proven_neg(onEvent(_28652,_28642)))))))}])
- % Found positive trigger: pfclog((~nextWorld(_28626,_28628),~true_in_world(_28642,skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652)),{ignore(_28628=skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652))},{is_unit(_28642,_28652)}==>proven_neg(onEvent(_28652,_28642))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~nextWorld(_28626,_28628),~true_in_world(_28642,skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652)),{ignore(_28628=skInstExistsNextWorldTrueInWorld_20FnSk(_28626,_28642,_28652))},{is_unit(_28642,_28652)}==>proven_neg(onEvent(_28652,_28642))))}])
- % =pfclog=
- % ~nextWorld(_28626, _28628), ~true_in_world(_28642, skInstExistsNextWorldTrueInWorld_20FnSk(_28626, _28642, _28652)), {ignore(_28628=skInstExistsNextWorldTrueInWorld_20FnSk(_28626, _28642, _28652))}, {is_unit(_28642, _28652)}==>proven_neg(onEvent(_28652, _28642)).
- % Found positive trigger: pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286))))
- % body: is_kif_clause(pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286)))))*->rhs([clif(pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286)))))])
- % Found positive trigger: pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286))))
- % body: rhs([(~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286)))])
- % RHS-Post1: ~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286))
- % Support: pfclog((~nextWorld(_11950,_11952),~true_in_world(_11966,skInstExistsNextWorldTrueInWorld_20FnSk(_11950,_11966,_11976)),{ignore(_11952=skInstExistsNextWorldTrueInWorld_20FnSk(_11950,_11966,_11976))},{is_unit(_11966,_11976)}==>proven_neg(onEvent(_11976,_11966)))),pt(pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286)))),rhs([(~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286)))]))
- % r_sane:mpred_fwc1((~nextWorld(_43768, _43770), ~true_in_world(_43784, skInstExistsNextWorldTrueInWorld_20FnSk(_43768, _43784, _43794)), {ignore(_43770=skInstExistsNextWorldTrueInWorld_20FnSk(_43768, _43784, _43794))}, {is_unit(_43784, _43794)}==>proven_neg(onEvent(_43794, _43784)))).
- % Adding positive
- % trigger: ~nextWorld(_14048,_14050)
- % body: pt(~true_in_world(_14064,skInstExistsNextWorldTrueInWorld_20FnSk(_14048,_14064,_14074)),(ignore(_14050=skInstExistsNextWorldTrueInWorld_20FnSk(_14048,_14064,_14074))*->is_unit(_14064,_14074)*->rhs([proven_neg(onEvent(_14074,_14064))])))
- % Support: (~nextWorld(_14374,_14376),~true_in_world(_14390,skInstExistsNextWorldTrueInWorld_20FnSk(_14374,_14390,_14400)),{ignore(_14376=skInstExistsNextWorldTrueInWorld_20FnSk(_14374,_14390,_14400))},{is_unit(_14390,_14400)}==>proven_neg(onEvent(_14400,_14390))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286))))
- % body: compound(pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286))))),\+is_ftVar(pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286)))))*->rhs([{with_current_why(pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286)))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_12270,_12272),~true_in_world(_12286,skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296)),{ignore(_12272=skInstExistsNextWorldTrueInWorld_20FnSk(_12270,_12286,_12296))},{is_unit(_12286,_12296)}==>proven_neg(onEvent(_12296,_12286)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}))
- % body: compound(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_9998,_10000)):-proven_neg(nextWorld(_10014,_10016)),proven_neg(true_in_world(_10000,skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))),{ignore(_10016=skInstExistsNextWorldTrueInWorld_20FnSk(_10014,_10000,_9998))})))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))},boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_63038, skInstExistsNextWorldTrueInWorld_20FnSk(_63044, _63046, _63048))):-proven_neg(nextWorld(_63044, skInstExistsNextWorldTrueInWorld_20FnSk(_63044, _63046, _63048))), proven_neg(nextWorld(_63044, _63038)), proven_not_neg(onEvent(_63048, _63046))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))))
- % body: compound(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))))),\+is_ftVar(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))))}])
- % =boxlog=
- % proven_neg(skolem(_10054, skInstExistsNextWorldTrueInWorld_20FnSk(_10060, _10062, _10064))) :-
- % proven_neg(nextWorld(_10060,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10060,
- % _10062,
- % _10064))),
- % proven_neg(nextWorld(_10060, _10054)),
- % proven_not_neg(onEvent(_10064, _10062)).
- % Found positive trigger: boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))))*->rhs([clif(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))))
- % body: delistify_last_arg((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))),boxlog_to_pfc,_30558),must_be_unqualified(_30558)*->rhs([pfclog(_30558)])
- % RHS-Post1: pfclog((~nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064)),~nextWorld(_10060,_10054),proven_not_neg(onEvent(_10064,_10062)),{is_unit(_10064,_10062,_10060,_10054)}==>proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064)))))
- % Support: boxlog((proven_neg(skolem(_9774,skInstExistsNextWorldTrueInWorld_20FnSk(_9780,_9782,_9784))):-proven_neg(nextWorld(_9780,skInstExistsNextWorldTrueInWorld_20FnSk(_9780,_9782,_9784))),proven_neg(nextWorld(_9780,_9774)),proven_not_neg(onEvent(_9784,_9782)))),pt(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))),(delistify_last_arg((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))),boxlog_to_pfc,(~nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064)),~nextWorld(_10060,_10054),proven_not_neg(onEvent(_10064,_10062)),{is_unit(_10064,_10062,_10060,_10054)}==>proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))))),must_be_unqualified((~nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064)),~nextWorld(_10060,_10054),proven_not_neg(onEvent(_10064,_10062)),{is_unit(_10064,_10062,_10060,_10054)}==>proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064)))))*->rhs([pfclog((~nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064)),~nextWorld(_10060,_10054),proven_not_neg(onEvent(_10064,_10062)),{is_unit(_10064,_10062,_10060,_10054)}==>proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064)))))])))
- % r_sane:mpred_fwc1(pfclog((~nextWorld(_24750, skInstExistsNextWorldTrueInWorld_20FnSk(_24750, _24758, _24760)), ~nextWorld(_24750, _24776), proven_not_neg(onEvent(_24760, _24758)), {is_unit(_24760, _24758, _24750, _24776)}==>proven_neg(skolem(_24776, skInstExistsNextWorldTrueInWorld_20FnSk(_24750, _24758, _24760)))))).
- % Found positive trigger: pfclog((~nextWorld(_28634,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)),~nextWorld(_28634,_28660),proven_not_neg(onEvent(_28644,_28642)),{is_unit(_28644,_28642,_28634,_28660)}==>proven_neg(skolem(_28660,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)))))
- % body: compound(pfclog((~nextWorld(_28634,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)),~nextWorld(_28634,_28660),proven_not_neg(onEvent(_28644,_28642)),{is_unit(_28644,_28642,_28634,_28660)}==>proven_neg(skolem(_28660,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)))))),\+is_ftVar(pfclog((~nextWorld(_28634,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)),~nextWorld(_28634,_28660),proven_not_neg(onEvent(_28644,_28642)),{is_unit(_28644,_28642,_28634,_28660)}==>proven_neg(skolem(_28660,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644))))))*->rhs([{with_current_why(pfclog((~nextWorld(_28634,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)),~nextWorld(_28634,_28660),proven_not_neg(onEvent(_28644,_28642)),{is_unit(_28644,_28642,_28634,_28660)}==>proven_neg(skolem(_28660,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644))))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_28634,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)),~nextWorld(_28634,_28660),proven_not_neg(onEvent(_28644,_28642)),{is_unit(_28644,_28642,_28634,_28660)}==>proven_neg(skolem(_28660,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644))))))))}])
- % Found positive trigger: pfclog((~nextWorld(_28634,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)),~nextWorld(_28634,_28660),proven_not_neg(onEvent(_28644,_28642)),{is_unit(_28644,_28642,_28634,_28660)}==>proven_neg(skolem(_28660,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~nextWorld(_28634,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)),~nextWorld(_28634,_28660),proven_not_neg(onEvent(_28644,_28642)),{is_unit(_28644,_28642,_28634,_28660)}==>proven_neg(skolem(_28660,skInstExistsNextWorldTrueInWorld_20FnSk(_28634,_28642,_28644)))))}])
- % =pfclog=
- % ~nextWorld(_28634, skInstExistsNextWorldTrueInWorld_20FnSk(_28634, _28642, _28644)), ~nextWorld(_28634, _28660), proven_not_neg(onEvent(_28644, _28642)), {is_unit(_28644, _28642, _28634, _28660)}==>proven_neg(skolem(_28660, skInstExistsNextWorldTrueInWorld_20FnSk(_28634, _28642, _28644))).
- % Found positive trigger: pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)))))
- % body: is_kif_clause(pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308))))))*->rhs([clif(pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308))))))])
- % Found positive trigger: pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)))))
- % body: rhs([(~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308))))])
- % RHS-Post1: ~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)))
- % Support: pfclog((~nextWorld(_11978,skInstExistsNextWorldTrueInWorld_20FnSk(_11978,_11986,_11988)),~nextWorld(_11978,_12004),proven_not_neg(onEvent(_11988,_11986)),{is_unit(_11988,_11986,_11978,_12004)}==>proven_neg(skolem(_12004,skInstExistsNextWorldTrueInWorld_20FnSk(_11978,_11986,_11988))))),pt(pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308))))),rhs([(~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308))))]))
- % r_sane:mpred_fwc1((~nextWorld(_42944, skInstExistsNextWorldTrueInWorld_20FnSk(_42944, _42952, _42954)), ~nextWorld(_42944, _42970), proven_not_neg(onEvent(_42954, _42952)), {is_unit(_42954, _42952, _42944, _42970)}==>proven_neg(skolem(_42970, skInstExistsNextWorldTrueInWorld_20FnSk(_42944, _42952, _42954))))).
- % Adding positive
- % trigger: ~nextWorld(_14076,skInstExistsNextWorldTrueInWorld_20FnSk(_14076,_14084,_14086))
- % body: pt(~nextWorld(_14076,_14102),pt(proven_not_neg(onEvent(_14086,_14084)),(is_unit(_14086,_14084,_14076,_14102)*->rhs([proven_neg(skolem(_14102,skInstExistsNextWorldTrueInWorld_20FnSk(_14076,_14084,_14086)))]))))
- % Support: (~nextWorld(_14402,skInstExistsNextWorldTrueInWorld_20FnSk(_14402,_14410,_14412)),~nextWorld(_14402,_14428),proven_not_neg(onEvent(_14412,_14410)),{is_unit(_14412,_14410,_14402,_14428)}==>proven_neg(skolem(_14428,skInstExistsNextWorldTrueInWorld_20FnSk(_14402,_14410,_14412)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)))))
- % body: compound(pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)))))),\+is_ftVar(pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308))))))*->rhs([{with_current_why(pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308))))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_12298,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308)),~nextWorld(_12298,_12324),proven_not_neg(onEvent(_12308,_12306)),{is_unit(_12308,_12306,_12298,_12324)}==>proven_neg(skolem(_12324,skInstExistsNextWorldTrueInWorld_20FnSk(_12298,_12306,_12308))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))))
- % body: compound(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062))))),\+is_ftVar(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10054,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))):-proven_neg(nextWorld(_10060,skInstExistsNextWorldTrueInWorld_20FnSk(_10060,_10062,_10064))),proven_neg(nextWorld(_10060,_10054)),proven_not_neg(onEvent(_10064,_10062)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_63306, _63308)):-proven_neg(nextWorld(_63322, _63324)), proven_neg(nextWorld(_63322, skInstExistsNextWorldTrueInWorld_20FnSk(_63322, _63308, _63306))), {ignore(_63324=skInstExistsNextWorldTrueInWorld_20FnSk(_63322, _63308, _63306))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}))
- % body: compound(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}))}])
- % =boxlog=
- % proven_neg(onEvent(_10162, _10164)) :-
- % proven_neg(nextWorld(_10178, _10180)),
- % proven_neg(nextWorld(_10178,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10178,
- % _10164,
- % _10162))),
- % { ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178, _10164, _10162))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})))*->rhs([clif(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}))
- % body: delistify_last_arg((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}),boxlog_to_pfc,_30944),must_be_unqualified(_30944)*->rhs([pfclog(_30944)])
- % RHS-Post1: pfclog((~nextWorld(_10178,_10180),~nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162)),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))},{is_unit(_10164,_10162)}==>proven_neg(onEvent(_10162,_10164))))
- % Support: boxlog((proven_neg(onEvent(_9874,_9876)):-proven_neg(nextWorld(_9890,_9892)),proven_neg(nextWorld(_9890,skInstExistsNextWorldTrueInWorld_20FnSk(_9890,_9876,_9874))),{ignore(_9892=skInstExistsNextWorldTrueInWorld_20FnSk(_9890,_9876,_9874))})),pt(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})),(delistify_last_arg((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}),boxlog_to_pfc,(~nextWorld(_10178,_10180),~nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162)),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))},{is_unit(_10164,_10162)}==>proven_neg(onEvent(_10162,_10164)))),must_be_unqualified((~nextWorld(_10178,_10180),~nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162)),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))},{is_unit(_10164,_10162)}==>proven_neg(onEvent(_10162,_10164))))*->rhs([pfclog((~nextWorld(_10178,_10180),~nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162)),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))},{is_unit(_10164,_10162)}==>proven_neg(onEvent(_10162,_10164))))])))
- % r_sane:mpred_fwc1(pfclog((~nextWorld(_24906, _24908), ~nextWorld(_24906, skInstExistsNextWorldTrueInWorld_20FnSk(_24906, _24930, _24932)), {ignore(_24908=skInstExistsNextWorldTrueInWorld_20FnSk(_24906, _24930, _24932))}, {is_unit(_24930, _24932)}==>proven_neg(onEvent(_24932, _24930))))).
- % Found positive trigger: pfclog((~nextWorld(_28786,_28788),~nextWorld(_28786,skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812)),{ignore(_28788=skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812))},{is_unit(_28810,_28812)}==>proven_neg(onEvent(_28812,_28810))))
- % body: compound(pfclog((~nextWorld(_28786,_28788),~nextWorld(_28786,skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812)),{ignore(_28788=skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812))},{is_unit(_28810,_28812)}==>proven_neg(onEvent(_28812,_28810))))),\+is_ftVar(pfclog((~nextWorld(_28786,_28788),~nextWorld(_28786,skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812)),{ignore(_28788=skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812))},{is_unit(_28810,_28812)}==>proven_neg(onEvent(_28812,_28810)))))*->rhs([{with_current_why(pfclog((~nextWorld(_28786,_28788),~nextWorld(_28786,skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812)),{ignore(_28788=skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812))},{is_unit(_28810,_28812)}==>proven_neg(onEvent(_28812,_28810)))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_28786,_28788),~nextWorld(_28786,skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812)),{ignore(_28788=skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812))},{is_unit(_28810,_28812)}==>proven_neg(onEvent(_28812,_28810)))))))}])
- % Found positive trigger: pfclog((~nextWorld(_28786,_28788),~nextWorld(_28786,skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812)),{ignore(_28788=skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812))},{is_unit(_28810,_28812)}==>proven_neg(onEvent(_28812,_28810))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~nextWorld(_28786,_28788),~nextWorld(_28786,skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812)),{ignore(_28788=skInstExistsNextWorldTrueInWorld_20FnSk(_28786,_28810,_28812))},{is_unit(_28810,_28812)}==>proven_neg(onEvent(_28812,_28810))))}])
- % =pfclog=
- % ~nextWorld(_28786, _28788), ~nextWorld(_28786, skInstExistsNextWorldTrueInWorld_20FnSk(_28786, _28810, _28812)), {ignore(_28788=skInstExistsNextWorldTrueInWorld_20FnSk(_28786, _28810, _28812))}, {is_unit(_28810, _28812)}==>proven_neg(onEvent(_28812, _28810)).
- % Found positive trigger: pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458))))
- % body: is_kif_clause(pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458)))))*->rhs([clif(pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458)))))])
- % Found positive trigger: pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458))))
- % body: rhs([(~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458)))])
- % RHS-Post1: ~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458))
- % Support: pfclog((~nextWorld(_12114,_12116),~nextWorld(_12114,skInstExistsNextWorldTrueInWorld_20FnSk(_12114,_12138,_12140)),{ignore(_12116=skInstExistsNextWorldTrueInWorld_20FnSk(_12114,_12138,_12140))},{is_unit(_12138,_12140)}==>proven_neg(onEvent(_12140,_12138)))),pt(pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458)))),rhs([(~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458)))]))
- % r_sane:mpred_fwc1((~nextWorld(_43922, _43924), ~nextWorld(_43922, skInstExistsNextWorldTrueInWorld_20FnSk(_43922, _43946, _43948)), {ignore(_43924=skInstExistsNextWorldTrueInWorld_20FnSk(_43922, _43946, _43948))}, {is_unit(_43946, _43948)}==>proven_neg(onEvent(_43948, _43946)))).
- % Adding positive
- % trigger: ~nextWorld(_14212,_14214)
- % body: pt(~nextWorld(_14212,skInstExistsNextWorldTrueInWorld_20FnSk(_14212,_14236,_14238)),(ignore(_14214=skInstExistsNextWorldTrueInWorld_20FnSk(_14212,_14236,_14238))*->is_unit(_14236,_14238)*->rhs([proven_neg(onEvent(_14238,_14236))])))
- % Support: (~nextWorld(_14538,_14540),~nextWorld(_14538,skInstExistsNextWorldTrueInWorld_20FnSk(_14538,_14562,_14564)),{ignore(_14540=skInstExistsNextWorldTrueInWorld_20FnSk(_14538,_14562,_14564))},{is_unit(_14562,_14564)}==>proven_neg(onEvent(_14564,_14562))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458))))
- % body: compound(pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458))))),\+is_ftVar(pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458)))))*->rhs([{with_current_why(pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458)))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_12434,_12436),~nextWorld(_12434,skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460)),{ignore(_12436=skInstExistsNextWorldTrueInWorld_20FnSk(_12434,_12458,_12460))},{is_unit(_12458,_12460)}==>proven_neg(onEvent(_12460,_12458)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}))
- % body: compound(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10162,_10164)):-proven_neg(nextWorld(_10178,_10180)),proven_neg(nextWorld(_10178,skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))),{ignore(_10180=skInstExistsNextWorldTrueInWorld_20FnSk(_10178,_10164,_10162))})))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))},boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(nextWorld(_3378,_3382)),proven_not_neg(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_63368, skInstExistsNextWorldTrueInWorld_20FnSk(_63374, _63376, _63378))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_63374, _63376, _63378), world)), proven_neg(nextWorld(_63374, _63368)), proven_not_neg(onEvent(_63378, _63376))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))))
- % body: compound(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))))),\+is_ftVar(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))))}])
- % =boxlog=
- % proven_neg(skolem(_10218, skInstExistsNextWorldTrueInWorld_20FnSk(_10224, _10226, _10228))) :-
- % proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,
- % _10226,
- % _10228),
- % world)),
- % proven_neg(nextWorld(_10224, _10218)),
- % proven_not_neg(onEvent(_10228, _10226)).
- % Found positive trigger: boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))))*->rhs([clif(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))))
- % body: delistify_last_arg((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))),boxlog_to_pfc,_30692),must_be_unqualified(_30692)*->rhs([pfclog(_30692)])
- % RHS-Post1: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world),~nextWorld(_10224,_10218),proven_not_neg(onEvent(_10228,_10226)),{is_unit(_10228,_10226,_10224,_10218)}==>proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228)))))
- % Support: boxlog((proven_neg(skolem(_9938,skInstExistsNextWorldTrueInWorld_20FnSk(_9944,_9946,_9948))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_9944,_9946,_9948),world)),proven_neg(nextWorld(_9944,_9938)),proven_not_neg(onEvent(_9948,_9946)))),pt(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))),(delistify_last_arg((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))),boxlog_to_pfc,(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world),~nextWorld(_10224,_10218),proven_not_neg(onEvent(_10228,_10226)),{is_unit(_10228,_10226,_10224,_10218)}==>proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))))),must_be_unqualified((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world),~nextWorld(_10224,_10218),proven_not_neg(onEvent(_10228,_10226)),{is_unit(_10228,_10226,_10224,_10218)}==>proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228)))))*->rhs([pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world),~nextWorld(_10224,_10218),proven_not_neg(onEvent(_10228,_10226)),{is_unit(_10228,_10226,_10224,_10218)}==>proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228)))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24926, _24928, _24930), world), ~nextWorld(_24926, _24946), proven_not_neg(onEvent(_24930, _24928)), {is_unit(_24930, _24928, _24926, _24946)}==>proven_neg(skolem(_24946, skInstExistsNextWorldTrueInWorld_20FnSk(_24926, _24928, _24930)))))).
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810),world),~nextWorld(_28806,_28826),proven_not_neg(onEvent(_28810,_28808)),{is_unit(_28810,_28808,_28806,_28826)}==>proven_neg(skolem(_28826,skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810)))))
- % body: compound(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810),world),~nextWorld(_28806,_28826),proven_not_neg(onEvent(_28810,_28808)),{is_unit(_28810,_28808,_28806,_28826)}==>proven_neg(skolem(_28826,skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810)))))),\+is_ftVar(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810),world),~nextWorld(_28806,_28826),proven_not_neg(onEvent(_28810,_28808)),{is_unit(_28810,_28808,_28806,_28826)}==>proven_neg(skolem(_28826,skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810))))))*->rhs([{with_current_why(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810),world),~nextWorld(_28806,_28826),proven_not_neg(onEvent(_28810,_28808)),{is_unit(_28810,_28808,_28806,_28826)}==>proven_neg(skolem(_28826,skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810))))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810),world),~nextWorld(_28806,_28826),proven_not_neg(onEvent(_28810,_28808)),{is_unit(_28810,_28808,_28806,_28826)}==>proven_neg(skolem(_28826,skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810))))))))}])
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810),world),~nextWorld(_28806,_28826),proven_not_neg(onEvent(_28810,_28808)),{is_unit(_28810,_28808,_28806,_28826)}==>proven_neg(skolem(_28826,skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810),world),~nextWorld(_28806,_28826),proven_not_neg(onEvent(_28810,_28808)),{is_unit(_28810,_28808,_28806,_28826)}==>proven_neg(skolem(_28826,skInstExistsNextWorldTrueInWorld_20FnSk(_28806,_28808,_28810)))))}])
- % =pfclog=
- % ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28806, _28808, _28810), world), ~nextWorld(_28806, _28826), proven_not_neg(onEvent(_28810, _28808)), {is_unit(_28810, _28808, _28806, _28826)}==>proven_neg(skolem(_28826, skInstExistsNextWorldTrueInWorld_20FnSk(_28806, _28808, _28810))).
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472)))))
- % body: is_kif_clause(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472))))))*->rhs([clif(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472))))))])
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472)))))
- % body: rhs([(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472))))])
- % RHS-Post1: ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472)))
- % Support: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12148,_12150,_12152),world),~nextWorld(_12148,_12168),proven_not_neg(onEvent(_12152,_12150)),{is_unit(_12152,_12150,_12148,_12168)}==>proven_neg(skolem(_12168,skInstExistsNextWorldTrueInWorld_20FnSk(_12148,_12150,_12152))))),pt(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472))))),rhs([(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472))))]))
- % r_sane:mpred_fwc1((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_43112, _43114, _43116), world), ~nextWorld(_43112, _43132), proven_not_neg(onEvent(_43116, _43114)), {is_unit(_43116, _43114, _43112, _43132)}==>proven_neg(skolem(_43132, skInstExistsNextWorldTrueInWorld_20FnSk(_43112, _43114, _43116))))).
- % Adding positive
- % trigger: ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14246,_14248,_14250),world)
- % body: pt(~nextWorld(_14246,_14266),pt(proven_not_neg(onEvent(_14250,_14248)),(is_unit(_14250,_14248,_14246,_14266)*->rhs([proven_neg(skolem(_14266,skInstExistsNextWorldTrueInWorld_20FnSk(_14246,_14248,_14250)))]))))
- % Support: (~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14572,_14574,_14576),world),~nextWorld(_14572,_14592),proven_not_neg(onEvent(_14576,_14574)),{is_unit(_14576,_14574,_14572,_14592)}==>proven_neg(skolem(_14592,skInstExistsNextWorldTrueInWorld_20FnSk(_14572,_14574,_14576)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472)))))
- % body: compound(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472)))))),\+is_ftVar(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472))))))*->rhs([{with_current_why(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472))))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472),world),~nextWorld(_12468,_12488),proven_not_neg(onEvent(_12472,_12470)),{is_unit(_12472,_12470,_12468,_12488)}==>proven_neg(skolem(_12488,skInstExistsNextWorldTrueInWorld_20FnSk(_12468,_12470,_12472))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))))
- % body: compound(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226))))),\+is_ftVar(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10218,skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10224,_10226,_10228),world)),proven_neg(nextWorld(_10224,_10218)),proven_not_neg(onEvent(_10228,_10226)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(nextWorld(_3378,_3382)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_63612, _63614)):-proven_neg(nextWorld(_63628, _63630)), proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_63628, _63614, _63612), world)), {ignore(_63630=skInstExistsNextWorldTrueInWorld_20FnSk(_63628, _63614, _63612))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}))
- % body: compound(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}))}])
- % =boxlog=
- % proven_neg(onEvent(_10326, _10328)) :-
- % proven_neg(nextWorld(_10342, _10344)),
- % proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,
- % _10328,
- % _10326),
- % world)),
- % { ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342, _10328, _10326))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})))*->rhs([clif(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}))
- % body: delistify_last_arg((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}),boxlog_to_pfc,_31080),must_be_unqualified(_31080)*->rhs([pfclog(_31080)])
- % RHS-Post1: pfclog((~nextWorld(_10342,_10344),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))},{is_unit(_10328,_10326)}==>proven_neg(onEvent(_10326,_10328))))
- % Support: boxlog((proven_neg(onEvent(_10038,_10040)):-proven_neg(nextWorld(_10054,_10056)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10054,_10040,_10038),world)),{ignore(_10056=skInstExistsNextWorldTrueInWorld_20FnSk(_10054,_10040,_10038))})),pt(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})),(delistify_last_arg((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}),boxlog_to_pfc,(~nextWorld(_10342,_10344),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))},{is_unit(_10328,_10326)}==>proven_neg(onEvent(_10326,_10328)))),must_be_unqualified((~nextWorld(_10342,_10344),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))},{is_unit(_10328,_10326)}==>proven_neg(onEvent(_10326,_10328))))*->rhs([pfclog((~nextWorld(_10342,_10344),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))},{is_unit(_10328,_10326)}==>proven_neg(onEvent(_10326,_10328))))])))
- % r_sane:mpred_fwc1(pfclog((~nextWorld(_25076, _25078), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25076, _25100, _25102), world), {ignore(_25078=skInstExistsNextWorldTrueInWorld_20FnSk(_25076, _25100, _25102))}, {is_unit(_25100, _25102)}==>proven_neg(onEvent(_25102, _25100))))).
- % Found positive trigger: pfclog((~nextWorld(_28952,_28954),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978),world),{ignore(_28954=skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978))},{is_unit(_28976,_28978)}==>proven_neg(onEvent(_28978,_28976))))
- % body: compound(pfclog((~nextWorld(_28952,_28954),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978),world),{ignore(_28954=skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978))},{is_unit(_28976,_28978)}==>proven_neg(onEvent(_28978,_28976))))),\+is_ftVar(pfclog((~nextWorld(_28952,_28954),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978),world),{ignore(_28954=skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978))},{is_unit(_28976,_28978)}==>proven_neg(onEvent(_28978,_28976)))))*->rhs([{with_current_why(pfclog((~nextWorld(_28952,_28954),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978),world),{ignore(_28954=skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978))},{is_unit(_28976,_28978)}==>proven_neg(onEvent(_28978,_28976)))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_28952,_28954),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978),world),{ignore(_28954=skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978))},{is_unit(_28976,_28978)}==>proven_neg(onEvent(_28978,_28976)))))))}])
- % Found positive trigger: pfclog((~nextWorld(_28952,_28954),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978),world),{ignore(_28954=skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978))},{is_unit(_28976,_28978)}==>proven_neg(onEvent(_28978,_28976))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~nextWorld(_28952,_28954),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978),world),{ignore(_28954=skInstExistsNextWorldTrueInWorld_20FnSk(_28952,_28976,_28978))},{is_unit(_28976,_28978)}==>proven_neg(onEvent(_28978,_28976))))}])
- % =pfclog=
- % ~nextWorld(_28952, _28954), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28952, _28976, _28978), world), {ignore(_28954=skInstExistsNextWorldTrueInWorld_20FnSk(_28952, _28976, _28978))}, {is_unit(_28976, _28978)}==>proven_neg(onEvent(_28978, _28976)).
- % Found positive trigger: pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622))))
- % body: is_kif_clause(pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622)))))*->rhs([clif(pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622)))))])
- % Found positive trigger: pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622))))
- % body: rhs([(~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622)))])
- % RHS-Post1: ~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622))
- % Support: pfclog((~nextWorld(_12278,_12280),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12278,_12302,_12304),world),{ignore(_12280=skInstExistsNextWorldTrueInWorld_20FnSk(_12278,_12302,_12304))},{is_unit(_12302,_12304)}==>proven_neg(onEvent(_12304,_12302)))),pt(pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622)))),rhs([(~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622)))]))
- % r_sane:mpred_fwc1((~nextWorld(_44084, _44086), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_44084, _44108, _44110), world), {ignore(_44086=skInstExistsNextWorldTrueInWorld_20FnSk(_44084, _44108, _44110))}, {is_unit(_44108, _44110)}==>proven_neg(onEvent(_44110, _44108)))).
- % Adding positive
- % trigger: ~nextWorld(_14376,_14378)
- % body: pt(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14376,_14400,_14402),world),(ignore(_14378=skInstExistsNextWorldTrueInWorld_20FnSk(_14376,_14400,_14402))*->is_unit(_14400,_14402)*->rhs([proven_neg(onEvent(_14402,_14400))])))
- % Support: (~nextWorld(_14702,_14704),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14726,_14728),world),{ignore(_14704=skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14726,_14728))},{is_unit(_14726,_14728)}==>proven_neg(onEvent(_14728,_14726))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622))))
- % body: compound(pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622))))),\+is_ftVar(pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622)))))*->rhs([{with_current_why(pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622)))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_12598,_12600),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624),world),{ignore(_12600=skInstExistsNextWorldTrueInWorld_20FnSk(_12598,_12622,_12624))},{is_unit(_12622,_12624)}==>proven_neg(onEvent(_12624,_12622)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}))
- % body: compound(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10326,_10328)):-proven_neg(nextWorld(_10342,_10344)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326),world)),{ignore(_10344=skInstExistsNextWorldTrueInWorld_20FnSk(_10342,_10328,_10326))})))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))},boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_63664, skInstExistsNextWorldTrueInWorld_20FnSk(_63670, _63672, _63674))):-proven_neg(true_in_world(_63672, skInstExistsNextWorldTrueInWorld_20FnSk(_63670, _63672, _63674))), proven_neg(inst(_63664, world)), proven_not_neg(onEvent(_63674, _63672))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))))
- % body: compound(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))))),\+is_ftVar(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))))}])
- % =boxlog=
- % proven_neg(skolem(_10382, skInstExistsNextWorldTrueInWorld_20FnSk(_10388, _10390, _10392))) :-
- % proven_neg(true_in_world(_10390,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10388,
- % _10390,
- % _10392))),
- % proven_neg(inst(_10382, world)),
- % proven_not_neg(onEvent(_10392, _10390)).
- % Found positive trigger: boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))))*->rhs([clif(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))))
- % body: delistify_last_arg((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))),boxlog_to_pfc,_30876),must_be_unqualified(_30876)*->rhs([pfclog(_30876)])
- % RHS-Post1: pfclog((~true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392)),~inst(_10382,world),proven_not_neg(onEvent(_10392,_10390)),{is_unit(_10392,_10390,_10388,_10382)}==>proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392)))))
- % Support: boxlog((proven_neg(skolem(_10102,skInstExistsNextWorldTrueInWorld_20FnSk(_10108,_10110,_10112))):-proven_neg(true_in_world(_10110,skInstExistsNextWorldTrueInWorld_20FnSk(_10108,_10110,_10112))),proven_neg(inst(_10102,world)),proven_not_neg(onEvent(_10112,_10110)))),pt(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))),(delistify_last_arg((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))),boxlog_to_pfc,(~true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392)),~inst(_10382,world),proven_not_neg(onEvent(_10392,_10390)),{is_unit(_10392,_10390,_10388,_10382)}==>proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))))),must_be_unqualified((~true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392)),~inst(_10382,world),proven_not_neg(onEvent(_10392,_10390)),{is_unit(_10392,_10390,_10388,_10382)}==>proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392)))))*->rhs([pfclog((~true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392)),~inst(_10382,world),proven_not_neg(onEvent(_10392,_10390)),{is_unit(_10392,_10390,_10388,_10382)}==>proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392)))))])))
- % r_sane:mpred_fwc1(pfclog((~true_in_world(_25088, skInstExistsNextWorldTrueInWorld_20FnSk(_25094, _25088, _25098)), ~inst(_25112, world), proven_not_neg(onEvent(_25098, _25088)), {is_unit(_25098, _25088, _25094, _25112)}==>proven_neg(skolem(_25112, skInstExistsNextWorldTrueInWorld_20FnSk(_25094, _25088, _25098)))))).
- % Found positive trigger: pfclog((~true_in_world(_28968,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)),~inst(_28992,world),proven_not_neg(onEvent(_28978,_28968)),{is_unit(_28978,_28968,_28974,_28992)}==>proven_neg(skolem(_28992,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)))))
- % body: compound(pfclog((~true_in_world(_28968,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)),~inst(_28992,world),proven_not_neg(onEvent(_28978,_28968)),{is_unit(_28978,_28968,_28974,_28992)}==>proven_neg(skolem(_28992,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)))))),\+is_ftVar(pfclog((~true_in_world(_28968,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)),~inst(_28992,world),proven_not_neg(onEvent(_28978,_28968)),{is_unit(_28978,_28968,_28974,_28992)}==>proven_neg(skolem(_28992,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978))))))*->rhs([{with_current_why(pfclog((~true_in_world(_28968,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)),~inst(_28992,world),proven_not_neg(onEvent(_28978,_28968)),{is_unit(_28978,_28968,_28974,_28992)}==>proven_neg(skolem(_28992,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978))))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_28968,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)),~inst(_28992,world),proven_not_neg(onEvent(_28978,_28968)),{is_unit(_28978,_28968,_28974,_28992)}==>proven_neg(skolem(_28992,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978))))))))}])
- % Found positive trigger: pfclog((~true_in_world(_28968,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)),~inst(_28992,world),proven_not_neg(onEvent(_28978,_28968)),{is_unit(_28978,_28968,_28974,_28992)}==>proven_neg(skolem(_28992,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~true_in_world(_28968,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)),~inst(_28992,world),proven_not_neg(onEvent(_28978,_28968)),{is_unit(_28978,_28968,_28974,_28992)}==>proven_neg(skolem(_28992,skInstExistsNextWorldTrueInWorld_20FnSk(_28974,_28968,_28978)))))}])
- % =pfclog=
- % ~true_in_world(_28968, skInstExistsNextWorldTrueInWorld_20FnSk(_28974, _28968, _28978)), ~inst(_28992, world), proven_not_neg(onEvent(_28978, _28968)), {is_unit(_28978, _28968, _28974, _28992)}==>proven_neg(skolem(_28992, skInstExistsNextWorldTrueInWorld_20FnSk(_28974, _28968, _28978))).
- % Found positive trigger: pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)))))
- % body: is_kif_clause(pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636))))))*->rhs([clif(pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636))))))])
- % Found positive trigger: pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)))))
- % body: rhs([(~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636))))])
- % RHS-Post1: ~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)))
- % Support: pfclog((~true_in_world(_12306,skInstExistsNextWorldTrueInWorld_20FnSk(_12312,_12306,_12316)),~inst(_12330,world),proven_not_neg(onEvent(_12316,_12306)),{is_unit(_12316,_12306,_12312,_12330)}==>proven_neg(skolem(_12330,skInstExistsNextWorldTrueInWorld_20FnSk(_12312,_12306,_12316))))),pt(pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636))))),rhs([(~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636))))]))
- % r_sane:mpred_fwc1((~true_in_world(_43284, skInstExistsNextWorldTrueInWorld_20FnSk(_43290, _43284, _43294)), ~inst(_43308, world), proven_not_neg(onEvent(_43294, _43284)), {is_unit(_43294, _43284, _43290, _43308)}==>proven_neg(skolem(_43308, skInstExistsNextWorldTrueInWorld_20FnSk(_43290, _43284, _43294))))).
- % Adding positive
- % trigger: ~true_in_world(_14404,skInstExistsNextWorldTrueInWorld_20FnSk(_14410,_14404,_14414))
- % body: pt(~inst(_14428,world),pt(proven_not_neg(onEvent(_14414,_14404)),(is_unit(_14414,_14404,_14410,_14428)*->rhs([proven_neg(skolem(_14428,skInstExistsNextWorldTrueInWorld_20FnSk(_14410,_14404,_14414)))]))))
- % Support: (~true_in_world(_14730,skInstExistsNextWorldTrueInWorld_20FnSk(_14736,_14730,_14740)),~inst(_14754,world),proven_not_neg(onEvent(_14740,_14730)),{is_unit(_14740,_14730,_14736,_14754)}==>proven_neg(skolem(_14754,skInstExistsNextWorldTrueInWorld_20FnSk(_14736,_14730,_14740)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)))))
- % body: compound(pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)))))),\+is_ftVar(pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636))))))*->rhs([{with_current_why(pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636))))),ignore(\+addAdmittedArguments(pfclog((~true_in_world(_12626,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636)),~inst(_12650,world),proven_not_neg(onEvent(_12636,_12626)),{is_unit(_12636,_12626,_12632,_12650)}==>proven_neg(skolem(_12650,skInstExistsNextWorldTrueInWorld_20FnSk(_12632,_12626,_12636))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))))
- % body: compound(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390))))),\+is_ftVar(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10382,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))):-proven_neg(true_in_world(_10390,skInstExistsNextWorldTrueInWorld_20FnSk(_10388,_10390,_10392))),proven_neg(inst(_10382,world)),proven_not_neg(onEvent(_10392,_10390)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_63958, _63960)):-proven_neg(inst(_63974, world)), proven_neg(true_in_world(_63960, skInstExistsNextWorldTrueInWorld_20FnSk(_63996, _63960, _63958))), {ignore(_63974=skInstExistsNextWorldTrueInWorld_20FnSk(_63996, _63960, _63958))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}))
- % body: compound(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}))}])
- % =boxlog=
- % proven_neg(onEvent(_10490, _10492)) :-
- % proven_neg(inst(_10506, world)),
- % proven_neg(true_in_world(_10492,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10528,
- % _10492,
- % _10490))),
- % { ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528, _10492, _10490))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})))*->rhs([clif(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}))
- % body: delistify_last_arg((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}),boxlog_to_pfc,_31262),must_be_unqualified(_31262)*->rhs([pfclog(_31262)])
- % RHS-Post1: pfclog((~inst(_10506,world),~true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490)),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))},{is_unit(_10492,_10490)}==>proven_neg(onEvent(_10490,_10492))))
- % Support: boxlog((proven_neg(onEvent(_10202,_10204)):-proven_neg(inst(_10218,world)),proven_neg(true_in_world(_10204,skInstExistsNextWorldTrueInWorld_20FnSk(_10240,_10204,_10202))),{ignore(_10218=skInstExistsNextWorldTrueInWorld_20FnSk(_10240,_10204,_10202))})),pt(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})),(delistify_last_arg((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}),boxlog_to_pfc,(~inst(_10506,world),~true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490)),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))},{is_unit(_10492,_10490)}==>proven_neg(onEvent(_10490,_10492)))),must_be_unqualified((~inst(_10506,world),~true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490)),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))},{is_unit(_10492,_10490)}==>proven_neg(onEvent(_10490,_10492))))*->rhs([pfclog((~inst(_10506,world),~true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490)),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))},{is_unit(_10492,_10490)}==>proven_neg(onEvent(_10490,_10492))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(_25252, world), ~true_in_world(_25268, skInstExistsNextWorldTrueInWorld_20FnSk(_25274, _25268, _25278)), {ignore(_25252=skInstExistsNextWorldTrueInWorld_20FnSk(_25274, _25268, _25278))}, {is_unit(_25268, _25278)}==>proven_neg(onEvent(_25278, _25268))))).
- % Found positive trigger: pfclog((~inst(_29132,world),~true_in_world(_29148,skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158)),{ignore(_29132=skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158))},{is_unit(_29148,_29158)}==>proven_neg(onEvent(_29158,_29148))))
- % body: compound(pfclog((~inst(_29132,world),~true_in_world(_29148,skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158)),{ignore(_29132=skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158))},{is_unit(_29148,_29158)}==>proven_neg(onEvent(_29158,_29148))))),\+is_ftVar(pfclog((~inst(_29132,world),~true_in_world(_29148,skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158)),{ignore(_29132=skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158))},{is_unit(_29148,_29158)}==>proven_neg(onEvent(_29158,_29148)))))*->rhs([{with_current_why(pfclog((~inst(_29132,world),~true_in_world(_29148,skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158)),{ignore(_29132=skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158))},{is_unit(_29148,_29158)}==>proven_neg(onEvent(_29158,_29148)))),ignore(\+addAdmittedArguments(pfclog((~inst(_29132,world),~true_in_world(_29148,skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158)),{ignore(_29132=skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158))},{is_unit(_29148,_29158)}==>proven_neg(onEvent(_29158,_29148)))))))}])
- % Found positive trigger: pfclog((~inst(_29132,world),~true_in_world(_29148,skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158)),{ignore(_29132=skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158))},{is_unit(_29148,_29158)}==>proven_neg(onEvent(_29158,_29148))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(_29132,world),~true_in_world(_29148,skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158)),{ignore(_29132=skInstExistsNextWorldTrueInWorld_20FnSk(_29154,_29148,_29158))},{is_unit(_29148,_29158)}==>proven_neg(onEvent(_29158,_29148))))}])
- % =pfclog=
- % ~inst(_29132, world), ~true_in_world(_29148, skInstExistsNextWorldTrueInWorld_20FnSk(_29154, _29148, _29158)), {ignore(_29132=skInstExistsNextWorldTrueInWorld_20FnSk(_29154, _29148, _29158))}, {is_unit(_29148, _29158)}==>proven_neg(onEvent(_29158, _29148)).
- % Found positive trigger: pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778))))
- % body: is_kif_clause(pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778)))))*->rhs([clif(pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778)))))])
- % Found positive trigger: pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778))))
- % body: rhs([(~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778)))])
- % RHS-Post1: ~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778))
- % Support: pfclog((~inst(_12442,world),~true_in_world(_12458,skInstExistsNextWorldTrueInWorld_20FnSk(_12464,_12458,_12468)),{ignore(_12442=skInstExistsNextWorldTrueInWorld_20FnSk(_12464,_12458,_12468))},{is_unit(_12458,_12468)}==>proven_neg(onEvent(_12468,_12458)))),pt(pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778)))),rhs([(~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778)))]))
- % r_sane:mpred_fwc1((~inst(_44264, world), ~true_in_world(_44280, skInstExistsNextWorldTrueInWorld_20FnSk(_44286, _44280, _44290)), {ignore(_44264=skInstExistsNextWorldTrueInWorld_20FnSk(_44286, _44280, _44290))}, {is_unit(_44280, _44290)}==>proven_neg(onEvent(_44290, _44280)))).
- % Adding positive
- % trigger: ~inst(_14540,world)
- % body: pt(~true_in_world(_14556,skInstExistsNextWorldTrueInWorld_20FnSk(_14562,_14556,_14566)),(ignore(_14540=skInstExistsNextWorldTrueInWorld_20FnSk(_14562,_14556,_14566))*->is_unit(_14556,_14566)*->rhs([proven_neg(onEvent(_14566,_14556))])))
- % Support: (~inst(_14866,world),~true_in_world(_14882,skInstExistsNextWorldTrueInWorld_20FnSk(_14888,_14882,_14892)),{ignore(_14866=skInstExistsNextWorldTrueInWorld_20FnSk(_14888,_14882,_14892))},{is_unit(_14882,_14892)}==>proven_neg(onEvent(_14892,_14882))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778))))
- % body: compound(pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778))))),\+is_ftVar(pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778)))))*->rhs([{with_current_why(pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778)))),ignore(\+addAdmittedArguments(pfclog((~inst(_12762,world),~true_in_world(_12778,skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788)),{ignore(_12762=skInstExistsNextWorldTrueInWorld_20FnSk(_12784,_12778,_12788))},{is_unit(_12778,_12788)}==>proven_neg(onEvent(_12788,_12778)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}))
- % body: compound(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10490,_10492)):-proven_neg(inst(_10506,world)),proven_neg(true_in_world(_10492,skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))),{ignore(_10506=skInstExistsNextWorldTrueInWorld_20FnSk(_10528,_10492,_10490))})))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))},boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_64008, skInstExistsNextWorldTrueInWorld_20FnSk(_64014, _64016, _64018))):-proven_neg(nextWorld(_64014, skInstExistsNextWorldTrueInWorld_20FnSk(_64014, _64016, _64018))), proven_neg(inst(_64008, world)), proven_not_neg(onEvent(_64018, _64016))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))))
- % body: compound(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))))),\+is_ftVar(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))))}])
- % =boxlog=
- % proven_neg(skolem(_10546, skInstExistsNextWorldTrueInWorld_20FnSk(_10552, _10554, _10556))) :-
- % proven_neg(nextWorld(_10552,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10552,
- % _10554,
- % _10556))),
- % proven_neg(inst(_10546, world)),
- % proven_not_neg(onEvent(_10556, _10554)).
- % Found positive trigger: boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))))*->rhs([clif(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))))
- % body: delistify_last_arg((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))),boxlog_to_pfc,_31022),must_be_unqualified(_31022)*->rhs([pfclog(_31022)])
- % RHS-Post1: pfclog((~nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556)),~inst(_10546,world),proven_not_neg(onEvent(_10556,_10554)),{is_unit(_10556,_10554,_10552,_10546)}==>proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556)))))
- % Support: boxlog((proven_neg(skolem(_10266,skInstExistsNextWorldTrueInWorld_20FnSk(_10272,_10274,_10276))):-proven_neg(nextWorld(_10272,skInstExistsNextWorldTrueInWorld_20FnSk(_10272,_10274,_10276))),proven_neg(inst(_10266,world)),proven_not_neg(onEvent(_10276,_10274)))),pt(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))),(delistify_last_arg((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))),boxlog_to_pfc,(~nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556)),~inst(_10546,world),proven_not_neg(onEvent(_10556,_10554)),{is_unit(_10556,_10554,_10552,_10546)}==>proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))))),must_be_unqualified((~nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556)),~inst(_10546,world),proven_not_neg(onEvent(_10556,_10554)),{is_unit(_10556,_10554,_10552,_10546)}==>proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556)))))*->rhs([pfclog((~nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556)),~inst(_10546,world),proven_not_neg(onEvent(_10556,_10554)),{is_unit(_10556,_10554,_10552,_10546)}==>proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556)))))])))
- % r_sane:mpred_fwc1(pfclog((~nextWorld(_25252, skInstExistsNextWorldTrueInWorld_20FnSk(_25252, _25260, _25262)), ~inst(_25276, world), proven_not_neg(onEvent(_25262, _25260)), {is_unit(_25262, _25260, _25252, _25276)}==>proven_neg(skolem(_25276, skInstExistsNextWorldTrueInWorld_20FnSk(_25252, _25260, _25262)))))).
- % Found positive trigger: pfclog((~nextWorld(_29132,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)),~inst(_29156,world),proven_not_neg(onEvent(_29142,_29140)),{is_unit(_29142,_29140,_29132,_29156)}==>proven_neg(skolem(_29156,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)))))
- % body: compound(pfclog((~nextWorld(_29132,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)),~inst(_29156,world),proven_not_neg(onEvent(_29142,_29140)),{is_unit(_29142,_29140,_29132,_29156)}==>proven_neg(skolem(_29156,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)))))),\+is_ftVar(pfclog((~nextWorld(_29132,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)),~inst(_29156,world),proven_not_neg(onEvent(_29142,_29140)),{is_unit(_29142,_29140,_29132,_29156)}==>proven_neg(skolem(_29156,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142))))))*->rhs([{with_current_why(pfclog((~nextWorld(_29132,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)),~inst(_29156,world),proven_not_neg(onEvent(_29142,_29140)),{is_unit(_29142,_29140,_29132,_29156)}==>proven_neg(skolem(_29156,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142))))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_29132,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)),~inst(_29156,world),proven_not_neg(onEvent(_29142,_29140)),{is_unit(_29142,_29140,_29132,_29156)}==>proven_neg(skolem(_29156,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142))))))))}])
- % Found positive trigger: pfclog((~nextWorld(_29132,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)),~inst(_29156,world),proven_not_neg(onEvent(_29142,_29140)),{is_unit(_29142,_29140,_29132,_29156)}==>proven_neg(skolem(_29156,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~nextWorld(_29132,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)),~inst(_29156,world),proven_not_neg(onEvent(_29142,_29140)),{is_unit(_29142,_29140,_29132,_29156)}==>proven_neg(skolem(_29156,skInstExistsNextWorldTrueInWorld_20FnSk(_29132,_29140,_29142)))))}])
- % =pfclog=
- % ~nextWorld(_29132, skInstExistsNextWorldTrueInWorld_20FnSk(_29132, _29140, _29142)), ~inst(_29156, world), proven_not_neg(onEvent(_29142, _29140)), {is_unit(_29142, _29140, _29132, _29156)}==>proven_neg(skolem(_29156, skInstExistsNextWorldTrueInWorld_20FnSk(_29132, _29140, _29142))).
- % Found positive trigger: pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)))))
- % body: is_kif_clause(pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800))))))*->rhs([clif(pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800))))))])
- % Found positive trigger: pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)))))
- % body: rhs([(~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800))))])
- % RHS-Post1: ~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)))
- % Support: pfclog((~nextWorld(_12470,skInstExistsNextWorldTrueInWorld_20FnSk(_12470,_12478,_12480)),~inst(_12494,world),proven_not_neg(onEvent(_12480,_12478)),{is_unit(_12480,_12478,_12470,_12494)}==>proven_neg(skolem(_12494,skInstExistsNextWorldTrueInWorld_20FnSk(_12470,_12478,_12480))))),pt(pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800))))),rhs([(~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800))))]))
- % r_sane:mpred_fwc1((~nextWorld(_43434, skInstExistsNextWorldTrueInWorld_20FnSk(_43434, _43442, _43444)), ~inst(_43458, world), proven_not_neg(onEvent(_43444, _43442)), {is_unit(_43444, _43442, _43434, _43458)}==>proven_neg(skolem(_43458, skInstExistsNextWorldTrueInWorld_20FnSk(_43434, _43442, _43444))))).
- % Adding positive
- % trigger: ~nextWorld(_14568,skInstExistsNextWorldTrueInWorld_20FnSk(_14568,_14576,_14578))
- % body: pt(~inst(_14592,world),pt(proven_not_neg(onEvent(_14578,_14576)),(is_unit(_14578,_14576,_14568,_14592)*->rhs([proven_neg(skolem(_14592,skInstExistsNextWorldTrueInWorld_20FnSk(_14568,_14576,_14578)))]))))
- % Support: (~nextWorld(_14894,skInstExistsNextWorldTrueInWorld_20FnSk(_14894,_14902,_14904)),~inst(_14918,world),proven_not_neg(onEvent(_14904,_14902)),{is_unit(_14904,_14902,_14894,_14918)}==>proven_neg(skolem(_14918,skInstExistsNextWorldTrueInWorld_20FnSk(_14894,_14902,_14904)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)))))
- % body: compound(pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)))))),\+is_ftVar(pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800))))))*->rhs([{with_current_why(pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800))))),ignore(\+addAdmittedArguments(pfclog((~nextWorld(_12790,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800)),~inst(_12814,world),proven_not_neg(onEvent(_12800,_12798)),{is_unit(_12800,_12798,_12790,_12814)}==>proven_neg(skolem(_12814,skInstExistsNextWorldTrueInWorld_20FnSk(_12790,_12798,_12800))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))))
- % body: compound(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554))))),\+is_ftVar(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10546,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))):-proven_neg(nextWorld(_10552,skInstExistsNextWorldTrueInWorld_20FnSk(_10552,_10554,_10556))),proven_neg(inst(_10546,world)),proven_not_neg(onEvent(_10556,_10554)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_64262, _64264)):-proven_neg(inst(_64278, world)), proven_neg(nextWorld(_64294, skInstExistsNextWorldTrueInWorld_20FnSk(_64294, _64264, _64262))), {ignore(_64278=skInstExistsNextWorldTrueInWorld_20FnSk(_64294, _64264, _64262))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}))
- % body: compound(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}))}])
- % =boxlog=
- % proven_neg(onEvent(_10654, _10656)) :-
- % proven_neg(inst(_10670, world)),
- % proven_neg(nextWorld(_10686,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10686,
- % _10656,
- % _10654))),
- % { ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686, _10656, _10654))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})))*->rhs([clif(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}))
- % body: delistify_last_arg((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}),boxlog_to_pfc,_31412),must_be_unqualified(_31412)*->rhs([pfclog(_31412)])
- % RHS-Post1: pfclog((~inst(_10670,world),~nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654)),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))},{is_unit(_10656,_10654)}==>proven_neg(onEvent(_10654,_10656))))
- % Support: boxlog((proven_neg(onEvent(_10366,_10368)):-proven_neg(inst(_10382,world)),proven_neg(nextWorld(_10398,skInstExistsNextWorldTrueInWorld_20FnSk(_10398,_10368,_10366))),{ignore(_10382=skInstExistsNextWorldTrueInWorld_20FnSk(_10398,_10368,_10366))})),pt(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})),(delistify_last_arg((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}),boxlog_to_pfc,(~inst(_10670,world),~nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654)),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))},{is_unit(_10656,_10654)}==>proven_neg(onEvent(_10654,_10656)))),must_be_unqualified((~inst(_10670,world),~nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654)),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))},{is_unit(_10656,_10654)}==>proven_neg(onEvent(_10654,_10656))))*->rhs([pfclog((~inst(_10670,world),~nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654)),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))},{is_unit(_10656,_10654)}==>proven_neg(onEvent(_10654,_10656))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(_25410, world), ~nextWorld(_25426, skInstExistsNextWorldTrueInWorld_20FnSk(_25426, _25434, _25436)), {ignore(_25410=skInstExistsNextWorldTrueInWorld_20FnSk(_25426, _25434, _25436))}, {is_unit(_25434, _25436)}==>proven_neg(onEvent(_25436, _25434))))).
- % Found positive trigger: pfclog((~inst(_29286,world),~nextWorld(_29302,skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312)),{ignore(_29286=skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312))},{is_unit(_29310,_29312)}==>proven_neg(onEvent(_29312,_29310))))
- % body: compound(pfclog((~inst(_29286,world),~nextWorld(_29302,skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312)),{ignore(_29286=skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312))},{is_unit(_29310,_29312)}==>proven_neg(onEvent(_29312,_29310))))),\+is_ftVar(pfclog((~inst(_29286,world),~nextWorld(_29302,skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312)),{ignore(_29286=skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312))},{is_unit(_29310,_29312)}==>proven_neg(onEvent(_29312,_29310)))))*->rhs([{with_current_why(pfclog((~inst(_29286,world),~nextWorld(_29302,skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312)),{ignore(_29286=skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312))},{is_unit(_29310,_29312)}==>proven_neg(onEvent(_29312,_29310)))),ignore(\+addAdmittedArguments(pfclog((~inst(_29286,world),~nextWorld(_29302,skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312)),{ignore(_29286=skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312))},{is_unit(_29310,_29312)}==>proven_neg(onEvent(_29312,_29310)))))))}])
- % Found positive trigger: pfclog((~inst(_29286,world),~nextWorld(_29302,skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312)),{ignore(_29286=skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312))},{is_unit(_29310,_29312)}==>proven_neg(onEvent(_29312,_29310))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(_29286,world),~nextWorld(_29302,skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312)),{ignore(_29286=skInstExistsNextWorldTrueInWorld_20FnSk(_29302,_29310,_29312))},{is_unit(_29310,_29312)}==>proven_neg(onEvent(_29312,_29310))))}])
- % =pfclog=
- % ~inst(_29286, world), ~nextWorld(_29302, skInstExistsNextWorldTrueInWorld_20FnSk(_29302, _29310, _29312)), {ignore(_29286=skInstExistsNextWorldTrueInWorld_20FnSk(_29302, _29310, _29312))}, {is_unit(_29310, _29312)}==>proven_neg(onEvent(_29312, _29310)).
- % Found positive trigger: pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950))))
- % body: is_kif_clause(pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950)))))*->rhs([clif(pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950)))))])
- % Found positive trigger: pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950))))
- % body: rhs([(~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950)))])
- % RHS-Post1: ~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950))
- % Support: pfclog((~inst(_12606,world),~nextWorld(_12622,skInstExistsNextWorldTrueInWorld_20FnSk(_12622,_12630,_12632)),{ignore(_12606=skInstExistsNextWorldTrueInWorld_20FnSk(_12622,_12630,_12632))},{is_unit(_12630,_12632)}==>proven_neg(onEvent(_12632,_12630)))),pt(pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950)))),rhs([(~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950)))]))
- % r_sane:mpred_fwc1((~inst(_44412, world), ~nextWorld(_44428, skInstExistsNextWorldTrueInWorld_20FnSk(_44428, _44436, _44438)), {ignore(_44412=skInstExistsNextWorldTrueInWorld_20FnSk(_44428, _44436, _44438))}, {is_unit(_44436, _44438)}==>proven_neg(onEvent(_44438, _44436)))).
- % Adding positive
- % trigger: ~inst(_14704,world)
- % body: pt(~nextWorld(_14720,skInstExistsNextWorldTrueInWorld_20FnSk(_14720,_14728,_14730)),(ignore(_14704=skInstExistsNextWorldTrueInWorld_20FnSk(_14720,_14728,_14730))*->is_unit(_14728,_14730)*->rhs([proven_neg(onEvent(_14730,_14728))])))
- % Support: (~inst(_15030,world),~nextWorld(_15046,skInstExistsNextWorldTrueInWorld_20FnSk(_15046,_15054,_15056)),{ignore(_15030=skInstExistsNextWorldTrueInWorld_20FnSk(_15046,_15054,_15056))},{is_unit(_15054,_15056)}==>proven_neg(onEvent(_15056,_15054))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950))))
- % body: compound(pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950))))),\+is_ftVar(pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950)))))*->rhs([{with_current_why(pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950)))),ignore(\+addAdmittedArguments(pfclog((~inst(_12926,world),~nextWorld(_12942,skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952)),{ignore(_12926=skInstExistsNextWorldTrueInWorld_20FnSk(_12942,_12950,_12952))},{is_unit(_12950,_12952)}==>proven_neg(onEvent(_12952,_12950)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}))
- % body: compound(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10654,_10656)):-proven_neg(inst(_10670,world)),proven_neg(nextWorld(_10686,skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))),{ignore(_10670=skInstExistsNextWorldTrueInWorld_20FnSk(_10686,_10656,_10654))})))))}])
- % RHS-Post1: boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))},boxlog((proven_neg(skolem(_3382,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),proven_neg(inst(_3382,world)),proven_not_neg(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(skolem(_64320, skInstExistsNextWorldTrueInWorld_20FnSk(_64326, _64328, _64330))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_64326, _64328, _64330), world)), proven_neg(inst(_64320, world)), proven_not_neg(onEvent(_64330, _64328))))).
- % Found positive trigger: boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))))
- % body: compound(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))))),\+is_ftVar(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))))}])
- % =boxlog=
- % proven_neg(skolem(_10710, skInstExistsNextWorldTrueInWorld_20FnSk(_10716, _10718, _10720))) :-
- % proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,
- % _10718,
- % _10720),
- % world)),
- % proven_neg(inst(_10710, world)),
- % proven_not_neg(onEvent(_10720, _10718)).
- % Found positive trigger: boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))))
- % body: is_kif_clause(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))))*->rhs([clif(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))))])
- % Found positive trigger: boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))))
- % body: delistify_last_arg((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))),boxlog_to_pfc,_31160),must_be_unqualified(_31160)*->rhs([pfclog(_31160)])
- % RHS-Post1: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world),~inst(_10710,world),proven_not_neg(onEvent(_10720,_10718)),{is_unit(_10720,_10718,_10716,_10710)}==>proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720)))))
- % Support: boxlog((proven_neg(skolem(_10430,skInstExistsNextWorldTrueInWorld_20FnSk(_10436,_10438,_10440))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10436,_10438,_10440),world)),proven_neg(inst(_10430,world)),proven_not_neg(onEvent(_10440,_10438)))),pt(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))),(delistify_last_arg((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))),boxlog_to_pfc,(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world),~inst(_10710,world),proven_not_neg(onEvent(_10720,_10718)),{is_unit(_10720,_10718,_10716,_10710)}==>proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))))),must_be_unqualified((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world),~inst(_10710,world),proven_not_neg(onEvent(_10720,_10718)),{is_unit(_10720,_10718,_10716,_10710)}==>proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720)))))*->rhs([pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world),~inst(_10710,world),proven_not_neg(onEvent(_10720,_10718)),{is_unit(_10720,_10718,_10716,_10710)}==>proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720)))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25418, _25420, _25422), world), ~inst(_25436, world), proven_not_neg(onEvent(_25422, _25420)), {is_unit(_25422, _25420, _25418, _25436)}==>proven_neg(skolem(_25436, skInstExistsNextWorldTrueInWorld_20FnSk(_25418, _25420, _25422)))))).
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298),world),~inst(_29312,world),proven_not_neg(onEvent(_29298,_29296)),{is_unit(_29298,_29296,_29294,_29312)}==>proven_neg(skolem(_29312,skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298)))))
- % body: compound(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298),world),~inst(_29312,world),proven_not_neg(onEvent(_29298,_29296)),{is_unit(_29298,_29296,_29294,_29312)}==>proven_neg(skolem(_29312,skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298)))))),\+is_ftVar(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298),world),~inst(_29312,world),proven_not_neg(onEvent(_29298,_29296)),{is_unit(_29298,_29296,_29294,_29312)}==>proven_neg(skolem(_29312,skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298))))))*->rhs([{with_current_why(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298),world),~inst(_29312,world),proven_not_neg(onEvent(_29298,_29296)),{is_unit(_29298,_29296,_29294,_29312)}==>proven_neg(skolem(_29312,skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298))))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298),world),~inst(_29312,world),proven_not_neg(onEvent(_29298,_29296)),{is_unit(_29298,_29296,_29294,_29312)}==>proven_neg(skolem(_29312,skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298))))))))}])
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298),world),~inst(_29312,world),proven_not_neg(onEvent(_29298,_29296)),{is_unit(_29298,_29296,_29294,_29312)}==>proven_neg(skolem(_29312,skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298)))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298),world),~inst(_29312,world),proven_not_neg(onEvent(_29298,_29296)),{is_unit(_29298,_29296,_29294,_29312)}==>proven_neg(skolem(_29312,skInstExistsNextWorldTrueInWorld_20FnSk(_29294,_29296,_29298)))))}])
- % =pfclog=
- % ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29294, _29296, _29298), world), ~inst(_29312, world), proven_not_neg(onEvent(_29298, _29296)), {is_unit(_29298, _29296, _29294, _29312)}==>proven_neg(skolem(_29312, skInstExistsNextWorldTrueInWorld_20FnSk(_29294, _29296, _29298))).
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964)))))
- % body: is_kif_clause(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964))))))*->rhs([clif(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964))))))])
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964)))))
- % body: rhs([(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964))))])
- % RHS-Post1: ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964)))
- % Support: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12640,_12642,_12644),world),~inst(_12658,world),proven_not_neg(onEvent(_12644,_12642)),{is_unit(_12644,_12642,_12640,_12658)}==>proven_neg(skolem(_12658,skInstExistsNextWorldTrueInWorld_20FnSk(_12640,_12642,_12644))))),pt(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964))))),rhs([(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964))))]))
- % r_sane:mpred_fwc1((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_43596, _43598, _43600), world), ~inst(_43614, world), proven_not_neg(onEvent(_43600, _43598)), {is_unit(_43600, _43598, _43596, _43614)}==>proven_neg(skolem(_43614, skInstExistsNextWorldTrueInWorld_20FnSk(_43596, _43598, _43600))))).
- % Adding positive
- % trigger: ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14738,_14740,_14742),world)
- % body: pt(~inst(_14756,world),pt(proven_not_neg(onEvent(_14742,_14740)),(is_unit(_14742,_14740,_14738,_14756)*->rhs([proven_neg(skolem(_14756,skInstExistsNextWorldTrueInWorld_20FnSk(_14738,_14740,_14742)))]))))
- % Support: (~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15064,_15066,_15068),world),~inst(_15082,world),proven_not_neg(onEvent(_15068,_15066)),{is_unit(_15068,_15066,_15064,_15082)}==>proven_neg(skolem(_15082,skInstExistsNextWorldTrueInWorld_20FnSk(_15064,_15066,_15068)))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964)))))
- % body: compound(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964)))))),\+is_ftVar(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964))))))*->rhs([{with_current_why(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964))))),ignore(\+addAdmittedArguments(pfclog((~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964),world),~inst(_12978,world),proven_not_neg(onEvent(_12964,_12962)),{is_unit(_12964,_12962,_12960,_12978)}==>proven_neg(skolem(_12978,skInstExistsNextWorldTrueInWorld_20FnSk(_12960,_12962,_12964))))))))}])
- % Found positive trigger: boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))))
- % body: compound(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718))))),\+is_ftVar(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))))*->rhs([{with_current_why(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(skolem(_10710,skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720))):-proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10716,_10718,_10720),world)),proven_neg(inst(_10710,world)),proven_not_neg(onEvent(_10720,_10718)))))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(inst(_3382,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world)),{ignore(_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366))}))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_64568, _64570)):-proven_neg(inst(_64584, world)), proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_64606, _64570, _64568), world)), {ignore(_64584=skInstExistsNextWorldTrueInWorld_20FnSk(_64606, _64570, _64568))}))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}))
- % body: compound(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}))}])
- % =boxlog=
- % proven_neg(onEvent(_10818, _10820)) :-
- % proven_neg(inst(_10834, world)),
- % proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,
- % _10820,
- % _10818),
- % world)),
- % { ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856, _10820, _10818))
- % }.
- % Found positive trigger: boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})))*->rhs([clif(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}))
- % body: delistify_last_arg((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}),boxlog_to_pfc,_31546),must_be_unqualified(_31546)*->rhs([pfclog(_31546)])
- % RHS-Post1: pfclog((~inst(_10834,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))},{is_unit(_10820,_10818)}==>proven_neg(onEvent(_10818,_10820))))
- % Support: boxlog((proven_neg(onEvent(_10530,_10532)):-proven_neg(inst(_10546,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10568,_10532,_10530),world)),{ignore(_10546=skInstExistsNextWorldTrueInWorld_20FnSk(_10568,_10532,_10530))})),pt(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})),(delistify_last_arg((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}),boxlog_to_pfc,(~inst(_10834,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))},{is_unit(_10820,_10818)}==>proven_neg(onEvent(_10818,_10820)))),must_be_unqualified((~inst(_10834,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))},{is_unit(_10820,_10818)}==>proven_neg(onEvent(_10818,_10820))))*->rhs([pfclog((~inst(_10834,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))},{is_unit(_10820,_10818)}==>proven_neg(onEvent(_10818,_10820))))])))
- % r_sane:mpred_fwc1(pfclog((~inst(_25574, world), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25596, _25598, _25600), world), {ignore(_25574=skInstExistsNextWorldTrueInWorld_20FnSk(_25596, _25598, _25600))}, {is_unit(_25598, _25600)}==>proven_neg(onEvent(_25600, _25598))))).
- % Found positive trigger: pfclog((~inst(_29448,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474),world),{ignore(_29448=skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474))},{is_unit(_29472,_29474)}==>proven_neg(onEvent(_29474,_29472))))
- % body: compound(pfclog((~inst(_29448,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474),world),{ignore(_29448=skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474))},{is_unit(_29472,_29474)}==>proven_neg(onEvent(_29474,_29472))))),\+is_ftVar(pfclog((~inst(_29448,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474),world),{ignore(_29448=skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474))},{is_unit(_29472,_29474)}==>proven_neg(onEvent(_29474,_29472)))))*->rhs([{with_current_why(pfclog((~inst(_29448,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474),world),{ignore(_29448=skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474))},{is_unit(_29472,_29474)}==>proven_neg(onEvent(_29474,_29472)))),ignore(\+addAdmittedArguments(pfclog((~inst(_29448,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474),world),{ignore(_29448=skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474))},{is_unit(_29472,_29474)}==>proven_neg(onEvent(_29474,_29472)))))))}])
- % Found positive trigger: pfclog((~inst(_29448,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474),world),{ignore(_29448=skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474))},{is_unit(_29472,_29474)}==>proven_neg(onEvent(_29474,_29472))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~inst(_29448,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474),world),{ignore(_29448=skInstExistsNextWorldTrueInWorld_20FnSk(_29470,_29472,_29474))},{is_unit(_29472,_29474)}==>proven_neg(onEvent(_29474,_29472))))}])
- % =pfclog=
- % ~inst(_29448, world), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29470, _29472, _29474), world), {ignore(_29448=skInstExistsNextWorldTrueInWorld_20FnSk(_29470, _29472, _29474))}, {is_unit(_29472, _29474)}==>proven_neg(onEvent(_29474, _29472)).
- % Found positive trigger: pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114))))
- % body: is_kif_clause(pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114)))))*->rhs([clif(pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114)))))])
- % Found positive trigger: pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114))))
- % body: rhs([(~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114)))])
- % RHS-Post1: ~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114))
- % Support: pfclog((~inst(_12770,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12792,_12794,_12796),world),{ignore(_12770=skInstExistsNextWorldTrueInWorld_20FnSk(_12792,_12794,_12796))},{is_unit(_12794,_12796)}==>proven_neg(onEvent(_12796,_12794)))),pt(pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114)))),rhs([(~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114)))]))
- % r_sane:mpred_fwc1((~inst(_44570, world), ~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_44592, _44594, _44596), world), {ignore(_44570=skInstExistsNextWorldTrueInWorld_20FnSk(_44592, _44594, _44596))}, {is_unit(_44594, _44596)}==>proven_neg(onEvent(_44596, _44594)))).
- % Adding positive
- % trigger: ~inst(_14868,world)
- % body: pt(~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14890,_14892,_14894),world),(ignore(_14868=skInstExistsNextWorldTrueInWorld_20FnSk(_14890,_14892,_14894))*->is_unit(_14892,_14894)*->rhs([proven_neg(onEvent(_14894,_14892))])))
- % Support: (~inst(_15194,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15216,_15218,_15220),world),{ignore(_15194=skInstExistsNextWorldTrueInWorld_20FnSk(_15216,_15218,_15220))},{is_unit(_15218,_15220)}==>proven_neg(onEvent(_15220,_15218))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114))))
- % body: compound(pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114))))),\+is_ftVar(pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114)))))*->rhs([{with_current_why(pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114)))),ignore(\+addAdmittedArguments(pfclog((~inst(_13090,world),~inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116),world),{ignore(_13090=skInstExistsNextWorldTrueInWorld_20FnSk(_13112,_13114,_13116))},{is_unit(_13114,_13116)}==>proven_neg(onEvent(_13116,_13114)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}))
- % body: compound(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))}))),\+is_ftVar(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10818,_10820)):-proven_neg(inst(_10834,world)),proven_neg(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818),world)),{ignore(_10834=skInstExistsNextWorldTrueInWorld_20FnSk(_10856,_10820,_10818))})))))}])
- % RHS-Post1: boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(currentWorld(_3378))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(proven_neg(onEvent(_3366,_3368)):-proven_neg(currentWorld(_3378))))},boxlog((proven_neg(onEvent(_3366,_3368)):-proven_neg(currentWorld(_3378))))])))
- % r_sane:mpred_fwc1(boxlog((proven_neg(onEvent(_60674, _60676)):-proven_neg(currentWorld(_60684))))).
- % Found positive trigger: boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526))))
- % body: compound(boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526))))),\+is_ftVar(boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526)))))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526))))}])
- % =boxlog=
- % proven_neg(onEvent(_10516, _10518)) :-
- % proven_neg(currentWorld(_10526)).
- % Found positive trigger: boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526))))
- % body: is_kif_clause(boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526)))))*->rhs([clif(boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526)))))])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526))))
- % body: delistify_last_arg((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526))),boxlog_to_pfc,_26406),must_be_unqualified(_26406)*->rhs([pfclog(_26406)])
- % RHS-Post1: pfclog((~currentWorld(_10526),{is_unit}==>proven_neg(onEvent(_10516,_10518))))
- % Support: boxlog((proven_neg(onEvent(_10340,_10342)):-proven_neg(currentWorld(_10350)))),pt(boxlog((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526)))),(delistify_last_arg((proven_neg(onEvent(_10516,_10518)):-proven_neg(currentWorld(_10526))),boxlog_to_pfc,(~currentWorld(_10526),{is_unit}==>proven_neg(onEvent(_10516,_10518)))),must_be_unqualified((~currentWorld(_10526),{is_unit}==>proven_neg(onEvent(_10516,_10518))))*->rhs([pfclog((~currentWorld(_10526),{is_unit}==>proven_neg(onEvent(_10516,_10518))))])))
- % r_sane:mpred_fwc1(pfclog((~currentWorld(_21060), {is_unit}==>proven_neg(onEvent(_21068, _21070))))).
- % Found positive trigger: pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186))))
- % body: compound(pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186))))),\+is_ftVar(pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186)))))*->rhs([{with_current_why(pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186)))),ignore(\+addAdmittedArguments(pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186)))))))}])
- % Found positive trigger: pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186))))}])
- % =pfclog=
- % ~currentWorld(_24176), {is_unit}==>proven_neg(onEvent(_24184, _24186)).
- % Found positive trigger: pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186))))
- % body: is_kif_clause(pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186)))))*->rhs([clif(pfclog((~currentWorld(_24176),{is_unit}==>proven_neg(onEvent(_24184,_24186)))))])
- % Found positive trigger: pfclog((~currentWorld(_11946),{is_unit}==>proven_neg(onEvent(_11954,_11956))))
- % body: rhs([(~currentWorld(_11946),{is_unit}==>proven_neg(onEvent(_11954,_11956)))])
- % RHS-Post1: ~currentWorld(_11946),{is_unit}==>proven_neg(onEvent(_11954,_11956))
- % Support: pfclog((~currentWorld(_11758),{is_unit}==>proven_neg(onEvent(_11766,_11768)))),pt(pfclog((~currentWorld(_11946),{is_unit}==>proven_neg(onEvent(_11954,_11956)))),rhs([(~currentWorld(_11946),{is_unit}==>proven_neg(onEvent(_11954,_11956)))]))
- % r_sane:mpred_fwc1((~currentWorld(_27342), {is_unit}==>proven_neg(onEvent(_27350, _27352)))).
- % Adding positive
- % trigger: ~currentWorld(_13036)
- % body: is_unit*->rhs([proven_neg(onEvent(_13044,_13046))])
- % Support: (~currentWorld(_13230),{is_unit}==>proven_neg(onEvent(_13238,_13240))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Found positive trigger: pfclog((~currentWorld(_11914),{is_unit}==>proven_neg(onEvent(_11922,_11924))))
- % body: compound(pfclog((~currentWorld(_11914),{is_unit}==>proven_neg(onEvent(_11922,_11924))))),\+is_ftVar(pfclog((~currentWorld(_11914),{is_unit}==>proven_neg(onEvent(_11922,_11924)))))*->rhs([{with_current_why(pfclog((~currentWorld(_11914),{is_unit}==>proven_neg(onEvent(_11922,_11924)))),ignore(\+addAdmittedArguments(pfclog((~currentWorld(_11914),{is_unit}==>proven_neg(onEvent(_11922,_11924)))))))}])
- % Found positive trigger: boxlog((proven_neg(onEvent(_10484,_10486)):-proven_neg(currentWorld(_10494))))
- % body: compound(boxlog((proven_neg(onEvent(_10484,_10486)):-proven_neg(currentWorld(_10494))))),\+is_ftVar(boxlog((proven_neg(onEvent(_10484,_10486)):-proven_neg(currentWorld(_10494)))))*->rhs([{with_current_why(boxlog((proven_neg(onEvent(_10484,_10486)):-proven_neg(currentWorld(_10494)))),ignore(\+addAdmittedArguments(boxlog((proven_neg(onEvent(_10484,_10486)):-proven_neg(currentWorld(_10494)))))))}])
- % RHS-Post1: boxlog((currentWorld(_3378):-proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(currentWorld(_3378):-proven_tru(onEvent(_3366,_3368))))},boxlog((currentWorld(_3378):-proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((currentWorld(_51072):-proven_tru(onEvent(_51080, _51082))))).
- % Found positive trigger: boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524))))
- % body: compound(boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524))))),\+is_ftVar(boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524)))))*->rhs([{with_current_why(boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524)))),ignore(\+addAdmittedArguments(boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524)))))))}])
- % Found positive trigger: boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524))))}])
- % =boxlog=
- % currentWorld(_10514) :-
- % proven_tru(onEvent(_10522, _10524)).
- % Found positive trigger: boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524))))
- % body: is_kif_clause(boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524)))))*->rhs([clif(boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524)))))])
- % Found positive trigger: boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524))))
- % body: delistify_last_arg((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524))),boxlog_to_pfc,_26036),must_be_unqualified(_26036)*->rhs([pfclog(_26036)])
- % RHS-Post1: pfclog((onEvent(_10522,_10524),{is_unit}==>currentWorld(_10514)))
- % Support: boxlog((currentWorld(_10346):-proven_tru(onEvent(_10354,_10356)))),pt(boxlog((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524)))),(delistify_last_arg((currentWorld(_10514):-proven_tru(onEvent(_10522,_10524))),boxlog_to_pfc,(onEvent(_10522,_10524),{is_unit}==>currentWorld(_10514))),must_be_unqualified((onEvent(_10522,_10524),{is_unit}==>currentWorld(_10514)))*->rhs([pfclog((onEvent(_10522,_10524),{is_unit}==>currentWorld(_10514)))])))
- % r_sane:mpred_fwc1(pfclog((onEvent(_49776, _49778), {is_unit}==>currentWorld(_49782)))).
- % Found positive trigger: pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874)))
- % body: compound(pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874)))),\+is_ftVar(pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874))))*->rhs([{with_current_why(pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874))),ignore(\+addAdmittedArguments(pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874))))))}])
- % Found positive trigger: pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874)))}])
- % =pfclog=
- % onEvent(_11868, _11870), {is_unit}==>currentWorld(_11874).
- % Found positive trigger: pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874)))
- % body: is_kif_clause(pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874))))*->rhs([clif(pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874))))])
- % Found positive trigger: pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874)))
- % body: rhs([(onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874))])
- % RHS-Post1: onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874)
- % Support: pfclog((onEvent(_11696,_11698),{is_unit}==>currentWorld(_11702))),pt(pfclog((onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874))),rhs([(onEvent(_11868,_11870),{is_unit}==>currentWorld(_11874))]))
- % r_sane:mpred_fwc1((onEvent(_44992, _44994), {is_unit}==>currentWorld(_44998))).
- % Adding positive
- % trigger: onEvent(_12874,_12876)
- % body: is_unit*->rhs([currentWorld(_12880)])
- % Support: (onEvent(_13052,_13054),{is_unit}==>currentWorld(_13058)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % uses_predicate(header_sane, baseKB, onEvent, 2).
- % Found positive trigger: pfclog((onEvent(_11836,_11838),{is_unit}==>currentWorld(_11842)))
- % body: compound(pfclog((onEvent(_11836,_11838),{is_unit}==>currentWorld(_11842)))),\+is_ftVar(pfclog((onEvent(_11836,_11838),{is_unit}==>currentWorld(_11842))))*->rhs([{with_current_why(pfclog((onEvent(_11836,_11838),{is_unit}==>currentWorld(_11842))),ignore(\+addAdmittedArguments(pfclog((onEvent(_11836,_11838),{is_unit}==>currentWorld(_11842))))))}])
- % Found positive trigger: boxlog((currentWorld(_10482):-proven_tru(onEvent(_10490,_10492))))
- % body: compound(boxlog((currentWorld(_10482):-proven_tru(onEvent(_10490,_10492))))),\+is_ftVar(boxlog((currentWorld(_10482):-proven_tru(onEvent(_10490,_10492)))))*->rhs([{with_current_why(boxlog((currentWorld(_10482):-proven_tru(onEvent(_10490,_10492)))),ignore(\+addAdmittedArguments(boxlog((currentWorld(_10482):-proven_tru(onEvent(_10490,_10492)))))))}])
- % RHS-Post1: boxlog((inst(_3382,world):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(inst(_3382,world):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((inst(_3382,world):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((inst(_54770, world):- \+true_in_world(_54786, skInstExistsNextWorldTrueInWorld_20FnSk(_54792, _54786, _54796)), {_54770=skInstExistsNextWorldTrueInWorld_20FnSk(_54792, _54786, _54796)}, proven_tru(onEvent(_54796, _54786))))).
- % Found positive trigger: boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914))))
- % body: compound(boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914))))),\+is_ftVar(boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914)))))*->rhs([{with_current_why(boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914)))),ignore(\+addAdmittedArguments(boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914)))))))}])
- % Found positive trigger: boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914))))}])
- % =boxlog=
- % inst(_10898, world) :-
- % \+ true_in_world(_10914,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10920,
- % _10914,
- % _10924)),
- % { _10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920, _10914, _10924)
- % },
- % proven_tru(onEvent(_10924, _10914)).
- % Found positive trigger: boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914))))
- % body: is_kif_clause(boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914)))))*->rhs([clif(boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914)))))])
- % Found positive trigger: boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914))))
- % body: delistify_last_arg((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914))),boxlog_to_pfc,_30912),must_be_unqualified(_30912)*->rhs([pfclog(_30912)])
- % RHS-Post1: pfclog((\+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},onEvent(_10924,_10914),{is_unit(_10898)}==>inst(_10898,world)))
- % Support: boxlog((inst(_10626,world):- \+true_in_world(_10642,skInstExistsNextWorldTrueInWorld_20FnSk(_10648,_10642,_10652)),{_10626=skInstExistsNextWorldTrueInWorld_20FnSk(_10648,_10642,_10652)},proven_tru(onEvent(_10652,_10642)))),pt(boxlog((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914)))),(delistify_last_arg((inst(_10898,world):- \+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},proven_tru(onEvent(_10924,_10914))),boxlog_to_pfc,(\+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},onEvent(_10924,_10914),{is_unit(_10898)}==>inst(_10898,world))),must_be_unqualified((\+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},onEvent(_10924,_10914),{is_unit(_10898)}==>inst(_10898,world)))*->rhs([pfclog((\+true_in_world(_10914,skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)),{_10898=skInstExistsNextWorldTrueInWorld_20FnSk(_10920,_10914,_10924)},onEvent(_10924,_10914),{is_unit(_10898)}==>inst(_10898,world)))])))
- % r_sane:mpred_fwc1(pfclog((\+true_in_world(_24726, skInstExistsNextWorldTrueInWorld_20FnSk(_24732, _24726, _24736)), {_24750=skInstExistsNextWorldTrueInWorld_20FnSk(_24732, _24726, _24736)}, onEvent(_24736, _24726), {is_unit(_24750)}==>inst(_24750, world)))).
- % Found positive trigger: pfclog((\+true_in_world(_28430,skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)),{_28454=skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)},onEvent(_28440,_28430),{is_unit(_28454)}==>inst(_28454,world)))
- % body: compound(pfclog((\+true_in_world(_28430,skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)),{_28454=skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)},onEvent(_28440,_28430),{is_unit(_28454)}==>inst(_28454,world)))),\+is_ftVar(pfclog((\+true_in_world(_28430,skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)),{_28454=skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)},onEvent(_28440,_28430),{is_unit(_28454)}==>inst(_28454,world))))*->rhs([{with_current_why(pfclog((\+true_in_world(_28430,skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)),{_28454=skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)},onEvent(_28440,_28430),{is_unit(_28454)}==>inst(_28454,world))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_28430,skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)),{_28454=skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)},onEvent(_28440,_28430),{is_unit(_28454)}==>inst(_28454,world))))))}])
- % Found positive trigger: pfclog((\+true_in_world(_28430,skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)),{_28454=skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)},onEvent(_28440,_28430),{is_unit(_28454)}==>inst(_28454,world)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+true_in_world(_28430,skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)),{_28454=skInstExistsNextWorldTrueInWorld_20FnSk(_28436,_28430,_28440)},onEvent(_28440,_28430),{is_unit(_28454)}==>inst(_28454,world)))}])
- % =pfclog=
- % \+true_in_world(_28430, skInstExistsNextWorldTrueInWorld_20FnSk(_28436, _28430, _28440)), {_28454=skInstExistsNextWorldTrueInWorld_20FnSk(_28436, _28430, _28440)}, onEvent(_28440, _28430), {is_unit(_28454)}==>inst(_28454, world).
- % Found positive trigger: pfclog((\+true_in_world(_13020,skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)),{_13044=skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)},onEvent(_13030,_13020),{is_unit(_13044)}==>inst(_13044,world)))
- % body: is_kif_clause(pfclog((\+true_in_world(_13020,skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)),{_13044=skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)},onEvent(_13030,_13020),{is_unit(_13044)}==>inst(_13044,world))))*->rhs([clif(pfclog((\+true_in_world(_13020,skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)),{_13044=skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)},onEvent(_13030,_13020),{is_unit(_13044)}==>inst(_13044,world))))])
- % Found positive trigger: pfclog((\+true_in_world(_13020,skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)),{_13044=skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)},onEvent(_13030,_13020),{is_unit(_13044)}==>inst(_13044,world)))
- % body: rhs([(\+true_in_world(_13020,skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)),{_13044=skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)},onEvent(_13030,_13020),{is_unit(_13044)}==>inst(_13044,world))])
- % RHS-Post1: \+true_in_world(_13020,skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)),{_13044=skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)},onEvent(_13030,_13020),{is_unit(_13044)}==>inst(_13044,world)
- % Support: pfclog((\+true_in_world(_12728,skInstExistsNextWorldTrueInWorld_20FnSk(_12734,_12728,_12738)),{_12752=skInstExistsNextWorldTrueInWorld_20FnSk(_12734,_12728,_12738)},onEvent(_12738,_12728),{is_unit(_12752)}==>inst(_12752,world))),pt(pfclog((\+true_in_world(_13020,skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)),{_13044=skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)},onEvent(_13030,_13020),{is_unit(_13044)}==>inst(_13044,world))),rhs([(\+true_in_world(_13020,skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)),{_13044=skInstExistsNextWorldTrueInWorld_20FnSk(_13026,_13020,_13030)},onEvent(_13030,_13020),{is_unit(_13044)}==>inst(_13044,world))]))
- % r_sane:mpred_fwc1((\+true_in_world(_42252, skInstExistsNextWorldTrueInWorld_20FnSk(_42258, _42252, _42262)), {_42276=skInstExistsNextWorldTrueInWorld_20FnSk(_42258, _42252, _42262)}, onEvent(_42262, _42252), {is_unit(_42276)}==>inst(_42276, world))).
- % Adding negative
- % trigger: true_in_world(_14626,skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636))
- % test: call_u_no_bc(true_in_world(_14626,skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)))
- % body: _14650=skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)*->pt(onEvent(_14636,_14626),(is_unit(_14650)*->rhs([inst(_14650,world)])))
- % Support: (\+true_in_world(_14924,skInstExistsNextWorldTrueInWorld_20FnSk(_14930,_14924,_14934)),{_14948=skInstExistsNextWorldTrueInWorld_20FnSk(_14930,_14924,_14934)},onEvent(_14934,_14924),{is_unit(_14948)}==>inst(_14948,world)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % uses_predicate(header_sane, baseKB, true_in_world, 2).
- % Adding positive
- % trigger: onEvent(_14636,_14626)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636),world)])
- % Support: \+true_in_world(_14626,skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)),nt(true_in_world(_15632,skInstExistsNextWorldTrueInWorld_20FnSk(_15638,_15632,_15642)),call_u_no_bc(true_in_world(_14626,skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636))),(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)=skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)*->pt(onEvent(_14636,_14626),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636),world)])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: true_in_world(_15632,skInstExistsNextWorldTrueInWorld_20FnSk(_15638,_15632,_15642))
- % cond: call_u_no_bc(true_in_world(_14626,skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)=skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)*->pt(onEvent(_14636,_14626),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636),world)])))
- % from: mpred_add_support_fast(pt(onEvent(_14636,_14626),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636),world)]))),(\+true_in_world(_14626,skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)),nt(true_in_world(_15632,skInstExistsNextWorldTrueInWorld_20FnSk(_15638,_15632,_15642)),call_u_no_bc(true_in_world(_14626,skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636))),(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)=skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636)*->pt(onEvent(_14636,_14626),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14632,_14626,_14636),world)])))))))
- % Found positive trigger: pfclog((\+true_in_world(_12988,skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)),{_13012=skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)},onEvent(_12998,_12988),{is_unit(_13012)}==>inst(_13012,world)))
- % body: compound(pfclog((\+true_in_world(_12988,skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)),{_13012=skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)},onEvent(_12998,_12988),{is_unit(_13012)}==>inst(_13012,world)))),\+is_ftVar(pfclog((\+true_in_world(_12988,skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)),{_13012=skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)},onEvent(_12998,_12988),{is_unit(_13012)}==>inst(_13012,world))))*->rhs([{with_current_why(pfclog((\+true_in_world(_12988,skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)),{_13012=skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)},onEvent(_12998,_12988),{is_unit(_13012)}==>inst(_13012,world))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_12988,skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)),{_13012=skInstExistsNextWorldTrueInWorld_20FnSk(_12994,_12988,_12998)},onEvent(_12998,_12988),{is_unit(_13012)}==>inst(_13012,world))))))}])
- % Found positive trigger: boxlog((inst(_10866,world):- \+true_in_world(_10882,skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)),{_10866=skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)},proven_tru(onEvent(_10892,_10882))))
- % body: compound(boxlog((inst(_10866,world):- \+true_in_world(_10882,skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)),{_10866=skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)},proven_tru(onEvent(_10892,_10882))))),\+is_ftVar(boxlog((inst(_10866,world):- \+true_in_world(_10882,skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)),{_10866=skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)},proven_tru(onEvent(_10892,_10882)))))*->rhs([{with_current_why(boxlog((inst(_10866,world):- \+true_in_world(_10882,skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)),{_10866=skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)},proven_tru(onEvent(_10892,_10882)))),ignore(\+addAdmittedArguments(boxlog((inst(_10866,world):- \+true_in_world(_10882,skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)),{_10866=skInstExistsNextWorldTrueInWorld_20FnSk(_10888,_10882,_10892)},proven_tru(onEvent(_10892,_10882)))))))}])
- % RHS-Post1: boxlog((inst(_3382,world):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(inst(_3382,world):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((inst(_3382,world):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((inst(_34078, world):- \+nextWorld(_34094, skInstExistsNextWorldTrueInWorld_20FnSk(_34094, _34102, _34104)), {_34078=skInstExistsNextWorldTrueInWorld_20FnSk(_34094, _34102, _34104)}, proven_tru(onEvent(_34104, _34102))))).
- % Found positive trigger: boxlog((inst(_37410,world):- \+nextWorld(_37426,skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)),{_37410=skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)},proven_tru(onEvent(_37436,_37434))))
- % body: compound(boxlog((inst(_37410,world):- \+nextWorld(_37426,skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)),{_37410=skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)},proven_tru(onEvent(_37436,_37434))))),\+is_ftVar(boxlog((inst(_37410,world):- \+nextWorld(_37426,skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)),{_37410=skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)},proven_tru(onEvent(_37436,_37434)))))*->rhs([{with_current_why(boxlog((inst(_37410,world):- \+nextWorld(_37426,skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)),{_37410=skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)},proven_tru(onEvent(_37436,_37434)))),ignore(\+addAdmittedArguments(boxlog((inst(_37410,world):- \+nextWorld(_37426,skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)),{_37410=skInstExistsNextWorldTrueInWorld_20FnSk(_37426,_37434,_37436)},proven_tru(onEvent(_37436,_37434)))))))}])
- % Found positive trigger: boxlog((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998))))}])
- % =boxlog=
- % inst(_10974, world) :-
- % \+ nextWorld(_10990,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_10990,
- % _10998,
- % _11000)),
- % { _10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990, _10998, _11000)
- % },
- % proven_tru(onEvent(_11000, _10998)).
- % Found positive trigger: boxlog((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998))))
- % body: is_kif_clause(boxlog((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998)))))*->rhs([clif(boxlog((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998)))))])
- % Found positive trigger: boxlog((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998))))
- % body: delistify_last_arg((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998))),boxlog_to_pfc,_24340),must_be_unqualified(_24340)*->rhs([pfclog(_24340)])
- % RHS-Post1: pfclog((\+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},onEvent(_11000,_10998),{is_unit(_10974)}==>inst(_10974,world)))
- % Support: boxlog((inst(_10702,world):- \+nextWorld(_10718,skInstExistsNextWorldTrueInWorld_20FnSk(_10718,_10726,_10728)),{_10702=skInstExistsNextWorldTrueInWorld_20FnSk(_10718,_10726,_10728)},proven_tru(onEvent(_10728,_10726)))),pt(boxlog((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998)))),(delistify_last_arg((inst(_10974,world):- \+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},proven_tru(onEvent(_11000,_10998))),boxlog_to_pfc,(\+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},onEvent(_11000,_10998),{is_unit(_10974)}==>inst(_10974,world))),must_be_unqualified((\+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},onEvent(_11000,_10998),{is_unit(_10974)}==>inst(_10974,world)))*->rhs([pfclog((\+nextWorld(_10990,skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)),{_10974=skInstExistsNextWorldTrueInWorld_20FnSk(_10990,_10998,_11000)},onEvent(_11000,_10998),{is_unit(_10974)}==>inst(_10974,world)))])))
- % r_sane:mpred_fwc1(pfclog((\+nextWorld(_24788, skInstExistsNextWorldTrueInWorld_20FnSk(_24788, _24796, _24798)), {_24812=skInstExistsNextWorldTrueInWorld_20FnSk(_24788, _24796, _24798)}, onEvent(_24798, _24796), {is_unit(_24812)}==>inst(_24812, world)))).
- % Found positive trigger: pfclog((\+nextWorld(_28490,skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)),{_28514=skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)},onEvent(_28500,_28498),{is_unit(_28514)}==>inst(_28514,world)))
- % body: compound(pfclog((\+nextWorld(_28490,skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)),{_28514=skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)},onEvent(_28500,_28498),{is_unit(_28514)}==>inst(_28514,world)))),\+is_ftVar(pfclog((\+nextWorld(_28490,skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)),{_28514=skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)},onEvent(_28500,_28498),{is_unit(_28514)}==>inst(_28514,world))))*->rhs([{with_current_why(pfclog((\+nextWorld(_28490,skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)),{_28514=skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)},onEvent(_28500,_28498),{is_unit(_28514)}==>inst(_28514,world))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_28490,skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)),{_28514=skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)},onEvent(_28500,_28498),{is_unit(_28514)}==>inst(_28514,world))))))}])
- % Found positive trigger: pfclog((\+nextWorld(_28490,skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)),{_28514=skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)},onEvent(_28500,_28498),{is_unit(_28514)}==>inst(_28514,world)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+nextWorld(_28490,skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)),{_28514=skInstExistsNextWorldTrueInWorld_20FnSk(_28490,_28498,_28500)},onEvent(_28500,_28498),{is_unit(_28514)}==>inst(_28514,world)))}])
- % =pfclog=
- % \+nextWorld(_28490, skInstExistsNextWorldTrueInWorld_20FnSk(_28490, _28498, _28500)), {_28514=skInstExistsNextWorldTrueInWorld_20FnSk(_28490, _28498, _28500)}, onEvent(_28500, _28498), {is_unit(_28514)}==>inst(_28514, world).
- % Found positive trigger: pfclog((\+nextWorld(_13096,skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)),{_13120=skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)},onEvent(_13106,_13104),{is_unit(_13120)}==>inst(_13120,world)))
- % body: is_kif_clause(pfclog((\+nextWorld(_13096,skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)),{_13120=skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)},onEvent(_13106,_13104),{is_unit(_13120)}==>inst(_13120,world))))*->rhs([clif(pfclog((\+nextWorld(_13096,skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)),{_13120=skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)},onEvent(_13106,_13104),{is_unit(_13120)}==>inst(_13120,world))))])
- % Found positive trigger: pfclog((\+nextWorld(_13096,skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)),{_13120=skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)},onEvent(_13106,_13104),{is_unit(_13120)}==>inst(_13120,world)))
- % body: rhs([(\+nextWorld(_13096,skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)),{_13120=skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)},onEvent(_13106,_13104),{is_unit(_13120)}==>inst(_13120,world))])
- % RHS-Post1: \+nextWorld(_13096,skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)),{_13120=skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)},onEvent(_13106,_13104),{is_unit(_13120)}==>inst(_13120,world)
- % Support: pfclog((\+nextWorld(_12804,skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12812,_12814)),{_12828=skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12812,_12814)},onEvent(_12814,_12812),{is_unit(_12828)}==>inst(_12828,world))),pt(pfclog((\+nextWorld(_13096,skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)),{_13120=skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)},onEvent(_13106,_13104),{is_unit(_13120)}==>inst(_13120,world))),rhs([(\+nextWorld(_13096,skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)),{_13120=skInstExistsNextWorldTrueInWorld_20FnSk(_13096,_13104,_13106)},onEvent(_13106,_13104),{is_unit(_13120)}==>inst(_13120,world))]))
- % r_sane:mpred_fwc1((\+nextWorld(_42318, skInstExistsNextWorldTrueInWorld_20FnSk(_42318, _42326, _42328)), {_42342=skInstExistsNextWorldTrueInWorld_20FnSk(_42318, _42326, _42328)}, onEvent(_42328, _42326), {is_unit(_42342)}==>inst(_42342, world))).
- % Adding negative
- % trigger: nextWorld(_14702,skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712))
- % test: call_u_no_bc(nextWorld(_14702,skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)))
- % body: _14726=skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)*->pt(onEvent(_14712,_14710),(is_unit(_14726)*->rhs([inst(_14726,world)])))
- % Support: (\+nextWorld(_15000,skInstExistsNextWorldTrueInWorld_20FnSk(_15000,_15008,_15010)),{_15024=skInstExistsNextWorldTrueInWorld_20FnSk(_15000,_15008,_15010)},onEvent(_15010,_15008),{is_unit(_15024)}==>inst(_15024,world)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14712,_14710)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712),world)])
- % Support: \+nextWorld(_14702,skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)),nt(nextWorld(_15708,skInstExistsNextWorldTrueInWorld_20FnSk(_15708,_15716,_15718)),call_u_no_bc(nextWorld(_14702,skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712))),(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)=skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)*->pt(onEvent(_14712,_14710),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712),world)])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: nextWorld(_15708,skInstExistsNextWorldTrueInWorld_20FnSk(_15708,_15716,_15718))
- % cond: call_u_no_bc(nextWorld(_14702,skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)=skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)*->pt(onEvent(_14712,_14710),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712),world)])))
- % from: mpred_add_support_fast(pt(onEvent(_14712,_14710),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712),world)]))),(\+nextWorld(_14702,skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)),nt(nextWorld(_15708,skInstExistsNextWorldTrueInWorld_20FnSk(_15708,_15716,_15718)),call_u_no_bc(nextWorld(_14702,skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712))),(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)=skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712)*->pt(onEvent(_14712,_14710),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14702,_14710,_14712),world)])))))))
- % Found positive trigger: pfclog((\+nextWorld(_13064,skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)),{_13088=skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)},onEvent(_13074,_13072),{is_unit(_13088)}==>inst(_13088,world)))
- % body: compound(pfclog((\+nextWorld(_13064,skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)),{_13088=skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)},onEvent(_13074,_13072),{is_unit(_13088)}==>inst(_13088,world)))),\+is_ftVar(pfclog((\+nextWorld(_13064,skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)),{_13088=skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)},onEvent(_13074,_13072),{is_unit(_13088)}==>inst(_13088,world))))*->rhs([{with_current_why(pfclog((\+nextWorld(_13064,skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)),{_13088=skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)},onEvent(_13074,_13072),{is_unit(_13088)}==>inst(_13088,world))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_13064,skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)),{_13088=skInstExistsNextWorldTrueInWorld_20FnSk(_13064,_13072,_13074)},onEvent(_13074,_13072),{is_unit(_13088)}==>inst(_13088,world))))))}])
- % Found positive trigger: boxlog((inst(_10942,world):- \+nextWorld(_10958,skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)),{_10942=skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)},proven_tru(onEvent(_10968,_10966))))
- % body: compound(boxlog((inst(_10942,world):- \+nextWorld(_10958,skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)),{_10942=skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)},proven_tru(onEvent(_10968,_10966))))),\+is_ftVar(boxlog((inst(_10942,world):- \+nextWorld(_10958,skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)),{_10942=skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)},proven_tru(onEvent(_10968,_10966)))))*->rhs([{with_current_why(boxlog((inst(_10942,world):- \+nextWorld(_10958,skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)),{_10942=skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)},proven_tru(onEvent(_10968,_10966)))),ignore(\+addAdmittedArguments(boxlog((inst(_10942,world):- \+nextWorld(_10958,skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)),{_10942=skInstExistsNextWorldTrueInWorld_20FnSk(_10958,_10966,_10968)},proven_tru(onEvent(_10968,_10966)))))))}])
- % RHS-Post1: boxlog((inst(_3382,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(inst(_3382,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((inst(_3382,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((inst(_21288, world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_21310, _21312, _21314), world), {_21288=skInstExistsNextWorldTrueInWorld_20FnSk(_21310, _21312, _21314)}, proven_tru(onEvent(_21314, _21312))))).
- % Found positive trigger: boxlog((inst(_24618,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644),world),{_24618=skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644)},proven_tru(onEvent(_24644,_24642))))
- % body: compound(boxlog((inst(_24618,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644),world),{_24618=skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644)},proven_tru(onEvent(_24644,_24642))))),\+is_ftVar(boxlog((inst(_24618,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644),world),{_24618=skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644)},proven_tru(onEvent(_24644,_24642)))))*->rhs([{with_current_why(boxlog((inst(_24618,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644),world),{_24618=skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644)},proven_tru(onEvent(_24644,_24642)))),ignore(\+addAdmittedArguments(boxlog((inst(_24618,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644),world),{_24618=skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644)},proven_tru(onEvent(_24644,_24642)))))))}])
- % Found positive trigger: boxlog((inst(_24618,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644),world),{_24618=skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644)},proven_tru(onEvent(_24644,_24642))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(_24618,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644),world),{_24618=skInstExistsNextWorldTrueInWorld_20FnSk(_24640,_24642,_24644)},proven_tru(onEvent(_24644,_24642))))}])
- % =boxlog=
- % inst(_24618, world) :-
- % \+ inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24640, _24642, _24644),
- % world),
- % { _24618=skInstExistsNextWorldTrueInWorld_20FnSk(_24640, _24642, _24644)
- % },
- % proven_tru(onEvent(_24644, _24642)).
- % Found positive trigger: boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074))))
- % body: is_kif_clause(boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074)))))*->rhs([clif(boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074)))))])
- % Found positive trigger: boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074))))
- % body: delistify_last_arg((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074))),boxlog_to_pfc,_15428),must_be_unqualified(_15428)*->rhs([pfclog(_15428)])
- % RHS-Post1: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},onEvent(_11076,_11074),{is_unit(_11050)}==>inst(_11050,world)))
- % Support: boxlog((inst(_10778,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10800,_10802,_10804),world),{_10778=skInstExistsNextWorldTrueInWorld_20FnSk(_10800,_10802,_10804)},proven_tru(onEvent(_10804,_10802)))),pt(boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074)))),(delistify_last_arg((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074))),boxlog_to_pfc,(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},onEvent(_11076,_11074),{is_unit(_11050)}==>inst(_11050,world))),must_be_unqualified((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},onEvent(_11076,_11074),{is_unit(_11050)}==>inst(_11050,world)))*->rhs([pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},onEvent(_11076,_11074),{is_unit(_11050)}==>inst(_11050,world)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24888, _24890, _24892), world), {_24906=skInstExistsNextWorldTrueInWorld_20FnSk(_24888, _24890, _24892)}, onEvent(_24892, _24890), {is_unit(_24906)}==>inst(_24906, world)))).
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590),world),{_28604=skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590)},onEvent(_28590,_28588),{is_unit(_28604)}==>inst(_28604,world)))
- % body: compound(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590),world),{_28604=skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590)},onEvent(_28590,_28588),{is_unit(_28604)}==>inst(_28604,world)))),\+is_ftVar(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590),world),{_28604=skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590)},onEvent(_28590,_28588),{is_unit(_28604)}==>inst(_28604,world))))*->rhs([{with_current_why(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590),world),{_28604=skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590)},onEvent(_28590,_28588),{is_unit(_28604)}==>inst(_28604,world))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590),world),{_28604=skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590)},onEvent(_28590,_28588),{is_unit(_28604)}==>inst(_28604,world))))))}])
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590),world),{_28604=skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590)},onEvent(_28590,_28588),{is_unit(_28604)}==>inst(_28604,world)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590),world),{_28604=skInstExistsNextWorldTrueInWorld_20FnSk(_28586,_28588,_28590)},onEvent(_28590,_28588),{is_unit(_28604)}==>inst(_28604,world)))}])
- % =pfclog=
- % \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_28586, _28588, _28590), world), {_28604=skInstExistsNextWorldTrueInWorld_20FnSk(_28586, _28588, _28590)}, onEvent(_28590, _28588), {is_unit(_28604)}==>inst(_28604, world).
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world)))
- % body: is_kif_clause(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world))))*->rhs([clif(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world))))])
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world)))
- % body: rhs([(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world))])
- % RHS-Post1: \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world)
- % Support: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12890,_12892,_12894),world),{_12908=skInstExistsNextWorldTrueInWorld_20FnSk(_12890,_12892,_12894)},onEvent(_12894,_12892),{is_unit(_12908)}==>inst(_12908,world))),pt(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world))),rhs([(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world))]))
- % r_sane:mpred_fwc1((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_42402, _42404, _42406), world), {_42420=skInstExistsNextWorldTrueInWorld_20FnSk(_42402, _42404, _42406)}, onEvent(_42406, _42404), {is_unit(_42420)}==>inst(_42420, world))).
- % Adding negative
- % trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world)
- % test: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world))
- % body: _14838=skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824)*->pt(onEvent(_14824,_14822),(is_unit(_14838)*->rhs([inst(_14838,world)])))
- % Support: (\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15118,_15120,_15122),world),{_15136=skInstExistsNextWorldTrueInWorld_20FnSk(_15118,_15120,_15122)},onEvent(_15122,_15120),{is_unit(_15136)}==>inst(_15136,world)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14824,_14822)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world)])
- % Support: \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15826,_15828,_15830),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824)=skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824)*->pt(onEvent(_14824,_14822),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world)])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15826,_15828,_15830),world)
- % cond: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824)=skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824)*->pt(onEvent(_14824,_14822),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world)])))
- % from: mpred_add_support_fast(pt(onEvent(_14824,_14822),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world)]))),(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15826,_15828,_15830),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824)=skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824)*->pt(onEvent(_14824,_14822),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14820,_14822,_14824),world)])))))))
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world)))
- % body: compound(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world)))),\+is_ftVar(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world))))*->rhs([{with_current_why(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186),world),{_13200=skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13184,_13186)},onEvent(_13186,_13184),{is_unit(_13200)}==>inst(_13200,world))))))}])
- % Found positive trigger: boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074))))
- % body: compound(boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074))))),\+is_ftVar(boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074)))))*->rhs([{with_current_why(boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074)))),ignore(\+addAdmittedArguments(boxlog((inst(_11050,world):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076),world),{_11050=skInstExistsNextWorldTrueInWorld_20FnSk(_11072,_11074,_11076)},proven_tru(onEvent(_11076,_11074)))))))}])
- % RHS-Post1: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))},boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_20150, _20152, _20154), world):- \+true_in_world(_20152, _20170), proven_tru(onEvent(_20154, _20152))))).
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23184,_23186,_23188),world):- \+true_in_world(_23186,_23204),proven_tru(onEvent(_23188,_23186))))
- % body: compound(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23184,_23186,_23188),world):- \+true_in_world(_23186,_23204),proven_tru(onEvent(_23188,_23186))))),\+is_ftVar(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23184,_23186,_23188),world):- \+true_in_world(_23186,_23204),proven_tru(onEvent(_23188,_23186)))))*->rhs([{with_current_why(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23184,_23186,_23188),world):- \+true_in_world(_23186,_23204),proven_tru(onEvent(_23188,_23186)))),ignore(\+addAdmittedArguments(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23184,_23186,_23188),world):- \+true_in_world(_23186,_23204),proven_tru(onEvent(_23188,_23186)))))))}])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23184,_23186,_23188),world):- \+true_in_world(_23186,_23204),proven_tru(onEvent(_23188,_23186))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23184,_23186,_23188),world):- \+true_in_world(_23186,_23204),proven_tru(onEvent(_23188,_23186))))}])
- % =boxlog=
- % inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23184, _23186, _23188), world) :-
- % \+ true_in_world(_23186, _23204),
- % proven_tru(onEvent(_23188, _23186)).
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966))))
- % body: is_kif_clause(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966)))))*->rhs([clif(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966)))))])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966))))
- % body: delistify_last_arg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966))),boxlog_to_pfc,_15050),must_be_unqualified(_15050)*->rhs([pfclog(_15050)])
- % RHS-Post1: pfclog((\+true_in_world(_10966,_10984),onEvent(_10968,_10966),{is_unit(_10968,_10966)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world)))
- % Support: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10740,_10742,_10744),world):- \+true_in_world(_10742,_10760),proven_tru(onEvent(_10744,_10742)))),pt(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966)))),(delistify_last_arg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966))),boxlog_to_pfc,(\+true_in_world(_10966,_10984),onEvent(_10968,_10966),{is_unit(_10968,_10966)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world))),must_be_unqualified((\+true_in_world(_10966,_10984),onEvent(_10968,_10966),{is_unit(_10968,_10966)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world)))*->rhs([pfclog((\+true_in_world(_10966,_10984),onEvent(_10968,_10966),{is_unit(_10968,_10966)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world)))])))
- % r_sane:mpred_fwc1(pfclog((\+true_in_world(_48416, _48418), onEvent(_48428, _48416), {is_unit(_48428, _48416)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_48450, _48416, _48428), world)))).
- % Found positive trigger: pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)))
- % body: compound(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)))),\+is_ftVar(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))))*->rhs([{with_current_why(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))))))}])
- % Found positive trigger: pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)))}])
- % =pfclog=
- % \+true_in_world(_12770, _12772), onEvent(_12782, _12770), {is_unit(_12782, _12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804, _12770, _12782), world).
- % Found positive trigger: pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)))
- % body: is_kif_clause(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))))*->rhs([clif(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))))])
- % Found positive trigger: pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)))
- % body: rhs([(\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))])
- % RHS-Post1: \+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)
- % Support: pfclog((\+true_in_world(_12522,_12524),onEvent(_12534,_12522),{is_unit(_12534,_12522)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12556,_12522,_12534),world))),pt(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))),rhs([(\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))]))
- % r_sane:mpred_fwc1((\+true_in_world(_53706, _53708), onEvent(_53718, _53706), {is_unit(_53718, _53706)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_53740, _53706, _53718), world))).
- % Adding negative
- % trigger: true_in_world(_14184,_14186)
- % test: call_u_no_bc(true_in_world(_14184,_14186))
- % body: pt(onEvent(_14196,_14184),(is_unit(_14196,_14184)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14218,_14184,_14196),world)])))
- % Support: (\+true_in_world(_14438,_14440),onEvent(_14450,_14438),{is_unit(_14450,_14438)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14472,_14438,_14450),world)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14196,_14184)
- % body: is_unit(_14196,_14184)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14218,_14184,_14196),world)])
- % Support: \+true_in_world(_14184,_14186),nt(true_in_world(_15032,_15034),call_u_no_bc(true_in_world(_14184,_14186)),pt(onEvent(_14196,_14184),(is_unit(_14196,_14184)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14218,_14184,_14196),world)]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: true_in_world(_15032,_15034)
- % cond: call_u_no_bc(true_in_world(_14184,_14186))
- % action: pt(onEvent(_14196,_14184),(is_unit(_14196,_14184)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14218,_14184,_14196),world)])))
- % from: mpred_add_support_fast(pt(onEvent(_14196,_14184),(is_unit(_14196,_14184)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14218,_14184,_14196),world)]))),(\+true_in_world(_14184,_14186),nt(true_in_world(_15032,_15034),call_u_no_bc(true_in_world(_14184,_14186)),pt(onEvent(_14196,_14184),(is_unit(_14196,_14184)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14218,_14184,_14196),world)]))))))
- % Found positive trigger: pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)))
- % body: compound(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world)))),\+is_ftVar(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))))*->rhs([{with_current_why(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_12770,_12772),onEvent(_12782,_12770),{is_unit(_12782,_12770)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12804,_12770,_12782),world))))))}])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966))))
- % body: compound(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966))))),\+is_ftVar(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966)))))*->rhs([{with_current_why(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966)))),ignore(\+addAdmittedArguments(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10964,_10966,_10968),world):- \+true_in_world(_10966,_10984),proven_tru(onEvent(_10968,_10966)))))))}])
- % RHS-Post1: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))},boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_20206, _20208, _20210), world):- \+nextWorld(_20206, _20226), proven_tru(onEvent(_20210, _20208))))).
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23236,_23238,_23240),world):- \+nextWorld(_23236,_23256),proven_tru(onEvent(_23240,_23238))))
- % body: compound(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23236,_23238,_23240),world):- \+nextWorld(_23236,_23256),proven_tru(onEvent(_23240,_23238))))),\+is_ftVar(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23236,_23238,_23240),world):- \+nextWorld(_23236,_23256),proven_tru(onEvent(_23240,_23238)))))*->rhs([{with_current_why(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23236,_23238,_23240),world):- \+nextWorld(_23236,_23256),proven_tru(onEvent(_23240,_23238)))),ignore(\+addAdmittedArguments(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23236,_23238,_23240),world):- \+nextWorld(_23236,_23256),proven_tru(onEvent(_23240,_23238)))))))}])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23236,_23238,_23240),world):- \+nextWorld(_23236,_23256),proven_tru(onEvent(_23240,_23238))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23236,_23238,_23240),world):- \+nextWorld(_23236,_23256),proven_tru(onEvent(_23240,_23238))))}])
- % =boxlog=
- % inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23236, _23238, _23240), world) :-
- % \+ nextWorld(_23236, _23256),
- % proven_tru(onEvent(_23240, _23238)).
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018))))
- % body: is_kif_clause(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018)))))*->rhs([clif(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018)))))])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018))))
- % body: delistify_last_arg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018))),boxlog_to_pfc,_15098),must_be_unqualified(_15098)*->rhs([pfclog(_15098)])
- % RHS-Post1: pfclog((\+nextWorld(_11016,_11036),onEvent(_11020,_11018),{is_unit(_11020,_11018,_11016)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world)))
- % Support: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10792,_10794,_10796),world):- \+nextWorld(_10792,_10812),proven_tru(onEvent(_10796,_10794)))),pt(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018)))),(delistify_last_arg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018))),boxlog_to_pfc,(\+nextWorld(_11016,_11036),onEvent(_11020,_11018),{is_unit(_11020,_11018,_11016)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world))),must_be_unqualified((\+nextWorld(_11016,_11036),onEvent(_11020,_11018),{is_unit(_11020,_11018,_11016)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world)))*->rhs([pfclog((\+nextWorld(_11016,_11036),onEvent(_11020,_11018),{is_unit(_11020,_11018,_11016)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world)))])))
- % r_sane:mpred_fwc1(pfclog((\+nextWorld(_48654, _48656), onEvent(_48666, _48668), {is_unit(_48666, _48668, _48654)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_48654, _48668, _48666), world)))).
- % Found positive trigger: pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)))
- % body: compound(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)))),\+is_ftVar(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))))*->rhs([{with_current_why(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))))))}])
- % Found positive trigger: pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)))}])
- % =pfclog=
- % \+nextWorld(_12836, _12838), onEvent(_12848, _12850), {is_unit(_12848, _12850, _12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836, _12850, _12848), world).
- % Found positive trigger: pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)))
- % body: is_kif_clause(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))))*->rhs([clif(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))))])
- % Found positive trigger: pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)))
- % body: rhs([(\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))])
- % RHS-Post1: \+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)
- % Support: pfclog((\+nextWorld(_12584,_12586),onEvent(_12596,_12598),{is_unit(_12596,_12598,_12584)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12584,_12598,_12596),world))),pt(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))),rhs([(\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))]))
- % r_sane:mpred_fwc1((\+nextWorld(_54212, _54214), onEvent(_54224, _54226), {is_unit(_54224, _54226, _54212)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_54212, _54226, _54224), world))).
- % Adding negative
- % trigger: nextWorld(_14270,_14272)
- % test: call_u_no_bc(nextWorld(_14270,_14272))
- % body: pt(onEvent(_14282,_14284),(is_unit(_14282,_14284,_14270)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14270,_14284,_14282),world)])))
- % Support: (\+nextWorld(_14528,_14530),onEvent(_14540,_14542),{is_unit(_14540,_14542,_14528)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14528,_14542,_14540),world)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14282,_14284)
- % body: is_unit(_14282,_14284,_14270)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14270,_14284,_14282),world)])
- % Support: \+nextWorld(_14270,_14272),nt(nextWorld(_15130,_15132),call_u_no_bc(nextWorld(_14270,_14272)),pt(onEvent(_14282,_14284),(is_unit(_14282,_14284,_14270)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14270,_14284,_14282),world)]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: nextWorld(_15130,_15132)
- % cond: call_u_no_bc(nextWorld(_14270,_14272))
- % action: pt(onEvent(_14282,_14284),(is_unit(_14282,_14284,_14270)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14270,_14284,_14282),world)])))
- % from: mpred_add_support_fast(pt(onEvent(_14282,_14284),(is_unit(_14282,_14284,_14270)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14270,_14284,_14282),world)]))),(\+nextWorld(_14270,_14272),nt(nextWorld(_15130,_15132),call_u_no_bc(nextWorld(_14270,_14272)),pt(onEvent(_14282,_14284),(is_unit(_14282,_14284,_14270)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14270,_14284,_14282),world)]))))))
- % Found positive trigger: pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)))
- % body: compound(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world)))),\+is_ftVar(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))))*->rhs([{with_current_why(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_12836,_12838),onEvent(_12848,_12850),{is_unit(_12848,_12850,_12836)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12836,_12850,_12848),world))))))}])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018))))
- % body: compound(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018))))),\+is_ftVar(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018)))))*->rhs([{with_current_why(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018)))),ignore(\+addAdmittedArguments(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11016,_11018,_11020),world):- \+nextWorld(_11016,_11036),proven_tru(onEvent(_11020,_11018)))))))}])
- % RHS-Post1: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))},boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_20266, _20268, _20270), world):- \+inst(_20284, world), proven_tru(onEvent(_20270, _20268))))).
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23296,_23298,_23300),world):- \+inst(_23314,world),proven_tru(onEvent(_23300,_23298))))
- % body: compound(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23296,_23298,_23300),world):- \+inst(_23314,world),proven_tru(onEvent(_23300,_23298))))),\+is_ftVar(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23296,_23298,_23300),world):- \+inst(_23314,world),proven_tru(onEvent(_23300,_23298)))))*->rhs([{with_current_why(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23296,_23298,_23300),world):- \+inst(_23314,world),proven_tru(onEvent(_23300,_23298)))),ignore(\+addAdmittedArguments(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23296,_23298,_23300),world):- \+inst(_23314,world),proven_tru(onEvent(_23300,_23298)))))))}])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23296,_23298,_23300),world):- \+inst(_23314,world),proven_tru(onEvent(_23300,_23298))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23296,_23298,_23300),world):- \+inst(_23314,world),proven_tru(onEvent(_23300,_23298))))}])
- % =boxlog=
- % inst(skInstExistsNextWorldTrueInWorld_20FnSk(_23296, _23298, _23300), world) :-
- % \+ inst(_23314, world),
- % proven_tru(onEvent(_23300, _23298)).
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070))))
- % body: is_kif_clause(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070)))))*->rhs([clif(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070)))))])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070))))
- % body: delistify_last_arg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070))),boxlog_to_pfc,_15146),must_be_unqualified(_15146)*->rhs([pfclog(_15146)])
- % RHS-Post1: pfclog((\+inst(_11086,world),onEvent(_11072,_11070),{is_unit(_11072,_11070)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world)))
- % Support: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_10844,_10846,_10848),world):- \+inst(_10862,world),proven_tru(onEvent(_10848,_10846)))),pt(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070)))),(delistify_last_arg((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070))),boxlog_to_pfc,(\+inst(_11086,world),onEvent(_11072,_11070),{is_unit(_11072,_11070)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world))),must_be_unqualified((\+inst(_11086,world),onEvent(_11072,_11070),{is_unit(_11072,_11070)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world)))*->rhs([pfclog((\+inst(_11086,world),onEvent(_11072,_11070),{is_unit(_11072,_11070)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(_48484, world), onEvent(_48496, _48498), {is_unit(_48496, _48498)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_48518, _48498, _48496), world)))).
- % Found positive trigger: pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)))
- % body: compound(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)))),\+is_ftVar(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))))*->rhs([{with_current_why(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))),ignore(\+addAdmittedArguments(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))))))}])
- % Found positive trigger: pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)))}])
- % =pfclog=
- % \+inst(_12874, world), onEvent(_12886, _12888), {is_unit(_12886, _12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908, _12888, _12886), world).
- % Found positive trigger: pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)))
- % body: is_kif_clause(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))))*->rhs([clif(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))))])
- % Found positive trigger: pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)))
- % body: rhs([(\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))])
- % RHS-Post1: \+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)
- % Support: pfclog((\+inst(_12626,world),onEvent(_12638,_12640),{is_unit(_12638,_12640)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12660,_12640,_12638),world))),pt(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))),rhs([(\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))]))
- % r_sane:mpred_fwc1((\+inst(_53760, world), onEvent(_53772, _53774), {is_unit(_53772, _53774)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_53794, _53774, _53772), world))).
- % Adding negative
- % trigger: inst(_14288,world)
- % test: call_u_no_bc(inst(_14288,world))
- % body: pt(onEvent(_14300,_14302),(is_unit(_14300,_14302)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14322,_14302,_14300),world)])))
- % Support: (\+inst(_14542,world),onEvent(_14554,_14556),{is_unit(_14554,_14556)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14576,_14556,_14554),world)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14300,_14302)
- % body: is_unit(_14300,_14302)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14322,_14302,_14300),world)])
- % Support: \+inst(_14288,world),nt(inst(_15136,world),call_u_no_bc(inst(_14288,world)),pt(onEvent(_14300,_14302),(is_unit(_14300,_14302)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14322,_14302,_14300),world)]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(_15136,world)
- % cond: call_u_no_bc(inst(_14288,world))
- % action: pt(onEvent(_14300,_14302),(is_unit(_14300,_14302)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14322,_14302,_14300),world)])))
- % from: mpred_add_support_fast(pt(onEvent(_14300,_14302),(is_unit(_14300,_14302)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14322,_14302,_14300),world)]))),(\+inst(_14288,world),nt(inst(_15136,world),call_u_no_bc(inst(_14288,world)),pt(onEvent(_14300,_14302),(is_unit(_14300,_14302)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14322,_14302,_14300),world)]))))))
- % Found positive trigger: pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)))
- % body: compound(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world)))),\+is_ftVar(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))))*->rhs([{with_current_why(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))),ignore(\+addAdmittedArguments(pfclog((\+inst(_12874,world),onEvent(_12886,_12888),{is_unit(_12886,_12888)}==>inst(skInstExistsNextWorldTrueInWorld_20FnSk(_12908,_12888,_12886),world))))))}])
- % Found positive trigger: boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070))))
- % body: compound(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070))))),\+is_ftVar(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070)))))*->rhs([{with_current_why(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070)))),ignore(\+addAdmittedArguments(boxlog((inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11068,_11070,_11072),world):- \+inst(_11086,world),proven_tru(onEvent(_11072,_11070)))))))}])
- % RHS-Post1: boxlog((nextWorld(_3378,_3382):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(nextWorld(_3378,_3382):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((nextWorld(_3378,_3382):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((nextWorld(_21488, _21490):- \+true_in_world(_21504, skInstExistsNextWorldTrueInWorld_20FnSk(_21488, _21504, _21514)), {_21490=skInstExistsNextWorldTrueInWorld_20FnSk(_21488, _21504, _21514)}, proven_tru(onEvent(_21514, _21504))))).
- % Found positive trigger: boxlog((nextWorld(_24826,_24828):- \+true_in_world(_24842,skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)),{_24828=skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)},proven_tru(onEvent(_24852,_24842))))
- % body: compound(boxlog((nextWorld(_24826,_24828):- \+true_in_world(_24842,skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)),{_24828=skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)},proven_tru(onEvent(_24852,_24842))))),\+is_ftVar(boxlog((nextWorld(_24826,_24828):- \+true_in_world(_24842,skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)),{_24828=skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)},proven_tru(onEvent(_24852,_24842)))))*->rhs([{with_current_why(boxlog((nextWorld(_24826,_24828):- \+true_in_world(_24842,skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)),{_24828=skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)},proven_tru(onEvent(_24852,_24842)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_24826,_24828):- \+true_in_world(_24842,skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)),{_24828=skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)},proven_tru(onEvent(_24852,_24842)))))))}])
- % Found positive trigger: boxlog((nextWorld(_24826,_24828):- \+true_in_world(_24842,skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)),{_24828=skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)},proven_tru(onEvent(_24852,_24842))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((nextWorld(_24826,_24828):- \+true_in_world(_24842,skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)),{_24828=skInstExistsNextWorldTrueInWorld_20FnSk(_24826,_24842,_24852)},proven_tru(onEvent(_24852,_24842))))}])
- % =boxlog=
- % nextWorld(_24826, _24828) :-
- % \+ true_in_world(_24842,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_24826,
- % _24842,
- % _24852)),
- % { _24828=skInstExistsNextWorldTrueInWorld_20FnSk(_24826, _24842, _24852)
- % },
- % proven_tru(onEvent(_24852, _24842)).
- % Found positive trigger: boxlog((nextWorld(_11282,_11284):- \+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},proven_tru(onEvent(_11308,_11298))))
- % body: is_kif_clause(boxlog((nextWorld(_11282,_11284):- \+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},proven_tru(onEvent(_11308,_11298)))))*->rhs([clif(boxlog((nextWorld(_11282,_11284):- \+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},proven_tru(onEvent(_11308,_11298)))))])
- % Found positive trigger: boxlog((nextWorld(_11282,_11284):- \+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},proven_tru(onEvent(_11308,_11298))))
- % body: delistify_last_arg((nextWorld(_11282,_11284):- \+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},proven_tru(onEvent(_11308,_11298))),boxlog_to_pfc,_15672),must_be_unqualified(_15672)*->rhs([pfclog(_15672)])
- % RHS-Post1: pfclog((\+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},onEvent(_11308,_11298),{is_unit(_11284,_11282)}==>nextWorld(_11282,_11284)))
- % Support: boxlog((nextWorld(_11010,_11012):- \+true_in_world(_11026,skInstExistsNextWorldTrueInWorld_20FnSk(_11010,_11026,_11036)),{_11012=skInstExistsNextWorldTrueInWorld_20FnSk(_11010,_11026,_11036)},proven_tru(onEvent(_11036,_11026)))),pt(boxlog((nextWorld(_11282,_11284):- \+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},proven_tru(onEvent(_11308,_11298)))),(delistify_last_arg((nextWorld(_11282,_11284):- \+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},proven_tru(onEvent(_11308,_11298))),boxlog_to_pfc,(\+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},onEvent(_11308,_11298),{is_unit(_11284,_11282)}==>nextWorld(_11282,_11284))),must_be_unqualified((\+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},onEvent(_11308,_11298),{is_unit(_11284,_11282)}==>nextWorld(_11282,_11284)))*->rhs([pfclog((\+true_in_world(_11298,skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)),{_11284=skInstExistsNextWorldTrueInWorld_20FnSk(_11282,_11298,_11308)},onEvent(_11308,_11298),{is_unit(_11284,_11282)}==>nextWorld(_11282,_11284)))])))
- % r_sane:mpred_fwc1(pfclog((\+true_in_world(_25210, skInstExistsNextWorldTrueInWorld_20FnSk(_25216, _25210, _25220)), {_25234=skInstExistsNextWorldTrueInWorld_20FnSk(_25216, _25210, _25220)}, onEvent(_25220, _25210), {is_unit(_25234, _25216)}==>nextWorld(_25216, _25234)))).
- % Found positive trigger: pfclog((\+true_in_world(_28938,skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)),{_28962=skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)},onEvent(_28948,_28938),{is_unit(_28962,_28944)}==>nextWorld(_28944,_28962)))
- % body: compound(pfclog((\+true_in_world(_28938,skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)),{_28962=skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)},onEvent(_28948,_28938),{is_unit(_28962,_28944)}==>nextWorld(_28944,_28962)))),\+is_ftVar(pfclog((\+true_in_world(_28938,skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)),{_28962=skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)},onEvent(_28948,_28938),{is_unit(_28962,_28944)}==>nextWorld(_28944,_28962))))*->rhs([{with_current_why(pfclog((\+true_in_world(_28938,skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)),{_28962=skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)},onEvent(_28948,_28938),{is_unit(_28962,_28944)}==>nextWorld(_28944,_28962))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_28938,skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)),{_28962=skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)},onEvent(_28948,_28938),{is_unit(_28962,_28944)}==>nextWorld(_28944,_28962))))))}])
- % Found positive trigger: pfclog((\+true_in_world(_28938,skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)),{_28962=skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)},onEvent(_28948,_28938),{is_unit(_28962,_28944)}==>nextWorld(_28944,_28962)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+true_in_world(_28938,skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)),{_28962=skInstExistsNextWorldTrueInWorld_20FnSk(_28944,_28938,_28948)},onEvent(_28948,_28938),{is_unit(_28962,_28944)}==>nextWorld(_28944,_28962)))}])
- % =pfclog=
- % \+true_in_world(_28938, skInstExistsNextWorldTrueInWorld_20FnSk(_28944, _28938, _28948)), {_28962=skInstExistsNextWorldTrueInWorld_20FnSk(_28944, _28938, _28948)}, onEvent(_28948, _28938), {is_unit(_28962, _28944)}==>nextWorld(_28944, _28962).
- % Found positive trigger: pfclog((\+true_in_world(_13422,skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)),{_13446=skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)},onEvent(_13432,_13422),{is_unit(_13446,_13428)}==>nextWorld(_13428,_13446)))
- % body: is_kif_clause(pfclog((\+true_in_world(_13422,skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)),{_13446=skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)},onEvent(_13432,_13422),{is_unit(_13446,_13428)}==>nextWorld(_13428,_13446))))*->rhs([clif(pfclog((\+true_in_world(_13422,skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)),{_13446=skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)},onEvent(_13432,_13422),{is_unit(_13446,_13428)}==>nextWorld(_13428,_13446))))])
- % Found positive trigger: pfclog((\+true_in_world(_13422,skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)),{_13446=skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)},onEvent(_13432,_13422),{is_unit(_13446,_13428)}==>nextWorld(_13428,_13446)))
- % body: rhs([(\+true_in_world(_13422,skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)),{_13446=skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)},onEvent(_13432,_13422),{is_unit(_13446,_13428)}==>nextWorld(_13428,_13446))])
- % RHS-Post1: \+true_in_world(_13422,skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)),{_13446=skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)},onEvent(_13432,_13422),{is_unit(_13446,_13428)}==>nextWorld(_13428,_13446)
- % Support: pfclog((\+true_in_world(_13126,skInstExistsNextWorldTrueInWorld_20FnSk(_13132,_13126,_13136)),{_13150=skInstExistsNextWorldTrueInWorld_20FnSk(_13132,_13126,_13136)},onEvent(_13136,_13126),{is_unit(_13150,_13132)}==>nextWorld(_13132,_13150))),pt(pfclog((\+true_in_world(_13422,skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)),{_13446=skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)},onEvent(_13432,_13422),{is_unit(_13446,_13428)}==>nextWorld(_13428,_13446))),rhs([(\+true_in_world(_13422,skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)),{_13446=skInstExistsNextWorldTrueInWorld_20FnSk(_13428,_13422,_13432)},onEvent(_13432,_13422),{is_unit(_13446,_13428)}==>nextWorld(_13428,_13446))]))
- % r_sane:mpred_fwc1((\+true_in_world(_43062, skInstExistsNextWorldTrueInWorld_20FnSk(_43068, _43062, _43072)), {_43086=skInstExistsNextWorldTrueInWorld_20FnSk(_43068, _43062, _43072)}, onEvent(_43072, _43062), {is_unit(_43086, _43068)}==>nextWorld(_43068, _43086))).
- % Adding negative
- % trigger: true_in_world(_15048,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058))
- % test: call_u_no_bc(true_in_world(_15048,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)))
- % body: _15072=skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)*->pt(onEvent(_15058,_15048),(is_unit(_15072,_15054)*->rhs([nextWorld(_15054,_15072)])))
- % Support: (\+true_in_world(_15350,skInstExistsNextWorldTrueInWorld_20FnSk(_15356,_15350,_15360)),{_15374=skInstExistsNextWorldTrueInWorld_20FnSk(_15356,_15350,_15360)},onEvent(_15360,_15350),{is_unit(_15374,_15356)}==>nextWorld(_15356,_15374)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_15058,_15048)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058),_15054)*->rhs([nextWorld(_15054,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058))])
- % Support: \+true_in_world(_15048,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)),nt(true_in_world(_16098,skInstExistsNextWorldTrueInWorld_20FnSk(_16104,_16098,_16108)),call_u_no_bc(true_in_world(_15048,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058))),(skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)=skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)*->pt(onEvent(_15058,_15048),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058),_15054)*->rhs([nextWorld(_15054,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058))])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: true_in_world(_16098,skInstExistsNextWorldTrueInWorld_20FnSk(_16104,_16098,_16108))
- % cond: call_u_no_bc(true_in_world(_15048,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)=skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)*->pt(onEvent(_15058,_15048),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058),_15054)*->rhs([nextWorld(_15054,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058))])))
- % from: mpred_add_support_fast(pt(onEvent(_15058,_15048),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058),_15054)*->rhs([nextWorld(_15054,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058))]))),(\+true_in_world(_15048,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)),nt(true_in_world(_16098,skInstExistsNextWorldTrueInWorld_20FnSk(_16104,_16098,_16108)),call_u_no_bc(true_in_world(_15048,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058))),(skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)=skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058)*->pt(onEvent(_15058,_15048),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058),_15054)*->rhs([nextWorld(_15054,skInstExistsNextWorldTrueInWorld_20FnSk(_15054,_15048,_15058))])))))))
- % Found positive trigger: pfclog((\+true_in_world(_13390,skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)),{_13414=skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)},onEvent(_13400,_13390),{is_unit(_13414,_13396)}==>nextWorld(_13396,_13414)))
- % body: compound(pfclog((\+true_in_world(_13390,skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)),{_13414=skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)},onEvent(_13400,_13390),{is_unit(_13414,_13396)}==>nextWorld(_13396,_13414)))),\+is_ftVar(pfclog((\+true_in_world(_13390,skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)),{_13414=skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)},onEvent(_13400,_13390),{is_unit(_13414,_13396)}==>nextWorld(_13396,_13414))))*->rhs([{with_current_why(pfclog((\+true_in_world(_13390,skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)),{_13414=skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)},onEvent(_13400,_13390),{is_unit(_13414,_13396)}==>nextWorld(_13396,_13414))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_13390,skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)),{_13414=skInstExistsNextWorldTrueInWorld_20FnSk(_13396,_13390,_13400)},onEvent(_13400,_13390),{is_unit(_13414,_13396)}==>nextWorld(_13396,_13414))))))}])
- % Found positive trigger: boxlog((nextWorld(_11250,_11252):- \+true_in_world(_11266,skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)),{_11252=skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)},proven_tru(onEvent(_11276,_11266))))
- % body: compound(boxlog((nextWorld(_11250,_11252):- \+true_in_world(_11266,skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)),{_11252=skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)},proven_tru(onEvent(_11276,_11266))))),\+is_ftVar(boxlog((nextWorld(_11250,_11252):- \+true_in_world(_11266,skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)),{_11252=skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)},proven_tru(onEvent(_11276,_11266)))))*->rhs([{with_current_why(boxlog((nextWorld(_11250,_11252):- \+true_in_world(_11266,skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)),{_11252=skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)},proven_tru(onEvent(_11276,_11266)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_11250,_11252):- \+true_in_world(_11266,skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)),{_11252=skInstExistsNextWorldTrueInWorld_20FnSk(_11250,_11266,_11276)},proven_tru(onEvent(_11276,_11266)))))))}])
- % RHS-Post1: boxlog((nextWorld(_3378,_3382):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(nextWorld(_3378,_3382):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((nextWorld(_3378,_3382):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((nextWorld(_21574, _21576):- \+nextWorld(_21574, skInstExistsNextWorldTrueInWorld_20FnSk(_21574, _21598, _21600)), {_21576=skInstExistsNextWorldTrueInWorld_20FnSk(_21574, _21598, _21600)}, proven_tru(onEvent(_21600, _21598))))).
- % Found positive trigger: boxlog((nextWorld(_24908,_24910):- \+nextWorld(_24908,skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)),{_24910=skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)},proven_tru(onEvent(_24934,_24932))))
- % body: compound(boxlog((nextWorld(_24908,_24910):- \+nextWorld(_24908,skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)),{_24910=skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)},proven_tru(onEvent(_24934,_24932))))),\+is_ftVar(boxlog((nextWorld(_24908,_24910):- \+nextWorld(_24908,skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)),{_24910=skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)},proven_tru(onEvent(_24934,_24932)))))*->rhs([{with_current_why(boxlog((nextWorld(_24908,_24910):- \+nextWorld(_24908,skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)),{_24910=skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)},proven_tru(onEvent(_24934,_24932)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_24908,_24910):- \+nextWorld(_24908,skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)),{_24910=skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)},proven_tru(onEvent(_24934,_24932)))))))}])
- % Found positive trigger: boxlog((nextWorld(_24908,_24910):- \+nextWorld(_24908,skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)),{_24910=skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)},proven_tru(onEvent(_24934,_24932))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((nextWorld(_24908,_24910):- \+nextWorld(_24908,skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)),{_24910=skInstExistsNextWorldTrueInWorld_20FnSk(_24908,_24932,_24934)},proven_tru(onEvent(_24934,_24932))))}])
- % =boxlog=
- % nextWorld(_24908, _24910) :-
- % \+ nextWorld(_24908,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_24908,
- % _24932,
- % _24934)),
- % { _24910=skInstExistsNextWorldTrueInWorld_20FnSk(_24908, _24932, _24934)
- % },
- % proven_tru(onEvent(_24934, _24932)).
- % Found positive trigger: boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382))))
- % body: is_kif_clause(boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382)))))*->rhs([clif(boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382)))))])
- % Found positive trigger: boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382))))
- % body: delistify_last_arg((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382))),boxlog_to_pfc,_15744),must_be_unqualified(_15744)*->rhs([pfclog(_15744)])
- % RHS-Post1: pfclog((\+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},onEvent(_11384,_11382),{is_unit(_11360,_11358)}==>nextWorld(_11358,_11360)))
- % Support: boxlog((nextWorld(_11086,_11088):- \+nextWorld(_11086,skInstExistsNextWorldTrueInWorld_20FnSk(_11086,_11110,_11112)),{_11088=skInstExistsNextWorldTrueInWorld_20FnSk(_11086,_11110,_11112)},proven_tru(onEvent(_11112,_11110)))),pt(boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382)))),(delistify_last_arg((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382))),boxlog_to_pfc,(\+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},onEvent(_11384,_11382),{is_unit(_11360,_11358)}==>nextWorld(_11358,_11360))),must_be_unqualified((\+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},onEvent(_11384,_11382),{is_unit(_11360,_11358)}==>nextWorld(_11358,_11360)))*->rhs([pfclog((\+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},onEvent(_11384,_11382),{is_unit(_11360,_11358)}==>nextWorld(_11358,_11360)))])))
- % r_sane:mpred_fwc1(pfclog((\+nextWorld(_25274, skInstExistsNextWorldTrueInWorld_20FnSk(_25274, _25282, _25284)), {_25298=skInstExistsNextWorldTrueInWorld_20FnSk(_25274, _25282, _25284)}, onEvent(_25284, _25282), {is_unit(_25298, _25274)}==>nextWorld(_25274, _25298)))).
- % Found positive trigger: pfclog((\+nextWorld(_29000,skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)),{_29024=skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)},onEvent(_29010,_29008),{is_unit(_29024,_29000)}==>nextWorld(_29000,_29024)))
- % body: compound(pfclog((\+nextWorld(_29000,skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)),{_29024=skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)},onEvent(_29010,_29008),{is_unit(_29024,_29000)}==>nextWorld(_29000,_29024)))),\+is_ftVar(pfclog((\+nextWorld(_29000,skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)),{_29024=skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)},onEvent(_29010,_29008),{is_unit(_29024,_29000)}==>nextWorld(_29000,_29024))))*->rhs([{with_current_why(pfclog((\+nextWorld(_29000,skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)),{_29024=skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)},onEvent(_29010,_29008),{is_unit(_29024,_29000)}==>nextWorld(_29000,_29024))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_29000,skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)),{_29024=skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)},onEvent(_29010,_29008),{is_unit(_29024,_29000)}==>nextWorld(_29000,_29024))))))}])
- % Found positive trigger: pfclog((\+nextWorld(_29000,skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)),{_29024=skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)},onEvent(_29010,_29008),{is_unit(_29024,_29000)}==>nextWorld(_29000,_29024)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+nextWorld(_29000,skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)),{_29024=skInstExistsNextWorldTrueInWorld_20FnSk(_29000,_29008,_29010)},onEvent(_29010,_29008),{is_unit(_29024,_29000)}==>nextWorld(_29000,_29024)))}])
- % =pfclog=
- % \+nextWorld(_29000, skInstExistsNextWorldTrueInWorld_20FnSk(_29000, _29008, _29010)), {_29024=skInstExistsNextWorldTrueInWorld_20FnSk(_29000, _29008, _29010)}, onEvent(_29010, _29008), {is_unit(_29024, _29000)}==>nextWorld(_29000, _29024).
- % Found positive trigger: pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522)))
- % body: is_kif_clause(pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522))))*->rhs([clif(pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522))))])
- % Found positive trigger: pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522)))
- % body: rhs([(\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522))])
- % RHS-Post1: \+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522)
- % Support: pfclog((\+nextWorld(_13202,skInstExistsNextWorldTrueInWorld_20FnSk(_13202,_13210,_13212)),{_13226=skInstExistsNextWorldTrueInWorld_20FnSk(_13202,_13210,_13212)},onEvent(_13212,_13210),{is_unit(_13226,_13202)}==>nextWorld(_13202,_13226))),pt(pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522))),rhs([(\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522))]))
- % r_sane:mpred_fwc1((\+nextWorld(_43130, skInstExistsNextWorldTrueInWorld_20FnSk(_43130, _43138, _43140)), {_43154=skInstExistsNextWorldTrueInWorld_20FnSk(_43130, _43138, _43140)}, onEvent(_43140, _43138), {is_unit(_43154, _43130)}==>nextWorld(_43130, _43154))).
- % Adding negative
- % trigger: nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166))
- % test: call_u_no_bc(nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)))
- % body: _15180=skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)*->pt(onEvent(_15166,_15164),(is_unit(_15180,_15156)*->rhs([nextWorld(_15156,_15180)])))
- % Support: (\+nextWorld(_15458,skInstExistsNextWorldTrueInWorld_20FnSk(_15458,_15466,_15468)),{_15482=skInstExistsNextWorldTrueInWorld_20FnSk(_15458,_15466,_15468)},onEvent(_15468,_15466),{is_unit(_15482,_15458)}==>nextWorld(_15458,_15482)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_15166,_15164)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166),_15156)*->rhs([nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166))])
- % Support: \+nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)),nt(nextWorld(_16174,skInstExistsNextWorldTrueInWorld_20FnSk(_16174,_16182,_16184)),call_u_no_bc(nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166))),(skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)=skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)*->pt(onEvent(_15166,_15164),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166),_15156)*->rhs([nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166))])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: nextWorld(_16174,skInstExistsNextWorldTrueInWorld_20FnSk(_16174,_16182,_16184))
- % cond: call_u_no_bc(nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)=skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)*->pt(onEvent(_15166,_15164),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166),_15156)*->rhs([nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166))])))
- % from: mpred_add_support_fast(pt(onEvent(_15166,_15164),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166),_15156)*->rhs([nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166))]))),(\+nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)),nt(nextWorld(_16174,skInstExistsNextWorldTrueInWorld_20FnSk(_16174,_16182,_16184)),call_u_no_bc(nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166))),(skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)=skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166)*->pt(onEvent(_15166,_15164),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166),_15156)*->rhs([nextWorld(_15156,skInstExistsNextWorldTrueInWorld_20FnSk(_15156,_15164,_15166))])))))))
- % Found positive trigger: pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522)))
- % body: compound(pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522)))),\+is_ftVar(pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522))))*->rhs([{with_current_why(pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_13498,skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)),{_13522=skInstExistsNextWorldTrueInWorld_20FnSk(_13498,_13506,_13508)},onEvent(_13508,_13506),{is_unit(_13522,_13498)}==>nextWorld(_13498,_13522))))))}])
- % Found positive trigger: boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382))))
- % body: compound(boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382))))),\+is_ftVar(boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382)))))*->rhs([{with_current_why(boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_11358,_11360):- \+nextWorld(_11358,skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)),{_11360=skInstExistsNextWorldTrueInWorld_20FnSk(_11358,_11382,_11384)},proven_tru(onEvent(_11384,_11382)))))))}])
- % RHS-Post1: boxlog((nextWorld(_3378,_3382):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(nextWorld(_3378,_3382):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((nextWorld(_3378,_3382):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((nextWorld(_21664, _21666):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_21664, _21688, _21690), world), {_21666=skInstExistsNextWorldTrueInWorld_20FnSk(_21664, _21688, _21690)}, proven_tru(onEvent(_21690, _21688))))).
- % Found positive trigger: boxlog((nextWorld(_24996,_24998):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022),world),{_24998=skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022)},proven_tru(onEvent(_25022,_25020))))
- % body: compound(boxlog((nextWorld(_24996,_24998):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022),world),{_24998=skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022)},proven_tru(onEvent(_25022,_25020))))),\+is_ftVar(boxlog((nextWorld(_24996,_24998):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022),world),{_24998=skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022)},proven_tru(onEvent(_25022,_25020)))))*->rhs([{with_current_why(boxlog((nextWorld(_24996,_24998):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022),world),{_24998=skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022)},proven_tru(onEvent(_25022,_25020)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_24996,_24998):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022),world),{_24998=skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022)},proven_tru(onEvent(_25022,_25020)))))))}])
- % Found positive trigger: boxlog((nextWorld(_24996,_24998):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022),world),{_24998=skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022)},proven_tru(onEvent(_25022,_25020))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((nextWorld(_24996,_24998):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022),world),{_24998=skInstExistsNextWorldTrueInWorld_20FnSk(_24996,_25020,_25022)},proven_tru(onEvent(_25022,_25020))))}])
- % =boxlog=
- % nextWorld(_24996, _24998) :-
- % \+ inst(skInstExistsNextWorldTrueInWorld_20FnSk(_24996, _25020, _25022),
- % world),
- % { _24998=skInstExistsNextWorldTrueInWorld_20FnSk(_24996, _25020, _25022)
- % },
- % proven_tru(onEvent(_25022, _25020)).
- % Found positive trigger: boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458))))
- % body: is_kif_clause(boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458)))))*->rhs([clif(boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458)))))])
- % Found positive trigger: boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458))))
- % body: delistify_last_arg((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458))),boxlog_to_pfc,_15816),must_be_unqualified(_15816)*->rhs([pfclog(_15816)])
- % RHS-Post1: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},onEvent(_11460,_11458),{is_unit(_11436,_11434)}==>nextWorld(_11434,_11436)))
- % Support: boxlog((nextWorld(_11162,_11164):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11162,_11186,_11188),world),{_11164=skInstExistsNextWorldTrueInWorld_20FnSk(_11162,_11186,_11188)},proven_tru(onEvent(_11188,_11186)))),pt(boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458)))),(delistify_last_arg((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458))),boxlog_to_pfc,(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},onEvent(_11460,_11458),{is_unit(_11436,_11434)}==>nextWorld(_11434,_11436))),must_be_unqualified((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},onEvent(_11460,_11458),{is_unit(_11436,_11434)}==>nextWorld(_11434,_11436)))*->rhs([pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},onEvent(_11460,_11458),{is_unit(_11436,_11434)}==>nextWorld(_11434,_11436)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25370, _25372, _25374), world), {_25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25370, _25372, _25374)}, onEvent(_25374, _25372), {is_unit(_25388, _25370)}==>nextWorld(_25370, _25388)))).
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098),world),{_29112=skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098)},onEvent(_29098,_29096),{is_unit(_29112,_29094)}==>nextWorld(_29094,_29112)))
- % body: compound(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098),world),{_29112=skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098)},onEvent(_29098,_29096),{is_unit(_29112,_29094)}==>nextWorld(_29094,_29112)))),\+is_ftVar(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098),world),{_29112=skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098)},onEvent(_29098,_29096),{is_unit(_29112,_29094)}==>nextWorld(_29094,_29112))))*->rhs([{with_current_why(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098),world),{_29112=skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098)},onEvent(_29098,_29096),{is_unit(_29112,_29094)}==>nextWorld(_29094,_29112))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098),world),{_29112=skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098)},onEvent(_29098,_29096),{is_unit(_29112,_29094)}==>nextWorld(_29094,_29112))))))}])
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098),world),{_29112=skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098)},onEvent(_29098,_29096),{is_unit(_29112,_29094)}==>nextWorld(_29094,_29112)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098),world),{_29112=skInstExistsNextWorldTrueInWorld_20FnSk(_29094,_29096,_29098)},onEvent(_29098,_29096),{is_unit(_29112,_29094)}==>nextWorld(_29094,_29112)))}])
- % =pfclog=
- % \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_29094, _29096, _29098), world), {_29112=skInstExistsNextWorldTrueInWorld_20FnSk(_29094, _29096, _29098)}, onEvent(_29098, _29096), {is_unit(_29112, _29094)}==>nextWorld(_29094, _29112).
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598)))
- % body: is_kif_clause(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598))))*->rhs([clif(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598))))])
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598)))
- % body: rhs([(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598))])
- % RHS-Post1: \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598)
- % Support: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13284,_13286,_13288),world),{_13302=skInstExistsNextWorldTrueInWorld_20FnSk(_13284,_13286,_13288)},onEvent(_13288,_13286),{is_unit(_13302,_13284)}==>nextWorld(_13284,_13302))),pt(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598))),rhs([(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598))]))
- % r_sane:mpred_fwc1((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_43210, _43212, _43214), world), {_43228=skInstExistsNextWorldTrueInWorld_20FnSk(_43210, _43212, _43214)}, onEvent(_43214, _43212), {is_unit(_43228, _43210)}==>nextWorld(_43210, _43228))).
- % Adding negative
- % trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),world)
- % test: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),world))
- % body: _15256=skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242)*->pt(onEvent(_15242,_15240),(is_unit(_15256,_15238)*->rhs([nextWorld(_15238,_15256)])))
- % Support: (\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15540,_15542,_15544),world),{_15558=skInstExistsNextWorldTrueInWorld_20FnSk(_15540,_15542,_15544)},onEvent(_15544,_15542),{is_unit(_15558,_15540)}==>nextWorld(_15540,_15558)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_15242,_15240)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),_15238)*->rhs([nextWorld(_15238,skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242))])
- % Support: \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16256,_16258,_16260),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242)=skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242)*->pt(onEvent(_15242,_15240),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),_15238)*->rhs([nextWorld(_15238,skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242))])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16256,_16258,_16260),world)
- % cond: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),world))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242)=skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242)*->pt(onEvent(_15242,_15240),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),_15238)*->rhs([nextWorld(_15238,skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242))])))
- % from: mpred_add_support_fast(pt(onEvent(_15242,_15240),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),_15238)*->rhs([nextWorld(_15238,skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242))]))),(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16256,_16258,_16260),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242)=skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242)*->pt(onEvent(_15242,_15240),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242),_15238)*->rhs([nextWorld(_15238,skInstExistsNextWorldTrueInWorld_20FnSk(_15238,_15240,_15242))])))))))
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598)))
- % body: compound(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598)))),\+is_ftVar(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598))))*->rhs([{with_current_why(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584),world),{_13598=skInstExistsNextWorldTrueInWorld_20FnSk(_13580,_13582,_13584)},onEvent(_13584,_13582),{is_unit(_13598,_13580)}==>nextWorld(_13580,_13598))))))}])
- % Found positive trigger: boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458))))
- % body: compound(boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458))))),\+is_ftVar(boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458)))))*->rhs([{with_current_why(boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_11434,_11436):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460),world),{_11436=skInstExistsNextWorldTrueInWorld_20FnSk(_11434,_11458,_11460)},proven_tru(onEvent(_11460,_11458)))))))}])
- % RHS-Post1: boxlog((nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))},boxlog((nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((nextWorld(_20520, skInstExistsNextWorldTrueInWorld_20FnSk(_20520, _20528, _20530)):- \+true_in_world(_20528, _20546), proven_tru(onEvent(_20530, _20528))))).
- % Found positive trigger: boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566))))
- % body: compound(boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566))))),\+is_ftVar(boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566)))))*->rhs([{with_current_why(boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566)))))))}])
- % Found positive trigger: boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566))))}])
- % =boxlog=
- % nextWorld(_23558, skInstExistsNextWorldTrueInWorld_20FnSk(_23558, _23566, _23568)) :-
- % \+ true_in_world(_23566, _23584),
- % proven_tru(onEvent(_23568, _23566)).
- % Found positive trigger: boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566))))
- % body: is_kif_clause(boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566)))))*->rhs([clif(boxlog((nextWorld(_23558,skInstExistsNextWorldTrueInWorld_20FnSk(_23558,_23566,_23568)):- \+true_in_world(_23566,_23584),proven_tru(onEvent(_23568,_23566)))))])
- % Found positive trigger: boxlog((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350))))
- % body: delistify_last_arg((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350))),boxlog_to_pfc,_11650),must_be_unqualified(_11650)*->rhs([pfclog(_11650)])
- % RHS-Post1: pfclog((\+true_in_world(_11350,_11368),onEvent(_11352,_11350),{is_unit(_11352,_11350)}==>nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352))))
- % Support: boxlog((nextWorld(_11118,skInstExistsNextWorldTrueInWorld_20FnSk(_11118,_11126,_11128)):- \+true_in_world(_11126,_11144),proven_tru(onEvent(_11128,_11126)))),pt(boxlog((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350)))),(delistify_last_arg((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350))),boxlog_to_pfc,(\+true_in_world(_11350,_11368),onEvent(_11352,_11350),{is_unit(_11352,_11350)}==>nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)))),must_be_unqualified((\+true_in_world(_11350,_11368),onEvent(_11352,_11350),{is_unit(_11352,_11350)}==>nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352))))*->rhs([pfclog((\+true_in_world(_11350,_11368),onEvent(_11352,_11350),{is_unit(_11352,_11350)}==>nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352))))])))
- % r_sane:mpred_fwc1(pfclog((\+true_in_world(_43006, _43008), onEvent(_43018, _43006), {is_unit(_43018, _43006)}==>nextWorld(_43034, skInstExistsNextWorldTrueInWorld_20FnSk(_43034, _43006, _43018))))).
- % Found positive trigger: pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))))
- % body: compound(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))))),\+is_ftVar(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))))*->rhs([{with_current_why(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))))))}])
- % Found positive trigger: pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))))}])
- % =pfclog=
- % \+true_in_world(_13154, _13156), onEvent(_13166, _13154), {is_unit(_13166, _13154)}==>nextWorld(_13182, skInstExistsNextWorldTrueInWorld_20FnSk(_13182, _13154, _13166)).
- % Found positive trigger: pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))))
- % body: is_kif_clause(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))))*->rhs([clif(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))))])
- % Found positive trigger: pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))))
- % body: rhs([(\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))])
- % RHS-Post1: \+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))
- % Support: pfclog((\+true_in_world(_12906,_12908),onEvent(_12918,_12906),{is_unit(_12918,_12906)}==>nextWorld(_12934,skInstExistsNextWorldTrueInWorld_20FnSk(_12934,_12906,_12918)))),pt(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))),rhs([(\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))]))
- % r_sane:mpred_fwc1((\+true_in_world(_54120, _54122), onEvent(_54132, _54120), {is_unit(_54132, _54120)}==>nextWorld(_54148, skInstExistsNextWorldTrueInWorld_20FnSk(_54148, _54120, _54132)))).
- % Adding negative
- % trigger: true_in_world(_14568,_14570)
- % test: call_u_no_bc(true_in_world(_14568,_14570))
- % body: pt(onEvent(_14580,_14568),(is_unit(_14580,_14568)*->rhs([nextWorld(_14596,skInstExistsNextWorldTrueInWorld_20FnSk(_14596,_14568,_14580))])))
- % Support: (\+true_in_world(_14822,_14824),onEvent(_14834,_14822),{is_unit(_14834,_14822)}==>nextWorld(_14850,skInstExistsNextWorldTrueInWorld_20FnSk(_14850,_14822,_14834))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14580,_14568)
- % body: is_unit(_14580,_14568)*->rhs([nextWorld(_14596,skInstExistsNextWorldTrueInWorld_20FnSk(_14596,_14568,_14580))])
- % Support: \+true_in_world(_14568,_14570),nt(true_in_world(_15416,_15418),call_u_no_bc(true_in_world(_14568,_14570)),pt(onEvent(_14580,_14568),(is_unit(_14580,_14568)*->rhs([nextWorld(_14596,skInstExistsNextWorldTrueInWorld_20FnSk(_14596,_14568,_14580))]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: true_in_world(_15416,_15418)
- % cond: call_u_no_bc(true_in_world(_14568,_14570))
- % action: pt(onEvent(_14580,_14568),(is_unit(_14580,_14568)*->rhs([nextWorld(_14596,skInstExistsNextWorldTrueInWorld_20FnSk(_14596,_14568,_14580))])))
- % from: mpred_add_support_fast(pt(onEvent(_14580,_14568),(is_unit(_14580,_14568)*->rhs([nextWorld(_14596,skInstExistsNextWorldTrueInWorld_20FnSk(_14596,_14568,_14580))]))),(\+true_in_world(_14568,_14570),nt(true_in_world(_15416,_15418),call_u_no_bc(true_in_world(_14568,_14570)),pt(onEvent(_14580,_14568),(is_unit(_14580,_14568)*->rhs([nextWorld(_14596,skInstExistsNextWorldTrueInWorld_20FnSk(_14596,_14568,_14580))]))))))
- % Found positive trigger: pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))))
- % body: compound(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166))))),\+is_ftVar(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))))*->rhs([{with_current_why(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_13154,_13156),onEvent(_13166,_13154),{is_unit(_13166,_13154)}==>nextWorld(_13182,skInstExistsNextWorldTrueInWorld_20FnSk(_13182,_13154,_13166)))))))}])
- % Found positive trigger: boxlog((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350))))
- % body: compound(boxlog((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350))))),\+is_ftVar(boxlog((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350)))))*->rhs([{with_current_why(boxlog((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_11342,skInstExistsNextWorldTrueInWorld_20FnSk(_11342,_11350,_11352)):- \+true_in_world(_11350,_11368),proven_tru(onEvent(_11352,_11350)))))))}])
- % RHS-Post1: boxlog((nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))},boxlog((nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((nextWorld(_20564, skInstExistsNextWorldTrueInWorld_20FnSk(_20564, _20572, _20574)):- \+nextWorld(_20564, _20590), proven_tru(onEvent(_20574, _20572))))).
- % Found positive trigger: boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606))))
- % body: compound(boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606))))),\+is_ftVar(boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606)))))*->rhs([{with_current_why(boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606)))))))}])
- % Found positive trigger: boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606))))}])
- % =boxlog=
- % nextWorld(_23598, skInstExistsNextWorldTrueInWorld_20FnSk(_23598, _23606, _23608)) :-
- % \+ nextWorld(_23598, _23624),
- % proven_tru(onEvent(_23608, _23606)).
- % Found positive trigger: boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606))))
- % body: is_kif_clause(boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606)))))*->rhs([clif(boxlog((nextWorld(_23598,skInstExistsNextWorldTrueInWorld_20FnSk(_23598,_23606,_23608)):- \+nextWorld(_23598,_23624),proven_tru(onEvent(_23608,_23606)))))])
- % Found positive trigger: boxlog((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402))))
- % body: delistify_last_arg((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402))),boxlog_to_pfc,_11702),must_be_unqualified(_11702)*->rhs([pfclog(_11702)])
- % RHS-Post1: pfclog((\+nextWorld(_11394,_11420),onEvent(_11404,_11402),{is_unit(_11394,_11404,_11402)}==>nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404))))
- % Support: boxlog((nextWorld(_11170,skInstExistsNextWorldTrueInWorld_20FnSk(_11170,_11178,_11180)):- \+nextWorld(_11170,_11196),proven_tru(onEvent(_11180,_11178)))),pt(boxlog((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402)))),(delistify_last_arg((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402))),boxlog_to_pfc,(\+nextWorld(_11394,_11420),onEvent(_11404,_11402),{is_unit(_11394,_11404,_11402)}==>nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)))),must_be_unqualified((\+nextWorld(_11394,_11420),onEvent(_11404,_11402),{is_unit(_11394,_11404,_11402)}==>nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404))))*->rhs([pfclog((\+nextWorld(_11394,_11420),onEvent(_11404,_11402),{is_unit(_11394,_11404,_11402)}==>nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404))))])))
- % r_sane:mpred_fwc1(pfclog((\+nextWorld(_43244, _43246), onEvent(_43256, _43258), {is_unit(_43244, _43256, _43258)}==>nextWorld(_43244, skInstExistsNextWorldTrueInWorld_20FnSk(_43244, _43258, _43256))))).
- % Found positive trigger: pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))))
- % body: compound(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))))),\+is_ftVar(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))))*->rhs([{with_current_why(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))))))}])
- % Found positive trigger: pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))))}])
- % =pfclog=
- % \+nextWorld(_13220, _13222), onEvent(_13232, _13234), {is_unit(_13220, _13232, _13234)}==>nextWorld(_13220, skInstExistsNextWorldTrueInWorld_20FnSk(_13220, _13234, _13232)).
- % Found positive trigger: pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))))
- % body: is_kif_clause(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))))*->rhs([clif(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))))])
- % Found positive trigger: pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))))
- % body: rhs([(\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))])
- % RHS-Post1: \+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))
- % Support: pfclog((\+nextWorld(_12968,_12970),onEvent(_12980,_12982),{is_unit(_12968,_12980,_12982)}==>nextWorld(_12968,skInstExistsNextWorldTrueInWorld_20FnSk(_12968,_12982,_12980)))),pt(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))),rhs([(\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))]))
- % r_sane:mpred_fwc1((\+nextWorld(_54616, _54618), onEvent(_54628, _54630), {is_unit(_54616, _54628, _54630)}==>nextWorld(_54616, skInstExistsNextWorldTrueInWorld_20FnSk(_54616, _54630, _54628)))).
- % Adding negative
- % trigger: nextWorld(_14654,_14656)
- % test: call_u_no_bc(nextWorld(_14654,_14656))
- % body: pt(onEvent(_14666,_14668),(is_unit(_14654,_14666,_14668)*->rhs([nextWorld(_14654,skInstExistsNextWorldTrueInWorld_20FnSk(_14654,_14668,_14666))])))
- % Support: (\+nextWorld(_14912,_14914),onEvent(_14924,_14926),{is_unit(_14912,_14924,_14926)}==>nextWorld(_14912,skInstExistsNextWorldTrueInWorld_20FnSk(_14912,_14926,_14924))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14666,_14668)
- % body: is_unit(_14654,_14666,_14668)*->rhs([nextWorld(_14654,skInstExistsNextWorldTrueInWorld_20FnSk(_14654,_14668,_14666))])
- % Support: \+nextWorld(_14654,_14656),nt(nextWorld(_15514,_15516),call_u_no_bc(nextWorld(_14654,_14656)),pt(onEvent(_14666,_14668),(is_unit(_14654,_14666,_14668)*->rhs([nextWorld(_14654,skInstExistsNextWorldTrueInWorld_20FnSk(_14654,_14668,_14666))]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: nextWorld(_15514,_15516)
- % cond: call_u_no_bc(nextWorld(_14654,_14656))
- % action: pt(onEvent(_14666,_14668),(is_unit(_14654,_14666,_14668)*->rhs([nextWorld(_14654,skInstExistsNextWorldTrueInWorld_20FnSk(_14654,_14668,_14666))])))
- % from: mpred_add_support_fast(pt(onEvent(_14666,_14668),(is_unit(_14654,_14666,_14668)*->rhs([nextWorld(_14654,skInstExistsNextWorldTrueInWorld_20FnSk(_14654,_14668,_14666))]))),(\+nextWorld(_14654,_14656),nt(nextWorld(_15514,_15516),call_u_no_bc(nextWorld(_14654,_14656)),pt(onEvent(_14666,_14668),(is_unit(_14654,_14666,_14668)*->rhs([nextWorld(_14654,skInstExistsNextWorldTrueInWorld_20FnSk(_14654,_14668,_14666))]))))))
- % Found positive trigger: pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))))
- % body: compound(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232))))),\+is_ftVar(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))))*->rhs([{with_current_why(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_13220,_13222),onEvent(_13232,_13234),{is_unit(_13220,_13232,_13234)}==>nextWorld(_13220,skInstExistsNextWorldTrueInWorld_20FnSk(_13220,_13234,_13232)))))))}])
- % Found positive trigger: boxlog((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402))))
- % body: compound(boxlog((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402))))),\+is_ftVar(boxlog((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402)))))*->rhs([{with_current_why(boxlog((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11394,_11402,_11404)):- \+nextWorld(_11394,_11420),proven_tru(onEvent(_11404,_11402)))))))}])
- % RHS-Post1: boxlog((nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))},boxlog((nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((nextWorld(_20630, skInstExistsNextWorldTrueInWorld_20FnSk(_20630, _20638, _20640)):- \+inst(_20654, world), proven_tru(onEvent(_20640, _20638))))).
- % Found positive trigger: boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668))))
- % body: compound(boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668))))),\+is_ftVar(boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668)))))*->rhs([{with_current_why(boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668)))))))}])
- % Found positive trigger: boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668))))}])
- % =boxlog=
- % nextWorld(_23660, skInstExistsNextWorldTrueInWorld_20FnSk(_23660, _23668, _23670)) :-
- % \+ inst(_23684, world),
- % proven_tru(onEvent(_23670, _23668)).
- % Found positive trigger: boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668))))
- % body: is_kif_clause(boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668)))))*->rhs([clif(boxlog((nextWorld(_23660,skInstExistsNextWorldTrueInWorld_20FnSk(_23660,_23668,_23670)):- \+inst(_23684,world),proven_tru(onEvent(_23670,_23668)))))])
- % Found positive trigger: boxlog((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454))))
- % body: delistify_last_arg((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454))),boxlog_to_pfc,_11754),must_be_unqualified(_11754)*->rhs([pfclog(_11754)])
- % RHS-Post1: pfclog((\+inst(_11470,world),onEvent(_11456,_11454),{is_unit(_11456,_11454)}==>nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456))))
- % Support: boxlog((nextWorld(_11222,skInstExistsNextWorldTrueInWorld_20FnSk(_11222,_11230,_11232)):- \+inst(_11246,world),proven_tru(onEvent(_11232,_11230)))),pt(boxlog((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454)))),(delistify_last_arg((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454))),boxlog_to_pfc,(\+inst(_11470,world),onEvent(_11456,_11454),{is_unit(_11456,_11454)}==>nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)))),must_be_unqualified((\+inst(_11470,world),onEvent(_11456,_11454),{is_unit(_11456,_11454)}==>nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456))))*->rhs([pfclog((\+inst(_11470,world),onEvent(_11456,_11454),{is_unit(_11456,_11454)}==>nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456))))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(_43072, world), onEvent(_43084, _43086), {is_unit(_43084, _43086)}==>nextWorld(_43100, skInstExistsNextWorldTrueInWorld_20FnSk(_43100, _43086, _43084))))).
- % Found positive trigger: pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))))
- % body: compound(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))))),\+is_ftVar(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))))*->rhs([{with_current_why(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))),ignore(\+addAdmittedArguments(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))))))}])
- % Found positive trigger: pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))))}])
- % =pfclog=
- % \+inst(_13258, world), onEvent(_13270, _13272), {is_unit(_13270, _13272)}==>nextWorld(_13286, skInstExistsNextWorldTrueInWorld_20FnSk(_13286, _13272, _13270)).
- % Found positive trigger: pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))))
- % body: is_kif_clause(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))))*->rhs([clif(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))))])
- % Found positive trigger: pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))))
- % body: rhs([(\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))])
- % RHS-Post1: \+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))
- % Support: pfclog((\+inst(_13010,world),onEvent(_13022,_13024),{is_unit(_13022,_13024)}==>nextWorld(_13038,skInstExistsNextWorldTrueInWorld_20FnSk(_13038,_13024,_13022)))),pt(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))),rhs([(\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))]))
- % r_sane:mpred_fwc1((\+inst(_54158, world), onEvent(_54170, _54172), {is_unit(_54170, _54172)}==>nextWorld(_54186, skInstExistsNextWorldTrueInWorld_20FnSk(_54186, _54172, _54170)))).
- % Adding negative
- % trigger: inst(_14672,world)
- % test: call_u_no_bc(inst(_14672,world))
- % body: pt(onEvent(_14684,_14686),(is_unit(_14684,_14686)*->rhs([nextWorld(_14700,skInstExistsNextWorldTrueInWorld_20FnSk(_14700,_14686,_14684))])))
- % Support: (\+inst(_14926,world),onEvent(_14938,_14940),{is_unit(_14938,_14940)}==>nextWorld(_14954,skInstExistsNextWorldTrueInWorld_20FnSk(_14954,_14940,_14938))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14684,_14686)
- % body: is_unit(_14684,_14686)*->rhs([nextWorld(_14700,skInstExistsNextWorldTrueInWorld_20FnSk(_14700,_14686,_14684))])
- % Support: \+inst(_14672,world),nt(inst(_15520,world),call_u_no_bc(inst(_14672,world)),pt(onEvent(_14684,_14686),(is_unit(_14684,_14686)*->rhs([nextWorld(_14700,skInstExistsNextWorldTrueInWorld_20FnSk(_14700,_14686,_14684))]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(_15520,world)
- % cond: call_u_no_bc(inst(_14672,world))
- % action: pt(onEvent(_14684,_14686),(is_unit(_14684,_14686)*->rhs([nextWorld(_14700,skInstExistsNextWorldTrueInWorld_20FnSk(_14700,_14686,_14684))])))
- % from: mpred_add_support_fast(pt(onEvent(_14684,_14686),(is_unit(_14684,_14686)*->rhs([nextWorld(_14700,skInstExistsNextWorldTrueInWorld_20FnSk(_14700,_14686,_14684))]))),(\+inst(_14672,world),nt(inst(_15520,world),call_u_no_bc(inst(_14672,world)),pt(onEvent(_14684,_14686),(is_unit(_14684,_14686)*->rhs([nextWorld(_14700,skInstExistsNextWorldTrueInWorld_20FnSk(_14700,_14686,_14684))]))))))
- % Found positive trigger: pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))))
- % body: compound(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270))))),\+is_ftVar(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))))*->rhs([{with_current_why(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))),ignore(\+addAdmittedArguments(pfclog((\+inst(_13258,world),onEvent(_13270,_13272),{is_unit(_13270,_13272)}==>nextWorld(_13286,skInstExistsNextWorldTrueInWorld_20FnSk(_13286,_13272,_13270)))))))}])
- % Found positive trigger: boxlog((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454))))
- % body: compound(boxlog((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454))))),\+is_ftVar(boxlog((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454)))))*->rhs([{with_current_why(boxlog((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454)))),ignore(\+addAdmittedArguments(boxlog((nextWorld(_11446,skInstExistsNextWorldTrueInWorld_20FnSk(_11446,_11454,_11456)):- \+inst(_11470,world),proven_tru(onEvent(_11456,_11454)))))))}])
- % RHS-Post1: boxlog((true_in_world(_3368,_3382):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(true_in_world(_3368,_3382):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((true_in_world(_3368,_3382):- \+true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((true_in_world(_21888, _21890):- \+true_in_world(_21888, skInstExistsNextWorldTrueInWorld_20FnSk(_21910, _21888, _21914)), {_21890=skInstExistsNextWorldTrueInWorld_20FnSk(_21910, _21888, _21914)}, proven_tru(onEvent(_21914, _21888))))).
- % Found positive trigger: boxlog((true_in_world(_25226,_25228):- \+true_in_world(_25226,skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)),{_25228=skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)},proven_tru(onEvent(_25252,_25226))))
- % body: compound(boxlog((true_in_world(_25226,_25228):- \+true_in_world(_25226,skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)),{_25228=skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)},proven_tru(onEvent(_25252,_25226))))),\+is_ftVar(boxlog((true_in_world(_25226,_25228):- \+true_in_world(_25226,skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)),{_25228=skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)},proven_tru(onEvent(_25252,_25226)))))*->rhs([{with_current_why(boxlog((true_in_world(_25226,_25228):- \+true_in_world(_25226,skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)),{_25228=skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)},proven_tru(onEvent(_25252,_25226)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_25226,_25228):- \+true_in_world(_25226,skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)),{_25228=skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)},proven_tru(onEvent(_25252,_25226)))))))}])
- % Found positive trigger: boxlog((true_in_world(_25226,_25228):- \+true_in_world(_25226,skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)),{_25228=skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)},proven_tru(onEvent(_25252,_25226))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((true_in_world(_25226,_25228):- \+true_in_world(_25226,skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)),{_25228=skInstExistsNextWorldTrueInWorld_20FnSk(_25248,_25226,_25252)},proven_tru(onEvent(_25252,_25226))))}])
- % =boxlog=
- % true_in_world(_25226, _25228) :-
- % \+ true_in_world(_25226,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_25248,
- % _25226,
- % _25252)),
- % { _25228=skInstExistsNextWorldTrueInWorld_20FnSk(_25248, _25226, _25252)
- % },
- % proven_tru(onEvent(_25252, _25226)).
- % Found positive trigger: boxlog((true_in_world(_11666,_11668):- \+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},proven_tru(onEvent(_11692,_11666))))
- % body: is_kif_clause(boxlog((true_in_world(_11666,_11668):- \+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},proven_tru(onEvent(_11692,_11666)))))*->rhs([clif(boxlog((true_in_world(_11666,_11668):- \+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},proven_tru(onEvent(_11692,_11666)))))])
- % Found positive trigger: boxlog((true_in_world(_11666,_11668):- \+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},proven_tru(onEvent(_11692,_11666))))
- % body: delistify_last_arg((true_in_world(_11666,_11668):- \+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},proven_tru(onEvent(_11692,_11666))),boxlog_to_pfc,_16058),must_be_unqualified(_16058)*->rhs([pfclog(_16058)])
- % RHS-Post1: pfclog((\+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},onEvent(_11692,_11666),{is_unit(_11668,_11666)}==>true_in_world(_11666,_11668)))
- % Support: boxlog((true_in_world(_11394,_11396):- \+true_in_world(_11394,skInstExistsNextWorldTrueInWorld_20FnSk(_11416,_11394,_11420)),{_11396=skInstExistsNextWorldTrueInWorld_20FnSk(_11416,_11394,_11420)},proven_tru(onEvent(_11420,_11394)))),pt(boxlog((true_in_world(_11666,_11668):- \+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},proven_tru(onEvent(_11692,_11666)))),(delistify_last_arg((true_in_world(_11666,_11668):- \+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},proven_tru(onEvent(_11692,_11666))),boxlog_to_pfc,(\+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},onEvent(_11692,_11666),{is_unit(_11668,_11666)}==>true_in_world(_11666,_11668))),must_be_unqualified((\+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},onEvent(_11692,_11666),{is_unit(_11668,_11666)}==>true_in_world(_11666,_11668)))*->rhs([pfclog((\+true_in_world(_11666,skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)),{_11668=skInstExistsNextWorldTrueInWorld_20FnSk(_11688,_11666,_11692)},onEvent(_11692,_11666),{is_unit(_11668,_11666)}==>true_in_world(_11666,_11668)))])))
- % r_sane:mpred_fwc1(pfclog((\+true_in_world(_58280, skInstExistsNextWorldTrueInWorld_20FnSk(_58286, _58280, _58290)), {_58304=skInstExistsNextWorldTrueInWorld_20FnSk(_58286, _58280, _58290)}, onEvent(_58290, _58280), {is_unit(_58304, _58280)}==>true_in_world(_58280, _58304)))).
- % Found positive trigger: pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838)))
- % body: compound(pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838)))),\+is_ftVar(pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838))))*->rhs([{with_current_why(pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838))))))}])
- % Found positive trigger: pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838)))}])
- % =pfclog=
- % \+true_in_world(_13814, skInstExistsNextWorldTrueInWorld_20FnSk(_13820, _13814, _13824)), {_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820, _13814, _13824)}, onEvent(_13824, _13814), {is_unit(_13838, _13814)}==>true_in_world(_13814, _13838).
- % Found positive trigger: pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838)))
- % body: is_kif_clause(pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838))))*->rhs([clif(pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838))))])
- % Found positive trigger: pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838)))
- % body: rhs([(\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838))])
- % RHS-Post1: \+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838)
- % Support: pfclog((\+true_in_world(_13518,skInstExistsNextWorldTrueInWorld_20FnSk(_13524,_13518,_13528)),{_13542=skInstExistsNextWorldTrueInWorld_20FnSk(_13524,_13518,_13528)},onEvent(_13528,_13518),{is_unit(_13542,_13518)}==>true_in_world(_13518,_13542))),pt(pfclog((\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838))),rhs([(\+true_in_world(_13814,skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)),{_13838=skInstExistsNextWorldTrueInWorld_20FnSk(_13820,_13814,_13824)},onEvent(_13824,_13814),{is_unit(_13838,_13814)}==>true_in_world(_13814,_13838))]))
- % r_sane:mpred_fwc1((\+true_in_world(_60826, skInstExistsNextWorldTrueInWorld_20FnSk(_60832, _60826, _60836)), {_60850=skInstExistsNextWorldTrueInWorld_20FnSk(_60832, _60826, _60836)}, onEvent(_60836, _60826), {is_unit(_60850, _60826)}==>true_in_world(_60826, _60850))).
- % Adding negative
- % trigger: true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446))
- % test: call_u_no_bc(true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)))
- % body: _15460=skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)*->pt(onEvent(_15446,_15436),(is_unit(_15460,_15436)*->rhs([true_in_world(_15436,_15460)])))
- % Support: (\+true_in_world(_15738,skInstExistsNextWorldTrueInWorld_20FnSk(_15744,_15738,_15748)),{_15762=skInstExistsNextWorldTrueInWorld_20FnSk(_15744,_15738,_15748)},onEvent(_15748,_15738),{is_unit(_15762,_15738)}==>true_in_world(_15738,_15762)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_15446,_15436)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446),_15436)*->rhs([true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446))])
- % Support: \+true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)),nt(true_in_world(_16486,skInstExistsNextWorldTrueInWorld_20FnSk(_16492,_16486,_16496)),call_u_no_bc(true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446))),(skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)=skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)*->pt(onEvent(_15446,_15436),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446),_15436)*->rhs([true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446))])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: true_in_world(_16486,skInstExistsNextWorldTrueInWorld_20FnSk(_16492,_16486,_16496))
- % cond: call_u_no_bc(true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)=skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)*->pt(onEvent(_15446,_15436),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446),_15436)*->rhs([true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446))])))
- % from: mpred_add_support_fast(pt(onEvent(_15446,_15436),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446),_15436)*->rhs([true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446))]))),(\+true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)),nt(true_in_world(_16486,skInstExistsNextWorldTrueInWorld_20FnSk(_16492,_16486,_16496)),call_u_no_bc(true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446))),(skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)=skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446)*->pt(onEvent(_15446,_15436),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446),_15436)*->rhs([true_in_world(_15436,skInstExistsNextWorldTrueInWorld_20FnSk(_15442,_15436,_15446))])))))))
- % Found positive trigger: pfclog((\+true_in_world(_13782,skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)),{_13806=skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)},onEvent(_13792,_13782),{is_unit(_13806,_13782)}==>true_in_world(_13782,_13806)))
- % body: compound(pfclog((\+true_in_world(_13782,skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)),{_13806=skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)},onEvent(_13792,_13782),{is_unit(_13806,_13782)}==>true_in_world(_13782,_13806)))),\+is_ftVar(pfclog((\+true_in_world(_13782,skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)),{_13806=skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)},onEvent(_13792,_13782),{is_unit(_13806,_13782)}==>true_in_world(_13782,_13806))))*->rhs([{with_current_why(pfclog((\+true_in_world(_13782,skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)),{_13806=skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)},onEvent(_13792,_13782),{is_unit(_13806,_13782)}==>true_in_world(_13782,_13806))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_13782,skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)),{_13806=skInstExistsNextWorldTrueInWorld_20FnSk(_13788,_13782,_13792)},onEvent(_13792,_13782),{is_unit(_13806,_13782)}==>true_in_world(_13782,_13806))))))}])
- % Found positive trigger: boxlog((true_in_world(_11634,_11636):- \+true_in_world(_11634,skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)),{_11636=skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)},proven_tru(onEvent(_11660,_11634))))
- % body: compound(boxlog((true_in_world(_11634,_11636):- \+true_in_world(_11634,skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)),{_11636=skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)},proven_tru(onEvent(_11660,_11634))))),\+is_ftVar(boxlog((true_in_world(_11634,_11636):- \+true_in_world(_11634,skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)),{_11636=skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)},proven_tru(onEvent(_11660,_11634)))))*->rhs([{with_current_why(boxlog((true_in_world(_11634,_11636):- \+true_in_world(_11634,skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)),{_11636=skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)},proven_tru(onEvent(_11660,_11634)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_11634,_11636):- \+true_in_world(_11634,skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)),{_11636=skInstExistsNextWorldTrueInWorld_20FnSk(_11656,_11634,_11660)},proven_tru(onEvent(_11660,_11634)))))))}])
- % RHS-Post1: boxlog((true_in_world(_3368,_3382):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(true_in_world(_3368,_3382):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((true_in_world(_3368,_3382):- \+nextWorld(_3378,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((true_in_world(_21960, _21962):- \+nextWorld(_21976, skInstExistsNextWorldTrueInWorld_20FnSk(_21976, _21960, _21986)), {_21962=skInstExistsNextWorldTrueInWorld_20FnSk(_21976, _21960, _21986)}, proven_tru(onEvent(_21986, _21960))))).
- % Found positive trigger: boxlog((true_in_world(_25298,_25300):- \+nextWorld(_25314,skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)),{_25300=skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)},proven_tru(onEvent(_25324,_25298))))
- % body: compound(boxlog((true_in_world(_25298,_25300):- \+nextWorld(_25314,skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)),{_25300=skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)},proven_tru(onEvent(_25324,_25298))))),\+is_ftVar(boxlog((true_in_world(_25298,_25300):- \+nextWorld(_25314,skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)),{_25300=skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)},proven_tru(onEvent(_25324,_25298)))))*->rhs([{with_current_why(boxlog((true_in_world(_25298,_25300):- \+nextWorld(_25314,skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)),{_25300=skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)},proven_tru(onEvent(_25324,_25298)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_25298,_25300):- \+nextWorld(_25314,skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)),{_25300=skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)},proven_tru(onEvent(_25324,_25298)))))))}])
- % Found positive trigger: boxlog((true_in_world(_25298,_25300):- \+nextWorld(_25314,skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)),{_25300=skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)},proven_tru(onEvent(_25324,_25298))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((true_in_world(_25298,_25300):- \+nextWorld(_25314,skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)),{_25300=skInstExistsNextWorldTrueInWorld_20FnSk(_25314,_25298,_25324)},proven_tru(onEvent(_25324,_25298))))}])
- % =boxlog=
- % true_in_world(_25298, _25300) :-
- % \+ nextWorld(_25314,
- % skInstExistsNextWorldTrueInWorld_20FnSk(_25314,
- % _25298,
- % _25324)),
- % { _25300=skInstExistsNextWorldTrueInWorld_20FnSk(_25314, _25298, _25324)
- % },
- % proven_tru(onEvent(_25324, _25298)).
- % Found positive trigger: boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742))))
- % body: is_kif_clause(boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742)))))*->rhs([clif(boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742)))))])
- % Found positive trigger: boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742))))
- % body: delistify_last_arg((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742))),boxlog_to_pfc,_16132),must_be_unqualified(_16132)*->rhs([pfclog(_16132)])
- % RHS-Post1: pfclog((\+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},onEvent(_11768,_11742),{is_unit(_11744,_11742)}==>true_in_world(_11742,_11744)))
- % Support: boxlog((true_in_world(_11470,_11472):- \+nextWorld(_11486,skInstExistsNextWorldTrueInWorld_20FnSk(_11486,_11470,_11496)),{_11472=skInstExistsNextWorldTrueInWorld_20FnSk(_11486,_11470,_11496)},proven_tru(onEvent(_11496,_11470)))),pt(boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742)))),(delistify_last_arg((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742))),boxlog_to_pfc,(\+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},onEvent(_11768,_11742),{is_unit(_11744,_11742)}==>true_in_world(_11742,_11744))),must_be_unqualified((\+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},onEvent(_11768,_11742),{is_unit(_11744,_11742)}==>true_in_world(_11742,_11744)))*->rhs([pfclog((\+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},onEvent(_11768,_11742),{is_unit(_11744,_11742)}==>true_in_world(_11742,_11744)))])))
- % r_sane:mpred_fwc1(pfclog((\+nextWorld(_58380, skInstExistsNextWorldTrueInWorld_20FnSk(_58380, _58388, _58390)), {_58404=skInstExistsNextWorldTrueInWorld_20FnSk(_58380, _58388, _58390)}, onEvent(_58390, _58388), {is_unit(_58404, _58388)}==>true_in_world(_58388, _58404)))).
- % Found positive trigger: pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)))
- % body: compound(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)))),\+is_ftVar(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))))*->rhs([{with_current_why(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))))))}])
- % Found positive trigger: pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)))}])
- % =pfclog=
- % \+nextWorld(_13890, skInstExistsNextWorldTrueInWorld_20FnSk(_13890, _13898, _13900)), {_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890, _13898, _13900)}, onEvent(_13900, _13898), {is_unit(_13914, _13898)}==>true_in_world(_13898, _13914).
- % Found positive trigger: pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)))
- % body: is_kif_clause(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))))*->rhs([clif(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))))])
- % Found positive trigger: pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)))
- % body: rhs([(\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))])
- % RHS-Post1: \+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)
- % Support: pfclog((\+nextWorld(_13594,skInstExistsNextWorldTrueInWorld_20FnSk(_13594,_13602,_13604)),{_13618=skInstExistsNextWorldTrueInWorld_20FnSk(_13594,_13602,_13604)},onEvent(_13604,_13602),{is_unit(_13618,_13602)}==>true_in_world(_13602,_13618))),pt(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))),rhs([(\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))]))
- % r_sane:mpred_fwc1((\+nextWorld(_60874, skInstExistsNextWorldTrueInWorld_20FnSk(_60874, _60882, _60884)), {_60898=skInstExistsNextWorldTrueInWorld_20FnSk(_60874, _60882, _60884)}, onEvent(_60884, _60882), {is_unit(_60898, _60882)}==>true_in_world(_60882, _60898))).
- % Adding negative
- % trigger: nextWorld(_15544,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554))
- % test: call_u_no_bc(nextWorld(_15544,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)))
- % body: _15568=skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)*->pt(onEvent(_15554,_15552),(is_unit(_15568,_15552)*->rhs([true_in_world(_15552,_15568)])))
- % Support: (\+nextWorld(_15846,skInstExistsNextWorldTrueInWorld_20FnSk(_15846,_15854,_15856)),{_15870=skInstExistsNextWorldTrueInWorld_20FnSk(_15846,_15854,_15856)},onEvent(_15856,_15854),{is_unit(_15870,_15854)}==>true_in_world(_15854,_15870)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_15554,_15552)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554),_15552)*->rhs([true_in_world(_15552,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554))])
- % Support: \+nextWorld(_15544,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)),nt(nextWorld(_16562,skInstExistsNextWorldTrueInWorld_20FnSk(_16562,_16570,_16572)),call_u_no_bc(nextWorld(_15544,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554))),(skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)=skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)*->pt(onEvent(_15554,_15552),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554),_15552)*->rhs([true_in_world(_15552,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554))])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: nextWorld(_16562,skInstExistsNextWorldTrueInWorld_20FnSk(_16562,_16570,_16572))
- % cond: call_u_no_bc(nextWorld(_15544,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)=skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)*->pt(onEvent(_15554,_15552),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554),_15552)*->rhs([true_in_world(_15552,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554))])))
- % from: mpred_add_support_fast(pt(onEvent(_15554,_15552),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554),_15552)*->rhs([true_in_world(_15552,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554))]))),(\+nextWorld(_15544,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)),nt(nextWorld(_16562,skInstExistsNextWorldTrueInWorld_20FnSk(_16562,_16570,_16572)),call_u_no_bc(nextWorld(_15544,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554))),(skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)=skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554)*->pt(onEvent(_15554,_15552),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554),_15552)*->rhs([true_in_world(_15552,skInstExistsNextWorldTrueInWorld_20FnSk(_15544,_15552,_15554))])))))))
- % Found positive trigger: pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)))
- % body: compound(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914)))),\+is_ftVar(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))))*->rhs([{with_current_why(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_13890,skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)),{_13914=skInstExistsNextWorldTrueInWorld_20FnSk(_13890,_13898,_13900)},onEvent(_13900,_13898),{is_unit(_13914,_13898)}==>true_in_world(_13898,_13914))))))}])
- % Found positive trigger: boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742))))
- % body: compound(boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742))))),\+is_ftVar(boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742)))))*->rhs([{with_current_why(boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_11742,_11744):- \+nextWorld(_11758,skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)),{_11744=skInstExistsNextWorldTrueInWorld_20FnSk(_11758,_11742,_11768)},proven_tru(onEvent(_11768,_11742)))))))}])
- % RHS-Post1: boxlog((true_in_world(_3368,_3382):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(true_in_world(_3368,_3382):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))},boxlog((true_in_world(_3368,_3382):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366),world),{_3382=skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)},proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((true_in_world(_22052, _22054):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_22074, _22052, _22078), world), {_22054=skInstExistsNextWorldTrueInWorld_20FnSk(_22074, _22052, _22078)}, proven_tru(onEvent(_22078, _22052))))).
- % Found positive trigger: boxlog((true_in_world(_25386,_25388):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412),world),{_25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412)},proven_tru(onEvent(_25412,_25386))))
- % body: compound(boxlog((true_in_world(_25386,_25388):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412),world),{_25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412)},proven_tru(onEvent(_25412,_25386))))),\+is_ftVar(boxlog((true_in_world(_25386,_25388):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412),world),{_25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412)},proven_tru(onEvent(_25412,_25386)))))*->rhs([{with_current_why(boxlog((true_in_world(_25386,_25388):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412),world),{_25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412)},proven_tru(onEvent(_25412,_25386)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_25386,_25388):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412),world),{_25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412)},proven_tru(onEvent(_25412,_25386)))))))}])
- % Found positive trigger: boxlog((true_in_world(_25386,_25388):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412),world),{_25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412)},proven_tru(onEvent(_25412,_25386))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((true_in_world(_25386,_25388):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412),world),{_25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25408,_25386,_25412)},proven_tru(onEvent(_25412,_25386))))}])
- % =boxlog=
- % true_in_world(_25386, _25388) :-
- % \+ inst(skInstExistsNextWorldTrueInWorld_20FnSk(_25408, _25386, _25412),
- % world),
- % { _25388=skInstExistsNextWorldTrueInWorld_20FnSk(_25408, _25386, _25412)
- % },
- % proven_tru(onEvent(_25412, _25386)).
- % Found positive trigger: boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818))))
- % body: is_kif_clause(boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818)))))*->rhs([clif(boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818)))))])
- % Found positive trigger: boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818))))
- % body: delistify_last_arg((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818))),boxlog_to_pfc,_16202),must_be_unqualified(_16202)*->rhs([pfclog(_16202)])
- % RHS-Post1: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},onEvent(_11844,_11818),{is_unit(_11820,_11818)}==>true_in_world(_11818,_11820)))
- % Support: boxlog((true_in_world(_11546,_11548):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11568,_11546,_11572),world),{_11548=skInstExistsNextWorldTrueInWorld_20FnSk(_11568,_11546,_11572)},proven_tru(onEvent(_11572,_11546)))),pt(boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818)))),(delistify_last_arg((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818))),boxlog_to_pfc,(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},onEvent(_11844,_11818),{is_unit(_11820,_11818)}==>true_in_world(_11818,_11820))),must_be_unqualified((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},onEvent(_11844,_11818),{is_unit(_11820,_11818)}==>true_in_world(_11818,_11820)))*->rhs([pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},onEvent(_11844,_11818),{is_unit(_11820,_11818)}==>true_in_world(_11818,_11820)))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_58442, _58444, _58446), world), {_58460=skInstExistsNextWorldTrueInWorld_20FnSk(_58442, _58444, _58446)}, onEvent(_58446, _58444), {is_unit(_58460, _58444)}==>true_in_world(_58444, _58460)))).
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)))
- % body: compound(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)))),\+is_ftVar(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))))*->rhs([{with_current_why(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))))))}])
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)))}])
- % =pfclog=
- % \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972, _13974, _13976), world), {_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972, _13974, _13976)}, onEvent(_13976, _13974), {is_unit(_13990, _13974)}==>true_in_world(_13974, _13990).
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)))
- % body: is_kif_clause(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))))*->rhs([clif(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))))])
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)))
- % body: rhs([(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))])
- % RHS-Post1: \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)
- % Support: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13676,_13678,_13680),world),{_13694=skInstExistsNextWorldTrueInWorld_20FnSk(_13676,_13678,_13680)},onEvent(_13680,_13678),{is_unit(_13694,_13678)}==>true_in_world(_13678,_13694))),pt(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))),rhs([(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))]))
- % r_sane:mpred_fwc1((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_60932, _60934, _60936), world), {_60950=skInstExistsNextWorldTrueInWorld_20FnSk(_60932, _60934, _60936)}, onEvent(_60936, _60934), {is_unit(_60950, _60934)}==>true_in_world(_60934, _60950))).
- % Adding negative
- % trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),world)
- % test: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),world))
- % body: _15644=skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630)*->pt(onEvent(_15630,_15628),(is_unit(_15644,_15628)*->rhs([true_in_world(_15628,_15644)])))
- % Support: (\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15928,_15930,_15932),world),{_15946=skInstExistsNextWorldTrueInWorld_20FnSk(_15928,_15930,_15932)},onEvent(_15932,_15930),{is_unit(_15946,_15930)}==>true_in_world(_15930,_15946)),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_15630,_15628)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),_15628)*->rhs([true_in_world(_15628,skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630))])
- % Support: \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16644,_16646,_16648),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630)=skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630)*->pt(onEvent(_15630,_15628),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),_15628)*->rhs([true_in_world(_15628,skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630))])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16644,_16646,_16648),world)
- % cond: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),world))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630)=skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630)*->pt(onEvent(_15630,_15628),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),_15628)*->rhs([true_in_world(_15628,skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630))])))
- % from: mpred_add_support_fast(pt(onEvent(_15630,_15628),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),_15628)*->rhs([true_in_world(_15628,skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630))]))),(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16644,_16646,_16648),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630)=skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630)*->pt(onEvent(_15630,_15628),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630),_15628)*->rhs([true_in_world(_15628,skInstExistsNextWorldTrueInWorld_20FnSk(_15626,_15628,_15630))])))))))
- % Found positive trigger: pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)))
- % body: compound(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990)))),\+is_ftVar(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))))*->rhs([{with_current_why(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))),ignore(\+addAdmittedArguments(pfclog((\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976),world),{_13990=skInstExistsNextWorldTrueInWorld_20FnSk(_13972,_13974,_13976)},onEvent(_13976,_13974),{is_unit(_13990,_13974)}==>true_in_world(_13974,_13990))))))}])
- % Found positive trigger: boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818))))
- % body: compound(boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818))))),\+is_ftVar(boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818)))))*->rhs([{with_current_why(boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_11818,_11820):- \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844),world),{_11820=skInstExistsNextWorldTrueInWorld_20FnSk(_11840,_11818,_11844)},proven_tru(onEvent(_11844,_11818)))))))}])
- % RHS-Post1: boxlog((true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))},boxlog((true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+true_in_world(_3368,_3382),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((true_in_world(_20902, skInstExistsNextWorldTrueInWorld_20FnSk(_20908, _20902, _20912)):- \+true_in_world(_20902, _20928), proven_tru(onEvent(_20912, _20902))))).
- % Found positive trigger: boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940))))
- % body: compound(boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940))))),\+is_ftVar(boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940)))))*->rhs([{with_current_why(boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940)))))))}])
- % Found positive trigger: boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940))))}])
- % =boxlog=
- % true_in_world(_23940, skInstExistsNextWorldTrueInWorld_20FnSk(_23946, _23940, _23950)) :-
- % \+ true_in_world(_23940, _23966),
- % proven_tru(onEvent(_23950, _23940)).
- % Found positive trigger: boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940))))
- % body: is_kif_clause(boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940)))))*->rhs([clif(boxlog((true_in_world(_23940,skInstExistsNextWorldTrueInWorld_20FnSk(_23946,_23940,_23950)):- \+true_in_world(_23940,_23966),proven_tru(onEvent(_23950,_23940)))))])
- % Found positive trigger: boxlog((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726))))
- % body: delistify_last_arg((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726))),boxlog_to_pfc,_12034),must_be_unqualified(_12034)*->rhs([pfclog(_12034)])
- % RHS-Post1: pfclog((\+true_in_world(_11726,_11752),onEvent(_11736,_11726),{is_unit(_11726,_11736)}==>true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736))))
- % Support: boxlog((true_in_world(_11502,skInstExistsNextWorldTrueInWorld_20FnSk(_11508,_11502,_11512)):- \+true_in_world(_11502,_11528),proven_tru(onEvent(_11512,_11502)))),pt(boxlog((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726)))),(delistify_last_arg((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726))),boxlog_to_pfc,(\+true_in_world(_11726,_11752),onEvent(_11736,_11726),{is_unit(_11726,_11736)}==>true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)))),must_be_unqualified((\+true_in_world(_11726,_11752),onEvent(_11736,_11726),{is_unit(_11726,_11736)}==>true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736))))*->rhs([pfclog((\+true_in_world(_11726,_11752),onEvent(_11736,_11726),{is_unit(_11726,_11736)}==>true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736))))])))
- % r_sane:mpred_fwc1(pfclog((\+true_in_world(_43350, _43352), onEvent(_43362, _43350), {is_unit(_43350, _43362)}==>true_in_world(_43350, skInstExistsNextWorldTrueInWorld_20FnSk(_43384, _43350, _43362))))).
- % Found positive trigger: pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))))
- % body: compound(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))))),\+is_ftVar(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))))*->rhs([{with_current_why(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))))))}])
- % Found positive trigger: pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))))}])
- % =pfclog=
- % \+true_in_world(_13538, _13540), onEvent(_13550, _13538), {is_unit(_13538, _13550)}==>true_in_world(_13538, skInstExistsNextWorldTrueInWorld_20FnSk(_13572, _13538, _13550)).
- % Found positive trigger: pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))))
- % body: is_kif_clause(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))))*->rhs([clif(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))))])
- % Found positive trigger: pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))))
- % body: rhs([(\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))])
- % RHS-Post1: \+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))
- % Support: pfclog((\+true_in_world(_13290,_13292),onEvent(_13302,_13290),{is_unit(_13290,_13302)}==>true_in_world(_13290,skInstExistsNextWorldTrueInWorld_20FnSk(_13324,_13290,_13302)))),pt(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))),rhs([(\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))]))
- % r_sane:mpred_fwc1((\+true_in_world(_54526, _54528), onEvent(_54538, _54526), {is_unit(_54526, _54538)}==>true_in_world(_54526, skInstExistsNextWorldTrueInWorld_20FnSk(_54560, _54526, _54538)))).
- % Adding negative
- % trigger: true_in_world(_14952,_14954)
- % test: call_u_no_bc(true_in_world(_14952,_14954))
- % body: pt(onEvent(_14964,_14952),(is_unit(_14952,_14964)*->rhs([true_in_world(_14952,skInstExistsNextWorldTrueInWorld_20FnSk(_14986,_14952,_14964))])))
- % Support: (\+true_in_world(_15206,_15208),onEvent(_15218,_15206),{is_unit(_15206,_15218)}==>true_in_world(_15206,skInstExistsNextWorldTrueInWorld_20FnSk(_15240,_15206,_15218))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_14964,_14952)
- % body: is_unit(_14952,_14964)*->rhs([true_in_world(_14952,skInstExistsNextWorldTrueInWorld_20FnSk(_14986,_14952,_14964))])
- % Support: \+true_in_world(_14952,_14954),nt(true_in_world(_15800,_15802),call_u_no_bc(true_in_world(_14952,_14954)),pt(onEvent(_14964,_14952),(is_unit(_14952,_14964)*->rhs([true_in_world(_14952,skInstExistsNextWorldTrueInWorld_20FnSk(_14986,_14952,_14964))]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: true_in_world(_15800,_15802)
- % cond: call_u_no_bc(true_in_world(_14952,_14954))
- % action: pt(onEvent(_14964,_14952),(is_unit(_14952,_14964)*->rhs([true_in_world(_14952,skInstExistsNextWorldTrueInWorld_20FnSk(_14986,_14952,_14964))])))
- % from: mpred_add_support_fast(pt(onEvent(_14964,_14952),(is_unit(_14952,_14964)*->rhs([true_in_world(_14952,skInstExistsNextWorldTrueInWorld_20FnSk(_14986,_14952,_14964))]))),(\+true_in_world(_14952,_14954),nt(true_in_world(_15800,_15802),call_u_no_bc(true_in_world(_14952,_14954)),pt(onEvent(_14964,_14952),(is_unit(_14952,_14964)*->rhs([true_in_world(_14952,skInstExistsNextWorldTrueInWorld_20FnSk(_14986,_14952,_14964))]))))))
- % Found positive trigger: pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))))
- % body: compound(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550))))),\+is_ftVar(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))))*->rhs([{with_current_why(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))),ignore(\+addAdmittedArguments(pfclog((\+true_in_world(_13538,_13540),onEvent(_13550,_13538),{is_unit(_13538,_13550)}==>true_in_world(_13538,skInstExistsNextWorldTrueInWorld_20FnSk(_13572,_13538,_13550)))))))}])
- % Found positive trigger: boxlog((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726))))
- % body: compound(boxlog((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726))))),\+is_ftVar(boxlog((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726)))))*->rhs([{with_current_why(boxlog((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_11726,skInstExistsNextWorldTrueInWorld_20FnSk(_11732,_11726,_11736)):- \+true_in_world(_11726,_11752),proven_tru(onEvent(_11736,_11726)))))))}])
- % RHS-Post1: boxlog((true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))},boxlog((true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+nextWorld(_3378,_3382),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((true_in_world(_20956, skInstExistsNextWorldTrueInWorld_20FnSk(_20962, _20956, _20966)):- \+nextWorld(_20962, _20982), proven_tru(onEvent(_20966, _20956))))).
- % Found positive trigger: boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994))))
- % body: compound(boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994))))),\+is_ftVar(boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994)))))*->rhs([{with_current_why(boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994)))))))}])
- % Found positive trigger: boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994))))}])
- % =boxlog=
- % true_in_world(_23994, skInstExistsNextWorldTrueInWorld_20FnSk(_24000, _23994, _24004)) :-
- % \+ nextWorld(_24000, _24020),
- % proven_tru(onEvent(_24004, _23994)).
- % Found positive trigger: boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994))))
- % body: is_kif_clause(boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994)))))*->rhs([clif(boxlog((true_in_world(_23994,skInstExistsNextWorldTrueInWorld_20FnSk(_24000,_23994,_24004)):- \+nextWorld(_24000,_24020),proven_tru(onEvent(_24004,_23994)))))])
- % Found positive trigger: boxlog((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778))))
- % body: delistify_last_arg((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778))),boxlog_to_pfc,_12086),must_be_unqualified(_12086)*->rhs([pfclog(_12086)])
- % RHS-Post1: pfclog((\+nextWorld(_11784,_11804),onEvent(_11788,_11778),{is_unit(_11778,_11788,_11784)}==>true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788))))
- % Support: boxlog((true_in_world(_11554,skInstExistsNextWorldTrueInWorld_20FnSk(_11560,_11554,_11564)):- \+nextWorld(_11560,_11580),proven_tru(onEvent(_11564,_11554)))),pt(boxlog((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778)))),(delistify_last_arg((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778))),boxlog_to_pfc,(\+nextWorld(_11784,_11804),onEvent(_11788,_11778),{is_unit(_11778,_11788,_11784)}==>true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)))),must_be_unqualified((\+nextWorld(_11784,_11804),onEvent(_11788,_11778),{is_unit(_11778,_11788,_11784)}==>true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788))))*->rhs([pfclog((\+nextWorld(_11784,_11804),onEvent(_11788,_11778),{is_unit(_11778,_11788,_11784)}==>true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788))))])))
- % r_sane:mpred_fwc1(pfclog((\+nextWorld(_43588, _43590), onEvent(_43600, _43602), {is_unit(_43602, _43600, _43588)}==>true_in_world(_43602, skInstExistsNextWorldTrueInWorld_20FnSk(_43588, _43602, _43600))))).
- % Found positive trigger: pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))))
- % body: compound(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))))),\+is_ftVar(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))))*->rhs([{with_current_why(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))))))}])
- % Found positive trigger: pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))))}])
- % =pfclog=
- % \+nextWorld(_13604, _13606), onEvent(_13616, _13618), {is_unit(_13618, _13616, _13604)}==>true_in_world(_13618, skInstExistsNextWorldTrueInWorld_20FnSk(_13604, _13618, _13616)).
- % Found positive trigger: pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))))
- % body: is_kif_clause(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))))*->rhs([clif(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))))])
- % Found positive trigger: pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))))
- % body: rhs([(\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))])
- % RHS-Post1: \+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))
- % Support: pfclog((\+nextWorld(_13352,_13354),onEvent(_13364,_13366),{is_unit(_13366,_13364,_13352)}==>true_in_world(_13366,skInstExistsNextWorldTrueInWorld_20FnSk(_13352,_13366,_13364)))),pt(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))),rhs([(\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))]))
- % r_sane:mpred_fwc1((\+nextWorld(_55038, _55040), onEvent(_55050, _55052), {is_unit(_55052, _55050, _55038)}==>true_in_world(_55052, skInstExistsNextWorldTrueInWorld_20FnSk(_55038, _55052, _55050)))).
- % Adding negative
- % trigger: nextWorld(_15038,_15040)
- % test: call_u_no_bc(nextWorld(_15038,_15040))
- % body: pt(onEvent(_15050,_15052),(is_unit(_15052,_15050,_15038)*->rhs([true_in_world(_15052,skInstExistsNextWorldTrueInWorld_20FnSk(_15038,_15052,_15050))])))
- % Support: (\+nextWorld(_15296,_15298),onEvent(_15308,_15310),{is_unit(_15310,_15308,_15296)}==>true_in_world(_15310,skInstExistsNextWorldTrueInWorld_20FnSk(_15296,_15310,_15308))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_15050,_15052)
- % body: is_unit(_15052,_15050,_15038)*->rhs([true_in_world(_15052,skInstExistsNextWorldTrueInWorld_20FnSk(_15038,_15052,_15050))])
- % Support: \+nextWorld(_15038,_15040),nt(nextWorld(_15898,_15900),call_u_no_bc(nextWorld(_15038,_15040)),pt(onEvent(_15050,_15052),(is_unit(_15052,_15050,_15038)*->rhs([true_in_world(_15052,skInstExistsNextWorldTrueInWorld_20FnSk(_15038,_15052,_15050))]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: nextWorld(_15898,_15900)
- % cond: call_u_no_bc(nextWorld(_15038,_15040))
- % action: pt(onEvent(_15050,_15052),(is_unit(_15052,_15050,_15038)*->rhs([true_in_world(_15052,skInstExistsNextWorldTrueInWorld_20FnSk(_15038,_15052,_15050))])))
- % from: mpred_add_support_fast(pt(onEvent(_15050,_15052),(is_unit(_15052,_15050,_15038)*->rhs([true_in_world(_15052,skInstExistsNextWorldTrueInWorld_20FnSk(_15038,_15052,_15050))]))),(\+nextWorld(_15038,_15040),nt(nextWorld(_15898,_15900),call_u_no_bc(nextWorld(_15038,_15040)),pt(onEvent(_15050,_15052),(is_unit(_15052,_15050,_15038)*->rhs([true_in_world(_15052,skInstExistsNextWorldTrueInWorld_20FnSk(_15038,_15052,_15050))]))))))
- % Found positive trigger: pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))))
- % body: compound(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616))))),\+is_ftVar(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))))*->rhs([{with_current_why(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))),ignore(\+addAdmittedArguments(pfclog((\+nextWorld(_13604,_13606),onEvent(_13616,_13618),{is_unit(_13618,_13616,_13604)}==>true_in_world(_13618,skInstExistsNextWorldTrueInWorld_20FnSk(_13604,_13618,_13616)))))))}])
- % Found positive trigger: boxlog((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778))))
- % body: compound(boxlog((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778))))),\+is_ftVar(boxlog((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778)))))*->rhs([{with_current_why(boxlog((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_11778,skInstExistsNextWorldTrueInWorld_20FnSk(_11784,_11778,_11788)):- \+nextWorld(_11784,_11804),proven_tru(onEvent(_11788,_11778)))))))}])
- % RHS-Post1: boxlog((true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))
- % Support: clif(=>(onEvent(_3118,_3120),(currentWorld(_3130),exists(_3134,&(&(inst(_3134,world),nextWorld(_3130,_3134)),true_in_world(_3120,_3134)))))),pt(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),(is_kif_clause(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))*->rhs([{delistify_last_arg(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))),kif_to_boxlog,(true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))},boxlog((true_in_world(_3368,skInstExistsNextWorldTrueInWorld_20FnSk(_3378,_3368,_3366)):- \+inst(_3382,world),proven_tru(onEvent(_3366,_3368))))])))
- % r_sane:mpred_fwc1(boxlog((true_in_world(_16588, skInstExistsNextWorldTrueInWorld_20FnSk(_16594, _16588, _16598)):- \+inst(_16612, world), proven_tru(onEvent(_16598, _16588))))).
- % Found positive trigger: boxlog((true_in_world(_19622,skInstExistsNextWorldTrueInWorld_20FnSk(_19628,_19622,_19632)):- \+inst(_19646,world),proven_tru(onEvent(_19632,_19622))))
- % body: compound(boxlog((true_in_world(_19622,skInstExistsNextWorldTrueInWorld_20FnSk(_19628,_19622,_19632)):- \+inst(_19646,world),proven_tru(onEvent(_19632,_19622))))),\+is_ftVar(boxlog((true_in_world(_19622,skInstExistsNextWorldTrueInWorld_20FnSk(_19628,_19622,_19632)):- \+inst(_19646,world),proven_tru(onEvent(_19632,_19622)))))*->rhs([{with_current_why(boxlog((true_in_world(_19622,skInstExistsNextWorldTrueInWorld_20FnSk(_19628,_19622,_19632)):- \+inst(_19646,world),proven_tru(onEvent(_19632,_19622)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_19622,skInstExistsNextWorldTrueInWorld_20FnSk(_19628,_19622,_19632)):- \+inst(_19646,world),proven_tru(onEvent(_19632,_19622)))))))}])
- % Found positive trigger: boxlog((true_in_world(_19622,skInstExistsNextWorldTrueInWorld_20FnSk(_19628,_19622,_19632)):- \+inst(_19646,world),proven_tru(onEvent(_19632,_19622))))
- % body: rhs([{write('% ='),write(boxlog),write(=),nl,flush_output,wdmsg((true_in_world(_19622,skInstExistsNextWorldTrueInWorld_20FnSk(_19628,_19622,_19632)):- \+inst(_19646,world),proven_tru(onEvent(_19632,_19622))))}])
- % =boxlog=
- % true_in_world(_19622, skInstExistsNextWorldTrueInWorld_20FnSk(_19628, _19622, _19632)) :-
- % \+ inst(_19646, world),
- % proven_tru(onEvent(_19632, _19622)).
- % Found positive trigger: boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396))))
- % body: is_kif_clause(boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396)))))*->rhs([clif(boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396)))))])
- % Found positive trigger: boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396))))
- % body: delistify_last_arg((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396))),boxlog_to_pfc,_11482),must_be_unqualified(_11482)*->rhs([pfclog(_11482)])
- % RHS-Post1: pfclog((\+inst(_7420,world),onEvent(_7406,_7396),{is_unit(_7396,_7406)}==>true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406))))
- % Support: boxlog((true_in_world(_7172,skInstExistsNextWorldTrueInWorld_20FnSk(_7178,_7172,_7182)):- \+inst(_7196,world),proven_tru(onEvent(_7182,_7172)))),pt(boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396)))),(delistify_last_arg((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396))),boxlog_to_pfc,(\+inst(_7420,world),onEvent(_7406,_7396),{is_unit(_7396,_7406)}==>true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)))),must_be_unqualified((\+inst(_7420,world),onEvent(_7406,_7396),{is_unit(_7396,_7406)}==>true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406))))*->rhs([pfclog((\+inst(_7420,world),onEvent(_7406,_7396),{is_unit(_7396,_7406)}==>true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406))))])))
- % r_sane:mpred_fwc1(pfclog((\+inst(_19622, world), onEvent(_19634, _19636), {is_unit(_19636, _19634)}==>true_in_world(_19636, skInstExistsNextWorldTrueInWorld_20FnSk(_19656, _19636, _19634))))).
- % Found positive trigger: pfclog((\+inst(_23048,world),onEvent(_23060,_23062),{is_unit(_23062,_23060)}==>true_in_world(_23062,skInstExistsNextWorldTrueInWorld_20FnSk(_23082,_23062,_23060))))
- % body: compound(pfclog((\+inst(_23048,world),onEvent(_23060,_23062),{is_unit(_23062,_23060)}==>true_in_world(_23062,skInstExistsNextWorldTrueInWorld_20FnSk(_23082,_23062,_23060))))),\+is_ftVar(pfclog((\+inst(_23048,world),onEvent(_23060,_23062),{is_unit(_23062,_23060)}==>true_in_world(_23062,skInstExistsNextWorldTrueInWorld_20FnSk(_23082,_23062,_23060)))))*->rhs([{with_current_why(pfclog((\+inst(_23048,world),onEvent(_23060,_23062),{is_unit(_23062,_23060)}==>true_in_world(_23062,skInstExistsNextWorldTrueInWorld_20FnSk(_23082,_23062,_23060)))),ignore(\+addAdmittedArguments(pfclog((\+inst(_23048,world),onEvent(_23060,_23062),{is_unit(_23062,_23060)}==>true_in_world(_23062,skInstExistsNextWorldTrueInWorld_20FnSk(_23082,_23062,_23060)))))))}])
- % Found positive trigger: pfclog((\+inst(_23048,world),onEvent(_23060,_23062),{is_unit(_23062,_23060)}==>true_in_world(_23062,skInstExistsNextWorldTrueInWorld_20FnSk(_23082,_23062,_23060))))
- % body: rhs([{write('% ='),write(pfclog),write(=),nl,flush_output,wdmsg((\+inst(_23048,world),onEvent(_23060,_23062),{is_unit(_23062,_23060)}==>true_in_world(_23062,skInstExistsNextWorldTrueInWorld_20FnSk(_23082,_23062,_23060))))}])
- % =pfclog=
- % \+inst(_23048, world), onEvent(_23060, _23062), {is_unit(_23062, _23060)}==>true_in_world(_23062, skInstExistsNextWorldTrueInWorld_20FnSk(_23082, _23062, _23060)).
- % Found positive trigger: pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212))))
- % body: is_kif_clause(pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212)))))*->rhs([clif(pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212)))))])
- % Found positive trigger: pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212))))
- % body: rhs([(\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212)))])
- % RHS-Post1: \+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212))
- % Support: pfclog((\+inst(_8952,world),onEvent(_8964,_8966),{is_unit(_8966,_8964)}==>true_in_world(_8966,skInstExistsNextWorldTrueInWorld_20FnSk(_8986,_8966,_8964)))),pt(pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212)))),rhs([(\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212)))]))
- % r_sane:mpred_fwc1((\+inst(_34572, world), onEvent(_34584, _34586), {is_unit(_34586, _34584)}==>true_in_world(_34586, skInstExistsNextWorldTrueInWorld_20FnSk(_34606, _34586, _34584)))).
- % Adding negative
- % trigger: inst(_10618,world)
- % test: call_u_no_bc(inst(_10618,world))
- % body: pt(onEvent(_10630,_10632),(is_unit(_10632,_10630)*->rhs([true_in_world(_10632,skInstExistsNextWorldTrueInWorld_20FnSk(_10652,_10632,_10630))])))
- % Support: (\+inst(_10872,world),onEvent(_10884,_10886),{is_unit(_10886,_10884)}==>true_in_world(_10886,skInstExistsNextWorldTrueInWorld_20FnSk(_10906,_10886,_10884))),mfl(header_sane,'/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc',117)
- % Adding positive
- % trigger: onEvent(_10630,_10632)
- % body: is_unit(_10632,_10630)*->rhs([true_in_world(_10632,skInstExistsNextWorldTrueInWorld_20FnSk(_10652,_10632,_10630))])
- % Support: \+inst(_10618,world),nt(inst(_11466,world),call_u_no_bc(inst(_10618,world)),pt(onEvent(_10630,_10632),(is_unit(_10632,_10630)*->rhs([true_in_world(_10632,skInstExistsNextWorldTrueInWorld_20FnSk(_10652,_10632,_10630))]))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(_11466,world)
- % cond: call_u_no_bc(inst(_10618,world))
- % action: pt(onEvent(_10630,_10632),(is_unit(_10632,_10630)*->rhs([true_in_world(_10632,skInstExistsNextWorldTrueInWorld_20FnSk(_10652,_10632,_10630))])))
- % from: mpred_add_support_fast(pt(onEvent(_10630,_10632),(is_unit(_10632,_10630)*->rhs([true_in_world(_10632,skInstExistsNextWorldTrueInWorld_20FnSk(_10652,_10632,_10630))]))),(\+inst(_10618,world),nt(inst(_11466,world),call_u_no_bc(inst(_10618,world)),pt(onEvent(_10630,_10632),(is_unit(_10632,_10630)*->rhs([true_in_world(_10632,skInstExistsNextWorldTrueInWorld_20FnSk(_10652,_10632,_10630))]))))))
- % Found positive trigger: pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212))))
- % body: compound(pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212))))),\+is_ftVar(pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212)))))*->rhs([{with_current_why(pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212)))),ignore(\+addAdmittedArguments(pfclog((\+inst(_9200,world),onEvent(_9212,_9214),{is_unit(_9214,_9212)}==>true_in_world(_9214,skInstExistsNextWorldTrueInWorld_20FnSk(_9234,_9214,_9212)))))))}])
- % Found positive trigger: boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396))))
- % body: compound(boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396))))),\+is_ftVar(boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396)))))*->rhs([{with_current_why(boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396)))),ignore(\+addAdmittedArguments(boxlog((true_in_world(_7396,skInstExistsNextWorldTrueInWorld_20FnSk(_7402,_7396,_7406)):- \+inst(_7420,world),proven_tru(onEvent(_7406,_7396)))))))}])
- % Found positive trigger: clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))
- % body: compound(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382))))))),\+is_ftVar(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))))*->rhs([{with_current_why(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))),ignore(\+addAdmittedArguments(clif(=>(onEvent(_3366,_3368),(currentWorld(_3378),exists(_3382,&(&(inst(_3382,world),nextWorld(_3378,_3382)),true_in_world(_3368,_3382)))))))))}])
- % gripe_CPUTIME(true, warn(2.023000721999999>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, clif(=>(onEvent(_1678, _1680), (currentWorld(_1690), exists(_1694, &(&(inst(_1694, world), nextWorld(_1690, _1694)), true_in_world(_1680, _1694)))))), (=>(onEvent(_1438, _1440), (currentWorld(_1450), exists(_1454, &(&(inst(_1454, world), nextWorld(_1450, _1454)), true_in_world(_1440, _1454))))), pt(=>(onEvent(_1678, _1680), (currentWorld(_1690), exists(_1694, &(&(inst(_1694, world), nextWorld(_1690, _1694)), true_in_world(_1680, _1694))))), (is_kif_clause(=>(onEvent(_1678, _1680), (currentWorld(_1690), exists(_1694, &(&(inst(_1694, world), nextWorld(_1690, _1694)), true_in_world(_1680, _1694))))))*->rhs([clif(=>(onEvent(_1678, _1680), (currentWorld(_1690), exists(_1694, &(&(inst(_1694, world), nextWorld(_1690, _1694)), true_in_world(_1680, _1694))))))])))), none))).
- % Found positive trigger: =>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694)))))
- % body: compound(=>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694)))))),\+is_ftVar(=>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694))))))*->rhs([{with_current_why(=>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694))))),ignore(\+addAdmittedArguments(=>(onEvent(_1678,_1680),(currentWorld(_1690),exists(_1694,&(&(inst(_1694,world),nextWorld(_1690,_1694)),true_in_world(_1680,_1694))))))))}])
- % gripe_CPUTIME(true, warn(2.0342680310000034>0.4), r_sane:must2('ore.pl':1222, mpred_post_update4(unique, =>(onEvent(Evt, Props), (currentWorld(C), exists(W, &(&(inst(W, world), nextWorld(C, W)), true_in_world(Props, W))))), (mfl(header_sane, '/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc', 117), ax), none))).
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:127
- % r_sane:mpred_fwc1(onEvent(pressed("CLR"), forall([_10052, _10058], =>(initalValue(_10052, _10058), currentValue(_10052, _10058))))).
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526))))
- % body: compound(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526))))),\+is_ftVar(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526)))))*->rhs([{with_current_why(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526)))),ignore(\+addAdmittedArguments(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526)))))))}])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526))))
- % body: is_kif_clause(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526)))))*->rhs([clif(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526)))))])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526))))
- % body: compound(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526))))),\+is_ftVar(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526)))))*->rhs([{with_current_why(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526)))),ignore(\+addAdmittedArguments(onEvent(pressed("CLR"),forall([_1520,_1526],=>(initalValue(_1520,_1526),currentValue(_1520,_1526)))))))}])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit*->rhs([currentWorld(_1766)])
- % is_unit
- % RHS-Post1: currentWorld(_1766)
- % Support: onEvent(pressed("CLR"),forall([_1304,_1310],=>(initalValue(_1304,_1310),currentValue(_1304,_1310)))),pt(onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510)))),(is_unit*->rhs([currentWorld(_1766)])))
- % r_sane:mpred_fwc1(currentWorld(_12838)).
- % Found positive trigger: currentWorld(_2722)
- % body: compound(currentWorld(_2722)),\+is_ftVar(currentWorld(_2722))*->rhs([{with_current_why(currentWorld(_2722),ignore(\+addAdmittedArguments(currentWorld(_2722))))}])
- % Found positive trigger: currentWorld(_2722)
- % body: is_kif_clause(currentWorld(_2722))*->rhs([clif(currentWorld(_2722))])
- % Found positive trigger: currentWorld(_2722)
- % body: compound(currentWorld(_2722)),\+is_ftVar(currentWorld(_2722))*->rhs([{with_current_why(currentWorld(_2722),ignore(\+addAdmittedArguments(currentWorld(_2722))))}])
- % Found negative trigger: currentWorld(skIsCurrentworldExists_19FnSk)
- % cond: call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk))
- % body: skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])
- % Support: spft(currentWorld(skIsCurrentworldExists_19FnSk),\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)]))))
- % Removing (withdraw1)
- % term: currentWorld(skIsCurrentworldExists_19FnSk)
- % support (was): \+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))
- % SUCCESS: retract_u(spft(currentWorld(skIsCurrentworldExists_19FnSk),\+currentWorld(skIsCurrentworldExists_19FnSk),nt(currentWorld(skIsCurrentworldExists_19FnSk),call_u_no_bc(currentWorld(skIsCurrentworldExists_19FnSk)),(skIsCurrentworldExists_19FnSk=skIsCurrentworldExists_19FnSk*->is_unit(skIsCurrentworldExists_19FnSk)*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))))
- % still_supported(currentWorld(skIsCurrentworldExists_19FnSk))
- % SUCCESS: retract_u(spft(currentWorld(skIsCurrentworldExists_19FnSk),onEvent(pressed("CLR"),forall([_10976,_10982],=>(initalValue(_10976,_10982),currentValue(_10976,_10982)))),pt(onEvent(pressed("CLR"),forall([_11034,_11040],=>(initalValue(_11034,_11040),currentValue(_11034,_11040)))),(is_unit*->rhs([currentWorld(skIsCurrentworldExists_19FnSk)])))))
- % moving(inherit_above(header_sane, currentWorld(_16322))).
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_1760,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_1760,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")),world)])
- % RHS-Post1: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_1760,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")),world)
- % Support: onEvent(pressed("CLR"),forall([_1304,_1310],=>(initalValue(_1304,_1310),currentValue(_1304,_1310)))),pt(onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_1760,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_1760,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")),world)])))
- % r_sane:mpred_fwc1(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16368, forall([_16382, _16388], =>(initalValue(_16382, _16388), currentValue(_16382, _16388))), pressed("CLR")), world)).
- % Found positive trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % body: compound(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)),\+is_ftVar(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world))*->rhs([{with_current_why(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),ignore(\+addAdmittedArguments(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world))))}])
- % Found positive trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % body: is_kif_clause(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world))*->rhs([clif(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world))])
- % Found positive trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % body: compound(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)),\+is_ftVar(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world))*->rhs([{with_current_why(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),ignore(\+addAdmittedArguments(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world))))}])
- % Found negative trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % cond: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126),world))
- % body: skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126)=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126)*->pt(onEvent(_3126,_3124),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126),world)])))
- % Support: spft(pt(onEvent(_3126,_3124),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126),world)]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126)=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126)*->pt(onEvent(_3126,_3124),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,_3124,_3126),world)]))))))
- % moving(inherit_above(header_sane, inst(_5750, _5752))).
- % Removing (withdraw1)
- % term: pt(onEvent(pressed("CLR"),forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260))),pressed("CLR")),world)])))
- % support (was): \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260))),pressed("CLR")),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_7254,_7260],=>(initalValue(_7254,_7260),currentValue(_7254,_7260))),pressed("CLR")),world)])))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)])))))))
- % still_supported(pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)]))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)]))),\+true_in_world(forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR"))),nt(true_in_world(_10852,skInstExistsNextWorldTrueInWorld_20FnSk(_10858,_10852,_10862)),call_u_no_bc(true_in_world(forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)])))))))
- % still_supported(pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)]))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)]))),\+nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR"))),nt(nextWorld(_3608,skInstExistsNextWorldTrueInWorld_20FnSk(_3608,_3616,_3618)),call_u_no_bc(nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)])))))))
- % SUCCESS: retract_u(spft(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),onEvent(pressed("CLR"),forall([_8570,_8576],=>(initalValue(_8570,_8576),currentValue(_8570,_8576)))),pt(onEvent(pressed("CLR"),forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)])))))
- % moving(inherit_above(header_sane, mpred_is_spying_pred(_15944, _15946))).
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,world),inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),ax))
- % still_supported(admittedArgument(inst,2,world))
- % SUCCESS: retract_u(spft(admittedArgument(inst,2,world),inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),ax))
- % still_supported(admittedArgument(inst,2,world))
- % Couldn't retract_i: spft(admittedArgument(inst,2,world),inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),ax).
- % still_supported(admittedArgument(inst,2,world))
- % Adding positive
- % trigger: onEvent(_16360,_16358)
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_16356,_16358,_16360))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16356,_16358,_16360),world)])
- % Support: \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16356,_16358,_16360),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_16356,_16358,_16360)=skInstExistsNextWorldTrueInWorld_20FnSk(_16356,_16358,_16360)*->pt(onEvent(_16360,_16358),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_16356,_16358,_16360))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_16356,_16358,_16360),world)])))))
- % Adding NEG mpred_do_fcnt via support
- % trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world)
- % cond: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376),world))
- % action: skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376)=skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376)*->pt(onEvent(_4376,_4374),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376),world)])))
- % from: mpred_add_support_fast(pt(onEvent(_4376,_4374),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376),world)]))),(\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3336,_3342],=>(initalValue(_3336,_3342),currentValue(_3336,_3342))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376)=skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376)*->pt(onEvent(_4376,_4374),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,_4374,_4376),world)])))))))
- % moving(inherit_above(header_sane, onEvent(_9198, _9200))).
- % RHS-Post1: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_4372,forall([_10810,_10816],=>(initalValue(_10810,_10816),currentValue(_10810,_10816))),pressed("CLR")),world)
- % Support: onEvent(pressed("CLR"),forall([_10810,_10816],=>(initalValue(_10810,_10816),currentValue(_10810,_10816)))),pt(onEvent(_8908,_8910),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_8924,_8910,_8908))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_8924,_8910,_8908),world)])))
- % moving(inherit_above(header_sane, inst(_25036, _25038))).
- % Found negative trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % cond: call_u_no_bc(inst(_3116,world))
- % body: pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)])))
- % Support: spft(pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)]))),\+inst(_3116,world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(_3116,world)),pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)])))))
- % Removing (withdraw1)
- % term: pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)])))
- % support (was): \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_5242,forall([_5256,_5262],=>(initalValue(_5256,_5262),currentValue(_5256,_5262))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_5242,forall([_5256,_5262],=>(initalValue(_5256,_5262),currentValue(_5256,_5262))),pressed("CLR")),world)),pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)]))))
- % SUCCESS: retract_u(spft(pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_5242,forall([_5256,_5262],=>(initalValue(_5256,_5262),currentValue(_5256,_5262))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_5242,forall([_5256,_5262],=>(initalValue(_5256,_5262),currentValue(_5256,_5262))),pressed("CLR")),world)),pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)]))))))
- % still_supported(pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)]))))
- % SUCCESS: retract_u(spft(pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)]))),\+true_in_world(_3130,_3724),nt(true_in_world(_3736,_3738),call_u_no_bc(true_in_world(_3130,_3724)),pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128),world)]))))))
- % Found negative trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % cond: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714),world))
- % body: skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714)=skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714)*->pt(onEvent(_7714,_7712),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714),_7710)*->rhs([nextWorld(_7710,skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714))])))
- % Support: spft(pt(onEvent(_7714,_7712),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714),_7710)*->rhs([nextWorld(_7710,skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714))]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714)=skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714)*->pt(onEvent(_7714,_7712),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714),_7710)*->rhs([nextWorld(_7710,skInstExistsNextWorldTrueInWorld_20FnSk(_7710,_7712,_7714))]))))))
- % Removing (withdraw1)
- % term: pt(onEvent(pressed("CLR"),forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164))),pressed("CLR")),_7710)*->rhs([nextWorld(_7710,skInstExistsNextWorldTrueInWorld_20FnSk(_7710,forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164))),pressed("CLR")))])))
- % support (was): \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164))),pressed("CLR")),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_7710,forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_7710,forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164))),pressed("CLR")),_7710)*->rhs([nextWorld(_7710,skInstExistsNextWorldTrueInWorld_20FnSk(_7710,forall([_14158,_14164],=>(initalValue(_14158,_14164),currentValue(_14158,_14164))),pressed("CLR")))])))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),_3122)*->rhs([nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),_3122)*->rhs([nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))])))))))
- % still_supported(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),_3122)*->rhs([nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),_3122)*->rhs([nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))),\+true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))),nt(true_in_world(_11070,skInstExistsNextWorldTrueInWorld_20FnSk(_11076,_11070,_11080)),call_u_no_bc(true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),_3122)*->rhs([nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))])))))))
- % still_supported(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),_3122)*->rhs([nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),_3122)*->rhs([nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))),\+nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))),nt(nextWorld(_3788,skInstExistsNextWorldTrueInWorld_20FnSk(_3788,_3796,_3798)),call_u_no_bc(nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),_3122)*->rhs([nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))])))))))
- % Found negative trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % cond: call_u_no_bc(inst(_9092,world))
- % body: pt(onEvent(_9104,_9106),(is_unit(_9104,_9106)*->rhs([nextWorld(_9132,skInstExistsNextWorldTrueInWorld_20FnSk(_9132,_9106,_9104))])))
- % Support: spft(pt(onEvent(_9104,_9106),(is_unit(_9104,_9106)*->rhs([nextWorld(_9132,skInstExistsNextWorldTrueInWorld_20FnSk(_9132,_9106,_9104))]))),\+inst(_9092,world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(_9092,world)),pt(onEvent(_9104,_9106),(is_unit(_9104,_9106)*->rhs([nextWorld(_9132,skInstExistsNextWorldTrueInWorld_20FnSk(_9132,_9106,_9104))])))))
- % Removing (withdraw1)
- % term: pt(onEvent(_9104,_9106),(is_unit(_9104,_9106)*->rhs([nextWorld(_9132,skInstExistsNextWorldTrueInWorld_20FnSk(_9132,_9106,_9104))])))
- % support (was): \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14320,forall([_14334,_14340],=>(initalValue(_14334,_14340),currentValue(_14334,_14340))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14320,forall([_14334,_14340],=>(initalValue(_14334,_14340),currentValue(_14334,_14340))),pressed("CLR")),world)),pt(onEvent(_9104,_9106),(is_unit(_9104,_9106)*->rhs([nextWorld(_9132,skInstExistsNextWorldTrueInWorld_20FnSk(_9132,_9106,_9104))]))))
- % SUCCESS: retract_u(spft(pt(onEvent(_9104,_9106),(is_unit(_9104,_9106)*->rhs([nextWorld(_9132,skInstExistsNextWorldTrueInWorld_20FnSk(_9132,_9106,_9104))]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14320,forall([_14334,_14340],=>(initalValue(_14334,_14340),currentValue(_14334,_14340))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_14320,forall([_14334,_14340],=>(initalValue(_14334,_14340),currentValue(_14334,_14340))),pressed("CLR")),world)),pt(onEvent(_9104,_9106),(is_unit(_9104,_9106)*->rhs([nextWorld(_9132,skInstExistsNextWorldTrueInWorld_20FnSk(_9132,_9106,_9104))]))))))
- % still_supported(pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([nextWorld(_3156,skInstExistsNextWorldTrueInWorld_20FnSk(_3156,_3130,_3128))]))))
- % SUCCESS: retract_u(spft(pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([nextWorld(_3156,skInstExistsNextWorldTrueInWorld_20FnSk(_3156,_3130,_3128))]))),\+true_in_world(_3130,_5324),nt(true_in_world(_5336,_5338),call_u_no_bc(true_in_world(_3130,_5324)),pt(onEvent(_3128,_3130),(is_unit(_3128,_3130)*->rhs([nextWorld(_3156,skInstExistsNextWorldTrueInWorld_20FnSk(_3156,_3130,_3128))]))))))
- % Found negative trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % cond: call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826),world))
- % body: skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826)=skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826)*->pt(onEvent(_11826,_11824),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826),_11824)*->rhs([true_in_world(_11824,skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826))])))
- % Support: spft(pt(onEvent(_11826,_11824),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826),_11824)*->rhs([true_in_world(_11824,skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826))]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826)=skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826)*->pt(onEvent(_11826,_11824),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826),_11824)*->rhs([true_in_world(_11824,skInstExistsNextWorldTrueInWorld_20FnSk(_11822,_11824,_11826))]))))))
- % Removing (withdraw1)
- % term: pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))])))
- % support (was): \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))])))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),world)),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))])))))))
- % still_supported(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))),\+true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))),nt(true_in_world(_3788,skInstExistsNextWorldTrueInWorld_20FnSk(_3794,_3788,_3798)),call_u_no_bc(true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))])))))))
- % still_supported(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))))
- % SUCCESS: retract_u(spft(pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))]))),\+nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))),nt(nextWorld(_12234,skInstExistsNextWorldTrueInWorld_20FnSk(_12234,_12242,_12244)),call_u_no_bc(nextWorld(_3122,skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))),(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))=skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR"))*->pt(onEvent(pressed("CLR"),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378)))),(is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")),forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))))*->rhs([true_in_world(forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),skInstExistsNextWorldTrueInWorld_20FnSk(_3122,forall([_3372,_3378],=>(initalValue(_3372,_3378),currentValue(_3372,_3378))),pressed("CLR")))])))))))
- % Found negative trigger: inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world)
- % cond: call_u_no_bc(inst(_3116,world))
- % body: pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))])))
- % Support: spft(pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))]))),\+inst(_3116,world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(_3116,world)),pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))])))))
- % Removing (withdraw1)
- % term: pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))])))
- % support (was): \+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_5248,forall([_5262,_5268],=>(initalValue(_5262,_5268),currentValue(_5262,_5268))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_5248,forall([_5262,_5268],=>(initalValue(_5262,_5268),currentValue(_5262,_5268))),pressed("CLR")),world)),pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))]))))
- % SUCCESS: retract_u(spft(pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))]))),\+inst(skInstExistsNextWorldTrueInWorld_20FnSk(_5248,forall([_5262,_5268],=>(initalValue(_5262,_5268),currentValue(_5262,_5268))),pressed("CLR")),world),nt(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_3046,forall([_3060,_3066],=>(initalValue(_3060,_3066),currentValue(_3060,_3066))),pressed("CLR")),world),call_u_no_bc(inst(skInstExistsNextWorldTrueInWorld_20FnSk(_5248,forall([_5262,_5268],=>(initalValue(_5262,_5268),currentValue(_5262,_5268))),pressed("CLR")),world)),pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))]))))))
- % still_supported(pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))]))))
- % SUCCESS: retract_u(spft(pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))]))),\+true_in_world(_3130,_3724),nt(true_in_world(_3736,_3738),call_u_no_bc(true_in_world(_3130,_3724)),pt(onEvent(_3128,_3130),(is_unit(_3130,_3128)*->rhs([true_in_world(_3130,skInstExistsNextWorldTrueInWorld_20FnSk(_3162,_3130,_3128))]))))))
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_8082,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")),world)])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),_11990)*->rhs([inst(skInstExistsNextWorldTrueInWorld_20FnSk(_11990,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")),world)])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_15936,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")),_15936)*->rhs([nextWorld(_15936,skInstExistsNextWorldTrueInWorld_20FnSk(_15936,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")))])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))*->rhs([nextWorld(_1786,skInstExistsNextWorldTrueInWorld_20FnSk(_1786,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")))])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(_3856,pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))*->rhs([nextWorld(_3856,skInstExistsNextWorldTrueInWorld_20FnSk(_3856,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")))])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(skInstExistsNextWorldTrueInWorld_20FnSk(_7814,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))*->rhs([true_in_world(forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),skInstExistsNextWorldTrueInWorld_20FnSk(_7814,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")))])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR"))*->rhs([true_in_world(forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),skInstExistsNextWorldTrueInWorld_20FnSk(_12400,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")))])
- % Found positive trigger: onEvent(pressed("CLR"),forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))))
- % body: is_unit(forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR"),_1770)*->rhs([true_in_world(forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),skInstExistsNextWorldTrueInWorld_20FnSk(_1770,forall([_1504,_1510],=>(initalValue(_1504,_1510),currentValue(_1504,_1510))),pressed("CLR")))])
- % /home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc:136
- % :- test_boxlog(<=>(non_empty_world(W_VAR), exists([W_VAR, Prop_VAR], true_in_world(Prop_VAR, W_VAR)))).
- % kif :-
- % <=>(non_empty_world(W), exists([W, Prop], true_in_world(Prop, W))).
- % qualify_nesc :-
- % nesc(<=>(non_empty_world(W), exists([W, Prop], true_in_world(Prop, W)))).
- % debugm(header_sane, sc_success(header_sane, r_sane:nnf(KB, nesc(b_d(KB, nesc, poss), <=>(non_empty_world(W), exists([W, Prop], true_in_world(Prop, W)))), &(nesc(b_d(KB, nesc, poss), v(~true_in_world(Prop, W), non_empty_world(W))), nesc(b_d(KB, nesc, poss), v(~non_empty_world(W), v(v(true_in_world(Prop, W), v(true_in_world(skPropTrueInWorld_23FnSk(W), W), ~skolem(Prop, skPropTrueInWorld_23FnSk(W)))), v(~skolem(W, skWArg2TrueInWorld_21FnSk(Prop)), v(true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop)), v(true_in_world(skIsPropTrueInWorld_22FnSk, skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk)), ~skolem(Prop, skIsPropTrueInWorld_22FnSk))))))))))).
- % nnf :-
- % &(nesc(v(~true_in_world(Prop, W), non_empty_world(W))), nesc(v(~non_empty_world(W), v(v(true_in_world(Prop, W), v(true_in_world(skPropTrueInWorld_23FnSk(W), W), ~skolem(Prop, skPropTrueInWorld_23FnSk(W)))), v(~skolem(W, skWArg2TrueInWorld_21FnSk(Prop)), v(true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop)), v(true_in_world(skIsPropTrueInWorld_22FnSk, skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk)), ~skolem(Prop, skIsPropTrueInWorld_22FnSk)))))))).
- % th_nnf_in :-
- % ( neg(true_in_world(Prop, W))
- % ; tru(non_empty_world(W))
- % ),
- % ( neg(non_empty_world(W))
- % ; ( tru(true_in_world(Prop, W))
- % ; tru(true_in_world(skPropTrueInWorld_23FnSk(W), W))
- % ; neg(skolem(Prop, skPropTrueInWorld_23FnSk(W)))
- % )
- % ; neg(skolem(W, skWArg2TrueInWorld_21FnSk(Prop)))
- % ; tru(true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop)))
- % ; tru(true_in_world(skIsPropTrueInWorld_22FnSk,
- % skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk)))
- % ; neg(skolem(Prop, skIsPropTrueInWorld_22FnSk))
- % ).
- % th_nnf_out :-
- % ~ (n(neg(true_in_world(Prop, W))), n(tru(non_empty_world(W)));n(neg(non_empty_world(W))), (n(tru(true_in_world(Prop, W))), n(tru(true_in_world(skPropTrueInWorld_23FnSk(W), W))), n(neg(skolem(Prop, skPropTrueInWorld_23FnSk(W))))), n(neg(skolem(W, skWArg2TrueInWorld_21FnSk(Prop)))), n(tru(true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop)))), n(tru(true_in_world(skIsPropTrueInWorld_22FnSk, skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk)))), n(neg(skolem(Prop, skIsPropTrueInWorld_22FnSk)))).
- true_in_world(skPropTrueInWorld_23FnSk(W), W) :-
- \+ true_in_world(Prop, W),
- { W=skWArg2TrueInWorld_21FnSk(Prop)
- },
- \+ true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop)),
- \+ true_in_world(skIsPropTrueInWorld_22FnSk,
- skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk)),
- fail,
- proven_tru(non_empty_world(W)).
- true_in_world(skIsPropTrueInWorld_22FnSk, skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk)) :-
- \+ true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop)),
- fail,
- \+ true_in_world(Prop, W),
- \+ true_in_world(skPropTrueInWorld_23FnSk(W), W),
- proven_tru(non_empty_world(W)).
- true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop)) :-
- \+ true_in_world(skIsPropTrueInWorld_22FnSk,
- skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk)),
- { Prop=skIsPropTrueInWorld_22FnSk
- },
- \+ true_in_world(Prop, W),
- \+ true_in_world(skPropTrueInWorld_23FnSk(W), W),
- { Prop=skPropTrueInWorld_23FnSk(W)
- },
- proven_tru(non_empty_world(W)).
- true_in_world(Prop, W) :-
- \+ true_in_world(skPropTrueInWorld_23FnSk(W), W),
- { Prop=skPropTrueInWorld_23FnSk(W)
- },
- { W=skWArg2TrueInWorld_21FnSk(Prop)
- },
- \+ true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop)),
- \+ true_in_world(skIsPropTrueInWorld_22FnSk,
- skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk)),
- { Prop=skIsPropTrueInWorld_22FnSk
- },
- proven_tru(non_empty_world(W)).
- proven_neg(true_in_world(Prop, W)) :-
- proven_neg(non_empty_world(W)).
- proven_neg(skolem(Prop, skPropTrueInWorld_23FnSk(W))) :-
- proven_neg(true_in_world(skPropTrueInWorld_23FnSk(W), W)),
- proven_neg(true_in_world(Prop, W)),
- { ignore(W=skWArg2TrueInWorld_21FnSk(Prop))
- },
- proven_neg(true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop))),
- proven_neg(true_in_world(skIsPropTrueInWorld_22FnSk,
- skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk))),
- { ignore(Prop=skIsPropTrueInWorld_22FnSk)
- },
- proven_not_neg(non_empty_world(W)).
- proven_neg(skolem(Prop, skIsPropTrueInWorld_22FnSk)) :-
- proven_neg(true_in_world(skIsPropTrueInWorld_22FnSk,
- skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk))),
- proven_neg(true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop))),
- { ignore(W=skWArg2TrueInWorld_21FnSk(Prop))
- },
- proven_neg(true_in_world(Prop, W)),
- proven_neg(true_in_world(skPropTrueInWorld_23FnSk(W), W)),
- { ignore(Prop=skPropTrueInWorld_23FnSk(W))
- },
- proven_not_neg(non_empty_world(W)).
- proven_neg(skolem(W, skWArg2TrueInWorld_21FnSk(Prop))) :-
- proven_neg(true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop))),
- proven_neg(true_in_world(skIsPropTrueInWorld_22FnSk,
- skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk))),
- { ignore(Prop=skIsPropTrueInWorld_22FnSk)
- },
- proven_neg(true_in_world(Prop, W)),
- proven_neg(true_in_world(skPropTrueInWorld_23FnSk(W), W)),
- { ignore(Prop=skPropTrueInWorld_23FnSk(W))
- },
- proven_not_neg(non_empty_world(W)).
- proven_neg(non_empty_world(W)) :-
- proven_neg(true_in_world(Prop, W)),
- proven_neg(true_in_world(skPropTrueInWorld_23FnSk(W), W)),
- { ignore(Prop=skPropTrueInWorld_23FnSk(W))
- },
- { ignore(W=skWArg2TrueInWorld_21FnSk(Prop))
- },
- proven_neg(true_in_world(Prop, skWArg2TrueInWorld_21FnSk(Prop))),
- proven_neg(true_in_world(skIsPropTrueInWorld_22FnSk,
- skWArg2TrueInWorld_21FnSk(skIsPropTrueInWorld_22FnSk))),
- { ignore(Prop=skIsPropTrueInWorld_22FnSk)
- }.
- non_empty_world(W) :-
- proven_tru(true_in_world(Prop, W)).
- % init_why(after('/home/prologmud_server/lib/swipl/pack/logicmoo_base/t/examples/fol/fol_calc_01.pfc')).
- % start_x_ide
- % Dont forget to ?- logicmoo_i_cyc_xform.
- % after_boot
- Welcome to SWI-Prolog (threaded, 64 bits, version 7.5.11-37-g67f3eb0-DIRTY)
- SWI-Prolog comes with ABSOLUTELY NO WARRANTY. This is free software.
- Please run ?- license. for legal details.
- For online help and background, visit http://www.swi-prolog.org
- For built-in help, use ?- help(Topic). or ?- apropos(Word).
- header_sane: ?-
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement