R
Size: a a a
R
/\(r :: *) -> \(f : r -> r) ->
fix {r} {nat -> r} \(rec : r -> nat -> r) (z : r) (n : nat) ->
unwrap n {r} z (\(n' : nat) -> rec (f z) n')
/\(r :: *) -> \(f : r -> r) ->
fix {r} {nat -> r} \(rec : r -> nat -> r) (z : r) (n : nat) ->
unwrap n {r} z (rec (f z))
data
по дефолту нужна?ЗП
/\(r :: *) -> \(f : r -> r) ->
fix {r} {nat -> r} \(rec : r -> nat -> r) (z : r) (n : nat) ->
unwrap n {r} z (\(n' : nat) -> rec (f z) n')
/\(r :: *) -> \(f : r -> r) ->
fix {r} {nat -> r} \(rec : r -> nat -> r) (z : r) (n : nat) ->
unwrap n {r} z (rec (f z))
data
по дефолту нужна?R
YG
YS
YS
YS
YS
YG
YS
YG
YS
YS
KZ
YS