@@ -1147,21 +1147,21 @@ module stdlib_linalg
1147
1147
${rt}$, intent(in), target :: a${ranksuffix(rank)}$
1148
1148
!> Order of the matrix norm being computed.
1149
1149
${it}$, intent(in) :: order
1150
- !> Dimension to collapse by computing the norm w.r.t other dimensions
1150
+ !> Dimension the norm is computed along
1151
1151
integer(ilp), intent(in) :: dim
1152
- !> Norm of the matrix.
1152
+ !> Norm of the matrix. (Same shape as `a`, with `dim` dropped).
1153
1153
real(${rk}$) :: nrm${reduced_shape('a', rank, 'dim')}$
1154
1154
end function stdlib_linalg_norm_${rank}$D_to_${rank-1}$D_${ii}$_${ri}$
1155
1155
module function stdlib_linalg_norm_${rank}$D_to_${rank-1}$D_err_${ii}$_${ri}$(a, order, dim, err) result(nrm)
1156
1156
!> Input matrix a[..]
1157
1157
${rt}$, intent(in), target :: a${ranksuffix(rank)}$
1158
1158
!> Order of the matrix norm being computed.
1159
1159
${it}$, intent(in) :: order
1160
- !> Dimension to collapse by computing the norm w.r.t other dimensions
1160
+ !> Dimension the norm is computed along
1161
1161
integer(ilp), intent(in) :: dim
1162
1162
!> Output state return flag.
1163
1163
type(linalg_state_type), intent(out) :: err
1164
- !> Norm of the matrix.
1164
+ !> Norm of the matrix. (Same shape as `a`, with `dim` dropped).
1165
1165
real(${rk}$) :: nrm${reduced_shape('a', rank, 'dim')}$
1166
1166
end function stdlib_linalg_norm_${rank}$D_to_${rank-1}$D_err_${ii}$_${ri}$
1167
1167
#:endfor
@@ -1235,10 +1235,9 @@ module stdlib_linalg
1235
1235
pure module subroutine norm_${rank}$D_to_${rank-1}$D_${ii}$_${ri}$(a, nrm, order, dim, err)
1236
1236
!> Input matrix a[..]
1237
1237
${rt}$, intent(in), target :: a${ranksuffix(rank)}$
1238
- !> Dimension to collapse by computing the norm w.r.t other dimensions
1239
- ! (dim must be defined before it is used for `nrm`)
1238
+ !> Dimension the norm is computed along
1240
1239
integer(ilp), intent(in) :: dim
1241
- !> Norm of the matrix.
1240
+ !> Norm of the matrix. (Same shape as `a`, with `dim` dropped).
1242
1241
real(${rk}$), intent(out) :: nrm${reduced_shape('a', rank, 'dim')}$
1243
1242
!> Order of the matrix norm being computed.
1244
1243
${it}$, intent(in) :: order
0 commit comments