ILUCRS Subroutine

public recursive subroutine ILUCRS(this, fill_in_order, RHS, debug)

$OMP parallel do

$OMP end parallel do

notice!! each col should be sorted.

      ! 高速バージョン

Type Bound

CRS_

Arguments

Type IntentOptional Attributes Name
class(CRS_), intent(inout) :: this
integer(kind=int32), intent(in) :: fill_in_order
real(kind=real64), intent(inout), optional :: RHS(:)
logical, intent(in), optional :: debug