let
hinge2_loss y y' =
let
z = hinge_loss y y'
in
MX
.(z *@ z)