source: trunk/LMDZ.PLUTO/libf/phypluto/dyn1d/ener_mod.F90 @ 3542

Last change on this file since 3542 was 3184, checked in by afalco, 2 years ago

Pluto PCM:
Added LMDZ.PLUTO, a copy of the generic model,
cleaned from some unnecessary modules (water, ...)
AF
File size: 196 bytes
RevLine 
[3184]1MODULE ener_mod
2
3IMPLICIT NONE 
4
5include "dimensions.h"
6include "paramet.h"
7
8      REAL ang0,etot0,ptot0,ztot0,stot0,                        &
9                ang,etot,ptot,ztot,stot,rmsdpdt,rmsv,gtot(llmm1)
10
11
12END MODULE ener_mod
Note: See TracBrowser for help on using the repository browser.