column :: NullableOrNot Value a -> Row a
column = \ case
  NonNullable (Value imp) -> Row (Row.nonNullValue imp)
  Nullable (Value imp) -> Row (Row.value imp)


-- * Nullability
-------------------------

{-|
Extensional specification of nullability over a generic decoder.
-}
column :: NullableOrNot Value a -> Row a
column = \ case
  NonNullable (Value imp) -> Row (Row.nonNullValue imp)
  Nullable (Value imp) -> Row (Row.value imp)


-- * Nullability
-------------------------

{-|
Extensional specification of nullability over a generic decoder.
-}
column = \ case
  NonNullable (Value imp) -> Row (Row.nonNullValue imp)
  Nullable (Value imp) -> Row (Row.value imp)


-- * Nullability
-------------------------

{-|
Extensional specification of nullability over a generic decoder.
-}