fwd: msg from Xun Luo about CASO agents

classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view

fwd: msg from Xun Luo about CASO agents

Rafael H Bordini-2
--- Forwarded Message -----------------------------
From: Hongyun Xu <[hidden email]>
Date: 25/03/2012 20:05
To:   "[hidden email]"
<[hidden email]>

Hi, there

I am just wandering how to implement CASO agent mentioned in your
Projects of Jason
I am trying to do work improving it.

There are two steps mentioned in the part of that paper--Modifying Jason.
Is there any extra steps?
If there is a separtate file for beliefs(as following) in constraint
solver ECLiPSe, how we write beliefs in .asl file of Jason? If there are
parameters for each actions in a plan, do we need to change the other
codes, which Jason did not deal with that?

By the way, is there any examples in Jason that refers to the applicable
Thanks for your help.




:- lib(eplex).

Vars = [A1,A2,A3,B1,B2,B3,C1,C2,C3,D1,D2,D3],
Vars $:: 0.0..1.0Inf,
A1 + A2 + A3 $= 21,
B1 + B2 + B3 $= 40,
C1 + C2 + C3 $= 34,
D1 + D2 + D3 $= 10,
A1 + B1 + C1 + D1 $=< 50,
A2 + B2 + C2 + D2 $=< 30,
A3 + B3 + C3 + D3 $=< 40,
eplex_solver_setup(min(10*A1 + 7*A2 + 200*A3 +8*B1 + 5*B2 + 10*B3 +5*C1
+ 5*C2 +  8*C3 +9*D1 + 3*D2 +  7*D3)),
(foreach(V, Vars) do
eplex_var_get(V, typed_solution, V)
output_data('mylog.txt', [Cost,Vars]).

:-mode output_data(++,+).
     param(T) do
         writeln(T, X)

This SF email is sponsosred by:
Try Windows Azure free for 90 days Click Here
Jason-users mailing list
[hidden email]