MCPcopy Create free account
hub / github.com/BoevaLab/FREEC / vectoridxabsmax

Function vectoridxabsmax

src/blas.cpp:67–83  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

65
66
67int vectoridxabsmax(const ap::real_1d_array& x, int i1, int i2)
68{
69 int result;
70 int i;
71 double a;
72
73 result = i1;
74 a = fabs(x(result));
75 for(i = i1+1; i <= i2; i++)
76 {
77 if( ap::fp_greater(fabs(x(i)),fabs(x(result))) )
78 {
79 result = i;
80 }
81 }
82 return result;
83}
84
85
86int columnidxabsmax(const ap::real_2d_array& x, int i1, int i2, int j)

Callers

nothing calls this directly

Calls

no outgoing calls

Tested by

no test coverage detected