From 7997ae8fc71e1867ae24bed5d7cb591d9ef13c03 Mon Sep 17 00:00:00 2001
From: Giovanni La Mura <giovanni.lamura@inaf.it>
Date: Fri, 14 Jun 2024 15:19:18 +0000
Subject: [PATCH] Suppress duplicate CSM_CLUSTER line
---
src/cluster/cluster.cpp | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/src/cluster/cluster.cpp b/src/cluster/cluster.cpp
index 9d5dc7a1..5e1d120c 100644
--- a/src/cluster/cluster.cpp
+++ b/src/cluster/cluster.cpp
@@ -1075,8 +1075,10 @@ int cluster_jxi488_cycle(int jxi488, ScattererConfiguration *sconf, GeometryConf
sprintf(virtual_line, " Fk=%15.7lE\n\0", fz);
output->append_line(virtual_line);
double alamb = 2.0 * 3.141592653589793 / cid->vk;
- sprintf(virtual_line, "INSERTION: CSM_CLUSTER %15.7lE%15.7lE%15.7lE%15.7lE\n\0", alamb, scasm, abssm, extsm);
- output->append_line(virtual_line);
+ if (ilr210 == 1) {
+ sprintf(virtual_line, "INSERTION: CSM_CLUSTER %15.7lE%15.7lE%15.7lE%15.7lE\n\0", alamb, scasm, abssm, extsm);
+ output->append_line(virtual_line);
+ }
} // ilr210 loop
double rmbrif = (real(cid->c1ao->fsacm[0][0]) - real(cid->c1ao->fsacm[1][1])) / real(cid->c1ao->fsacm[0][0]);
double rmdchr = (imag(cid->c1ao->fsacm[0][0]) - imag(cid->c1ao->fsacm[1][1])) / imag(cid->c1ao->fsacm[0][0]);
--
GitLab