pierwsza proba merga devela do adasko
[unres.git] / source / unres / src_MD-M / COMMON.CHAIN
index 71db8f7..f343887 100644 (file)
@@ -9,7 +9,8 @@
       common /rotmat/ t(3,3,maxres),r(3,3,maxres),prod(3,3,maxres),
      &                rt(3,3,maxres) 
       common /refstruct/ cref(3,maxres2+2,maxperm),
-     &crefjlee(3,maxres2+2),
-     & nsup,nstart_sup,nstart_seq,chain_rep(3,maxres2+2,maxsym),
+     & crefjlee(3,maxres2+2),
+     & chain_rep(3,maxres2+2,maxsym),
+     & nsup,nstart_sup,nstart_seq,
      & chain_length,iprzes,tabperm(maxperm,maxsym),nperm
       common /from_zscore/ nz_start,nz_end,iz_sc