Logtalk 2.17.1 files.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1071 b08c6af1-5177-4d33-ba66-4b1c6b8b522a

Logtalk/examples/dcgs/SCRIPT

@@ -1,6 +1,6 @@
 =================================================================
 Logtalk - Object oriented extension to Prolog
-Release 2.17.0
+Release 2.17.1
 
 Copyright (c) 1998-2004 Paulo Moura.  All Rights Reserved.
 =================================================================
@@ -14,7 +14,7 @@ Result = -9
 yes
 
 
-% recognizing gramatically correct sentences
+% recognizing gramatically correct sentences:
 
 | ?- sentence::parse([the, girl, likes, the, boy], Result).
 
@@ -27,7 +27,7 @@ Result = false
 yes
 
 
-% generating parse trees for sentences
+% generating parse trees for sentences:
 
 | ?- parsetree::parse([the, girl, likes, the, boy], Tree).
 
@@ -35,7 +35,38 @@ Tree = Tree = s(np(d(the), n(girl)), vp(v(likes), np(d(the), n(boy))))
 yes
 
 
-% conversion between compound terms and XML
+% bill of materials example:
+
+| ?- bom::parts(bike, L).
+
+L = [frame, crank, pedal, pedal, chain, spokes, rim, hub, spokes, rim, hub]
+yes
+
+| ?- bom::parts(wheel, L).
+
+L = [spokes, rim, hub]
+yes
+
+
+% parsing command-line shell input:
+
+| ?- shell::parse("pwd; cd ..; ls -a", L).
+
+L = [pwd,'cd ..','ls -a'] ? 
+
+yes
+
+
+% walker movements:
+
+| ?- walker::walk([n(5), e(4), s(2), nw(8), s(5), se(1), n(4)], Ending).
+
+Ending = -0.94974746830583223,6.9497474683058318 ? 
+
+yes
+
+
+% conversion between compound terms and XML:
 
 | ?- xml::convert(word(child, children), word(singular, plural), XML).
 
@@ -49,7 +80,7 @@ Interpretation = word(singular, plural)
 yes
 
 
-% parsing URLs
+% parsing URLs:
 
 | ?- url::parse("http://www.logtalk.org", Components).
 
@@ -75,3 +106,20 @@ yes
 
 Components = [protocol(http), address([193, 136, 64, 5]), path([files, update]), file('')] 
 yes
+
+
+% command language example:
+
+?- faa::main.
+Fly Amzi! Air
+enter command> list flights
+aa101
+aa102
+aa103
+enter command> book elana aa102
+enter command> book tom aa102
+enter command> list passengers aa102
+elana
+tom
+enter command> exit
+yes