SKP_Silk_array_maxabs.go

package silk

// SKP_Silk_int16_array_maxabs see SKP_Silk_array_maxabs.c
// len_ -> len(vec)
func SKP_Silk_int16_array_maxabs(vec []int16, _len int32) int16 {
	if _len == 0 {
		return 0
	}
	ind := _len - 1
	max := SKP_SMULBB(int32(vec[ind]), int32(vec[ind]))
	for i := _len - 2; i >= 0; i-- {
		lvl := SKP_SMULBB(int32(vec[i]), int32(vec[i]))
		if lvl > max {
			max = lvl
			ind = i
		}
	}
	if int64(max) >= 0x3FFF0001 {
		return SKP_int16_MAX
	} else {
		if int64(vec[ind]) < 0 {
			return -vec[ind]
		} else {
			return vec[ind]
		}
	}
}