X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FCOMMON.CHAIN;h=c33eaee90b523a6681efb60617067794d8535647;hb=f1ff02ee61e7f54196bd9b04c86ad76124ce9bb1;hp=ea1c17a6291b25bec21ce617e5fe775ffda3dbeb;hpb=a011fefc2dfb60e67600c580cf245c3cb55743f1;p=unres.git diff --git a/source/unres/src_MD-M/COMMON.CHAIN b/source/unres/src_MD-M/COMMON.CHAIN index ea1c17a..c33eaee 100644 --- a/source/unres/src_MD-M/COMMON.CHAIN +++ b/source/unres/src_MD-M/COMMON.CHAIN @@ -8,7 +8,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