Parent Directory | Revision Log | Patch
trunk/dyn3d/prather.f90 revision 81 by guez, Wed Mar 5 14:38:41 2014 UTC | trunk/Sources/dyn3d/prather.f revision 139 by guez, Tue May 26 17:46:03 2015 UTC | |
---|---|---|
# | Line 3 | Line 3 |
3 | ! 12:53:07 lmdzadmin Exp $ | ! 12:53:07 lmdzadmin Exp $ |
4 | ||
5 | SUBROUTINE prather(q, w, masse, pbaru, pbarv, nt, dt) | SUBROUTINE prather(q, w, masse, pbaru, pbarv, nt, dt) |
6 | USE dimens_m | |
USE paramet_m | ||
7 | USE comconst | USE comconst |
8 | USE dimens_m | |
9 | USE disvert_m | USE disvert_m |
10 | USE comgeom | USE dynetat0_m, only: rlonv, rlonu |
11 | USE nr_util, ONLY: pi | USE nr_util, ONLY: pi |
12 | USE paramet_m | |
13 | ||
14 | IMPLICIT NONE | IMPLICIT NONE |
15 | ||
16 | ! ======================================================================= | ! ======================================================================= |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |