method add_child   x = childs  <- childs @ [x]