C File  hellofortran.f
        subroutine hellofortran (n)
        integer n
       
        do 100 i=1, n
            print *,i, "Fortran says hello"
100     continue
        end