по списку типов?
Есть ф-ция foo :: forall (is :: [Nat]). (LessThen is max) => (forall (i :: Nat). (i <= max) => Double) -> [Double]
Cамый простой способ - написать TF MapLessThan. Сложнее - разобраться как использовать дефункционализованные представления из Data.Singletons.Prelude и взять Map оттуда.
Обсуждают сегодня