UNRES-Dock generator real rand

[unres.git] / source / unres-dock / generator.f

diff --git a/source/unres-dock/generator.f b/source/unres-dock/generator.f
index a8dd761..ffdb2c1 100644 (file)
--- a/source/unres-dock/generator.f
+++ b/source/unres-dock/generator.f
@@ -8,7 +8,8 @@
       integer numera1(90000),numerr1(90000),numera2(90000)
       integer glys1, glys2, glye1, glye2, ilee
       integer no_models, seed1, seed11, seed12, seed13
-      real*8 rand, r, boxx, boxy, boxz, dist2acm, dist1acm, b(4), t(3)
+      real rand
+      real*8 r, boxx, boxy, boxz, dist2acm, dist1acm, b(4), t(3)
       real*8 minx1, miny1, minz1, maxx1, maxy1, maxz1
       real*8 minx2, miny2, minz2, maxx2, maxy2, maxz2
       real*8 distx1, disty1, distz1, distx2, disty2, distz2