Parent Directory | Revision Log | Patch
trunk/Sources/dyn3d/principal_cshift.f revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC | trunk/dyn3d/principal_cshift.f revision 254 by guez, Mon Feb 5 10:39:38 2018 UTC | |
---|---|---|
# | Line 11 contains | Line 11 contains |
11 | ! xprimm. | ! xprimm. |
12 | ||
13 | USE dimens_m, ONLY: iim | USE dimens_m, ONLY: iim |
14 | use dynetat0_m, only: clon | |
15 | use nr_util, only: twopi | use nr_util, only: twopi |
use serre, only: clon | ||
16 | ||
17 | integer, intent(in):: is2 | integer, intent(in):: is2 |
18 | real, intent(inout):: xlon(:), xprimm(:) ! (iim + 1) | real, intent(inout):: xlon(:), xprimm(:) ! (iim + 1) |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |