! maximum number of atoms, snapshots: modes: parameter (natmax=4000,natm3=3*natmax) parameter (nmodemax=200) parameter (ncvmax=2*nmodemax+10,lworkl=ncvmax*(ncvmax+8)) parameter (ijmax=800000)