Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
** ROBOT'S 1ST SENTENCE **
6 views
Skip to first unread message
Graham Cooper
May 12, 2013, 3:10:07 AM5/12/13
to
1st PROGRAM
vert [ pnt X Y ] [ pnt X Z ] .
-----------------------
I Finally got it working!
TRACE
horz A [pnt 5 4 ] ?
PUSH: 0 .... V A .... REF 2 .... TERM
PUSH: 1 .... V .... REF 21 .... TERM pnt
PUSH: 2 .... V .... REF 22 .... TERM X
PUSH: 3 .... V .... REF 23 .... TERM Y
PUSH: 4 .... V Z .... REF 32 .... TERM 5
PUSH: 5 .... V Y .... REF 33 .... TERM 4
horz [ pnt X Y ] [ pnt Z Y ]
<<MATCH>>
-------------------------------
horz A [pnt 5 4 ] ?
WIDE:2
WR:2---21---pnt
WR:2---22---X
DEEP:4
WR:2---23---Y
DEEP:5
VAR:Y====4
A:=pnt X 4
---------------
HUMAN: what makes a vertical line with (5,4) ?
horz A [pnt 5 4 ] ?
ROBOT: Any Point with a Variable X and Y = 4.
A:=pnt X 4
---------------
NEXT WEEK: Double Tail End Recursion & some BLOCKPROLOG Speed Tests!
Herc
--
www.BLoCKPROLOG.com
vert [ pnt X Y ] [ pnt X Z ] .
-----------------------
I Finally got it working!
TRACE
horz A [pnt 5 4 ] ?
PUSH: 0 .... V A .... REF 2 .... TERM
PUSH: 1 .... V .... REF 21 .... TERM pnt
PUSH: 2 .... V .... REF 22 .... TERM X
PUSH: 3 .... V .... REF 23 .... TERM Y
PUSH: 4 .... V Z .... REF 32 .... TERM 5
PUSH: 5 .... V Y .... REF 33 .... TERM 4
horz [ pnt X Y ] [ pnt Z Y ]
<<MATCH>>
-------------------------------
horz A [pnt 5 4 ] ?
WIDE:2
WR:2---21---pnt
WR:2---22---X
DEEP:4
WR:2---23---Y
DEEP:5
VAR:Y====4
A:=pnt X 4
---------------
HUMAN: what makes a vertical line with (5,4) ?
horz A [pnt 5 4 ] ?
ROBOT: Any Point with a Variable X and Y = 4.
A:=pnt X 4
---------------
NEXT WEEK: Double Tail End Recursion & some BLOCKPROLOG Speed Tests!
Herc
--
www.BLoCKPROLOG.com
0 new messages