gfortran errors

[unres.git] / source / cluster / wham / src-M / ssMD.F

diff --git a/source/cluster/wham/src-M/ssMD.F b/source/cluster/wham/src-M/ssMD.F
index 42983f8..1fd3325 100644 (file)
--- a/source/cluster/wham/src-M/ssMD.F
+++ b/source/cluster/wham/src-M/ssMD.F
@@ -126,6 +126,7 @@ c      integer itypi,itypj,k,l
       double precision d_ssxm(1:3),d_ljxm(1:3),d_ssm(1:3),d_ljm(1:3)
       double precision f1,f2,h1,h2,hd1,hd2
       double precision omega,delta_inv,deltasq_inv,fac1,fac2
+      double precision xi,yi,zi
 c-------FIRST METHOD
       double precision xm,d_xm(1:3)
 c-------END FIRST METHOD