X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA%2FCOMMON.MINIM;h=e44f9cdac7cc7836818ca762d2aa8f0c2bacc64a;hb=5e13bfdf2c98103be8166d5d2bbf9269c40e63a4;hp=7845d42411ad4f181a6498347c072675f78ce1d1;hpb=f0ab76db798e4461535a3ce519bf1188744a7d9b;p=unres.git diff --git a/source/unres/src_CSA/COMMON.MINIM b/source/unres/src_CSA/COMMON.MINIM index 7845d42..e44f9cd 100644 --- a/source/unres/src_CSA/COMMON.MINIM +++ b/source/unres/src_CSA/COMMON.MINIM @@ -1,4 +1,5 @@ double precision tolf,rtolf - integer maxfun,maxmin,minfun,minmin - common /minimm/ tolf,rtolf,maxfun,maxmin, - & minfun,minmin + integer maxfun,maxmin,minfun,minmin, + & print_min_ini,print_min_stat,print_min_res + common /minimm/ tolf,rtolf,maxfun,maxmin,minfun,minmin, + & print_min_ini,print_min_stat,print_min_res