source:
trunk/LMDZ.PLUTO/libf/phypluto/dyn1d/ener_mod.F90
Last change on this file was 3184, checked in by , 12 months ago | |
---|---|
File size: 196 bytes |
Line | |
---|---|
1 | MODULE ener_mod |
2 | |
3 | IMPLICIT NONE |
4 | |
5 | include "dimensions.h" |
6 | include "paramet.h" |
7 | |
8 | REAL ang0,etot0,ptot0,ztot0,stot0, & |
9 | ang,etot,ptot,ztot,stot,rmsdpdt,rmsv,gtot(llmm1) |
10 | |
11 | |
12 | END MODULE ener_mod |
Note: See TracBrowser
for help on using the repository browser.