X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FCOMMON.INTERACT;h=be18ffee9490bd19f1eae135804864975b7655a7;hp=14d92ef9ed614e8af7097eb4a4b1f5610186fc5b;hb=bde71ffff7527add147c1bee4bad23f02b4d1ab7;hpb=6f352fb19a065386a573d715b09235bbdcfdd744 diff --git a/source/unres/src_MD-M/COMMON.INTERACT b/source/unres/src_MD-M/COMMON.INTERACT index 14d92ef..be18ffe 100644 --- a/source/unres/src_MD-M/COMMON.INTERACT +++ b/source/unres/src_MD-M/COMMON.INTERACT @@ -1,7 +1,11 @@ double precision aa,bb,augm,aad,bad,app,bpp,ale6,ael3,ael6, &aa_lip,bb_lip,aa_aq,bb_aq,sc_aa_tube_par,sc_bb_tube_par, & pep_aa_tube,pep_bb_tube - + double precision wdti,wdti2,wdti4,wdti8, + & wdtii,wdtii2,wdtii4,wdtii8 + common /nosehoover_dt/ + & wdti(maxyosh),wdti2(maxyosh),wdti4(maxyosh),wdti8(maxyosh), + & wdtii(maxyosh),wdtii2(maxyosh),wdtii4(maxyosh),wdtii8(maxyosh) integer expon,expon2 integer nnt,nct,nint_gr,istart,iend,itype,itel,itypro, & ielstart,ielend,ielstart_vdw,ielend_vdw,nscp_gr,iscpstart,