to spiral :size
if :size > 30 [stop] ; a condition stop
fd :size rt 15 ; many lines of action
spiral :size *1.02 ; the tailend recursive call
end
spiral 10
Here a new word spiral is defined (with a parameter) in the definition, the word calls itself with a different parameter. On the stop conmdition, the inner most word breaks out, and each calling word continues with the next command- also a break.
Datum
5 juli 2007 (ursprungligt uppladdningsdatum)
Källa
Ingen maskinläsbar källa angavs. Eget arbete antaget (baserat på upphovsrättsanspråk).
Skapare
Ingen maskinläsbar skapare angavs. ClemRutter antaget (baserat på upphovsrättsanspråk).
Licensiering
Jag, upphovsrättsinnehavaren av detta verk, publicerar härmed det under följande licenser:
Tillstånd ges att kopiera, distribuera och/eller modifiera detta dokument under villkoren i GNU Free Documentation License, Version 1.2 eller senare version publicerad av Free Software Foundation, utan oföränderliga avsnitt, framsidestexter eller baksidestexter. En kopia av licensen ingår i avsnittet GNU Free Documentation License.http://www.gnu.org/copyleft/fdl.htmlGFDLGNU Free Documentation Licensetruetrue
att dela – att kopiera, distribuera och sända verket
att remixa – att skapa bearbetningar
På följande villkor:
erkännande – Du måste ge lämpligt erkännande, ange en länk till licensen och indikera om ändringar har gjorts. Du får göra det på ett lämpligt sätt, men inte på ett sätt som antyder att licensgivaren stödjer dig eller din användning.
dela lika – Om du remixar, transformerar eller bygger vidare på materialet måste du distribuera dina bidrag under samma eller en kompatibel licens som originalet.
Detta licenstillägg lades till till denna fil som en del av GFDL:s licensuppdatering.http://creativecommons.org/licenses/by-sa/3.0/CC BY-SA 3.0Creative Commons Attribution-Share Alike 3.0truetrue
Detta verk är fri programvara; du kan distribuera det och/eller modifiera det under villkoren i GNU General Public License som publicerat av Free Software Foundation; antingen version 2 av licensen, eller någon senare version. Detta verk distribueras i hopp om att det ska vara användbart, men utan någon garanti, även utan underförstådd garanti om säljbarhet eller lämplighet för ett särskilt ändamål. Se version 2 och version 3 av GNU General Public License för mer information.http://www.gnu.org/licenses/gpl.htmlGPLGNU General Public Licensetruetrue
Logo Example - illustrating the logo program to spiral :size if :size > 30 [stop] ; a condition stop fd :size rt 15 ; many lines of action spiral :size *1.02 ; the tailend recursive call end spiral 10 Here a new word spiral is d
Den här filen innehåller extrainformation som troligen lades till av en digitalkamera eller skanner när filen skapades. Om filen har modifierats kan det hända att vissa detaljer inte överensstämmer med den modifierade filen.