diff --git a/src/Data/Sequenceable/Generic.hs b/src/Data/Sequenceable/Generic.hs
index 777830013..7c01b6fd5 100644
--- a/src/Data/Sequenceable/Generic.hs
+++ b/src/Data/Sequenceable/Generic.hs
@@ -16,3 +16,6 @@ instance GSequenceable U1 where
 
 instance GSequenceable Par1 where
   gsequenceAlt (Par1 a) = Par1 <$> a
+
+instance GSequenceable (K1 i c) where
+  gsequenceAlt (K1 a) = pure (K1 a)