Defines | Typedefs | Functions | Variables

minval.c File Reference

#include <stddef.h>
#include <liberrno.h>
#include <fmath.h>
#include <cray/dopevec.h>
#include <cray/portdefs.h>
#include "arraydefs.h"
Include dependency graph for minval.c:

Go to the source code of this file.

Defines

#define USE_INT8   1
#define USE_INT6   2
#define USE_INT4   3
#define USE_INT2   4
#define USE_INT1   5
#define USE_REAL16   6
#define USE_REAL8   7
#define USE_REAL4   8
#define INCREMENT()
#define INCR_RES()
#define LOAD_DM_MK()

Typedefs

typedef int _f_int6

Functions

void _MINVAL_J (DopeVectorType *result, DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
void _MINVAL__J (DopeVectorType *result, DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
void _MINVAL_S (DopeVectorType *result, DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
void _MINVAL__S (DopeVectorType *result, DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
void _MINVAL_I (DopeVectorType *result, DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
void _MINVAL__I (DopeVectorType *result, DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
_f_int6 _MINVAL0_I (DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
_f_int8 _MINVAL0__I (DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
void _MINVAL_I4 (DopeVectorType *result, DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
void _MINVAL__I4 (DopeVectorType *result, DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
void _MINVAL_I2 (DopeVectorType *result, DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
void _MINVAL__I2 (DopeVectorType *result, DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
void _MINVAL_I1 (DopeVectorType *result, DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
void _MINVAL__I1 (DopeVectorType *result, DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
_f_int4 _MINVAL0_I4 (DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
_f_int4 _MINVAL0__I4 (DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
_f_int2 _MINVAL0_I2 (DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
_f_int2 _MINVAL0__I2 (DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
_f_int1 _MINVAL0_I1 (DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
_f_int1 _MINVAL0__I1 (DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
void _MINVAL_S4 (DopeVectorType *result, DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
void _MINVAL__S4 (DopeVectorType *result, DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
_f_real4 _MINVAL0_S4 (DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
_f_real4 _MINVAL0__S4 (DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
_f_int8 _MINVAL0_J (DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
_f_int8 _MINVAL0__J (DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
_f_real8 _MINVAL0_S (DopeVectorType *source, _f_int *dimp, DopeVectorType *mask)
_f_real8 _MINVAL0__S (DopeVectorType *source, DopeVectorType *dimp, DopeVectorType *mask)
void __minval (DopeVectorType *result, DopeVectorType *source, _f_int *dimp, DopeVectorType *mask, int scalar, int subtype, int init_val)

Variables

static char USMID [] = "@(#) libfi/array/minval.c 92.0 10/08/98 14:37:14"

Define Documentation

#define INCR_RES (  ) 

Definition at line 124 of file minval.c.

Referenced by __minval().

#define INCREMENT (  ) 

Definition at line 61 of file minval.c.

#define LOAD_DM_MK (  ) 
Value:
dm = dimp;                                                      \
        mk = mask;                                                      \
        /* if last arg = NULL, is last-1 arg mask or dim? */            \
        if (mask == NULL) {                                             \
                /* last arg = NULL, is last-1 arg mask or dim? */       \
                if (dimp != NULL) {                                     \
                        if (dimp->type_lens.type == DVTYPE_LOGICAL) {   \
                                /* last-1 argument is mask. */          \
                                mk = dimp;                              \
                                dm = mask;                              \
                        }                                               \
                }                                                       \
        }                                                               \
        if (dm != NULL) {                                               \
                _f_int dmintlen;                                        \
                dmintlen = dm->type_lens.int_len >> 3;                  \
                dimenp = (_f_int *) &dimenlc;                           \
                if (dmintlen == sizeof(_f_int8)) {                      \
                        *dimenp = *(_f_int8 *) dm->base_addr.a.ptr;     \
                } else if (dmintlen == sizeof(_f_int4)) {               \
                        *dimenp = *(_f_int4 *) dm->base_addr.a.ptr;     \
                } else if (dmintlen == sizeof(_f_int2)) {               \
                        *dimenp = *(_f_int2 *) dm->base_addr.a.ptr;     \
                } else if (dmintlen == sizeof(_f_int1)) {               \
                        *dimenp = *(_f_int1 *) dm->base_addr.a.ptr;     \
                }                                                       \
        }

Definition at line 180 of file minval.c.

Referenced by _MINVAL0__I(), _MINVAL0__I1(), _MINVAL0__I2(), _MINVAL0__I4(), _MINVAL0__J(), _MINVAL0__S(), _MINVAL0__S4(), _MINVAL__I(), _MINVAL__I1(), _MINVAL__I2(), _MINVAL__I4(), _MINVAL__J(), _MINVAL__S(), and _MINVAL__S4().

#define USE_INT1   5

Definition at line 50 of file minval.c.

Referenced by _MINVAL0__I1(), _MINVAL0_I1(), _MINVAL__I1(), and _MINVAL_I1().

#define USE_INT2   4

Definition at line 49 of file minval.c.

Referenced by __minval(), _MINVAL0__I2(), _MINVAL0_I2(), _MINVAL__I2(), and _MINVAL_I2().

#define USE_INT4   3

Definition at line 48 of file minval.c.

Referenced by __minval(), _MINVAL0__I4(), _MINVAL0_I4(), _MINVAL__I4(), and _MINVAL_I4().

#define USE_INT6   2

Definition at line 47 of file minval.c.

Referenced by __minval(), _MINVAL0__I(), _MINVAL0_I(), _MINVAL__I(), and _MINVAL_I().

#define USE_INT8   1

Definition at line 46 of file minval.c.

Referenced by _MINVAL0__I(), _MINVAL0__J(), _MINVAL0_I(), _MINVAL0_J(), _MINVAL__I(), _MINVAL__J(), _MINVAL_I(), and _MINVAL_J().

#define USE_REAL16   6

Definition at line 51 of file minval.c.

#define USE_REAL4   8

Definition at line 53 of file minval.c.

Referenced by _MINVAL0__S4(), _MINVAL0_S4(), _MINVAL__S4(), and _MINVAL_S4().

#define USE_REAL8   7

Definition at line 52 of file minval.c.

Referenced by __minval(), _MINVAL0__S(), _MINVAL0_S(), _MINVAL__S(), and _MINVAL_S().

Typedef Documentation

typedef int _f_int6

Definition at line 359 of file minval.c.

Function Documentation

void __minval ( DopeVectorType *  result,
DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask,
int  scalar,
int  subtype,
int  init_val 
)

Definition at line 1108 of file minval.c.

References _LELVL_ABORT, _lerror(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, BITS_PER_BYTE, DopeVector::dimension, DVSUBTYPE_INT32, DVSUBTYPE_INT64, DVSUBTYPE_REAL128, DVSUBTYPE_REAL32, DVSUBTYPE_REAL64, DopeVector::DvDimen::extent, FEINTDTY, FENOMEMY, FESCIDIM, if(), INCR_RES, INCREMENT, f90_type::int_len, DopeVector::DvDimen::low_bound, LTOB, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, restrict, DopeVector::DvDimen::stride_mult, f90_type::type, DopeVector::type_lens, USE_INT2, USE_INT4, USE_INT6, and USE_REAL8.

Referenced by _MINVAL0__I(), _MINVAL0__I1(), _MINVAL0__I2(), _MINVAL0__I4(), _MINVAL0__J(), _MINVAL0__S(), _MINVAL0__S4(), _MINVAL0_I(), _MINVAL0_I1(), _MINVAL0_I2(), _MINVAL0_I4(), _MINVAL0_J(), _MINVAL0_S(), _MINVAL0_S4(), _MINVAL__I(), _MINVAL__I1(), _MINVAL__I2(), _MINVAL__I4(), _MINVAL__J(), _MINVAL__S(), _MINVAL__S4(), _MINVAL_I(), _MINVAL_I1(), _MINVAL_I2(), _MINVAL_I4(), _MINVAL_J(), _MINVAL_S(), and _MINVAL_S4().

Here is the call graph for this function:

_f_int8 _MINVAL0__I ( DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 402 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT64, HUGE_INT6_F90, f90_type::int_len, f90_type::kind_or_star, LOAD_DM_MK, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, USE_INT6, and USE_INT8.

Here is the call graph for this function:

_f_int1 _MINVAL0__I1 ( DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 750 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT32, HUGE_INT1_F90, f90_type::int_len, f90_type::kind_or_star, LOAD_DM_MK, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_INT1.

Here is the call graph for this function:

_f_int2 _MINVAL0__I2 ( DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 673 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT32, HUGE_INT2_F90, f90_type::int_len, f90_type::kind_or_star, LOAD_DM_MK, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_INT2.

Here is the call graph for this function:

_f_int4 _MINVAL0__I4 ( DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 596 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT32, HUGE_INT4_F90, f90_type::int_len, f90_type::kind_or_star, LOAD_DM_MK, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_INT4.

Here is the call graph for this function:

_f_int8 _MINVAL0__J ( DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 938 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT64, HUGE_INT8_F90, f90_type::int_len, f90_type::kind_or_star, LOAD_DM_MK, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_INT8.

Here is the call graph for this function:

_f_real8 _MINVAL0__S ( DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 1005 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_REAL64, HUGE_REAL8_F90, f90_type::int_len, f90_type::kind_or_star, LOAD_DM_MK, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_REAL8.

Here is the call graph for this function:

_f_real4 _MINVAL0__S4 ( DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 866 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_REAL32, DVSUBTYPE_REAL64, HUGE_REAL4_F90, f90_type::int_len, f90_type::kind_or_star, LOAD_DM_MK, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_REAL4.

Here is the call graph for this function:

_f_int6 _MINVAL0_I ( DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 367 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT64, HUGE_INT6_F90, f90_type::int_len, f90_type::kind_or_star, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, USE_INT6, and USE_INT8.

Here is the call graph for this function:

_f_int1 _MINVAL0_I1 ( DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 715 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT32, HUGE_INT1_F90, f90_type::int_len, f90_type::kind_or_star, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_INT1.

Here is the call graph for this function:

_f_int2 _MINVAL0_I2 ( DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 638 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT32, HUGE_INT2_F90, f90_type::int_len, f90_type::kind_or_star, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_INT2.

Here is the call graph for this function:

_f_int4 _MINVAL0_I4 ( DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 561 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT32, HUGE_INT4_F90, f90_type::int_len, f90_type::kind_or_star, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_INT4.

Here is the call graph for this function:

_f_int8 _MINVAL0_J ( DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 908 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_INT64, HUGE_INT8_F90, f90_type::int_len, f90_type::kind_or_star, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_INT8.

Here is the call graph for this function:

_f_real8 _MINVAL0_S ( DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 975 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_REAL64, HUGE_REAL8_F90, f90_type::int_len, f90_type::kind_or_star, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_REAL8.

Here is the call graph for this function:

_f_real4 _MINVAL0_S4 ( DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 831 of file minval.c.

References __minval(), DopeVector::a, DopeVector::assoc, DopeVector::base_addr, f90_type::dec_len, f90_type::dpflag, DVSUBTYPE_REAL32, DVSUBTYPE_REAL64, HUGE_REAL4_F90, f90_type::int_len, f90_type::kind_or_star, DopeVector::n_dim, NULL, DopeVector::orig_base, DopeVector::orig_size, DopeVector::p_or_a, DopeVector::ptr_alloc, f90_type::type, DopeVector::type_lens, and USE_REAL4.

Here is the call graph for this function:

void _MINVAL__I ( DopeVectorType *  result,
DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 336 of file minval.c.

References __minval(), DVSUBTYPE_INT64, LOAD_DM_MK, USE_INT6, and USE_INT8.

Here is the call graph for this function:

void _MINVAL__I1 ( DopeVectorType *  result,
DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 538 of file minval.c.

References __minval(), DVSUBTYPE_INT32, LOAD_DM_MK, and USE_INT1.

Here is the call graph for this function:

void _MINVAL__I2 ( DopeVectorType *  result,
DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 499 of file minval.c.

References __minval(), DVSUBTYPE_INT32, LOAD_DM_MK, and USE_INT2.

Here is the call graph for this function:

void _MINVAL__I4 ( DopeVectorType *  result,
DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 460 of file minval.c.

References __minval(), DVSUBTYPE_INT32, LOAD_DM_MK, and USE_INT4.

Here is the call graph for this function:

void _MINVAL__J ( DopeVectorType *  result,
DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 241 of file minval.c.

References __minval(), DVSUBTYPE_INT64, LOAD_DM_MK, and USE_INT8.

Here is the call graph for this function:

void _MINVAL__S ( DopeVectorType *  result,
DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 271 of file minval.c.

References __minval(), DVSUBTYPE_REAL64, LOAD_DM_MK, and USE_REAL8.

Here is the call graph for this function:

void _MINVAL__S4 ( DopeVectorType *  result,
DopeVectorType *  source,
DopeVectorType *  dimp,
DopeVectorType *  mask 
)

Definition at line 808 of file minval.c.

References __minval(), DVSUBTYPE_REAL32, DVSUBTYPE_REAL64, LOAD_DM_MK, and USE_REAL4.

Here is the call graph for this function:

void _MINVAL_I ( DopeVectorType *  result,
DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 320 of file minval.c.

References __minval(), DVSUBTYPE_INT64, USE_INT6, and USE_INT8.

Here is the call graph for this function:

void _MINVAL_I1 ( DopeVectorType *  result,
DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 522 of file minval.c.

References __minval(), DVSUBTYPE_INT32, and USE_INT1.

Here is the call graph for this function:

void _MINVAL_I2 ( DopeVectorType *  result,
DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 483 of file minval.c.

References __minval(), DVSUBTYPE_INT32, and USE_INT2.

Here is the call graph for this function:

void _MINVAL_I4 ( DopeVectorType *  result,
DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 444 of file minval.c.

References __minval(), DVSUBTYPE_INT32, and USE_INT4.

Here is the call graph for this function:

void _MINVAL_J ( DopeVectorType *  result,
DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 230 of file minval.c.

References __minval(), DVSUBTYPE_INT64, and USE_INT8.

Here is the call graph for this function:

void _MINVAL_S ( DopeVectorType *  result,
DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 260 of file minval.c.

References __minval(), DVSUBTYPE_REAL64, and USE_REAL8.

Here is the call graph for this function:

void _MINVAL_S4 ( DopeVectorType *  result,
DopeVectorType *  source,
_f_int *  dimp,
DopeVectorType *  mask 
)

Definition at line 792 of file minval.c.

References __minval(), DVSUBTYPE_REAL32, DVSUBTYPE_REAL64, and USE_REAL4.

Here is the call graph for this function:

Variable Documentation

char USMID[] = "@(#) libfi/array/minval.c 92.0 10/08/98 14:37:14" [static]

Definition at line 37 of file minval.c.

Generated on Thu Jun 30 2011 05:51:31 for Open64 (mfef90, whirl2f, and IR tools) by  doxygen 1.7.1