From 5d07ff9f8b72f1b5986c45aff86263aab8e555fc Mon Sep 17 00:00:00 2001
From: Johannes Pfeifer <jpfeifer@gmx.de>
Date: Sat, 2 Dec 2023 11:07:54 +0100
Subject: [PATCH] GSA: decrease waitbar refresh frequency

---
 matlab/gsa/map_calibration.m | 4 +++-
 matlab/gsa/mc_moments.m      | 4 +++-
 matlab/gsa/stab_map_.m       | 8 ++++++--
 3 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/matlab/gsa/map_calibration.m b/matlab/gsa/map_calibration.m
index 576cd34daf..44703dc05c 100644
--- a/matlab/gsa/map_calibration.m
+++ b/matlab/gsa/map_calibration.m
@@ -130,7 +130,9 @@ if init
         else
             irestrictions(j)=0;
         end
-        dyn_waitbar(j/Nsam,h,['MC iteration ',int2str(j),'/',int2str(Nsam)])
+        if mod(j,3)==0
+            dyn_waitbar(j/Nsam,h,['MC iteration ',int2str(j),'/',int2str(Nsam)])
+        end
     end
     dyn_waitbar_close(h);
 
diff --git a/matlab/gsa/mc_moments.m b/matlab/gsa/mc_moments.m
index d32d01d131..31554da12d 100644
--- a/matlab/gsa/mc_moments.m
+++ b/matlab/gsa/mc_moments.m
@@ -51,7 +51,9 @@ for j=1:nsam
         dum(:,(i-1)*nobs+1:i*nobs)=autocorr{i};
     end
     ac(:,:,j)=dum;
-    dyn_waitbar(j/nsam,h)
+    if mod(j,3)==0
+        dyn_waitbar(j/nsam,h)
+    end
 end
 dyn_waitbar_close(h)
 skipline()
diff --git a/matlab/gsa/stab_map_.m b/matlab/gsa/stab_map_.m
index ba2d646b80..019fd1e4e2 100644
--- a/matlab/gsa/stab_map_.m
+++ b/matlab/gsa/stab_map_.m
@@ -328,7 +328,9 @@ if fload==0 %run new MC
         end
         ys_=real(dr_.ys);
         yys(:,j) = ys_;
-        dyn_waitbar(j/Nsam,h,['MC iteration ',int2str(j),'/',int2str(Nsam)])
+        if mod(j,3)
+            dyn_waitbar(j/Nsam,h,['MC iteration ',int2str(j),'/',int2str(Nsam)])
+        end
     end
     dyn_waitbar_close(h);
     if prepSA && jstab
@@ -401,7 +403,9 @@ else %load old run
             T(:,:,j) = [dr_.ghx dr_.ghu];
             ys_=real(dr_.ys);
             yys(:,j) = ys_;
-            dyn_waitbar(j/ntrans,h,['MC iteration ',int2str(j),'/',int2str(ntrans)])
+            if mod(j,3)
+                dyn_waitbar(j/ntrans,h,['MC iteration ',int2str(j),'/',int2str(ntrans)])
+            end
         end
         dyn_waitbar_close(h);
         save(filetoload,'T','-append')
-- 
GitLab