1:-include(library('ec_planner/ec_test_incl')).    2:-expects_dialect(pfc).    3 %  loading(always,'examples/Mueller2006/Chapter13/Abduction.e').
    4%;
    5%; Copyright (c) 2005 IBM Corporation and others.
    6%; All rights reserved. This program and the accompanying materials
    7%; are made available under the terms of the Common Public License v1.0
    8%; which accompanies this distribution, and is available at
    9%; http://www.eclipse.org/legal/cpl-v10.html
   10%;
   11%; Contributors:
   12%; IBM - Initial implementation
   13%;
   14%; @book{Mueller:2006,
   15%;   author = "Erik T. Mueller",
   16%;   year = "2006",
   17%;   title = "Commonsense Reasoning",
   18%;   address = "San Francisco",
   19%;   publisher = "Morgan Kaufmann/Elsevier",
   20%; }
   21%;
   22
   23% load foundations/Root.e
   24
   25% load foundations/EC.e
   26
   27% sort agent
   28==> sort(agent).
   29
   30% fluent Awake(agent)
   31 %  fluent(awake(agent)).
   32==> mpred_prop(awake(agent),fluent).
   33==> meta_argtypes(awake(agent)).
   34
   35% event WakeUp(agent)
   36 %  event(wakeUp(agent)).
   37==> mpred_prop(wakeUp(agent),event).
   38==> meta_argtypes(wakeUp(agent)).
   39
   40
   41% From /opt/logicmoo_workspace/packs_sys/small_adventure_games/prolog/ec_planner/examples/Mueller2006/Chapter13/Abduction.e:27
   42% [agent,time]
   43 % Initiates(WakeUp(agent),Awake(agent),time).
   44axiom(initiates(wakeUp(Agent), awake(Agent), Time),
   45    []).
   46
   47% From /opt/logicmoo_workspace/packs_sys/small_adventure_games/prolog/ec_planner/examples/Mueller2006/Chapter13/Abduction.e:29
   48% agent James
   49% From /opt/logicmoo_workspace/packs_sys/small_adventure_games/prolog/ec_planner/examples/Mueller2006/Chapter13/Abduction.e:30
   50==> t(agent,james).
   51
   52
   53% From /opt/logicmoo_workspace/packs_sys/small_adventure_games/prolog/ec_planner/examples/Mueller2006/Chapter13/Abduction.e:30
   54% !HoldsAt(Awake(James),0).
   55 %  not(initially(awake(james))).
   56axiom(not(initially(awake(james))),
   57    []).
   58
   59
   60% From /opt/logicmoo_workspace/packs_sys/small_adventure_games/prolog/ec_planner/examples/Mueller2006/Chapter13/Abduction.e:31
   61% HoldsAt(Awake(James),1).
   62holds_at(awake(james),1).
   63
   64% From /opt/logicmoo_workspace/packs_sys/small_adventure_games/prolog/ec_planner/examples/Mueller2006/Chapter13/Abduction.e:33
   65% range time 0 1
   66% From /opt/logicmoo_workspace/packs_sys/small_adventure_games/prolog/ec_planner/examples/Mueller2006/Chapter13/Abduction.e:34
   67==> range(time,0,1).
   68
   69% range offset 1 1
   70% From /opt/logicmoo_workspace/packs_sys/small_adventure_games/prolog/ec_planner/examples/Mueller2006/Chapter13/Abduction.e:35
   71==>