| # | Line 48 | Line 48 | |
|---|---|---|
| 48 | !! spline parameters. | |
| 49 | !! | |
| 50 | !! @author Charles F. Vardeman II | |
| 51 | < | !! @version $Id: interpolation.F90,v 1.4 2006-04-14 21:49:54 gezelter Exp $ |
| 51 | > | !! @version $Id: interpolation.F90,v 1.5 2006-04-14 21:59:23 gezelter Exp $ |
| 52 | ||
| 53 | ||
| 54 | module INTERPOLATION | |
| # | Line 219 | Line 219 | contains | |
| 219 | cs%dx_i = 1.0_DP / dx | |
| 220 | ||
| 221 | return | |
| 222 | < | end subroutine newSplineWithoutDerivs |
| 222 | > | end subroutine newSpline |
| 223 | ||
| 224 | subroutine deleteSpline(this) | |
| 225 | ||
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |