let mathd-algebra-270 = `!f:real->real.
    (!x. ~(x = -- &2) ==> f x = &1 / (x + &2))
==>
    f (f (&1)) = &3 / &7
`;;