X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fcheckder_p.F;h=32d2366da95bc8580883c764e20d2e97843380d1;hb=0bb81c1c3180a2079d70af7dd534295e1e0b1e4c;hp=0539e4825f9b00e33135f03a25b022f77bbccdd1;hpb=2ec03757b68a8fb1a604a7f84f83086291fc75db;p=unres.git diff --git a/source/unres/src_MD-M/checkder_p.F b/source/unres/src_MD-M/checkder_p.F index 0539e48..32d2366 100644 --- a/source/unres/src_MD-M/checkder_p.F +++ b/source/unres/src_MD-M/checkder_p.F @@ -272,8 +272,8 @@ C Check the gradient of the energy in Cartesian coordinates. integer uiparm(1) double precision urparm(1) external fdum - r_cut=2.0d0 - rlambd=0.3d0 +c r_cut=2.0d0 +c rlambd=0.3d0 icg=1 nf=0 nfl=0