subroutine, public banddiagonalmod::banddiagonal |
( |
type(bounds_type), intent(in) |
bounds, |
|
|
integer, intent(in) |
lbj, |
|
|
integer, intent(in) |
ubj, |
|
|
integer, dimension( bounds%begc: ), intent(in) |
jtop, |
|
|
integer, dimension( bounds%begc: ), intent(in) |
jbot, |
|
|
integer, intent(in) |
numf, |
|
|
integer, dimension(:), intent(in) |
filter, |
|
|
integer, intent(in) |
nband, |
|
|
real(r8), dimension( bounds%begc: , 1: , lbj: ), intent(in) |
b, |
|
|
real(r8), dimension( bounds%begc: , lbj: ), intent(in) |
r, |
|
|
real(r8), dimension( bounds%begc: , lbj: ), intent(inout) |
u |
|
) |
| |