Add constructors and deconstructors for Rational

Implemented (%), numerator and denominator as in Data.Ratio