Parent Directory | Revision Log | Patch
trunk/libf/dyn3d/geopot.f90 revision 70 by guez, Mon Jun 24 15:39:52 2013 UTC | trunk/dyn3d/geopot.f revision 265 by guez, Tue Mar 20 09:35:59 2018 UTC | |
---|---|---|
# | Line 11 contains | Line 11 contains |
11 | ! Objet : calcul du géopotentiel aux milieux des couches | ! Objet : calcul du géopotentiel aux milieux des couches |
12 | ! L'intégration se fait de bas en haut. | ! L'intégration se fait de bas en haut. |
13 | ||
14 | USE dimens_m, ONLY: iim, jjm, llm | USE dimensions, ONLY: iim, jjm, llm |
15 | use nr_util, only: assert | use nr_util, only: assert |
16 | ||
17 | REAL, INTENT(IN):: teta(:, :, :) ! (iim + 1, jjm + 1, llm) | REAL, INTENT(IN):: teta(:, :, :) ! (iim + 1, jjm + 1, llm) |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |