p :: (real(0 .. 107000) ~ "Pa" field ( x(grid)
, y(grid)
, z(grid)
) monotonic k(+) on
(i = 0 .. nlon + 2 by
j = 0 .. nlat + 2 by
k = 1 .. nlev + 1
)
)
Scalar Form
p := A + B * p_s
Dimensioned
p := A + B * p_s
Discretized
p := A + B * p_s
CSE Eliminated
p := varidx(A, [k]) + varidx(B, [k]) * varidx(p_s, [i, j])