Local FORTRAN 77 Inquiry Routines

Here the F77-callable inquiry subroutines are described briefly. These provide essentially the same capability as the combination of the HPF intrinsic array inquiry functions such as SHAPE and SIZE, together with the HPF LOCAL LIBRARY inquiry routines. The subroutine F77_SUBGRID_INFO serves as a local counterpart to the globally callable subroutine HPF_SUBGRID_INFO described above. In all of the following:

• ARRAY is a dummy argument passed in from a global HPF caller using the LAYOUT ("0DHPF_ARRAY"0D) attribute and declared within the FORTRAN 77 local subroutine as a scalar integer variable. It is an INTENT (IN) argument.
• DIM is a scalar integer of default kind. It is an INTENT (IN) argument. This argument specifies a particular axis of the global array associated with ARRAY or, if DIM = -1, inquiry is for all axes.
• An ``inquiry result'' is an INTENT (OUT) argument. If DIM = -1, it is a rank-one array of size equal to at least the rank of the global array associated with ARRAY, returning information associated with all axes. If DIM is positive, the ``inquiry result'' is a scalar, returning information only for the axis indicated by DIM.
• The arguments are defined in the same way as for the corresponding HPF or HPF_LOCAL routines unless otherwise noted. See the description of HPF_SUBGRID_INFO above and Section 11.7.1 for full specifications of the similarly-named HPF_LOCAL_LIBRARY procedures.