Declare an array of the appropriate type that will be passed to a
FORTRAN routine.
This array will be the actual argument of a call to a FORTRAN
routine. (type not CHARACTER or LOCATOR.)
Invocation:
DECLARE_type_ARRAY(arg,dims)
Arguments:
arg
The array being declared.
dims
The dimensions of the array.
Examples:
DECLARE_type_ARRAY(arg,10)
will expand as follows:
All systems:
F77_type_TYPE arg[10]
DECLARE_type_ARRAY(arg,2
[3][4)
]
will expand as follows:
All systems:
F77_type_TYPE arg[2][3][4]
where F77_type_TYPE expands to the appropriate
C type.
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