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