Index of Functions: A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X 
Index Page
maxad

Table of contents
Procedure
Abstract
Required_Reading
Keywords
Declarations
Brief_I/O
Detailed_Input
Detailed_Output
Parameters
Exceptions
Files
Particulars
Examples
Restrictions
Literature_References
Author_and_Institution
Version

Procedure

     MAXAD  ( Maximum element of array, DP )

     SUBROUTINE MAXAD ( ARRAY, NDIM, MAXVAL, LOC )

Abstract

     Locate the maximum element of a DP array.

Required_Reading

     None.

Keywords

     ARRAY
     SEARCH

Declarations

     IMPLICIT NONE

     DOUBLE PRECISION      ARRAY ( * )
     INTEGER               NDIM
     DOUBLE PRECISION      MAXVAL
     INTEGER               LOC

Brief_I/O

     VARIABLE  I/O  DESCRIPTION
     --------  ---  -------------------------------------------------
     ARRAY      I   Array.
     NDIM       I   Number of elements in ARRAY.
     MAXVAL     O   Maximum value in ARRAY.
     LOC        O   Location of MAXVAL in ARRAY.

Detailed_Input

     ARRAY    is an arbitrary array.

     NDIM     is the number of elements in ARRAY.

Detailed_Output

     MAXVAL   is the value in array that is greater than or equal
              to all other values in the array. If the array
              contains more than one element with this value,
              the first one is returned.

              Elements in character arrays are compared according
              to the ASCII collating sequence.

     LOC      is the location of the maximum element. That is,
              MAXVAL contains element ARRAY(LOC).

Parameters

     None.

Exceptions

     Error free.

     1)  If the array is empty (NDIM is less than one), LOC is zero,
         and MAXVAL is not changed.

Files

     None.

Particulars

     None.

Examples

     Let array A contain the following elements.

        A(1) = 16.D0
        A(2) =  4.D0
        A(3) = 32.D0
        A(4) = 64.D0
        A(5) =  2.D0
        A(6) =  8.D0

     Then following the call

        CALL MAXAD ( A, 6, MAXVAL, LOC )

     the values of MAXVAL and LOC are 64.D0 and 4 respectively.

Restrictions

     None.

Literature_References

     None.

Author_and_Institution

     J. Diaz del Rio    (ODC Space)
     W.L. Taber         (JPL)
     I.M. Underwood     (JPL)

Version

    SPICELIB Version 1.1.0, 14-APR-2021 (JDR)

        Added IMPLICIT NONE statement.

        Edited the header to comply with NAIF standard. Removed
        unnecessary $Revisions section.

    SPICELIB Version 1.0.1, 10-MAR-1992 (WLT)

        Comment section for permuted index source lines was added
        following the header.

    SPICELIB Version 1.0.0, 31-JAN-1990 (IMU)
Fri Dec 31 18:36:33 2021