source:
utils/tools_AGRIF_CMEMS_2020/NESTING_AGRIF/src/agrif_user.f90
@
10987
Last change on this file since 10987 was 10084, checked in by rblod, 6 years ago | |
---|---|
File size: 721 bytes |
Rev | Line | |
---|---|---|
[10084] | 1 | subroutine agrif_user |
2 | ||
3 | end subroutine agrif_user | |
4 | ||
5 | subroutine agrif_initworkspace | |
6 | ||
7 | end subroutine agrif_initworkspace | |
8 | ||
9 | subroutine agrif_initvalues | |
10 | ||
11 | end subroutine agrif_initvalues | |
12 | ||
13 | SUBROUTINE Agrif_detect( kg, ksizex ) | |
14 | !!---------------------------------------------------------------------- | |
15 | !! *** ROUTINE Agrif_detect *** | |
16 | !!---------------------------------------------------------------------- | |
17 | INTEGER, DIMENSION(2) :: ksizex | |
18 | INTEGER, DIMENSION(ksizex(1),ksizex(2)) :: kg | |
19 | !!---------------------------------------------------------------------- | |
20 | ! | |
21 | RETURN | |
22 | ! | |
23 | END SUBROUTINE Agrif_detect | |
24 | ||
25 | SUBROUTINE agrif_before_regridding | |
26 | END SUBROUTINE agrif_before_regridding |
Note: See TracBrowser
for help on using the repository browser.