concrete RelativeSwe of Relative = CatSwe ** RelativeScand with (ResScand = ResSwe) ;