X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-NEWSC-NEWCORR%2FCOMMON.PEPTCONT;fp=source%2Fwham%2Fsrc-NEWSC-NEWCORR%2FCOMMON.PEPTCONT;h=59e05ddb7484e5ab5b87605783be8713d28c5223;hb=d101c97dea752458d76055fdbae49c26fff03c1f;hp=0000000000000000000000000000000000000000;hpb=325eda160c9ad2982501e091ca40606a29043712;p=unres.git

diff --git a/source/wham/src-NEWSC-NEWCORR/COMMON.PEPTCONT b/source/wham/src-NEWSC-NEWCORR/COMMON.PEPTCONT
new file mode 100644
index 0000000..59e05dd
--- /dev/null
+++ b/source/wham/src-NEWSC-NEWCORR/COMMON.PEPTCONT
@@ -0,0 +1,7 @@
+      integer ncont_pept_ref,icont_pept_ref,ncont_frag_ref,
+     & icont_frag_ref,isec_ref
+      common /peptcont/ ncont_pept_ref,
+     & icont_pept_ref(2,maxcont),
+     & ncont_frag_ref(mmaxfrag),
+     & icont_frag_ref(2,maxcont,mmaxfrag),
+     & isec_ref(maxres)