Return to fs029.f CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / usr.bin / f77 / testf77 / tests

BSD 4.3tahoe

      integer function ff029(ivon01)
c
c     comment section
c     ff029
c
c         this function subprogram is called by the main program fm028.
c     the function argument is incremented by 1 and control returned
c     to the calling program.
c
c      references
c        american national standard programming language fortran,
c              x3.9-1978
c
c        section 15.5.1, defining function subprograms and function
c                        statements
c        section 15.8, return statement
c
c     test section
c
c          function subprogram
c
c     increment argument by 1 and return to calling program.
c
      ivon02 = ivon01
      ff029  = ivon02 + 1
      ivon02 = 500
      return
      end

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.