* svec_l2norm - computes the l2 norm of an svec */
| 446 | * svec_l2norm - computes the l2 norm of an svec |
| 447 | */ |
| 448 | Datum svec_l2norm(PG_FUNCTION_ARGS) |
| 449 | { |
| 450 | SvecType *svec = PG_GETARG_SVECTYPE_P(0); |
| 451 | SparseData sdata = sdata_from_svec(svec); |
| 452 | double accum; |
| 453 | accum = l2norm_sdata_values_double(sdata); |
| 454 | |
| 455 | if (IS_NVP(accum)) PG_RETURN_NULL(); |
| 456 | |
| 457 | PG_RETURN_FLOAT8(accum); |
| 458 | } |
| 459 | |
| 460 | PG_FUNCTION_INFO_V1( svec_svec_l2norm ); |
| 461 | /** |
nothing calls this directly
no test coverage detected