Forgot to load lapack in a few examples
[maxima.git] / share / odepack / fortran / dumsum.f
blobc74dd8bcfdcb2a59ea6c15df3e2bddd9e6251455
1 SUBROUTINE DUMSUM(A,B,C)
2 C Routine to force normal storing of A + B, for DUMACH.
3 DOUBLE PRECISION A, B, C
4 C = A + B
5 RETURN
6 END