f(x) = If[0 ≤ x ≤ 800, (100 * ℯ^((-0.003 * x)))]
Profondeur = 0 (slider from 0 to 800, step 0.2)
A: (Profondeur, f(Profondeur))