(t_144 ::
(real ~ "1" on
(i = 1 .. nlon by j = 1 .. nlat by k = 2 .. nlev)
))
CSE Eliminated
(t_144 :=
( varidx(eta_p, [i, j, k])
* (varidx(T, [i, j, k - 1]) - varidx(T, [i, j, k]))
))