Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_type), | intent(inout), | TARGET | :: | matrix | ||
integer, | intent(in) | :: | which_norm | |||
real(kind=dp), | intent(out), | DIMENSION(:) | :: | norm_vector |
SUBROUTINE dbcsr_norm_r8_vec(matrix, which_norm, norm_vector)
TYPE(dbcsr_type), INTENT(INOUT), TARGET :: matrix
INTEGER, INTENT(IN) :: which_norm
REAL(dp), DIMENSION(:), INTENT(OUT) :: norm_vector
CALL dbcsr_norm_r8_vec_prv(matrix%prv, which_norm, norm_vector)
END SUBROUTINE dbcsr_norm_r8_vec