Parent Directory | Revision Log | Patch
revision 124 by guez, Thu Feb 5 15:19:37 2015 UTC | revision 125 by guez, Fri Feb 6 15:00:28 2015 UTC | |
---|---|---|
# | Line 6 contains | Line 6 contains |
6 | ||
7 | subroutine principal_cshift(is2, xlon, xprimm) | subroutine principal_cshift(is2, xlon, xprimm) |
8 | ||
9 | ! Add or subtract 2 pi so that xlon is near [-pi, pi], then cshift | |
10 | ! so that xlon is in ascending order. Make the same cshift on | |
11 | ! xprimm. | |
12 | ||
13 | USE dimens_m, ONLY: iim | USE dimens_m, ONLY: iim |
14 | use nr_util, only: twopi | use nr_util, only: twopi |
15 | use serre, only: clon | use serre, only: clon |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |