Writing from sandbox to machine - initial code

2025-06-12 17:42:08 +02:00
parent 91e3c5ccae
commit d8693e5529
8 changed files with 146 additions and 19 deletions
@@ -41,7 +41,7 @@ CONSTRAINT, SEQUENCE=swissfel, RANGE=satsy01$end, X<10;
 LMDIF, CALLS=1000, TOLERANCE=1.E-21;
 ENDMATCH;

-!satsy01.mqua280.k1 = satsy01.mqua280.k1*1.3;
+satsy01.mqua280.k1 = satsy01.mqua280.k1*(1+leakdisp);

 !------------------------------------------
 ! close vertical dispersion