#19 SPTI will not get past setup phase

[seismick]

If a job containing SPTI is launched with icps, it does not run.
The logfile show the last thing done is starting setup for process SPTI.
This is followed by the SPTI parameters. There is no error message.
This happens whatever parameters are chosen for SPTI. If SPTI is deleted
from the offending workfile, it will run.

[seismick]

SPTI also fails to run in i686_gfortran_mpich2 as well as x86_64_gfortran_mpich2

[seismick]

Fortunately, SPTI does execute under
platform x86_64_intel91_mpich2 built with:
Centos 6.0 Intel compilers 11.1 MPICH2 1.3 FFTW 2.1.5 JDK 6u35

[seismick]

SPTI will run under
platform i686_intel91_mpich2 built with:
Centos 5.8 Intel compilers 11.1 MPICH2 1.2.1p JDK 6u35
So problem happens with gfortran compiler

[seismick]

The error was "Fortran runtime error: Bad unit number in OPEN statement" at line 837 of spti.f90. To patch bug, you this insert at line 820:
print_lun = pc_get_lun()

that is just before
write(print_lun, '(/,'' SPTI setup'' &

then SPTI will proceed to execute.
There was a pc_get_lun a little after this write statement. Seems that
print_lun was not defined when needed. I don't know why it worked with Intel compiler.

[seismick]

This was fixed years ago and can be closed.