X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FCOMMON.MD;h=b17c722b84eb05bb8156bc2bde74f5d28be7ed17;hb=40f0efa4001306152d5c1f00d3b9e754c60b7694;hp=7b437fe44a33e51ca8169fef6b23085389b5142a;hpb=c092a8655963478b90eb630150c75ff5775f45f0;p=unres.git diff --git a/source/unres/src_MD-M/COMMON.MD b/source/unres/src_MD-M/COMMON.MD index 7b437fe..b17c722 100644 --- a/source/unres/src_MD-M/COMMON.MD +++ b/source/unres/src_MD-M/COMMON.MD @@ -54,7 +54,7 @@ & rattle,RESPA common /inertia/ IP,ISC,MP,MSC double precision scal_fric,rwat,etawat,gamp, - & gamsc(ntyp),stdfp,stdfsc(ntyp),stdforcp(MAXRES), + & gamsc(ntyp1),stdfp,stdfsc(ntyp),stdforcp(MAXRES), & stdforcsc(MAXRES),pstok,restok(ntyp+1),cPoise,Rb common /langevin/ pstok,restok,gamp,gamsc, & stdfp,stdfsc,stdforcp,stdforcsc,rwat,etawat,cPoise,Rb,surfarea,