module A where import B showField :: Fields v -> String showField a = show a