1 |
module regr_lat_time_coefoz_m |
module regr_lat_time_coefoz_m |
2 |
|
|
|
! This module is clean: no C preprocessor directive, no include line. |
|
3 |
! Author: Lionel GUEZ |
! Author: Lionel GUEZ |
4 |
|
|
5 |
implicit none |
implicit none |
38 |
|
|
39 |
use dimens_m, only: jjm |
use dimens_m, only: jjm |
40 |
use comgeom, only: rlatv |
use comgeom, only: rlatv |
41 |
use comconst, only: pi |
use nr_util, only: pi |
42 |
use regr1_step_av_m, only: regr1_step_av |
use numer_rec_95, only: regr1_step_av, regr3_lint |
|
use regr3_lint_m, only: regr3_lint |
|
43 |
use netcdf95, only: nf95_open, nf95_gw_var, nf95_close, & |
use netcdf95, only: nf95_open, nf95_gw_var, nf95_close, & |
44 |
nf95_inq_varid, handle_err, nf95_put_var |
nf95_inq_varid, handle_err, nf95_put_var |
45 |
use netcdf, only: nf90_nowrite, nf90_get_var |
use netcdf, only: nf90_nowrite, nf90_get_var |
238 |
|
|
239 |
use dimens_m, only: jjm |
use dimens_m, only: jjm |
240 |
use comgeom, only: rlatu |
use comgeom, only: rlatu |
241 |
use comconst, only: pi |
use nr_util, only: assert_eq, pi |
|
use numer_rec, only: assert_eq |
|
242 |
|
|
243 |
use netcdf95, only: nf95_create, nf95_def_dim, nf95_def_var, & |
use netcdf95, only: nf95_create, nf95_def_dim, nf95_def_var, & |
244 |
nf95_put_att, nf95_enddef, nf95_copy_att, nf95_put_var |
nf95_put_att, nf95_enddef, nf95_copy_att, nf95_put_var |