1:-include(library('ec_planner/ec_test_incl')). 2:-expects_dialect(pfc). 3 % loading(always,'ecnet/Money.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 15% event Pay(agent,agent) 16 % event(pay(agent,agent)). 17==> mpred_prop(pay(agent,agent),event). 18==> meta_argtypes(pay(agent,agent)). 19 20% event Tip(agent,agent) 21 % event(tip(agent,agent)). 22==> mpred_prop(tip(agent,agent),event). 23==>