Validate input fields have unique names

src/Language/GraphQL/Validate/Validation.hs

@@ -44,6 +44,7 @@ data Rule m
     | ArgumentsRule (Field -> RuleT m) (Directive -> RuleT m)
     | DirectivesRule ([Directive] -> RuleT m)
     | VariablesRule ([VariableDefinition] -> RuleT m)
+    | ValueRule (Value -> RuleT m) (ConstValue -> RuleT m)
 
 -- | Monad transformer used by the rules.
 type RuleT m = ReaderT (Validation m) Seq Error