Create a function to insert a new parent node to an existing node.
The function insert-child does not work for position larger than 0?
The function move-node needs more work. Need both information from floc
and tloc, yet these information should be combined in a single location
so remove and insert can both stay in the final tree.