|
1 | 1 | #:include "common.fypp"
|
2 | 2 | #:set IR_KINDS_TYPES = INT_KINDS_TYPES + REAL_KINDS_TYPES
|
3 | 3 | #:set RC_KINDS_TYPES = REAL_KINDS_TYPES + CMPLX_KINDS_TYPES
|
4 |
| -! #:set ICR_KINDS_TYPES = REAL_KINDS_TYPES + CMPLX_KINDS_TYPES + INT_KINDS_TYPES |
5 | 4 |
|
6 | 5 | module stdlib_math
|
7 | 6 | use stdlib_kinds, only: int8, int16, int32, int64, sp, dp, qp
|
@@ -31,6 +30,7 @@ module stdlib_math
|
31 | 30 | !! Create rank 1 array of linearly spaced elements
|
32 | 31 | !! If the number of elements is not specified, create an array with size 100. If n is a negative value,
|
33 | 32 | !! return an array with size 0. If n = 1, return end
|
| 33 | + !!([Specification](../page/specs/stdlib_math.html#description)) |
34 | 34 | #:for k1, t1 in RC_KINDS_TYPES
|
35 | 35 | #:set RName = rname("linspace_default", 1, t1, k1)
|
36 | 36 | module function ${RName}$(start, end) result(res)
|
@@ -60,8 +60,12 @@ module stdlib_math
|
60 | 60 | !! If the number of elements is not specified, create an array with size 100. If n is a negative value,
|
61 | 61 | !! return an array with size 0. If n = 1, return end. When dealing with integers as the `start` and `end`
|
62 | 62 | !! paramaters, the return type is always a double precision real.
|
| 63 | + !! |
| 64 | + !!([Specification](../page/specs/stdlib_math.html#description)) |
63 | 65 | #:for k1, t1 in INT_KINDS_TYPES
|
64 | 66 | #:set RName = rname("linspace_default", 1, t1, k1)
|
| 67 | + #! The interface for INT_KINDS_TYPES cannot be combined with RC_KINDS_TYPES |
| 68 | + #! because the output for integer types is always a real with dp. |
65 | 69 | module function ${RName}$(start, end) result(res)
|
66 | 70 | ${t1}$, intent(in) :: start
|
67 | 71 | ${t1}$, intent(in) :: end
|
|
0 commit comments