6 |
use conf_gcm_m, only: conf_gcm |
use conf_gcm_m, only: conf_gcm |
7 |
use dimensions, only: iim, jjm |
use dimensions, only: iim, jjm |
8 |
USE dynetat0_m, only: rlonu, rlatv, rlatu, rlatu1, rlatu2, rlonv, xprimm025, & |
USE dynetat0_m, only: rlonu, rlatv, rlatu, rlatu1, rlatu2, rlonv, xprimm025, & |
9 |
xprimp025, xprimu, xprimv, yprimu1, yprimu2 |
xprimp025, xprimu, xprimv, yprimu1, yprimu2, read_serre |
10 |
use fxhyp_m, only: fxhyp |
use fxhyp_m, only: fxhyp |
11 |
use fyhyp_m, only: fyhyp |
use fyhyp_m, only: fyhyp |
12 |
use inter_barxy_m, only: inter_barxy |
use inter_barxy_m, only: inter_barxy |
13 |
USE nr_util, ONLY : pi |
USE nr_util, ONLY : pi |
|
use read_serre_m, only: read_serre |
|
14 |
|
|
15 |
implicit none |
implicit none |
16 |
|
|