! $Id: ener_mod.F90 5099 2024-07-22 19:29:09Z abarral $ MODULE ener_mod IMPLICIT NONE include "dimensions.h" include "paramet.h" REAL ang0,etot0,ptot0,ztot0,stot0, & ang,etot,ptot,ztot,stot,rmsdpdt,rmsv,gtot(llmm1) END MODULE ener_mod