X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD_DFA%2FCOMMON.LANGEVIN;fp=source%2Funres%2Fsrc_MD_DFA%2FCOMMON.LANGEVIN;h=0000000000000000000000000000000000000000;hb=664d495e70d14eed4e97f7b8efd2e107dee2fd4e;hp=6a703e260ced0a3be053d48eb7cd93e703b4e4b3;hpb=77276d5043cefaf512451c3ad9f669ed22b90d04;p=unres.git diff --git a/source/unres/src_MD_DFA/COMMON.LANGEVIN b/source/unres/src_MD_DFA/COMMON.LANGEVIN deleted file mode 100644 index 6a703e2..0000000 --- a/source/unres/src_MD_DFA/COMMON.LANGEVIN +++ /dev/null @@ -1,21 +0,0 @@ - double precision friction(3,0:MAXRES2),stochforc(3,0:MAXRES2), - & fricmat(MAXRES2,MAXRES2),fric_work(MAXRES6), - & stoch_work(MAXRES6), - & fricgam(MAXRES6),fricvec(MAXRES2,MAXRES2), - & pfric_mat(MAXRES2,MAXRES2),vfric_mat(MAXRES2,MAXRES2), - & afric_mat(MAXRES2,MAXRES2),prand_mat(MAXRES2,MAXRES2), - & vrand_mat1(MAXRES2,MAXRES2),vrand_mat2(MAXRES2,MAXRES2), - & pfric0_mat(MAXRES2,MAXRES2,0:maxflag_stoch), - & afric0_mat(MAXRES2,MAXRES2,0:maxflag_stoch), - & vfric0_mat(MAXRES2,MAXRES2,0:maxflag_stoch), - & prand0_mat(MAXRES2,MAXRES2,0:maxflag_stoch), - & vrand0_mat1(MAXRES2,MAXRES2,0:maxflag_stoch), - & vrand0_mat2(MAXRES2,MAXRES2,0:maxflag_stoch), - & mt1(maxres2,maxres2),mt2(maxres2,maxres2),mt3(maxres2,maxres2) - logical flag_stoch(0:maxflag_stoch) - common /langforc/ friction,stochforc, - & fricmat,fric_work,fricgam,stoch_work,fricvec,vrand_mat1, - & vrand_mat2,prand_mat,vfric_mat,afric_mat,pfric_mat, - & pfric0_mat,afric0_mat,vfric0_mat,prand0_mat,vrand0_mat1, - & vrand0_mat2,flag_stoch - common /langmat/ mt1,mt2,mt3