P
Size: a a a
P
VS
АВ
AH
AH
P
P
VK
VK
оГ
P
P
VK
P
let tailmap func list =
let rec func1 acc list1 =
match list1 with
| [] -> acc
| x::xs -> func1 ((func x)::acc) xs
func1 [] list |> List.revP
оГ
АВ
let tailmap func list =
let rec func1 acc list1 =
match list1 with
| [] -> acc
| x::xs -> func1 ((func x)::acc) xs
func1 [] list |> List.revP