IMSL on UNIX

Using IMSL 4.01 on Sun Solaris

IMSL 4.01 with MATH/Library and STAT/Library is available on the Sun Solaris operating system via the computational server FATMAN.SIU.EDU. Each of these libraries contains mathematical and statistical subroutines. To access IMSL, you must first have a Unix login ID on the FATMAN server. You can then Telnet to the host FATMAN.SIU.EDU, and login with your ID and password.

Sample Program Example

Sample IMSL program: imsltest.f90

      use sort_real_int
      use rand_gen_int

! implicit none

! This is Example 1 for SORT_REAL.

      integer, parameter :: n=100
      real(kind(1e0)), dimension(n) :: x, y

! Generate random data to sort.
      call rand_gen(x)

! Sort the data so it is non-decreasing.
      call sort_real(x, y)

      do 100 i = 1,100
         write (6,101) y(i)

100 continue
101 format(' ',F8.3)

! Check that the sorted array is not decreasing.
      if (count(y(1:n-1) > y(2:n)) == 0) then
         write (*,*) 'Example 1 for SORT_REAL is correct.'
      end if

      end

Executing the Program

With the environment variables set and a test program available, you are ready to run IMSL. To run the test program "imsltest.f90", issue the command

imsl imsltest

This command will compile the program and save the file "imsltest.out". To execute this compiled file, type

imsltest.out > imsltest.list

This command runs the compiled file and writes program output to the file "imsltest.list". This ".list" filename suffix is one that you can change. Only the ".f90" and ".out" suffixes are mandatory.

Additional Information

Fortran 90 programs should end with the filename suffix ".f90".

IMSL assumes that you are running Fortran 90, but older Fortran code (F77) will work.

References

IMSL MATH/Library (5371/5372) 1999. 2 Volumes.

IMSL MATH/Library Special Functions (5111A) 1998.

IMSL STAT/Library (5114A/5115A) 1999. 2 Volumes.

Documentation is available on the vendor's web site or can be ordered:

Visual Numerics
1300 W. Sam Houston Pkwy S., Suite 150
Houston, TX 77042
Telephone: 713-784-3131
Web site: www.vni.com