* svec_normalize - Computes a normalized SVEC. */
| 566 | * svec_normalize - Computes a normalized SVEC. |
| 567 | */ |
| 568 | Datum svec_normalize(PG_FUNCTION_ARGS) |
| 569 | { |
| 570 | SvecType *svec = PG_GETARG_SVECTYPE_P(0); |
| 571 | SparseData sdata = sdata_from_svec(svec); |
| 572 | double norm; |
| 573 | |
| 574 | norm = l2norm_sdata_values_double(sdata); |
| 575 | |
| 576 | op_sdata_by_scalar_inplace( 3, (char *)&norm, sdata, 2); |
| 577 | |
| 578 | PG_RETURN_SVECTYPE_P( svec_from_sparsedata( sdata, true)); |
| 579 | } |
| 580 | |
| 581 | PG_FUNCTION_INFO_V1( svec_l1norm ); |
| 582 | /** |
nothing calls this directly
no test coverage detected