Difference between revisions of "Recursion"
Jhernandez3 (talk | contribs) m |
Jhernandez3 (talk | contribs) m |
||
Line 5: | Line 5: | ||
:<code>Function Factorial2(n: Positive Atom)</code> | :<code>Function Factorial2(n: Positive Atom)</code> | ||
− | |||
:<code>Definition: IF n > 1 THEN N*Factorial2(n-1) ELSE 1</code> | :<code>Definition: IF n > 1 THEN N*Factorial2(n-1) ELSE 1</code> | ||
Line 16: | Line 15: | ||
# Select '''Attributes''' from the '''Object''' menu. | # Select '''Attributes''' from the '''Object''' menu. | ||
− | ::[[File:procedure_attributes.png| | + | ::[[File:procedure_attributes.png|200px]] |
<ol start="2"><li>Select '''Functions''' from the '''Class''' menu.</li></ol> | <ol start="2"><li>Select '''Functions''' from the '''Class''' menu.</li></ol> | ||
Line 32: | Line 31: | ||
:<code>Function Prime_factors(x, y: Positive Atom)</code> | :<code>Function Prime_factors(x, y: Positive Atom)</code> | ||
− | |||
:<code>Definition:</code> | :<code>Definition:</code> | ||
− | |||
::<code>Var n := Floor(x/y);</code> | ::<code>Var n := Floor(x/y);</code> | ||
− | |||
::<code>IF n<y THEN [x]</code> | ::<code>IF n<y THEN [x]</code> | ||
− | |||
::<code>ELSE IF x = n*y THEN Concat([y], Factors(n, y))</code> | ::<code>ELSE IF x = n*y THEN Concat([y], Factors(n, y))</code> | ||
− | |||
::<code>ELSE Prime_factors(x, y+1)</code> | ::<code>ELSE Prime_factors(x, y+1)</code> | ||
− | |||
::<code>Factors(60, 2) → [2, 2, 3, 5]</code> | ::<code>Factors(60, 2) → [2, 2, 3, 5]</code> | ||
Revision as of 14:00, 20 December 2015
A recursive function is a function that calls itself within its definition. This is often a convenient way to define a function, and sometimes the only way. As an example, consider this definition of factorial:
Function Factorial2(n: Positive Atom)
Definition: IF n > 1 THEN N*Factorial2(n-1) ELSE 1
If its parameter, n
, is greater than 1, Factorial2
calls itself with the actual parameter value n-1
. Otherwise, it simply returns 1. Like any normal recursive function, it has a termination condition under which the recursion stops — when n <= 1
.
Normally, if you try to use a function in its own definition, it complains about a cyclic dependency loop. To enable recursion, you must display and set the Recursive attribute:
- Select Attributes from the Object menu.
- Select Functions from the Class menu.
- Scroll down the list of attributes and click Recursive twice, so that it shows √, meaning that the recursive attribute is displayed for each function in its Object window and the Attribute panel.
- Check OK to close Attributes dialog.
For each function for which you wish to enable recursion:
- Open the Object Window for the function by double-clicking its node (or selecting the node and clicking the Object button).
- Type
1
into its Recursive field.
As another example, consider this recursive function to compute a list of the prime factors of an integer, x
, equal to or greater than y
:
Function Prime_factors(x, y: Positive Atom)
Definition:
Var n := Floor(x/y);
IF n<y THEN [x]
ELSE IF x = n*y THEN Concat([y], Factors(n, y))
ELSE Prime_factors(x, y+1)
Factors(60, 2) → [2, 2, 3, 5]
In essence, Prime_factors
says to compute n
as x
divided by y
, rounded down. If y
is greater than n
, then x
is the last factor, so return x
as a list. If x
is an exact factor of y
, then concatenate x
with any factors of n
, equal or greater than n
. Otherwise, try y+1
as a factor.
Enable comment auto-refresher