min_nz

Source: utils/misc/min_nz.pro

 MIN_NZ
        Extract the smallest positive element of an array.

 Call:
        val = min_nz(array[, mindex, max=max])

 Return Value:
        val     any     The smallest positive value or -1 if no positive
                        values.

 Argument:
        array   any     input   The array whose min is needed
        mindex  long    output  The (first) location in the array at
                                which the min value is found.

 Keyword:
        max     any     output  The maximum value in the array.
        full            input   If set, then just return the regular
                                minimum (to allow a procedure to
                                choose which by flag)

 History:
        Prototype: 24/1/91; SJT
        Improve and changes to smallest >0: 22/2/91; SJT
        Add MAX keyword: 31/3/92; SJT
        Add optional second argument for location of min value:
                                                        20/8/93; SJT
        Add "finite" condition: 6/12/93; SJT
        Add full key: 2/5/02; SJT