Function input_function 

fn input_function(
    r_hat: &[f64],
    tau_r: f64,
    lambda: f64,
    wave_mask: &[bool],
) -> (Vec<f64>, f64)

Laplace input function: soft-threshold with the morphology mask passing large coefficients through unshrunk. Returns (x_hat_psi, tau_x).