let
elastic a x =
MX
.(a $* (l1 x) +@ ((1. -. a) $* (l2 x)))