X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-NEWSC-NEWCORR%2FCOMMON.CONTROL.org;fp=source%2Fwham%2Fsrc-NEWSC-NEWCORR%2FCOMMON.CONTROL.org;h=7dc2298a501e7dbb1fc5593e19ab25f866658c1f;hb=7308760ff07636ef6b1ee28d8c3a67a23c14b34b;hp=0000000000000000000000000000000000000000;hpb=9a54ab407f6d0d9d564d52763b3e2136450b9ffc;p=unres.git

diff --git a/source/wham/src-NEWSC-NEWCORR/COMMON.CONTROL.org b/source/wham/src-NEWSC-NEWCORR/COMMON.CONTROL.org
new file mode 100644
index 0000000..7dc2298
--- /dev/null
+++ b/source/wham/src-NEWSC-NEWCORR/COMMON.CONTROL.org
@@ -0,0 +1,9 @@
+      integer iscode,indpdb,outpdb,outmol2,icomparfunc,pdbint,
+     & ensembles
+      logical refstr,pdbref,punch_dist,print_rms,caonly,verbose,
+     & merge_helices,bxfile,cxfile,histfile,entfile,zscfile,
+     & rmsrgymap
+      common /cntrl/ iscode,indpdb,refstr,pdbref,outpdb,outmol2,
+     & punch_dist,print_rms,caonly,verbose,icomparfunc,pdbint,
+     & merge_helices,bxfile,cxfile,histfile,entfile,zscfile,rmsrgymap,
+     & ensembles