Logtalk 2.26.2 files.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1488 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
2005-12-24 18:26:23 +00:00
parent 3455276aa2
commit 60fbc754f9
123 changed files with 130 additions and 4097 deletions
--- a/Logtalk/examples/birds/albatross.lgt
+++ b/Logtalk/examples/birds/albatross.lgt
@@ -1,14 +0,0 @@
-
-:- object(albatross,
-	imports(descriptors),
-	extends(tubenose)).
-
-
-	family(albatross).
-
-	size(large).
-
-	wings(long_narrow).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/ash_throated_flycatcher.lgt
+++ b/Logtalk/examples/birds/ash_throated_flycatcher.lgt
@@ -1,10 +0,0 @@
-
-:- object(ash_throated_flycatcher,
-	imports(descriptors),
-	extends(flycatcher)).
-
-
-	throat(white).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/barn_swallow.lgt
+++ b/Logtalk/examples/birds/barn_swallow.lgt
@@ -1,10 +0,0 @@
-
-:- object(barn_swallow,
-	imports(descriptors),
-	extends(swallow)).
-
-
-	tail(forked).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/black_footed_albatross.lgt
+++ b/Logtalk/examples/birds/black_footed_albatross.lgt
@@ -1,10 +0,0 @@
-
-:- object(black_footed_albatross,
-	imports(descriptors),
-	extends(albatross)).
-
-
-	color(dark).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/california_condor.lgt
+++ b/Logtalk/examples/birds/california_condor.lgt
@@ -1,10 +0,0 @@
-
-:- object(california_condor,
-	imports(descriptors),
-	extends(vulture)).
-
-
-	flight_profile(flat).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/canada_goose.lgt
+++ b/Logtalk/examples/birds/canada_goose.lgt
@@ -1,12 +0,0 @@
-
-:- object(canada_goose,
-	imports(descriptors),
-	extends(goose)).
-
-
-	head(black).
-
-	cheek(white).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/cliff_swallow.lgt
+++ b/Logtalk/examples/birds/cliff_swallow.lgt
@@ -1,10 +0,0 @@
-
-:- object(cliff_swallow,
-	imports(descriptors),
-	extends(swallow)).
-
-
-	tail(square).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/duck.lgt
+++ b/Logtalk/examples/birds/duck.lgt
@@ -1,14 +0,0 @@
-
-:- object(duck,
-	imports(descriptors),
-	extends(waterfowl)).
-
-
-	family(duck).
-
-	feed(on_water_surface).
-
-	flight(agile).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/falcon.lgt
+++ b/Logtalk/examples/birds/falcon.lgt
@@ -1,16 +0,0 @@
-
-:- object(falcon,
-	imports(descriptors),
-	extends(falconiforms)).
-
-
-	family(falcon).
-
-	wings(long_pointed).
-
-	head(large).
-
-	tail(narrow_at_tip).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/falconiforms.lgt
+++ b/Logtalk/examples/birds/falconiforms.lgt
@@ -1,16 +0,0 @@
-
-:- object(falconiforms,
-	imports(descriptors),
-	extends(order)).
-
-
-	order(falconiforms).
-
-	eats(meat).
-
-	feet(curved_talons).
-
-	bill(sharp_hooked).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/female_mallard.lgt
+++ b/Logtalk/examples/birds/female_mallard.lgt
@@ -1,12 +0,0 @@
-
-:- object(female_mallard,
-	imports(descriptors),
-	extends(duck)).
-
-
-	voice(quack).
-
-	color(mottled_brown).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/flycatcher.lgt
+++ b/Logtalk/examples/birds/flycatcher.lgt
@@ -1,14 +0,0 @@
-
-:- object(flycatcher,
-	imports(descriptors),
-	extends(passerformes)).
-
-
-	family(flycatcher).
-
-	bill(flat).
-
-	eats(flying_insects).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/fulmar.lgt
+++ b/Logtalk/examples/birds/fulmar.lgt
@@ -1,12 +0,0 @@
-
-:- object(fulmar,
-	imports(descriptors),
-	extends(tubenose)).
-
-
-	size(medium).
-
-	flight(flap_glide).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/goose.lgt
+++ b/Logtalk/examples/birds/goose.lgt
@@ -1,14 +0,0 @@
-
-:- object(goose,
-	imports(descriptors),
-	extends(waterfowl)).
-
-
-	family(goose).
-
-	size(plump).
-
-	flight(powerful).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/great_crested_flycatcher.lgt
+++ b/Logtalk/examples/birds/great_crested_flycatcher.lgt
@@ -1,10 +0,0 @@
-
-:- object(great_crested_flycatcher,
-	imports(descriptors),
-	extends(flycatcher)).
-
-
-	tail(long_rusty).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/laysan_albatross.lgt
+++ b/Logtalk/examples/birds/laysan_albatross.lgt
@@ -1,11 +0,0 @@
-
-:- object(laysan_albatross,
-	imports(descriptors),
-	extends(albatross)).
-
-
-	color(white).
-
-
-:- end_object.
-
--- a/Logtalk/examples/birds/male_mallard.lgt
+++ b/Logtalk/examples/birds/male_mallard.lgt
@@ -1,12 +0,0 @@
-
-:- object(male_mallard,
-	imports(descriptors),
-	extends(duck)).
-
-
-	voice(quack).
-
-	head(green).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/order.lgt
+++ b/Logtalk/examples/birds/order.lgt
@@ -1,6 +0,0 @@
-
-:- object(order,
-	imports(descriptors, proto_hierarchy)).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/passerformes.lgt
+++ b/Logtalk/examples/birds/passerformes.lgt
@@ -1,12 +0,0 @@
-
-:- object(passerformes,
-	imports(descriptors),
-	extends(order)).
-
-
-	order(passerformes).
-
-	feet(one_long_backward_toe).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/peregrine_falcon.lgt
+++ b/Logtalk/examples/birds/peregrine_falcon.lgt
@@ -1,10 +0,0 @@
-
-:- object(peregrine_falcon,
-	imports(descriptors),
-	extends(falcon)).
-
-
-	eats(birds).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/pintail.lgt
+++ b/Logtalk/examples/birds/pintail.lgt
@@ -1,10 +0,0 @@
-
-:- object(pintail,
-	imports(descriptors),
-	extends(duck)).
-
-
-	voice(short_whistle).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/purple_martin.lgt
+++ b/Logtalk/examples/birds/purple_martin.lgt
@@ -1,10 +0,0 @@
-
-:- object(purple_martin,
-	imports(descriptors),
-	extends(swallow)).
-
-
-	color(dark).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/snow_goose.lgt
+++ b/Logtalk/examples/birds/snow_goose.lgt
@@ -1,10 +0,0 @@
-
-:- object(snow_goose,
-	imports(descriptors),
-	extends(goose)).
-
-
-	color(white).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/sparrow_hawk.lgt
+++ b/Logtalk/examples/birds/sparrow_hawk.lgt
@@ -1,10 +0,0 @@
-
-:- object(sparrow_hawk,
-	imports(descriptors),
-	extends(falcon)).
-
-
-	eats(insects).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/swallow.lgt
+++ b/Logtalk/examples/birds/swallow.lgt
@@ -1,16 +0,0 @@
-
-:- object(swallow,
-	imports(descriptors),
-	extends(passerformes)).
-
-
-	family(swallow).
-
-	wings(long_pointed).
-
-	tail(forked).
-
-	bill(short).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/swan.lgt
+++ b/Logtalk/examples/birds/swan.lgt
@@ -1,16 +0,0 @@
-
-:- object(swan,
-	imports(descriptors),
-	extends(waterfowl)).
-
-
-	family(swan).
-
-	neck(long).
-
-	color(white).
-
-	flight(ponderous).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/trumpeter_swan.lgt
+++ b/Logtalk/examples/birds/trumpeter_swan.lgt
@@ -1,10 +0,0 @@
-
-:- object(trumpeter_swan,
-	imports(descriptors),
-	extends(swan)).
-
-
-	voice(loud_trumpeting).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/tubenose.lgt
+++ b/Logtalk/examples/birds/tubenose.lgt
@@ -1,16 +0,0 @@
-
-:- object(tubenose,
-	imports(descriptors),
-	extends(order)).
-
-
-	order(tubenose).
-
-	nostrils(external_tubular).
-
-	live(at_sea).
-
-	bill(hooked).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/turkey_vulture.lgt
+++ b/Logtalk/examples/birds/turkey_vulture.lgt
@@ -1,10 +0,0 @@
-
-:- object(turkey_vulture,
-	imports(descriptors),
-	extends(vulture)).
-
-
-	flight_profile(v_shaped).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/vulture.lgt
+++ b/Logtalk/examples/birds/vulture.lgt
@@ -1,14 +0,0 @@
-
-:- object(vulture,
-	imports(descriptors),
-	extends(falconiforms)).
-
-
-	family(vulture).
-
-	feed(scavange).
-
-	wings(broad).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/waterfowl.lgt
+++ b/Logtalk/examples/birds/waterfowl.lgt
@@ -1,14 +0,0 @@
-
-:- object(waterfowl,
-	imports(descriptors),
-	extends(order)).
-
-
-	order(waterfowl).
-
-	feet(webbed).
-
-	bill(flat).
-
-
-:- end_object.
--- a/Logtalk/examples/birds/whistling_swan.lgt
+++ b/Logtalk/examples/birds/whistling_swan.lgt
@@ -1,10 +0,0 @@
-
-:- object(whistling_swan,
-	imports(descriptors),
-	extends(swan)).
-
-
-	voice(muffled_musical_whistle).
-
-
-:- end_object.