diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Logtalk 2.27.1 files.

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1580 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura
2006-03-26 17:31:34 +00:00
parent fded381282
commit 75b2645e3f
205 changed files with 2896 additions and 2171 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
Logtalk/examples/proxies/SCRIPT Normal file
View File

@@ -0,0 +1,24 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.27.1
Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
=================================================================
% start by loading the example:
| ?- logtalk_load(proxies(loader)).
...
% print the area and the perimeter for all circle proxies:
| ?- forall(circle(Id, R, C), (write(Id), write(' '), circle(R, C)::print)).
#1 area: 4.75291, perimeter: 7.72831, color: blue
#2 area: 43.2412, perimeter: 23.3106, color: yellow
#3 area: 0.477836, perimeter: 2.45044, color: green
#4 area: 103.508, perimeter: 36.0655, color: black
#5 area: 217.468, perimeter: 52.2761, color: cyan
yes