B
::
real
(0
..
1)
~
"1" field
z
(
grid
)
on
k
=
1
..
nlev
+
1