Cluster/unres modified to read MD coordinates in CX format, also from multiple files.

[unres.git] / source / cluster / unres / src / fitsq.f

diff --git a/source/cluster/unres/src/fitsq.f b/source/cluster/unres/src/fitsq.f
index 17d92ee..fbcf223 100644 (file)
--- a/source/cluster/unres/src/fitsq.f
+++ b/source/cluster/unres/src/fitsq.f
@@ -1,5 +1,5 @@
       subroutine fitsq(rms,x,y,nn,t,b,non_conv)
-      implicit real*8 (a-h,o-z)
+      include 'DIMENSIONS'
       include 'COMMON.IOUNITS'
 c  x and y are the vectors of coordinates (dimensioned (3,n)) of the two
 c  structures to be superimposed.  nn is 3*n, where n is the number of