tips for a lispanalogy example

Iosif Armaos iarmaos at otenet.gr
Fri Oct 26 00:31:39 EDT 2001


------=_NextPart_000_000D_01C15DE7.DE4CFAE0
Content-Type: multipart/alternative;
	boundary="----=_NextPart_001_000E_01C15DE7.DE4CFAE0"


------=_NextPart_001_000E_01C15DE7.DE4CFAE0
Content-Type: text/plain;
	charset="iso-8859-7"
Content-Transfer-Encoding: quoted-printable

To whom it may concern

In the context of one particular unit of my postgraduate studies at the =
University of Athens, I am trying to run under Act-r an implementation =
of analogy as mentioned in Act-R Primer (Learning by Analogy p.40) and =
Act-R User=92s Manual (Section 12 : Analogy and Section 14 : =
Examples-lispanalogy in the Examples folder) but I am unfortunately =
experiencing difficulties.=20

I have to mention that I am this program through Windows and I wonder if =
there are any tips you can give to me, to be able to succeed in running =
this program.

(chunk-type LISP-OPERATION TYPE ARG1 ARG2 ACHIEVED-BY)

(chunk-type LISP-CALL FIRST SECOND THIRD)

(chunk-type ARITHMETIC-SYMBOL IMPLEMENTS)

(chunk-type ARITHMETIC-OPERATION SYMBOLIZED-BY)

(chunk-type NUMBER-NAME VALUE)

(chunk-type NUMERIC-VALUE)

(add-dm

    (* ISA ARITHMETIC-SYMBOL IMPLEMENTS MULTIPLICATION)

    (+ ISA ARITHMETIC-SYMBOL IMPLEMENTS ADDITION)

    (- ISA ARITHMETIC-SYMBOL IMPLEMENTS SUBTRACTION)

    (/ ARITHMETIC-SYMBOL IMPLEMENTS DIVISION)

    (MULTIPLICATION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY *)

    (ADDITION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY +)

    (DIVISION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY /)

    (SUBTRACTION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY -)

    (ONE ISA NUMBER-NAME VALUE 1)

    (TWO ISA NUMBER-NAME VALUE 2)

    (THREE ISA NUMBER-NAME VALUE 3)

    (FOUR ISA NUMBER-NAME VALUE 4)

    (FIVE ISA NUMBER-NAME VALUE 5)

    (SIX ISA NUMBER-NAME VALUE 6)

    (SEVEN ISA NUMBER-NAME VALUE 7)

    (EIGHT ISA NUMBER-NAME VALUE 8)

    (NINE ISA NUMBER-NAME VALUE 9)

    (TEN ISA NUMBER-NAME VALUE 10)

    (ELEVEN ISA NUMBER-NAME VALUE 11)

    (1 ISA NUMERIC-VALUE)

    (2 ISA NUMERIC-VALUE)

    (3 ISA NUMERIC-VALUE)

    (4 ISA NUMERIC-VALUE)

    (5 ISA NUMERIC-VALUE)

    (6 ISA NUMERIC-VALUE)

    (7 ISA NUMERIC-VALUE)

    (8 ISA NUMERIC-VALUE)

    (9 ISA NUMERIC-VALUE)

    (10 ISA NUMERIC-VALUE)

    (11 ISA NUMERIC-VALUE)

    (EXAMBLE-GOAL ISA LISP-OPERATION TYPE MULTIPLICATION ARG1 TWO ARG2 =
THREE ACHIEVED-BY EXAMBLE-CAUSE)

    (EXAMBLE-CAUSE ISA LISP-CALL FIRST * SECOND TWO THIRD THREE)

    (PROBLEM1 LISP-OPERATION TYPE ADDITION ARG1 FOUR ARG2 SEVEN)

    (PROBLEM2 LISP-OPERATION TYPE DIVISION ARG1 TEN ARG2 FIVE)

    (PROBLEM3 LISP-OPERATION TYPE SUBTRACTION ARG1 NINE ARG2 ONE)

)=20



(P MULT

    =3DGOAL>

        ISA LISP-OPERATION

        TYPE MULTIPLICATION

        ARG1 =3DARG1

        ARG2 =3DARG2

    =3DARG1>

        ISA NUMBER-NAME

        VALUE =3DVALUE1

    =3DARG2>

        ISA NUMBER-NAME

        VALUE =3DVALUE2

=3D=3D>

    =3DSUBGOAL>

        ISA LISP-CALL

        FIRST *

        SECOND =3DARG1

        THIRD =3DARG2

    !OUTPUT! ("PRODUCTION MULT SETS A SUBGOAL TO MAKE A LISP-CALL."))





(GOAL-FOCUS PROBLEM1)





Yours faithfully=20

Iosif Armaos


------=_NextPart_001_000E_01C15DE7.DE4CFAE0
Content-Type: text/html;
	charset="iso-8859-7"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD>

<META content=3D"text/html; charset=3Dwindows-1253" =
http-equiv=3DContent-Type>
<META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR>
</HEAD>
<BODY bgColor=3D#fffff0>
<DIV>
<P>To whom it may concern</P>
<P>In the context of one particular unit of my postgraduate studies at =
the=20
University of Athens, I am trying to run under Act-r an implementation =
of=20
analogy as mentioned in Act-R Primer (Learning by Analogy p.40) and =
Act-R=20
User’s Manual (Section 12 : Analogy and Section 14 : =
Examples-lispanalogy=20
in the Examples folder) but I am unfortunately experiencing =
difficulties. </P>
<P>I have to mention that I am this program through Windows and I wonder =
if=20
there are any tips you can give to me, to be able to succeed in running =
this=20
program.</P><B><FONT face=3D"Courier New" size=3D1><FONT face=3D"Courier =
New" size=3D1>
<P>(chunk-type LISP-OPERATION TYPE ARG1 ARG2 ACHIEVED-BY)</P>
<P>(chunk-type LISP-CALL FIRST SECOND THIRD)</P>
<P>(chunk-type ARITHMETIC-SYMBOL IMPLEMENTS)</P>
<P>(chunk-type ARITHMETIC-OPERATION SYMBOLIZED-BY)</P>
<P>(chunk-type NUMBER-NAME VALUE)</P>
<P>(chunk-type NUMERIC-VALUE)</P>
<P>(add-dm</P>
<P>    (* ISA ARITHMETIC-SYMBOL IMPLEMENTS =
MULTIPLICATION)</P>
<P>    (+ ISA ARITHMETIC-SYMBOL IMPLEMENTS ADDITION)</P>
<P>    (- ISA ARITHMETIC-SYMBOL IMPLEMENTS =
SUBTRACTION)</P>
<P>    (/ ARITHMETIC-SYMBOL IMPLEMENTS DIVISION)</P>
<P>    (MULTIPLICATION ISA ARITHMETIC-OPERATION =
SYMBOLIZED-BY=20
*)</P>
<P>    (ADDITION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY =
+)</P>
<P>    (DIVISION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY =
/)</P>
<P>    (SUBTRACTION ISA ARITHMETIC-OPERATION =
SYMBOLIZED-BY -)</P>
<P>    (ONE ISA NUMBER-NAME VALUE 1)</P>
<P>    (TWO ISA NUMBER-NAME VALUE 2)</P>
<P>    (THREE ISA NUMBER-NAME VALUE 3)</P>
<P>    (FOUR ISA NUMBER-NAME VALUE 4)</P>
<P>    (FIVE ISA NUMBER-NAME VALUE 5)</P>
<P>    (SIX ISA NUMBER-NAME VALUE 6)</P>
<P>    (SEVEN ISA NUMBER-NAME VALUE 7)</P>
<P>    (EIGHT ISA NUMBER-NAME VALUE 8)</P>
<P>    (NINE ISA NUMBER-NAME VALUE 9)</P>
<P>    (TEN ISA NUMBER-NAME VALUE 10)</P>
<P>    (ELEVEN ISA NUMBER-NAME VALUE 11)</P>
<P>    (1 ISA NUMERIC-VALUE)</P>
<P>    (2 ISA NUMERIC-VALUE)</P>
<P>    (3 ISA NUMERIC-VALUE)</P>
<P>    (4 ISA NUMERIC-VALUE)</P>
<P>    (5 ISA NUMERIC-VALUE)</P>
<P>    (6 ISA NUMERIC-VALUE)</P>
<P>    (7 ISA NUMERIC-VALUE)</P>
<P>    (8 ISA NUMERIC-VALUE)</P>
<P>    (9 ISA NUMERIC-VALUE)</P>
<P>    (10 ISA NUMERIC-VALUE)</P>
<P>    (11 ISA NUMERIC-VALUE)</P>
<P>    (EXAMBLE-GOAL ISA LISP-OPERATION TYPE =
MULTIPLICATION ARG1=20
TWO ARG2 THREE ACHIEVED-BY EXAMBLE-CAUSE)</P>
<P>    (EXAMBLE-CAUSE ISA LISP-CALL FIRST * SECOND TWO =
THIRD=20
THREE)</P>
<P>    (PROBLEM1 LISP-OPERATION TYPE ADDITION ARG1 FOUR =
ARG2=20
SEVEN)</P>
<P>    (PROBLEM2 LISP-OPERATION TYPE DIVISION ARG1 TEN =
ARG2=20
FIVE)</P>
<P>    (PROBLEM3 LISP-OPERATION TYPE SUBTRACTION ARG1 =
NINE ARG2=20
ONE)</P>
<P>) </P></FONT>
<P> </P><FONT face=3D"Courier New" size=3D1>
<P>(P MULT</P>
<P>    =3DGOAL></P>
<P>        ISA LISP-OPERATION</P>
<P>        TYPE MULTIPLICATION</P>
<P>        ARG1 =3DARG1</P>
<P>        ARG2 =3DARG2</P>
<P>    =3DARG1></P>
<P>        ISA NUMBER-NAME</P>
<P>        VALUE =3DVALUE1</P>
<P>    =3DARG2></P>
<P>        ISA NUMBER-NAME</P>
<P>        VALUE =3DVALUE2</P>
<P>=3D=3D></P>
<P>    =3DSUBGOAL></P>
<P>        ISA LISP-CALL</P>
<P>        FIRST *</P>
<P>        SECOND =3DARG1</P>
<P>        THIRD =3DARG2</P>
<P>    !OUTPUT! ("PRODUCTION MULT SETS A SUBGOAL TO =
MAKE A=20
LISP-CALL."))</P></FONT>
<P> </P>
<P> </P><FONT face=3D"Courier New" size=3D1>
<P>(GOAL-FOCUS PROBLEM1)</P></FONT>
<P> </P></FONT></B>
<P> </P>
<P>Yours faithfully </P>
<P>Iosif Armaos</P></DIV></BODY></HTML>

------=_NextPart_001_000E_01C15DE7.DE4CFAE0--

------=_NextPart_000_000D_01C15DE7.DE4CFAE0
Content-Type: application/octet-stream;
	name="actranal"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
	filename="actranal"


(clear-all)
(sgp=20
   :ERA T
   :RT 0.0
   :EGS NIL
   :PAS NIL
   :ANS NIL
   :SL NIL
   :AL NIL
   :BLL NIL
)
(sgp
   :PMT NIL
   :MT T
)
(chunk-type LISP-OPERATION TYPE ARG1 ARG2 ACHIEVED-BY)
(chunk-type LISP-CALL FIRST SECOND THIRD)
(chunk-type ARITHMETIC-SYMBOL IMPLEMENTS)
(chunk-type ARITHMETIC-OPERATION SYMBOLIZED-BY)
(chunk-type NUMBER-NAME VALUE)
(chunk-type NUMERIC-VALUE)
(add-dm
	(* ISA ARITHMETIC-SYMBOL IMPLEMENTS MULTIPLICATION)
	(+ ISA ARITHMETIC-SYMBOL IMPLEMENTS ADDITION)
	(- ISA ARITHMETIC-SYMBOL IMPLEMENTS SUBTRACTION)
	(/ ARITHMETIC-SYMBOL IMPLEMENTS DIVISION)
	(MULTIPLICATION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY *)
	(ADDITION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY +)
	(DIVISION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY /)
	(SUBTRACTION ISA ARITHMETIC-OPERATION SYMBOLIZED-BY -)
	(ONE ISA NUMBER-NAME VALUE 1)
	(TWO ISA NUMBER-NAME VALUE 2)
	(THREE ISA NUMBER-NAME VALUE 3)
	(FOUR ISA NUMBER-NAME VALUE 4)
	(FIVE ISA NUMBER-NAME VALUE 5)
	(SIX ISA NUMBER-NAME VALUE 6)
	(SEVEN ISA NUMBER-NAME VALUE 7)
	(EIGHT ISA NUMBER-NAME VALUE 8)
	(NINE ISA NUMBER-NAME VALUE 9)
	(TEN ISA NUMBER-NAME VALUE 10)
	(ELEVEN ISA NUMBER-NAME VALUE 11)
	(1 ISA NUMERIC-VALUE)
	(2 ISA NUMERIC-VALUE)
	(3 ISA NUMERIC-VALUE)
	(4 ISA NUMERIC-VALUE)
	(5 ISA NUMERIC-VALUE)
	(6 ISA NUMERIC-VALUE)
	(7 ISA NUMERIC-VALUE)
	(8 ISA NUMERIC-VALUE)
	(9 ISA NUMERIC-VALUE)
	(10 ISA NUMERIC-VALUE)
	(11 ISA NUMERIC-VALUE)
	(EXAMBLE-GOAL ISA LISP-OPERATION TYPE MULTIPLICATION ARG1 TWO ARG2 =
THREE ACHIEVED-BY EXAMBLE-CAUSE)
	(EXAMBLE-CAUSE ISA LISP-CALL FIRST * SECOND TWO THIRD THREE)
	(PROBLEM1 LISP-OPERATION TYPE ADDITION ARG1 FOUR ARG2 SEVEN)
	(PROBLEM2 LISP-OPERATION TYPE DIVISION ARG1 TEN ARG2 FIVE)
	(PROBLEM3 LISP-OPERATION TYPE SUBTRACTION ARG1 NINE ARG2 ONE)
)=09





(P MULT
	=3DGOAL>
		ISA LISP-OPERATION
		TYPE MULTIPLICATION
		ARG1 =3DARG1
		ARG2 =3DARG2
	=3DARG1>
		ISA NUMBER-NAME
		VALUE =3DVALUE1
	=3DARG2>
		ISA NUMBER-NAME
		VALUE =3DVALUE2
=3D=3D>
	=3DSUBGOAL>
		ISA LISP-CALL
		FIRST *
		SECOND =3DARG1
		THIRD =3DARG2
	!OUTPUT! ("PRODUCTION MULT SETS A SUBGOAL TO MAKE A LISP-CALL."))
(GOAL-FOCUS PROBLEM1)

------=_NextPart_000_000D_01C15DE7.DE4CFAE0--





More information about the ACT-R-users mailing list