debug options

src/Makevars.in

-PKG_CFLAGS=@PKG_CFLAGS@ 
-PKG_FFLAGS=@PKG_FFLAGS@
+DEBUG_FFLAGS=-fPIC -ggdb3 -O0
+DEBUG_CFLAGS=-fPIC -ggdb3 -O0
+
+all: $(SHLIB)
+
+tripack.o: tripack.f
+	$(FC) $(DEBUG_FFLAGS) -c -o $@ $<
+
+akima697.o: akima697.f
+	$(FC) $(DEBUG_FFLAGS) -c -o $@ $<
+
+akima760.o: akima760.f
+	$(FC) $(DEBUG_FFLAGS) -c -o $@ $<
+
+akima761.o: akima761.f
+	$(FC) $(DEBUG_FFLAGS) -c -o $@ $<
+
+akima433.o: akima433.f
+	$(FC) $(DEBUG_FFLAGS) -c -o $@ $<
+
+#init.o: init.c
+#	$(CC) $(CPPFLAGS) -I/usr/include/R $(DEBUG_CFLAGS) -c -o $@ $<

src/akima433.f

@@ -154,8 +154,14 @@ C DETERMINATION OF THE COEFFICIENTS
    60   Q2=(2.0*(M3-T3)+M3-T4)/A3
         Q3=(-M3-M3+T3+T4)/(A3*A3)
 C COMPUTATION OF THE POLYNOMIAL
-   70   DX=UK-P0
+ 70     DX=UK-P0
+        WRITE(*,*),"T3=",T3," T4=",T4
+        WRITE(*,*),"M1=",M1," M2=",M2," M3=",M3," M4=",M4," M5=",M5
+        WRITE(*,*),"X1=",X1," X2=",X2," X3=",X3," X4=",X4," X5=",X5
+        WRITE(*,*),"Y1=",Y1," Y2=",Y2," Y3=",Y3," Y4=",Y4," Y5=",Y5
+        WRITE(*,*),"Q0=",Q0," Q1=",Q1," Q2=",Q2," Q3=",Q3
         V(K)=Q0+DX*(Q1+DX*(Q2+DX*Q3))
+        WRITE(*,*),"OUT (",UK,", ",V(K),")"
    80 CONTINUE
       RETURN
 C ERROR EXIT