conLikeFieldType (RealDataCon dc) label = dataConFieldType dc label
conLikeFieldType (RealDataCon dc) label = dataConFieldType dc label
conLikeFieldType (RealDataCon dc) label = dataConFieldType dc label