Learn Fp in Sml: