I am trying to execute this code available with the documentation of Mozart:
declare
functor Fractions
import FD
export Script
define
proc {Script Root}
sol(a:A b:B c:C d:D e:E f:F g:G h:H i:I) = Root
BC = {FD.decl}
EF = {FD.decl}
HI = {FD.decl}
in
Root ::: 1#9
{FD.distinct Root}
BC =: 10*B + C
EF =: 10*E + F
HI =: 10*H + I
A*EF*HI + D*BC*HI + G*BC*EF =: BC*EF*HI
{FD.distribute ff Root}
end
end
E = {New Search.parallel init(plm03:1#ssh plm04:1#ssh)}
{E trace(true)}
Xs = {E all(Fractions $)}
but when compiling from shell I have errors like "Search not introduced".
I have already executed the sequential code (on a single machine without using the class Search.parallel) and the result is ok.
I've also tried to include the last three lines in the clause "define-end" but there are still some errors.
Obviously, I make some mistakes in the definition of the functor, but I haven't got the solution yet.
So, I would ask if anyone could help me with some suggestions about these errors. Thanks a lot to all.
Best regards.
Lucia Cambise
_________________________________________________________________________________ mozart-users mailing list [email protected] http://www.mozart-oz.org/mailman/listinfo/mozart-users
