gh fig deletions in balanced tree procedure balancel (var pnodevar hboolean)(adens _avltrees *var nodebegin (*hleft branch has shrunk*if bal - then bal : elsif bal then bal : :false else (*bal rebalance* : rightif bal > then (*sinlge rr rotation* right : leftp left :pif bal then bal : bal :- :false else bal : bal : endp : else (*double rl rotation* : leftp left : rightp right :