! Program Example from "Essential Fortran 90 & 95" by Loren P. Meissner
! Copyright 1996. Copying for sale requires permission from the author.
! Otherwise, distribution is permitted if these three lines are included.

! Example 2.15. Recursive print a list of integers.
  program C15
    use C15M
    implicit none
! start program C15
    open (unit = 2, file = "zahlen.txt", status = "old", action = "read", position = "rewind")
    call Recursive_Print( ) ! Recursive print a list.
    stop
  end program C15
