Parent Directory
| 
Revision Log
Removed procedure "psextbar". "psextbar" was called but the result of the call was not used.
| 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 | 46 | real rmsv, gtot(llm - 1) |
| 13 | guez | 3 | |
| 14 | save | ||
| 15 | |||
| 16 | end module ener |
| ViewVC Help | |
| Powered by ViewVC 1.1.21 |