Internal Function Definition

Although a DEF statement defines only a function that is represented by an expression, function definitions enables us to define a function by describing the process.
An internal function definition is a function definition written within a program unit. All variables other than the parameters and data written in DATA statements are shared with the program unit.
An internal function definition begins with FUNCTION line and ends with END FUNCTION Line.
A FUNCTION line describes the name and the parameters. Parameters are written punctuated by commas and enclosed in parentheses if any. The rule for naming a function is the same as that of a variable.
To determine the function value, use a LET statement where the function name is written on the left hand side of a equal sign. This type of LET statement is called a function-let-statement.

Example. An internal function definition included by the main program.

10 FUNCTION P(n,r)
20    LET a=1
30    FOR k=1 TO r
40       LET a=a*(n-k+1)
50    NEXT k
60    LET P=a
70 END FUNCTION 
80 PRINT P(8,3)
90 END



Note. A function-let-statement is not a LET-statement, and the function name is not a variable on the syntax of Full BASIC. Thus the function value is not rounded to the precision of a variable.

Note. A internal function definition must be written in before the line in which the function is referred. If the function definition is written in after the reference, write a DECLARE FUNCTION statement which holds the name of the function in the beginning.
Example.

100 DECLARE FUNCTION P
110 PRINT P(8,3)
120 FUNCTION P(n,r)
130    LET a=1
140    FOR k=1 TO r
150       LET a=a*(n-k+1)
160    NEXT k
170    LET P=a
180 END FUNCTION 
190 END