公共接口 simps
使用辛普森规则对采样值进行积分 (规范)
函数
私有纯递归模块函数 simps_dx_dp(y, dx, even) 结果(integral)
参数
| 类型 | 意图 | 可选 | 属性 | 名称 | ||
|---|---|---|---|---|---|---|
| real(kind=dp), | 意图(in), | 维度(:) | :: | y | ||
| real(kind=dp), | 意图(in) | :: | dx | |||
| integer, | 意图(in), | 可选 | :: | even |
返回值 real(kind=dp)
私有纯递归模块函数 simps_dx_sp(y, dx, even) 结果(integral)
参数
| 类型 | 意图 | 可选 | 属性 | 名称 | ||
|---|---|---|---|---|---|---|
| real(kind=sp), | 意图(in), | 维度(:) | :: | y | ||
| real(kind=sp), | 意图(in) | :: | dx | |||
| integer, | 意图(in), | 可选 | :: | even |
返回值 real(kind=sp)
私有递归模块函数 simps_x_dp(y, x, even) 结果(integral)
参数
| 类型 | 意图 | 可选 | 属性 | 名称 | ||
|---|---|---|---|---|---|---|
| real(kind=dp), | 意图(in), | 维度(:) | :: | y | ||
| real(kind=dp), | 意图(in), | 维度(:) | :: | x | ||
| integer, | 意图(in), | 可选 | :: | even |
返回值 real(kind=dp)
私有递归模块函数 simps_x_sp(y, x, even) 结果(integral)
参数
| 类型 | 意图 | 可选 | 属性 | 名称 | ||
|---|---|---|---|---|---|---|
| real(kind=sp), | 意图(in), | 维度(:) | :: | y | ||
| real(kind=sp), | 意图(in), | 维度(:) | :: | x | ||
| integer, | 意图(in), | 可选 | :: | even |