| 20 |
! The variable is regridded by averaging. |
! The variable is regridded by averaging. |
| 21 |
|
|
| 22 |
use dimens_m, only: iim, jjm, llm |
use dimens_m, only: iim, jjm, llm |
| 23 |
use nrutil, only: assert |
use numer_rec, only: assert |
| 24 |
use regr1_step_av_m, only: regr1_step_av |
use regr1_step_av_m, only: regr1_step_av |
| 25 |
use pressure_var, only: p3d |
use pressure_var, only: p3d |
| 26 |
|
|
| 93 |
! The variable is regridded by interpolation. |
! The variable is regridded by interpolation. |
| 94 |
|
|
| 95 |
use dimens_m, only: iim, jjm, llm |
use dimens_m, only: iim, jjm, llm |
| 96 |
use nrutil, only: assert |
use numer_rec, only: assert |
| 97 |
use regr1_lint_m, only: regr1_lint |
use regr1_lint_m, only: regr1_lint |
| 98 |
use pressure_var, only: pls |
use pressure_var, only: pls |
| 99 |
|
|
Parent Directory
| 
Revision Log
| 
Patch