zmiany w multichainie

[unres.git] / source / unres / src_MD-M / chainbuild.F

diff --git a/source/unres/src_MD-M/chainbuild.F b/source/unres/src_MD-M/chainbuild.F
index c4970d3..766e14a 100644 (file)
--- a/source/unres/src_MD-M/chainbuild.F
+++ b/source/unres/src_MD-M/chainbuild.F
@@ -18,7 +18,8 @@ C Set lprn=.true. for debugging
       lprn = .false.
       perbox=.false.
       fail=.false.
-       if (perbox) then
+      print *, 'enter chainbuild' 
+      if (perbox) then
       cost=dcos(theta(3))
       sint=dsin(theta(3))
       print *,'before refsys'