! ! $Id: ener_mod.F90 2622 2016-09-04 06:12:02Z None $ ! 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