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); |
|