X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc-HCD-5D%2Frmscalc.F;h=44f8459d9d0ac3755af0d4fa1d66f2f732d6ca8f;hb=46227db07bc6afa375e557d16d01107c2a59129b;hp=b467d9c0353d645f2f2ffc4b32232266a46f64e4;hpb=820f293760806cf45f8368b0e23dfcdc3e7b992e;p=unres.git diff --git a/source/unres/src-HCD-5D/rmscalc.F b/source/unres/src-HCD-5D/rmscalc.F index b467d9c..44f8459 100644 --- a/source/unres/src-HCD-5D/rmscalc.F +++ b/source/unres/src-HCD-5D/rmscalc.F @@ -199,7 +199,7 @@ c------------------------------------------------------------------------ enddo rmsside=dsqrt(rmsside/nnnn) #ifdef DEBUG - write (iout,*) iii,iref," nnnn",nnnn," rmsside",rmsside + write (iout,*) "nnnn",nnnn," rmsside",rmsside #endif rmscalc_side=rmsside return