- integer newcontlisti(200*maxres),newcontlistj(200*maxres),
- & newcontlistppi(200*maxres),newcontlistppj(200*maxres),
- & newcontlistscpi(200*maxres),newcontlistscpj(200*maxres),
+ integer newcontlisti(maxint_res*maxres),
+ & newcontlistj(maxint_res*maxres),
+ & newcontlistppi(maxint_res*maxres),
+ & newcontlistppj(maxint_res*maxres),
+ & newcontlistpp_vdwi(maxint_res*maxres),
+ & newcontlistpp_vdwj(maxint_res*maxres),
+ & newcontlistscpi(2*maxint_res*maxres),
+ & newcontlistscpj(2*maxint_res*maxres),