Editing MAD (programming language) (section)

=== Declaration statements ===
Variables may be implicitly or explicitly declared. By default all implicitly declared variables are assumed to be floating point. The NORMAL MODE IS statement may be used to change this default.
{{col-begin}}
{{col-2}}
* FLOATING POINT var<sub>1</sub>, var<sub>2</sub>, ... (may include dimension information)
* INTEGER var<sub>1</sub>, var<sub>2</sub>, ... (may include dimension information)
* BOOLEAN var<sub>1</sub>, var<sub>2</sub>, ... (may include dimension information)
* FUNCTION NAME ''name''<sub>1</sub>, ''name''<sub>2</sub>, ... (may include dimension information)
* STATEMENT LABEL ''label''<sub>1</sub>, ''label''<sub>2</sub>, ... (may include dimension information)
* MODE NUMBER ''n'', var<sub>1</sub>, var<sub>2</sub>, ... (may include dimension information)
* NORMAL MODE IS ''type-name'' (INTEGER, BOOLEAN, FLOATING POINT, STATEMENT LABEL, or FUNCTION NAME)
* NORMAL MODE IS MODE NUMBER ''n''
* DIMENSION ''variable''(''max-dimension'') (declares an array from 0...''max-dimension'')
* DIMENSION ''variable''(''from''...''to'')
* DIMENSION ''variable''(''subscript<sub>1</sub>'', ''subscript<sub>2</sub>'', ..., ''subscript<sub>n</sub>'') (declares a multidimensional array)
{{col-2}}
* VECTOR VALUES ''array''(''n'') = c<sub>1</sub>, c<sub>2</sub>, c<sub>3</sub>, ...
* VECTOR VALUES ''array''(''m'') ... ''array''(''n'') = constant
* DOUBLE STORAGE MODE ''mode-list'' (doubles the amount of storage allocated for the modes listed)
* EQUIVALENCE (''a''<sub>1</sub>, ''a''<sub>2</sub>, ..., ''a''<sub>m</sub>), ...
* PROGRAM COMMON ''a'', ''b'', ''c'', ... (may include dimension information)
* ERASABLE ''a'', ''b'', ''c'', ... (may include dimension information)
* PARAMETER ''A''<sub>1</sub>(''B''<sub>1</sub>), ''A''<sub>2</sub>(''B''<sub>2</sub>), ..., ''A''<sub>n</sub>(''B''<sub>n</sub>)
* SYMBOL TABLE VECTOR ''variable''
* FULL SYMBOL TABLE VECTOR ''variable''
* LISTING ON (the default)
* LISTING OFF
* REFERENCES ON
* REFERENCES OFF (the default)
{{col-end}}