[GRASS-user] m.eigensystem segfaults under Jaunty (beta)

[Hamish]

> Hamish:
> > perhaps you could compile into the fortran code some informative
> > hints, e.g. put scatter some of these before and after reading
> > the input values, etc:
> > 
> > ----8<----
> >        PRINT *,"Made it past normalizing the data"
> > ----8<----

Nikos:
> So I did. Randomely I've introduced in main.f some PRINT lines (I
> changed the text -- details below).
> 
> I get an error when I try to compile:
> 
> # attempt to compile after changes
> make MODULE_TOPDIR=/geo/osgeo/src/grass6_devel
....
> f77   -c -o main.o main.f
>    MAIN eigen:
> Error on line 43: Declaration error declaration among
> executables
[...]
> /usr/bin/f77: aborting compilation
> make: *** [main.o] Error 25

.... start by dealing with the first error on line 43 ...


> svn diff
> Index: main.f
> ===================================================================
> --- main.f    (revision 36664)
> +++ main.f    (working copy)
> @@ -39,6 +39,7 @@

^^^ diff starts on line 39

>  C         of the eigen value
> (E). 
>  
>  C
> +       PRINT *,"Starting the program..."

^^^ so this is line 43.

>         DOUBLE PRECISION
> A(30,30),W1,W2,WR(30),WI(30),Z(30,30),FV1(30)
>         DOUBLE PRECISION SUM1,SUM2
>         INTEGER     
>     IV1(30),N


I think you have to wait until after you define your variables before
you can run any commands like print. Try 'C'ommenting our that first
"Stating the program" one.

I am not sure, but I don't think you have to wait until the write device
(stdout) has been opened before using PRINT.


Hamish