6 |
! latitude-pressure grid, and writes the values to a NetCDF file. |
! latitude-pressure grid, and writes the values to a NetCDF file. |
7 |
! The pressure grid is "presnivs" from "disvert". |
! The pressure grid is "presnivs" from "disvert". |
8 |
|
|
9 |
use dimens_m, only: jjm, llm |
use dimensions, only: jjm, llm |
10 |
USE dimphy, ONLY : klon |
USE dimphy, ONLY : klon |
11 |
use disvert_m, only: pa, disvert, ap, bp, preff, presnivs |
use disvert_m, only: pa, disvert, ap, bp, preff, presnivs |
12 |
use jumble, only: new_unit |
use jumble, only: new_unit |