| SimCon Home | Reference Manual Home |

REFERENCE

Syntax:

!% REFERENCE [:] [:] <symbol> [ , <symbol> ... ]

Function:

Specifies that the named sub-program arguments are passed by reference. Note that this is normally the default argument passing mechanism in Fortran for numeric arguments, but not for strings. FPT uses this information in the argument consistency check (please see CHECK ARGUMENTS). The alternative protocol specifications for arguments are:

!% VALUE

!% REFERENCE

!% DESCRIPTOR

!% ADDRESS AND LENGTH

Names which contain exotic characters such as '%', ':' or '#' (which are all legal on some systems) must be written as quoted strings.

The REFERENCE command must be written in code within the scope of declaration of the variable. It is introduced by a comment delimiter in column 1 and the character % in column 2.

Where to use this command:

Operating system command line	No
Configuration file, config.fsp	No
Specification (FSP) files, *.fsp	No
Interactively, to FPT> prompt:	No
Interactive command files	No
Embedded in the Fortran code	Yes

Default:

By reference for numeric arguments, and as specified by the commands:

% PASS STRING ARGUMENTS. . . for arguments of type character.

Example:

SUBROUTINE plot_title(title) CHARACTER*80 title !% REFERENCE :: title

See also:

CHECK ARGUMENTS