X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA_DiL%2FCOMMON.DISTFIT;fp=source%2Funres%2Fsrc_CSA_DiL%2FCOMMON.DISTFIT;h=0000000000000000000000000000000000000000;hp=044225b485e7439478f1dd2e793d7fe0c955ae67;hb=de4bc5453ea46e111d936cb85e1758ed21c08fcd;hpb=b75425747e3e2b448ca5e0ef8367712e1f339124 diff --git a/source/unres/src_CSA_DiL/COMMON.DISTFIT b/source/unres/src_CSA_DiL/COMMON.DISTFIT deleted file mode 100644 index 044225b..0000000 --- a/source/unres/src_CSA_DiL/COMMON.DISTFIT +++ /dev/null @@ -1,14 +0,0 @@ -c parameter (maxres22=maxres*(maxres+1)/2) - parameter (maxres22=1) - double precision w,d0,DRDG,DD,H,XX - integer nbfrag,bfrag,nhfrag,hfrag,bvar_frag,hvar_frag,nhpb0, - 1 lvar_frag,svar_frag,avar_frag - COMMON /c_frag/ nbfrag,bfrag(4,maxres/3),nhfrag,hfrag(2,maxres/3) - COMMON /frag/ bvar_frag(mxio,6),hvar_frag(mxio,3), - 1 lvar_frag(mxio,3),svar_frag(mxio,3), - 2 avar_frag(mxio,5) - COMMON /WAGI/ w(MAXRES22),d0(MAXRES22) - COMMON /POCHODNE/ NX,NY,DRDG(MAXRES22,MAXRES),DD(MAXRES22), - 1 H(MAXRES,MAXRES),XX(MAXRES) - COMMON /frozen/ mask(maxres) - COMMON /store0/ nhpb0