GP
Size: a a a
GP
R
TT
R
AT
TT
R
Oℕ
Oℕ
AT
join
, который народ в свитере написал поменьше деревья даетjoin (Leaf t) := t;
join (Node ll (Leaf x) rr) := Node (join ll) x (join rr);
join (Node ll (Node l x r) rr) := Node l x (join (Node ll r rr)).
KC