From 0b5dc2127c130503dbe0801ad53faa7b2f5dba24 Mon Sep 17 00:00:00 2001
From: rneder <reinhard.neder@fau.de>
Date: Thu, 11 Jan 2018 21:38:21 +0100
Subject: [PATCH] Ensured that symm: use works with clearly defined origin

---
 discus/prog/symm_sup.f90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/discus/prog/symm_sup.f90 b/discus/prog/symm_sup.f90
index 6208b91f..90e5e875 100644
--- a/discus/prog/symm_sup.f90
+++ b/discus/prog/symm_sup.f90
@@ -179,6 +179,8 @@ SUBROUTINE symm_setup
    sym_mat (:, :) = 0.0 
    sym_rmat(:, :) = 0.0 
    sym_mat (4, 4) = 1.0 
+   sym_orig(:)    = 0.0
+   sym_orig_mol   = .false.
 !
    sym_mat (:, :) = spc_mat(:,:, sym_use)
 !