Thread: IFTYPE set to IXY or IXYZ

Hi Ray,

The sac code for Fortran string handling worked for Sun Fortran, but had
problems similar to what you describe when using g77 on Linux or Mac OS X.
Before the release of sac version 101.0, Brian Savage spent time fixing up
things in the routines in sacio.a.

What version of sac are you using? What platform? What Fortran
compiler? If you are using a version earlier than 101.0, I suggest you
upgrade.

One trick I have used when I got extra characters in a filename I was
using in my home-grown sgf-file writer is to add a null character at the
end of the string:


nf = lenc(filena)
write(*,*) 'Opening plotting file named ',filena(1:nf)
filena(nf+1:nf+1) = char(0)

where lenc is my own routine for finding out the number of characters in a
character variable.

Arthur

On Wed, 16 May 2007, Ray Russo wrote:

I'm trying to use wsac0 with some home-grown fortran code. I get errors
after apparently normal compilation:

ERROR: Illegal enumerated header field value: IXY 4
?
ERROR: Illegal enumerated header field value: IXYZ?e?

I have set the IFTYPE several different ways in the call:

ftype = 'IXY' (ftype defined character*4)
call setihv('IFTYPE',ftype,nerr)

or

call setihv('IFTYPE','IXY',nerr)

Nothing works. Looks like there is garbage at the end of the string, to
judge from the error messages above.

Anybody solved this problem?

Thanks!


--
R. M. Russo
Assistant Professor
Dept. of Geological Sciences
University of Florida
P.O. Box 112120
241 Williamson Hall
Gainesville, FL 32611 USA
+1 352 392 6766 office
+1 352 392 9294 fax
rrusso<at>ufl.edu
rayrusso<at>cox.net


_______________________________________________
sac-help mailing list
sac-help<at>iris.washington.edu
http://www.iris.washington.edu/mailman/listinfo/sac-help