& eesij,ees,evdw,ene, rij,zj_temp,xj_temp,yj_temp,
& sscale,sscagrad,dist_temp,xj_safe,yj_safe,zj_safe,dist_init
double precision elpp6c(2,2),elpp3c(2,2),ael6c(2,2),ael3c(2,2),
& eesij,ees,evdw,ene, rij,zj_temp,xj_temp,yj_temp,
& sscale,sscagrad,dist_temp,xj_safe,yj_safe,zj_safe,dist_init
double precision elpp6c(2,2),elpp3c(2,2),ael6c(2,2),ael3c(2,2),