source:
NEMO/branches/2019/ENHANCE-02_ISF_domcfg/src/agrif_parameters.F90
@
12983
Last change on this file since 12983 was 10727, checked in by rblod, 5 years ago | |
---|---|
File size: 409 bytes |
Line | |
---|---|
1 | #ifdef key_agrif |
2 | module agrif_parameters |
3 | USE par_kind |
4 | |
5 | INTEGER :: nn_cln_update |
6 | LOGICAL :: ln_spc_dyn |
7 | REAL(wp) :: rn_sponge_tra |
8 | REAL(wp) :: rn_sponge_dyn |
9 | LOGICAL :: ln_chk_bathy |
10 | INTEGER :: npt_copy |
11 | INTEGER :: npt_connect |
12 | |
13 | REAL(wp), PUBLIC, ALLOCATABLE, SAVE , DIMENSION(:,:) :: ztabramp |
14 | |
15 | end module agrif_parameters |
16 | #else |
17 | subroutine agrif_parameters_empty |
18 | end subroutine agrif_parameters_empty |
19 | #endif |
Note: See TracBrowser
for help on using the repository browser.