From 42c4f937538db40aedf600239cbf3bf441a1c92a Mon Sep 17 00:00:00 2001 From: Gustavo Marques Date: Tue, 29 May 2018 09:30:37 -0600 Subject: [PATCH] Add some comments --- src/parameterizations/vertical/MOM_diabatic_driver.F90 | 1 + 1 file changed, 1 insertion(+) diff --git a/src/parameterizations/vertical/MOM_diabatic_driver.F90 b/src/parameterizations/vertical/MOM_diabatic_driver.F90 index a26e44fe48..f283f6243a 100644 --- a/src/parameterizations/vertical/MOM_diabatic_driver.F90 +++ b/src/parameterizations/vertical/MOM_diabatic_driver.F90 @@ -893,6 +893,7 @@ subroutine diabatic(u, v, h, tv, Hml, fluxes, visc, ADp, CDp, dt, Time_end, & call tracer_vertdiff(hold, ea, eb, dt, tv%T, G, GV) call tracer_vertdiff(hold, ea, eb, dt, tv%S, G, GV) else + call triDiagTS(G, GV, is, ie, js, je, hold, ea, eb, tv%T, tv%S) endif