next up previous 252
Next: F77_DOUBLE_TYPE - Define the type DOUBLE PRECISION
Up: Full Description of F77 Macros
Previous: F77_CREATE_CHARACTER_ARRAY_M - Create a FORTRAN CHARACTER array (n-D)


F77_CREATE_LOGICAL_ARRAY_M - Create a FORTRAN LOGICAL array (n-D)

Description:
Create a LOGICAL array that will be passed to a FORTRAN routine using the LOGICAL_ARRAY_ARG macro. Use this macro, in combination with the DECLARE_LOGICAL_ARRAY_DYN and F77_FREE_LOGICAL macros, where the size of the LOGICAL array is not known until run time.

Invocation:
F77_CREATE_LOGICAL_ARRAY_M(arg,ndims,dims)

Arguments:

arg
The array being created.
ndims
The number of dimensions.
dims
A 1-D array holding the ndims dimensions.

Examples:

F77_CREATE_LOGICAL_ARRAY_M(flog,ndims,dims)
will expand as follows:

All systems: flog=cnfCrela(ndims,dims);




next up previous 252
Next: F77_DOUBLE_TYPE - Define the type DOUBLE PRECISION
Up: Full Description of F77 Macros
Previous: F77_CREATE_CHARACTER_ARRAY_M - Create a FORTRAN CHARACTER array (n-D)

CNF and F77 Mixed Language Programming -- FORTRAN and C
Starlink User Note 209
P.M. Allan
A.J. Chipperfield
R.F. Warren-Smith
19 January 2000
E-mail:ussc@star.rl.ac.uk