Displaying 1 result from an estimated 1 matches for "wjm3".
Did you mean:
wjm
1999 Jun 09
1
R correct g77 flags for Linux/Alpha (PR#208)
...'t pass the make check (choked with
tests/Examples/modreg-Ex.R).
I used gdb, and it turned out that the src/library/modreg/src/sinerp.f was
the problem.
else if(j.eq.nk)then
c1 = 0d0
c2 = 0d0
c3 = 0d0
endif
> p1ip(1,j) = 0d0- (c1*wjm3(1)+c2*wjm3(2)+c3*wjm3(3))
p1ip(2,j) = 0d0- (c1*wjm3(2)+c2*wjm2(1)+c3*wjm2(2))
I think wjm3(3) should be 0, but it was set to a really tiny value.
So I gave -mieee for g77, and it solved the problem.
The configure correctly identify the CFLAGS for alpha, but -mieee should
be given to g77...