concrete MathFre of Math = CatFre ** MathRomance with (DiffRomance = DiffFre) ;