set_all_coo Subroutine

private subroutine set_all_coo(self, value)

Type Bound

type_coo

Arguments

Type IntentOptional Attributes Name
class(type_coo), intent(inout) :: self
real(kind=real64), intent(in) :: value

Called by

proc~~set_all_coo~~CalledByGraph proc~set_all_coo type_coo%set_all_coo proc~zero_coo type_coo%zero_coo proc~zero_coo->proc~set_all_coo

Source Code

    subroutine set_all_coo(self, value)
        implicit none
        class(type_coo), intent(inout) :: self
        real(real64), intent(in) :: value

        integer(int32) :: i

        do i = 1, self%nnz
            self%val(i) = value
        end do

    end subroutine set_all_coo