From 0b293408cb9316e978f1d1a28f3df7192a564f50 Mon Sep 17 00:00:00 2001
From: BLANCO-GARCIA <oscar-roberto.blanco-garcia@synchrotron-soleil.fr>
Date: Mon, 30 May 2022 10:49:51 +0200
Subject: [PATCH] sets maximum corrlist to 1200
---
tracy/tracy/src/soleillib.cc | 24 ++++++++++++------------
1 file changed, 12 insertions(+), 12 deletions(-)
diff --git a/tracy/tracy/src/soleillib.cc b/tracy/tracy/src/soleillib.cc
index 2138fa1..5a6897d 100644
--- a/tracy/tracy/src/soleillib.cc
+++ b/tracy/tracy/src/soleillib.cc
@@ -2155,19 +2155,19 @@ void Multipole_thicksext(const char *fic_hcorr, const char *fic_vcorr, const cha
int dlist[500]; /* dipole list */
int qlist[500]; /* Quadrupole list */
int slist[500]; /* Sextupole list */
- int hcorrlist[120]; /* horizontal corrector list */
- int vcorrlist[120]; /* vertical corrector list */
- int qcorrlist[120]; /* skew quad list */
- int hcorrlistThick[120]; /* horizontal corrector list */
- int vcorrlistThick[120]; /* vertical corrector list */
- int qcorrlistThick[120]; /* skew quad list */
+ int hcorrlist[1200]; /* horizontal corrector list */
+ int vcorrlist[1200]; /* vertical corrector list */
+ int qcorrlist[1200]; /* skew quad list */
+ int hcorrlistThick[1200]; /* horizontal corrector list */
+ int vcorrlistThick[1200]; /* vertical corrector list */
+ int qcorrlistThick[1200]; /* skew quad list */
CellType Cell;
int mOrder = 0; /* multipole order */
double mKL = 0.0 ; /* multipole integrated strength */
double corr_strength = 0.0;
- double hcorr[120], vcorr[120], qcorr[120];
+ double hcorr[1200], vcorr[1200], qcorr[1200];
double b2 = 0.0, b3 = 0.0;
double dBoB2 = 0.0, dBoB3 = 0.0, dBoB4 = 0.0, dBoB5 = 0.0, dBoB6 = 0.0,
dBoB7 = 0.0, dBoB9 = 0.0, dBoB11 = 0.0, dBoB15 = 0.0, dBoB21 = 0.0,
@@ -2832,16 +2832,16 @@ void Multipole_thinsext(const char *fic_hcorr, const char *fic_vcorr, const char
int dlist[500]; /* dipole list */
int qlist[500]; /* Quadrupole list */
int slist[500]; /* Sextupole list */
- int hcorrlist[120]; /* horizontal corrector list */
- int vcorrlist[120]; /* vertical corrector list */
- int qcorrlist[120]; /* skew quad list */
+ int hcorrlist[1200]; /* horizontal corrector list */
+ int vcorrlist[1200]; /* vertical corrector list */
+ int qcorrlist[1200]; /* skew quad list */
CellType Cell;
int mOrder = 0; /* multipole order */
double mKL = 0.0 ; /* multipole integrated strength */
double corr_strength = 0.0;
- double hcorr[120], vcorr[120], qcorr[120];
+ double hcorr[1200], vcorr[1200], qcorr[1200];
double b2 = 0.0, b3 = 0.0;
double dBoB2 = 0.0, dBoB3 = 0.0, dBoB4 = 0.0, dBoB5 = 0.0, dBoB6 = 0.0,
dBoB7 = 0.0, dBoB9 = 0.0, dBoB11 = 0.0, dBoB15 = 0.0, dBoB21 = 0.0,
@@ -6440,7 +6440,7 @@ void AddCorrQtErr_fam(char const *fic, const int Fnum, const double conv, const
double bnL = 0.0, anL = 0.0;
double brho = 0.0, conv_strength = 0.0;
double corr; /* skew quadrupole horizontal or vertical corrector error, read from a file*/
- int corrlistThick[120]; /* index of associated sextupole*/
+ int corrlistThick[1200]; /* index of associated sextupole*/
FILE *fi;
--
GitLab