Hi developers,
today we need someone familiar with F77...
src.garden/answers/src.answers/raster/r.fill.dir
is causing attached problem.
Note: At least I did not face the problem. Seems
to be compiler specific.
Thanks for listening
Markus
Markus Neteler wrote:
Hi developers,
today we need someone familiar with F77...
src.garden/answers/src.answers/raster/r.fill.dir
is causing attached problem.
[...]
f77 -c fillsngl.ffillsngl.f: In program MAIN__':
fillsngl.f:54: SMALLEST=MIN(DATA(J-1,I1),DATA(J,I1),DATA(J+1,I1),
1 2
Type disagreement between expressions at (1) and (2)
By default, name beginning vith [I-N] are integers, float else.
This can be redefined. Maybe you should look at the definition
of SMALLEST and the MIN function (if i remember well, there is an
AMIN function in the Fortran math library for the min of two floats,
so MIN should be a localy defined function)
--
Michel Wurtz ENGEES - CEREG
1, quai Koch - BP 1039, F-67070 STRASBOURG cedex
Tel: +33 03.88.24.82.45 Fax: +33 03.88.37.04.97
----------------------------------------
If you want to unsubscribe from GRASS Development
Team internal mailing list write to:
minordomo@geog.uni-hannover.de with
subject 'unsubscribe grass5'
length: 2324
max: 0
Michel Wurtz - ENGEES/CEREG wrote:
Markus Neteler wrote:
>
> Hi developers,
>
> today we need someone familiar with F77...
> src.garden/answers/src.answers/raster/r.fill.dir
> is causing attached problem.
[...]
> f77 -c fillsngl.ffillsngl.f: In program MAIN__':
> fillsngl.f:54: SMALLEST=MIN(DATA(J-1,I1),DATA(J,I1),DATA(J+1,I1),
> 1 2
> Type disagreement between expressions at (1) and (2)By default, name beginning vith [I-N] are integers, float else.
This can be redefined. Maybe you should look at the definition
of SMALLEST and the MIN function (if i remember well, there is an
AMIN function in the Fortran math library for the min of two floats,
so MIN should be a localy defined function)
MIN is a standard FORTRAN77 intrinsic function which may use more
than 2 arguments. It is a GENERIC function, so it is OK to use it
with INTEGER, FLOAT or DOUBLE arguments.
I have no compilation error on my platform:
Redhat Linux 6.2 + egcs-g77-1.1.2-30 + glibc-2.1.3-15
Jacques
----------------------------------------
If you want to unsubscribe from GRASS Development
Team internal mailing list write to:
minordomo@geog.uni-hannover.de with
subject 'unsubscribe grass5'
length: 2116
max: 0
On Fri, May 12, 2000 at 02:11:56PM +0200, Michel Wurtz - ENGEES/CEREG wrote:
Markus Neteler wrote:
>
> Hi developers,
>
> today we need someone familiar with F77...
> src.garden/answers/src.answers/raster/r.fill.dir
> is causing attached problem.
[...]
> f77 -c fillsngl.ffillsngl.f: In program MAIN__':
> fillsngl.f:54: SMALLEST=MIN(DATA(J-1,I1),DATA(J,I1),DATA(J+1,I1),
> 1 2
> Type disagreement between expressions at (1) and (2)By default, name beginning vith [I-N] are integers, float else.
This can be redefined. Maybe you should look at the definition
of SMALLEST and the MIN function (if i remember well, there is an
AMIN function in the Fortran math library for the min of two floats,
so MIN should be a localy defined function)
Hi Michel,
I did not find a local MIN definition there. Then I tried
AMIN instead of MIN (as suggested), but received:
OBJ.i586-linux-elf/fillsngl.o(.text+0x5e1): undefined reference to 'amin_'
At least my g77 doesn't like it... I am really not familiar with F77,
sorry.
Further ideas are welcome. Of course the CVS is untouched here 
Nevertheless, thanks!
Markus
----------------------------------------
If you want to unsubscribe from GRASS Development
Team internal mailing list write to:
minordomo@geog.uni-hannover.de with
subject 'unsubscribe grass5'
length: 1979
max: 0