@@ -971,3 +971,7 @@ instance (ToSample a a, ToSample b b, ToSample c c, ToSample d d, ToSample e e)
971971instance (ToSample a a, ToSample b b, ToSample c c, ToSample d d, ToSample e e, ToSample f f) => ToSample (a, b, c, d, e, f) (a, b, c, d, e, f)
972972instance (ToSample a a, ToSample b b, ToSample c c, ToSample d d, ToSample e e, ToSample f f, ToSample g g) => ToSample (a, b, c, d, e, f, g) (a, b, c, d, e, f, g)
973973
974+instance ToSample a a => ToSample (Maybe a) (Maybe a)
975+instance (ToSample a a, ToSample b b) => ToSample (Either a b) (Either a b)
976+instance ToSample a a => ToSample [a] [a]
977+