|
| subroutine | l1ubb (m, mah1, mah2, mbh1, mbh2, a, b) |
| | [L]*[D]*[U] factoring of band-matrix [A], modify [B] –> [D**-1]*[B] [L] lower triangular with unit main diagonal [D] diagonal matrix [U] upper triangular with unit main diagonal [B] associated band matrix with same number of rows as [A] lower triangular elements of [A] by [D**-1]*[L]*[D], the upper by [U], replace matrix [B] by [D**-1]*[B]. More...
|
| |
| subroutine | dl1ubb (m, mah1, mah2, mbh1, mbh2, a, b) |
| | Double precision version of L1UBB. More...
|
| |
Definition at line 66 of file pmat2.f90.
| subroutine pmat2::l1ubb::l1ubb |
( |
integer(spi), intent(in) |
m, |
|
|
integer(spi), intent(in) |
mah1, |
|
|
integer(spi), intent(in) |
mah2, |
|
|
integer(spi), intent(in) |
mbh1, |
|
|
integer(spi), intent(in) |
mbh2, |
|
|
real(sp), dimension(m,-mah1:mah2), intent(inout) |
a, |
|
|
real(sp), dimension(m,-mbh1:mbh2), intent(inout) |
b |
|
) |
| |
|
private |
[L]*[D]*[U] factoring of band-matrix [A], modify [B] –> [D**-1]*[B] [L] lower triangular with unit main diagonal [D] diagonal matrix [U] upper triangular with unit main diagonal [B] associated band matrix with same number of rows as [A] lower triangular elements of [A] by [D**-1]*[L]*[D], the upper by [U], replace matrix [B] by [D**-1]*[B].
- Parameters
-
| [in] | m | Number of rows of A and B |
| [in] | mah1 | number of subdiagonals of A |
| [in] | mah2 | number of superdiagonals of A |
| [in] | mbh1 | number of subdiagonals of B |
| [in] | mbh2 | number of superdiagonals of B |
| [in,out] | a | input as band matrix, output as lower and upper triangulars with 1s implicitly assumed to lie on the main diagonal. The product of these triangular matrices is [D**-1]*[A], where [D] is a diagonal matrix. |
| [in,out] | b | Input single precision band matrix B; output [D**-1 B] |
- Author
- R. J. Purser, Tsukasa Fujita (JMA)
- Date
- 1996
Definition at line 732 of file pmat2.f90.
| subroutine pmat2::l1ubb::dl1ubb |
( |
integer(spi), intent(in) |
m, |
|
|
integer(spi), intent(in) |
mah1, |
|
|
integer(spi), intent(in) |
mah2, |
|
|
integer(spi), intent(in) |
mbh1, |
|
|
integer(spi), intent(in) |
mbh2, |
|
|
real(dp), dimension(m,-mah1:mah2), intent(inout) |
a, |
|
|
real(dp), dimension(m,-mbh1:mbh2), intent(inout) |
b |
|
) |
| |
|
private |
Double precision version of L1UBB.
- Parameters
-
| [in] | m | Number of rows of A and B |
| [in] | mah1 | left half-width of fortran array A |
| [in] | mah2 | right half-width of fortran array A |
| [in] | mbh1 | left half-width of fortran array B |
| [in] | mbh2 | left half-width of fortran array B |
| [in,out] | a | Input double precision band matrix A; output factors encoded as [D**-1 * L * D]+[U-I] |
| [in,out] | b | Input double precision band matrix B; output [D**-1 B] |
- Author
- R. J. Purser, Tsukasa Fujita (JMA)
- Date
- 1999
Definition at line 770 of file pmat2.f90.
The documentation for this interface was generated from the following file:
- /gpfs/dell2/emc/modeling/noscrub/George.Gayno/ufs_utils.git/UFS_UTILS.upstream/sorc/grid_tools.fd/regional_esg_grid.fd/pmat2.f90
1.8.5 
