9 May 2025   9:00:57.641 PM
 
binary_tree():
  FORTRAN90 version.
 
  Demonstrate how pointers can be used to define
  and manipulate a binary tree.
 
TEST01
  Create, one at a time, a sequence of integers.
  As each integer is created, insert it into a sorted
  binary tree.  Print the binary tree at the end.
 
  Initial data generation:
 
         1       713
         2        61
         3       470
         4       590
         5       548
         6       312
         7       823
         8       918
         9       713
        10       863
 
  Contents of sorted binary tree:
 
         2        61
         6       312
         3       470
         5       548
         4       590
         9       713
         1       713
         7       823
        10       863
         8       918
 
BINARY_TREE:
  Normal end of execution.
 
 9 May 2025   9:00:57.641 PM