Parent Directory | Revision Log
Initial import
1 | 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 | real rmsv, gtot(llm-1) |
13 | |
14 | save |
15 | |
16 | end module ener |
ViewVC Help | |
Powered by ViewVC 1.1.21 |