Présentation de 8425.jps

50 setxunit 7.5 setborder -2 10 setxrange -2 10 setyrange 1 1 settkstep 0.5 0.5 setsubtkstep 1 1 setmkstep /sigma def /m def /f {m sub sigma div dup mul -2 div Exp 2 pi mul sqrt sigma mul div} def setlinewidth {f} courbe