Например, как мне написать версию map
, которая будет работать с полиморфными функциями в Typed Racket? Я использую простую функцию id
, определенную как:
(: id : (All (A) A -> A))
(define (id x) x)
Когда я пытаюсь сопоставить его со списком, я получаю сообщение об ошибке:
> (map id '(1 2 3))
Type Checker: Polymorphic function `map' could not be applied to arguments:
Types: (-> a b ... b c) (Listof a) (Listof b) ... b -> (Listof c)
(-> a c) (Pairof a (Listof a)) -> (Pairof c (Listof c))
Arguments: (All (A) (-> A A)) (List One Positive-Byte Positive-Byte)
Expected result: AnyValues
in: (map id (quote (1 2 3)))