rightLowerIdentifier :: Gen String
rightLowerIdentifier = resize 2 rightCapitalIdentifier <++> return "." <++> lowerIdentifier
rightLowerIdentifier :: Gen String
rightLowerIdentifier = resize 2 rightCapitalIdentifier <++> return "." <++> lowerIdentifier
rightLowerIdentifier = resize 2 rightCapitalIdentifier <++> return "." <++> lowerIdentifier