A source code from a very good modern fortran reference book (Fortran 95 2003 for scientists and engineers). It can be used to develop modulized or object-oriented FORTRAN program.

fortran 95 2003 for scientists and engineers_codes\chap1\Fig1-5.for
..................................................\.....\Fig1-6.for
..................................................\.....\Fig1-7.f90
..................................................\.....0\character_subs.f90
..................................................\......\INPUTC
..................................................\......\real_to_character.f90
..................................................\......\sort4\sort4.f90
..................................................\......\....._dynamic\sortc.f90
..................................................\......\swapstr.f90
..................................................\......\test_abc.f90
..................................................\......\test_plot.f90
..................................................\......\test_real_to_character.f90
..................................................\......\test_ucase.f90
..................................................\......\ucase.f90
..................................................\.....1\diff.f90
..................................................\......\.simul\dsimul.f90
..................................................\......\......\simul.f90
..................................................\......\......\SYS6.ILL
..................................................\......\......\SYS6.SNG
..................................................\......\......\SYS6.WEL
..................................................\......\......\test_dsimul.f90
..................................................\......\kinds.f90
..................................................\......\roots_2.f90
..................................................\......\select_kinds.f90
..................................................\......\SYS10
..................................................\......\SYS6.ILL
..................................................\......\SYS6.SNG
..................................................\......\SYS6.WEL
..................................................\......\test_complex.f90
..................................................\......\test_selected_int_kinds.f90
..................................................\......\test_selected_kinds.f90
..................................................\.....2\a.exe
..................................................\......\customer_database.f90
..................................................\......\DATABASE
..................................................\......\filtp.dat
..................................................\......\filtv.dat
..................................................\......\INP1
..................................................\......\MEASURE.F90
..................................................\......\point_module\test_vectors.exe
..................................................\......\............\test_vectors.f90
..................................................\......\............\vector_module.f90
..................................................\......\point_module.f90
..................................................\......\point_module.o
..................................................\......\PURE.DAT
..................................................\......\SYS10
..................................................\......\SYS6.ILL
..................................................\......\SYS6.SNG
..................................................\......\SYS6.WEL
..................................................\......\test_allocatable.f90
..................................................\......\test_bound_procedures.f90
..................................................\......\test_io.f90
..................................................\......\test_type_extension.f90
..................................................\......\track1.dat
..................................................\......\track2.dat
..................................................\......\vel.dat
..................................................\.....3\DATA
......................

• We are an exchange download platform that only provides communication channels. The downloaded content comes from the internet. Except for download issues, please Google on your own.
• The downloaded content is provided for members to upload. If it unintentionally infringes on your copyright, please contact us.
• Please use Winrar for decompression tools
• If download fail, Try it againg or Feedback to us.
• If downloaded content did not match the introduction, Feedback to us，Confirm and will be refund.
• Before downloading, you can inquire through the uploaded person information

Nothing．