source/unres/src_MD-M/COMMON.CACHE

   1       integer ncache,CachSrc(max_cache),isent(max_cache),
   2      & iused(max_cache)
   3       logical cache_update
   4       double precision ecache(max_cache),xcache(maxvar,max_cache)
   5       common /cache/ ecache,xcache,ncache,CachSrc,isent,iused,
   6      & cache_update