procedure post_order(in:root)
begin
     var albero: root
     if(root!=NULL)then
        post_order(root.right)
        post_order(root.left)
        print(root.info)
     endif
end post_order