CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ tridiagonal()

subroutine clm_lake::tridiagonal ( integer, intent(in) lbc,
integer, intent(in) ubc,
integer, intent(in) lbj,
integer, intent(in) ubj,
integer, dimension(lbc:ubc), intent(in) jtop,
integer, intent(in) numf,
integer, dimension(1:numf), intent(in) filter,
real(kind_lake), dimension(lbc:ubc, lbj:ubj), intent(in) a,
real(kind_lake), dimension(lbc:ubc, lbj:ubj), intent(in) b,
real(kind_lake), dimension(lbc:ubc, lbj:ubj), intent(in) c,
real(kind_lake), dimension(lbc:ubc, lbj:ubj), intent(in) r,
real(kind_lake), dimension(lbc:ubc, lbj:ubj), intent(inout) u )
private
Parameters
[in]ubclbinning and ubing column indices
[in]ubjlbinning and ubing level indices
[in]jtoptop level for each column
[in]numffilter dimension
[in]a"a" left off diagonal of tridiagonal matrix
[in]b"b" diagonal column for tridiagonal matrix
[in]c"c" right off diagonal tridiagonal matrix
[in]r"r" forcing term of tridiagonal matrix
[in,out]usolution

Definition at line 3862 of file clm_lake.f90.