Parent Directory | Revision Log
Split "thermcell.f" and "cv3_routines.f". Removed copies of files that are now in "L_util". Moved "mva9" and "diagetpq" to their own files. Unified variable names across procedures.
1 | guez | 3 | module ener |
2 | |||
3 | ! From ener.h, v 1.1.1.1 2004/05/19 12:53:07 lmdzadmin | ||
4 | |||
5 | use dimens_m, only: llm | ||
6 | |||
7 | implicit none | ||
8 | |||
9 | private llm | ||
10 | |||
11 | REAL ang0, etot0, ptot0, ztot0, stot0, ang, etot, ptot, ztot, stot, rmsdpdt | ||
12 | guez | 47 | real rmsv |
13 | guez | 3 | |
14 | save | ||
15 | |||
16 | end module ener |
ViewVC Help | |
Powered by ViewVC 1.1.21 |