This algorithm was gracefully provided by Ivan Privec and adapted by Jose Alves
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | op | |||
| complex(kind=dp), | intent(in) | :: | alpha | |||
| complex(kind=dp), | intent(in), | contiguous | :: | data(:,:) | ||
| integer(kind=ilp), | intent(in), | contiguous | :: | ia(:) | ||
| integer(kind=ilp), | intent(in), | contiguous | :: | ja(:,:) | ||
| integer, | intent(in) | :: | storage | |||
| complex(kind=dp), | intent(in), | contiguous | :: | vec_x(:) | ||
| complex(kind=dp), | intent(in) | :: | beta | |||
| complex(kind=dp), | intent(inout), | contiguous | :: | vec_y(:) |
This algorithm was gracefully provided by Ivan Privec and adapted by Jose Alves
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | op | |||
| complex(kind=sp), | intent(in) | :: | alpha | |||
| complex(kind=sp), | intent(in), | contiguous | :: | data(:,:) | ||
| integer(kind=ilp), | intent(in), | contiguous | :: | ia(:) | ||
| integer(kind=ilp), | intent(in), | contiguous | :: | ja(:,:) | ||
| integer, | intent(in) | :: | storage | |||
| complex(kind=sp), | intent(in), | contiguous | :: | vec_x(:) | ||
| complex(kind=sp), | intent(in) | :: | beta | |||
| complex(kind=sp), | intent(inout), | contiguous | :: | vec_y(:) |
This algorithm was gracefully provided by Ivan Privec and adapted by Jose Alves
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | op | |||
| real(kind=dp), | intent(in) | :: | alpha | |||
| real(kind=dp), | intent(in), | contiguous | :: | data(:,:) | ||
| integer(kind=ilp), | intent(in), | contiguous | :: | ia(:) | ||
| integer(kind=ilp), | intent(in), | contiguous | :: | ja(:,:) | ||
| integer, | intent(in) | :: | storage | |||
| real(kind=dp), | intent(in), | contiguous | :: | vec_x(:) | ||
| real(kind=dp), | intent(in) | :: | beta | |||
| real(kind=dp), | intent(inout), | contiguous | :: | vec_y(:) |
This algorithm was gracefully provided by Ivan Privec and adapted by Jose Alves
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | op | |||
| real(kind=sp), | intent(in) | :: | alpha | |||
| real(kind=sp), | intent(in), | contiguous | :: | data(:,:) | ||
| integer(kind=ilp), | intent(in), | contiguous | :: | ia(:) | ||
| integer(kind=ilp), | intent(in), | contiguous | :: | ja(:,:) | ||
| integer, | intent(in) | :: | storage | |||
| real(kind=sp), | intent(in), | contiguous | :: | vec_x(:) | ||
| real(kind=sp), | intent(in) | :: | beta | |||
| real(kind=sp), | intent(inout), | contiguous | :: | vec_y(:) |