17 |
USE comvert, ONLY : nivsigs |
USE comvert, ONLY : nivsigs |
18 |
USE comgeom, ONLY : rlatu, rlonv |
USE comgeom, ONLY : rlatu, rlonv |
19 |
USE dimens_m, ONLY : llm |
USE dimens_m, ONLY : llm |
20 |
USE histcom, ONLY: histbeg_totreg, histdef, histend, histvert |
USE histbeg_totreg_m, ONLY : histbeg_totreg |
21 |
|
USE histdef_m, ONLY : histdef |
22 |
|
USE histend_m, ONLY : histend |
23 |
|
USE histvert_m, ONLY : histvert |
24 |
USE iniadvtrac_m, ONLY : ttext |
USE iniadvtrac_m, ONLY : ttext |
25 |
USE nr_util, ONLY : pi |
USE nr_util, ONLY : pi |
26 |
USE paramet_m, ONLY : iip1, jjp1 |
USE paramet_m, ONLY : iip1, jjp1 |