Object Info


v_t is defined in /home/robert/projects/Ctadel/dyn.s:316
v_t --> declared_var(script("dyn")) --> declared_object(script("dyn")) --> object
derived_var --> dependent_var --> variable --> object
object
------- Properties:
v_t has cse_value(((( ( 1 / 2
* varidx(t_219, [i, j, nlev]) / varidx(t_49, [i, j, nlev])
)
+ ( ( rdth * ( ( 1.56961230576048E-7
* ( (varidx(E, [i, j, k]) + varidx(phi, [i, j, nlev]))
- varidx(E, [i, j + 1, k])
- varidx(phi, [i, j + 1, nlev])
)
)
+ ( 2.25270758122744E-5
* (( 0.30391234671126
* ( varidx(q, [i, j, nlev])
+ varidx(q, [i, j + 1, nlev])
)
) + 1)
* ( varidx(ln_p, [i, j, k])
- varidx(ln_p, [i, j + 1, k])
)
* (varidx(T, [i, j, k]) + varidx(T, [i, j + 1, k]))
)
)
+ ( 1 / 16
* (varidx(Z, [i, j, k]) + varidx(Z, [i - 1, j, k]))
* ( ( varidx(hxu, [i, j])
* varidx(t_47, [i, j, nlev])
* varidx(u, [i, j, nlev])
)
+ ( varidx(hxu, [i, j + 1])
* varidx(t_47, [i, j + 1, nlev])
* varidx(u, [i, j + 1, nlev])
)
+ ( varidx(hxu, [i - 1, j])
* varidx(t_47, [i - 1, j, nlev])
* varidx(u, [i - 1, j, nlev])
)
+ ( varidx(hxu, [i - 1, j + 1])
* varidx(t_47, [i - 1, j + 1, nlev])
* varidx(u, [i - 1, j + 1, nlev])
)
)
)
)
/ varidx(hyv, [i, j])
)
) if
nlev <= k
) \\
( 1 / 2 * varidx(t_219, [i, j, 2]) / varidx(t_49, [i, j, 1])
+ ( ( rdth * ( ( 1.56961230576048E-7
* ( (varidx(E, [i, j, k]) + varidx(phi, [i, j, 1]))
- varidx(E, [i, j + 1, k])
- varidx(phi, [i, j + 1, 1])
)
)
+ ( 2.25270758122744E-5
* (( 0.30391234671126
* ( varidx(q, [i, j, 1])
+ varidx(q, [i, j + 1, 1])
)
) + 1)
* ( varidx(ln_p, [i, j, k])
- varidx(ln_p, [i, j + 1, k])
)
* (varidx(T, [i, j, k]) + varidx(T, [i, j + 1, k]))
)
)
+ ( 1 / 16
* (varidx(Z, [i, j, k]) + varidx(Z, [i - 1, j, k]))
* ( ( varidx(hxu, [i, j])
* varidx(t_47, [i, j, 1])
* varidx(u, [i, j, 1])
)
+ ( varidx(hxu, [i, j + 1])
* varidx(t_47, [i, j + 1, 1])
* varidx(u, [i, j + 1, 1])
)
+ ( varidx(hxu, [i - 1, j])
* varidx(t_47, [i - 1, j, 1])
* varidx(u, [i - 1, j, 1])
)
+ ( varidx(hxu, [i - 1, j + 1])
* varidx(t_47, [i - 1, j + 1, 1])
* varidx(u, [i - 1, j + 1, 1])
)
)
)
)
/ varidx(hyv, [i, j])
)
) if k <= 1 \\
( ( 1 / 2
* ( (varidx(t_219, [i, j, k]) + varidx(t_219, [i, j, k + 1]))
/ varidx(t_49, [i, j, k])
)
)
+ ( ( rdth * ( ( 1.56961230576048E-7
* ( (varidx(E, [i, j, k]) + varidx(phi, [i, j, k]))
- varidx(E, [i, j + 1, k])
- varidx(phi, [i, j + 1, k])
)
)
+ ( 2.25270758122744E-5
* (( 0.30391234671126
* ( varidx(q, [i, j, k])
+ varidx(q, [i, j + 1, k])
)
) + 1)
* ( varidx(ln_p, [i, j, k])
- varidx(ln_p, [i, j + 1, k])
)
* (varidx(T, [i, j, k]) + varidx(T, [i, j + 1, k]))
)
)
+ ( 1 / 16
* (varidx(Z, [i, j, k]) + varidx(Z, [i - 1, j, k]))
* ( ( varidx(hxu, [i, j])
* varidx(t_47, [i, j, k])
* varidx(u, [i, j, k])
)
+ ( varidx(hxu, [i, j + 1])
* varidx(t_47, [i, j + 1, k])
* varidx(u, [i, j + 1, k])
)
+ ( varidx(hxu, [i - 1, j])
* varidx(t_47, [i - 1, j, k])
* varidx(u, [i - 1, j, k])
)
+ ( varidx(hxu, [i - 1, j + 1])
* varidx(t_47, [i - 1, j + 1, k])
* varidx(u, [i - 1, j + 1, k])
)
)
)
)
/ varidx(hyv, [i, j])
)
)
))
point([i, j, k])
indexed_value(( 1 / 2 * ( ( ( (varidx(v, [i, j, k + 1]) - varidx(v, [i, j, k]))
* ((( 1 / 2
* ( varidx(eta_p, [i, j, k + 1])
+ varidx(eta_p, [i, j + 1, k + 1])
)
) if
k + 1 <= nlev
) \\ 0.0)
)
+ ( (varidx(v, [i, j, k]) - varidx(v, [i, j, k - 1]))
* ((( 1 / 2
* ( varidx(eta_p, [i, j, k])
+ varidx(eta_p, [i, j + 1, k])
)
) if
2 <= k
) \\ 0.0)
)
)
/ ( ( 1 / 2
* (varidx(p, [i, j, k]) + varidx(p, [i, j + 1, k]))
)
- ( 1 / 2
* ( varidx(p, [i, j, k + 1])
+ varidx(p, [i, j + 1, k + 1])
)
)
)
)
+ ( ( ( ( 1.56961230576048E-7
* rdth
* ( (varidx(E, [i, j, k]) + varidx(phi, [i, j, k]))
- varidx(E, [i, j + 1, k])
- varidx(phi, [i, j + 1, k])
)
)
+ ( 2.25270758122744E-5
* rdth
* (( 0.30391234671126
* (varidx(q, [i, j, k]) + varidx(q, [i, j + 1, k]))
) + 1)
* (varidx(ln_p, [i, j, k]) - varidx(ln_p, [i, j + 1, k]))
* (varidx(T, [i, j, k]) + varidx(T, [i, j + 1, k]))
)
)
- ( 1 / 4
* (varidx(Z, [i, j, k]) + varidx(Z, [i - 1, j, k]))
* ( ( 1 / 2
* ( varidx(hxu, [i, j]) * varidx(u_aux, [i, j, k])
+ ( varidx(hxu, [i - 1, j])
* varidx(u_aux, [i - 1, j, k])
)
)
)
+ ( 1 / 2
* ( ( varidx(hxu, [i, j + 1])
* varidx(u_aux, [i, j + 1, k])
)
+ ( varidx(hxu, [i - 1, j + 1])
* varidx(u_aux, [i - 1, j + 1, k])
)
)
)
)
)
)
/ varidx(hyv, [i, j])
)
))
derived_stencil([0 .. 0, 0 .. 0, 0 .. 0])
derived_domain([1 .. nlon, 1 .. nlat, 1 .. nlev])
discrete_value(( ( 1 / hyv
* ( ( R_d
* ave_g(T, y)
* df_g(ln_p, y)
* (ave_g(q, y) * (1 - 1 / epsilon) - 1)
)
- df_g(E + phi, y)
- ave_g(ave_h(hxu * u_aux, x), y) * protect(ave_h(Z, x))
)
)
- ( ave_g(( df_h(v, z)
* ((ave_g(eta_p, y) if
2 <= k and k <= nlev
) \\ 0.0)
), z)
/ df_g(ave_g(p, y), z)
)
))
grid(grid([grid, half, half, _G25920]))
dimensioned_value(( 1 / h_y * ave(ave(- h_x * u_aux, x), y) * protect(Z)
- ( (R_d * T) / h_y
* df(ln_p, y)
* (q * (1 / epsilon - 1 ~ "1") + 1 ~ "1")
)
- ( ave(( df(v, z ~ "1")
* (eta_p if 2 ~ "1" <= k and k <= nlev \\
0.0 ~ " kg s^-3 / m"
)
), z)
/ df(p, z ~ "1")
)
- 1 / h_y * df(E + phi, y)
))
unit(unit(0, [0, 0, 1, -2, 0, 0, 0, 0]))
scalar_value(( 1 / h_y * ave(ave(- h_x * u_aux, x), y) * protect(Z)
- ( (R_d * T) / h_y
* df(ln_p, y)
* (q * (1 / epsilon - 1) + 1)
)
- ( ave(( df(v, z ~ "1")
* (eta_p if 2 <= k and k <= nlev \\ 0.0)
), z)
/ df(p, z ~ "1")
)
- 1 / h_y * df(E + phi, y)
))
fortran_name(PDVDT)
value(( 1 / h_y * ave(ave(- h_x * u_aux, x), y) * protect(Z)
- ( R_d / h_y
* df(ln_p, y)
* (T * (q * (1 / epsilon - 1) + 1) \\ T)
)
- ( ave(( df(v, z ~ "1")
* (eta_p if on (k = 2 .. nlev) \\ real(0))
), z)
/ df(p, z ~ "1")
)
- 1 / h_y * df(E + phi, y)
))
type(real)
declared_domain([1 .. nlon, 1 .. nlat, 1 .. nlev])
dependency([x, y, z])
------- Properties inherited from class dependent_var:
v_t has instance_name(v)
------- Methods inherited from class object:
v_t can restore(_G26134)
save(_G26134, _G26135)
get_properties(_G26134, _G26135)
get_superobjects(_G26134, _G26135)
get_subobjects(_G26134, _G26135)
get_parents(_G26134, _G26135)
get_children(_G26134, _G26135)
get_instances(_G26134, _G26135)
create(_G26134, _G26135)
get_dependencies(_G26134, _G26135)
------- Methods inherited from class variable:
v_t can get_store_cost(_G26145, 10)
get_load_cost(_G26145, 1)