From 52fc3dc60e4cda456728f7fe2a3447cb006ea529 Mon Sep 17 00:00:00 2001
From: Harald Forbert <Harald.Forbert@rub.de>
Date: Tue, 28 Jan 2025 14:03:34 +0100
Subject: [PATCH] ensure proper initial conditions in helium_worm code (fixes
 bug with multiple helium environments with worm propagation)

---
 src/motion/helium_worm.F | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/motion/helium_worm.F b/src/motion/helium_worm.F
index 52c73cdba5..47c722f7ef 100644
--- a/src/motion/helium_worm.F
+++ b/src/motion/helium_worm.F
@@ -94,6 +94,9 @@ CONTAINS
          helium%saveiperm(:) = helium%iperm(:)
          helium%savepermutation(:) = helium%permutation(:)
       END IF
+      !make sure work array is in sync with pos
+      ! (helium_print_coordinates for example messes with that...)
+      helium%work = helium%pos
 
       nMC = helium%iter_rot
       ncycle = 0