save the scripts

wk/Ajay_scan_CH4_lin_ITG.m

@@ -115,8 +115,8 @@ for NU = NU_a
     LAMBDAD = 0.0;
     NOISE0  = 1.0e-5; % Init noise amplitude
     BCKGD0  = 0.0;    % Init background
-    GRADB   = 1.0;
-    CURVB   = 1.0;
+    k_gB   = 1.0;
+    k_cB   = 1.0;
     %% RUN
     setup
     % naming

wk/CBC_kT_PJ_scan.m

@@ -77,7 +77,7 @@ P = P_a(i); J = J_a(i);
         MU_J    = 0.0; LAMBDAD = 0.0;
         NOISE0  = 1.0e-4; % Init noise amplitude
         BCKGD0  = 0.0;    % Init background
-        GRADB   = 1.0;CURVB   = 1.0;
+        k_gB   = 1.0;k_cB   = 1.0;
 
         %%-------------------------------------------------------------------------
         % RUN

wk/CBC_kT_scan_salpha.m

@@ -116,8 +116,8 @@ for KT = KT_a
     LAMBDAD = 0.0;
     NOISE0  = 1.0e-5; % Init noise amplitude
     BCKGD0  = 0.0;    % Init background
-    GRADB   = 1.0;
-    CURVB   = 1.0;
+    k_gB   = 1.0;
+    k_cB   = 1.0;
     %% RUN
     setup
     % naming

wk/CBC_ky_PJ_scan.m

@@ -69,7 +69,7 @@ for j = 1
     MU_J    = 0.0; LAMBDAD = 0.0;
     NOISE0  = 0.0e-5; % Init noise amplitude
     BCKGD0  = 1.0;    % Init background
-GRADB   = 1.0;CURVB   = 1.0;
+k_gB   = 1.0;k_cB   = 1.0;
 end
 %%-------------------------------------------------------------------------
 % RUN

wk/CBC_nu_CO_scan.m

@@ -115,8 +115,8 @@ for NU = NU_a
     LAMBDAD = 0.0;
     NOISE0  = 1.0e-5; % Init noise amplitude
     BCKGD0  = 0.0;    % Init background
-    GRADB   = 1.0;
-    CURVB   = 1.0;
+    k_gB   = 1.0;
+    k_cB   = 1.0;
     %% RUN
     setup
     % naming

wk/CBC_nu_CO_scan_miller.m

@@ -118,8 +118,8 @@ for NU = NU_a
     LAMBDAD = 0.0;
     NOISE0  = 1.0e-5; % Init noise amplitude
     BCKGD0  = 0.0;    % Init background
-    GRADB   = 1.0;
-    CURVB   = 1.0;
+    k_gB   = 1.0;
+    k_cB   = 1.0;
     %% RUN
     setup
     % naming

wk/CBC_nu_CO_scan_salpha.m

@@ -117,8 +117,8 @@ for NU = NU_a
     LAMBDAD = 0.0;
     NOISE0  = 1.0e-5; % Init noise amplitude
     BCKGD0  = 0.0;    % Init background
-    GRADB   = 1.0;
-    CURVB   = 1.0;
+    k_gB   = 1.0;
+    k_cB   = 1.0;
     %% RUN
     setup
     % naming

wk/Dimits_fig3.m

-%% Heat flux Qi [R/rhos^2/cs]
+%% Heat flux Qi 
 	kN = 2.22;
 	%-------------- GM ---------------
 	%(P,J)=(2,1)

wk/analysis_gene.m

@@ -47,7 +47,7 @@ addpath(genpath([gyacomodir,'matlab/load'])) % ... add
 %Paper 2
 % folder = '/misc/gene_results/CBC/KT_6.96_64x32x32x24x12_Nexc_5/';
 % folder = '/misc/gene_results/CBC/KT_6.96_128x64x24x8x4_Nexc_5_00/';
-% folder = '/misc/gene_results/CBC/KT_6.96_128x64x24x16x8_Nexc_5_00/';
+folder = '/misc/gene_results/CBC/KT_6.96_128x64x24x16x8_Nexc_5_00/';
 % folder = '/misc/gene_results/CBC/KT_6.96_128x64x24x32x16_Nexc_5_00/';
 % folder = '/misc/gene_results/CBC/KT_6.96_128x64x24x32x16_Nexc_5_01/';
 
@@ -55,9 +55,12 @@ addpath(genpath([gyacomodir,'matlab/load'])) % ... add
 % folder = '/misc/gene_results/CBC/KT_5.3_128x64x24x32x16_Nexc_5_01/';
 % folder = '/misc/gene_results/CBC/new_sim/KT_5.3_128x64x24x16x8_Nexc_5/';
 % folder = '/misc/gene_results/CBC/new_sim/KT_5.3_128x64x24x8x4_Nexc_5/';
-folder = '/misc/gene_results/CBC/new_sim/KT_6.96_128x64x24x8x4_Nexc_5_smallvbox/';
+% folder = '/misc/gene_results/CBC/new_sim/KT_6.96_128x64x24x8x4_Nexc_5_smallvbox/';
 % folder = '/misc/gene_results/CBC/new_sim/KT_6.96_128x64x24x16x8_Nexc_5_largexbox/';
 
+% debug ? shearless
+% folder = '/misc/gene_results/CBC/shearless_CBC_128x64x24x24x12_00/';
+% folder = '/misc/gene_results/CBC/shearless_CBC_128x64x24x24x12_01/';
 gene_data = load_gene_data(folder);
 gene_data.FIGDIR = folder;
 gene_data = invert_kxky_to_kykx_gene_results(gene_data);
@@ -95,10 +98,10 @@ options.INTERP    = 0;
 options.POLARPLOT = 0;
 options.AXISEQUAL = 0;
 options.NORMALIZE = 0;
-% options.NAME      = '\phi';
+options.NAME      = '\phi';
 % options.NAME      = '\psi';
 % options.NAME      = '\omega_z';
-options.NAME      = 'n_i';
+% options.NAME      = 'n_i';
 % options.NAME      = 'n_i-n_e';
 % options.NAME      = '\phi^{NZ}';
 % options.NAME      = 'N_i^{00}';
@@ -107,8 +110,8 @@ options.NAME      = 'n_i';
 % options.NAME      = 'Q_x';
 % options.NAME      = 'k^2n_e';
 options.PLAN      = 'xy';
-options.COMP      = 1;
-options.TIME      = [0];
+options.COMP      = 'avg';
+options.TIME      = [50 200 500];
 options.RESOLUTION = 256;
 
 data.a = data.EPS * 2e3;

wk/analysis_gyacomo.m

@@ -30,12 +30,14 @@ FMT = '.fig';
 if 1
 %% Space time diagramm (fig 11 Ivanov 2020)
 % data.scale = 1;%/(data.Nx*data.Ny)^2;
-i_ = 1; 
-disp([num2str(data.TJOB_SE(i_)),' ',num2str(data.TJOB_SE(i_+1))])
-disp([num2str(data.NU_EVOL(i_)),' ',num2str(data.NU_EVOL(i_+1))])
-options.TAVG_0   = data.TJOB_SE(i_)+600;%0.4*data.Ts3D(end);
-options.TAVG_1   = data.TJOB_SE(i_+1);%0.9*data.Ts3D(end); % Averaging times duration
-options.NCUT     = 4;              % Number of cuts for averaging and error estimation
+% jid_ = 0; 
+% disp([num2str(data.TJOB_SE(2*jid_+1)),' ',num2str(data.TJOB_SE(2*(jid_+1)))])
+% disp([num2str(data.NU_EVOL(2*jid_+1)),' ',num2str(data.NU_EVOL(2*(jid_+1)))])
+% options.TAVG_0   = data.TJOB_SE(2*jid_+1);%0.4*data.Ts3D(end);
+% options.TAVG_1   = data.TJOB_SE(2*(jid_+1));%0.9*data.Ts3D(end); % Averaging times duration
+options.TAVG_0   = 100;
+options.TAVG_1   = 1000;
+options.NCUT     = 5;              % Number of cuts for averaging and error estimation
 options.NMVA     = 1;              % Moving average for time traces
 % options.ST_FIELD = '\Gamma_x';   % chose your field to plot in spacetime diag (e.g \phi,v_x,G_x)
 options.ST_FIELD = '\phi';          % chose your field to plot in spacetime diag (e.g \phi,v_x,G_x)
@@ -67,23 +69,23 @@ end
 if 0
 %% MOVIES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % Options
-options.INTERP    = 1;
+options.INTERP    = 0;
 options.POLARPLOT = 0;
-options.NAME      = '\phi';
+% options.NAME      = '\phi';
 % options.NAME      = '\omega_z';
 % options.NAME     = 'N_i^{00}';
 % options.NAME      = 's_{Ey}';
 % options.NAME      = 'n_i^{NZ}';
-% options.NAME      = 'G_x';
-% options.NAME      = 'n_i';
+% options.NAME      = 'Q_x';
+options.NAME      = 'n_i';
 % options.NAME      = 'n_i-n_e';
-options.PLAN      = 'xy';
+options.PLAN      = 'yz';
 % options.NAME      = 'f_i';
 % options.PLAN      = 'sx';
 options.COMP      = 'avg';
 % options.TIME      = data.Ts5D(end-30:end);
-options.TIME      =  data.Ts3D;
-% options.TIME      = [0:10000];
+% options.TIME      =  data.Ts3D;
+options.TIME      = [800:1000];
 data.EPS          = 0.1;
 data.a = data.EPS * 2000;
 options.RESOLUTION = 256;
@@ -100,7 +102,7 @@ options.NORMALIZE = 0;
 options.NAME      = '\phi';
 % options.NAME      = '\psi';
 % options.NAME      = '\omega_z';
-% options.NAME     = 'n_i';
+% options.NAME      = 'T_i';
 % options.NAME      = 'n_i-n_e';
 % options.NAME      = '\phi^{NZ}';
 % options.NAME      = 'N_i^{00}';
@@ -109,8 +111,8 @@ options.NAME      = '\phi';
 % options.NAME      = 'Q_x';
 % options.NAME      = 'k^2n_e';
 options.PLAN      = 'xy';
-options.COMP      = 1;
-options.TIME      = [29.5 30 30.5];
+options.COMP      = 'avg';
+options.TIME      = [50 200 500 1000];
 options.RESOLUTION = 256;
 
 data.a = data.EPS * 2e3;
@@ -140,7 +142,7 @@ options.XPERP     = linspace( 0,sqrt(6),16).^2;
 % options.SPAR      = gene_data.vp';
 % options.XPERP     = gene_data.mu';
 options.iz        = 'avg';
-options.T         = [0.5:0.1:1]*data.Ts3D(end);
+options.T         = [0.9:0.1:1]*data.Ts3D(end);
 % options.PLT_FCT   = 'contour';
 % options.PLT_FCT   = 'contourf';
 options.PLT_FCT   = 'surfvv';
@@ -156,13 +158,9 @@ if 0
 %% Hermite-Laguerre spectrum
 % options.TIME = 'avg';
 options.P2J        = 0;
-options.ST         = 0;
-options.PLOT_TYPE  = 'space-time';
+options.ST         = 1;
 options.NORMALIZED = 0;
-options.JOBNUM     = 0;
-options.TIME       = [200:500];
-options.specie     = 'i';
-options.compz      = 'avg';
+options.TIME       = [180:10000];
 fig = show_moments_spectrum(data,options);
 % fig = show_napjz(data,options);
 % save_figure(data,fig,'.png');
@@ -170,7 +168,7 @@ end
 
 if 0
 %% Time averaged spectrum
-options.TIME   = [5000 9000];
+options.TIME   = [180 9000];
 options.NORM   =1;
 % options.NAME   = '\phi';
 % options.NAME      = 'N_i^{00}';
@@ -206,7 +204,7 @@ if 0
 %% Mode evolution
 options.NORMALIZED = 1;
 options.TIME   = [000:9000];
-options.KX_TW  = [25 55]; %kx Growth rate time window
+options.KX_TW  = [1 20]; %kx Growth rate time window
 options.KY_TW  = [0 20];  %ky Growth rate time window
 options.NMA    = 1;
 options.NMODES = 800;
@@ -229,7 +227,7 @@ if 0
 %% Metric infos
 options.SHOW_FLUXSURF = 0;
 options.SHOW_METRICS  = 1;
-fig = plot_metric(data,options);
+[fig, geo_arrays] = plot_metric(data,options);
 end
 
 if 0

wk/header_3D_results.m

@@ -33,7 +33,7 @@ PARTITION  = '/misc/gyacomo_outputs/';
 % resdir = 'CBC/old/128x64x16x5x3';
 % resdir = 'CBC/96x96x16x3x2_Nexc_6';
 % resdir = 'CBC/128x96x16x3x2_Nexc_0';
-% resdir = 'CBC/old/192x96x24x13x7';
+% resdir = 'CBC/192x96x24x13x7'; 
 
 % resdir = 'CBC/128x96x16x3x2_Nexc_0_periodic_chi';
 % resdir = 'CBC/64x32x16x3x2_Nexc_0_periodic_chi';
@@ -77,13 +77,20 @@ PARTITION  = '/misc/gyacomo_outputs/';
 %% CBC Miller
 % resdir = 'GCM_CBC/daint/Miller_GX_comparison';
 % resdir = 'GCM_CBC/daint/Salpha_GX_comparison';
-%% Paper 2 simulations
+% resdir = 'Mandell_benchmark/5x3';
+% resdir = 'Mandell_benchmark/new_5x3';
+% resdir = 'Mandell_benchmark/new_5x3_more_diff';
+% resdir = 'Mandell_benchmark/7x5';
+% resdir = 'Mandell_benchmark/new_7x5';
+% resdir = 'Mandell_benchmark/new_7x5_more_diff';
+% % Paper 2 simulations
 % convergence CBC and Dimits regime
 % resdir = 'paper_2_nonlinear/kT_6.96/CBC_7x4x128x64x24';
 % resdir = 'paper_2_nonlinear/kT_6.96/CBC_3x2x128x64x24_Nexc_5';
 % resdir = 'paper_2_nonlinear/kT_6.96/CBC_5x3x128x64x24_Nexc_5';
 % resdir = 'paper_2_nonlinear/kT_6.96/CBC_7x4x128x64x24_Nexc_5';
 % resdir = 'paper_2_nonlinear/kT_6.96/CBC_9x5x128x64x24_Nexc_5';
+% resdir = 'paper_2_nonlinear/kT_6.96/CBC_21x11x128x64x24_Nexc_5';
 % resdir = 'paper_2_nonlinear/kT_5.3/CBC_11x6x128x64x24_Nexc_5';
 % resdir = 'paper_2_nonlinear/kT_5.3/CBC_kT_5.3_3x2x128x64x24_Nexc_5';
 % resdir = 'paper_2_nonlinear/kT_5.3/CBC_kT_5.3_5x3x128x64x24_Nexc_5';
@@ -95,12 +102,28 @@ PARTITION  = '/misc/gyacomo_outputs/';
 % resdir = 'paper_2_nonlinear/kT_5.3/CBC_kT_5.3_17x9x128x64x24_Nexc_5';
 % Scan in kT
 % resdir = 'paper_2_nonlinear/kT_scan_DGGK_0.05/9x5x128x64x24';
-
 % resdir = 'paper_2_nonlinear/CBC_rerun/rerun_CBC_3x2x128x64x16';
-% resdir = 'dev/init_ppj';
-% resdir = 'dev/hatB_NL';
-resdir = 'dev/CBC_wave_study';
+% resdir = 'paper_2_nonlinear/CBC_rerun/rerun_CBC_5x3x128x64x16';
+% resdir = 'dev/Napjz_spectrum';
+% resdir = 'dev/CBC_test';
+
+% Reruns
+%  resdir = 'paper_2_nonlinear/kT_6.96_rerun/5x3x192x96x24';
+%  resdir = 'paper_2_nonlinear/kT_6.96_rerun/7x4x192x96x24';
+%  resdir = 'paper_2_nonlinear/kT_6.96_rerun/9x5x192x96x24';
+% resdir = 'paper_2_nonlinear/kT_6.96/5x3x128x64x24';
+% resdir = 'paper_2_nonlinear/kT_6.96/7x4x128x64x24';
+% resdir = 'paper_2_nonlinear/2jm1_coeff_kT_6.96/5x3x192x96x24';
+% resdir = 'paper_2_nonlinear/2jm1_coeff_kT_6.96/7x4x192x96x24';
+% resdir = 'paper_2_nonlinear/2jm1_coeff_kT_6.96/9x5x192x96x24';
+
+resdir = 'paper_2_nonlinear/kT_6.96/2jm1_version_5x3x128x64x24';
+% resdir = 'paper_2_nonlinear/dbg/CBC_test_Napjmir_3x2x128x64x24';
+% resdir = 'paper_2_nonlinear/dbg/CBC_bench_3x2x128x64x24';
+
+% debug shearless
+% resdir = 'paper_2_nonlinear/shearless_CBC/7x4x192x96x24';
 
 resdir = ['results/',resdir];
-JOBNUMMIN = 04; JOBNUMMAX = 10;
+JOBNUMMIN = 00; JOBNUMMAX = 10;
 run analysis_gyacomo

wk/lin_3D_Zpinch.m

@@ -95,8 +95,8 @@ MU_J    = 0.0;     %
 LAMBDAD = 0.0;
 NOISE0  = 1.0e-5; % Init noise amplitude
 BCKGD0  = 0.0;    % Init background
-GRADB   = 1.0;
-CURVB   = 1.0;
+k_gB   = 1.0;
+k_cB   = 1.0;
 COLL_KCUT = 1000;
 %%-------------------------------------------------------------------------
 %% RUN

wk/lin_3Dzpinch.m

@@ -99,8 +99,8 @@ MU_J    = 0.0;     %
 LAMBDAD = 0.0;
 NOISE0  = 1.0e-5; % Init noise amplitude
 BCKGD0  = 0.0;    % Init background
-GRADB   = 0.1;
-CURVB   = 0.1;
+k_gB   = 0.1;
+k_cB   = 0.1;
 COLL_KCUT = 1.5;
 %%-------------------------------------------------------------------------
 %% RUN

wk/lin_ETPY.m

@@ -100,8 +100,8 @@ MU_J    = 0.0;     %
 LAMBDAD = 0.0;
 NOISE0  = 1.0e-5; % Init noise amplitude
 BCKGD0  = 0.0;    % Init background
-GRADB   = 1.0;
-CURVB   = 1.0;
+k_gB   = 1.0;
+k_cB   = 1.0;
 COLL_KCUT = 1000;
 %%-------------------------------------------------------------------------
 %% RUN

wk/lin_ITG.m

@@ -10,12 +10,14 @@ addpath(genpath([gyacomodir,'matlab'])) % ... add
 addpath(genpath([gyacomodir,'matlab/plot'])) % ... add
 addpath(genpath([gyacomodir,'matlab/compute'])) % ... add
 addpath(genpath([gyacomodir,'matlab/load'])) % ... add% EXECNAME = 'gyacomo_1.0';
+% SIMID   = 'linear_CBC_benchmark_GX';  % Name of the simulation
 SIMID   = 'dbg';  % Name of the simulation
 RUN     = 1; % To run or just to load
 default_plots_options
 % EXECNAME = 'gyacomo_debug';
+% EXECNAME = 'gyacomo_2jm1';
+% EXECNAME = 'gyacomo_dlnBdz';
 EXECNAME = 'gyacomo_alpha';
-% EXECNAME = 'gyacomo';
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %% Set Up parameters
 CLUSTER.TIME  = '99:00:00'; % allocation time hh:mm:ss
@@ -33,15 +35,15 @@ KIN_E   = 0;         % 1: kinetic electrons, 2: adiabatic electrons
 BETA    = 1e-4;     % electron plasma beta
 %% GRID PARAMETERS
 P = 4;
-J = P/2;
+J = 2;%P/2;
 PMAXE   = P;     % Hermite basis size of electrons
 JMAXE   = J;     % Laguerre "
 PMAXI   = P;     % " ions
 JMAXI   = J;     % "
 NX      = 8;     % real space x-gridpoints
-NY      = 2;     %     ''     y-gridpoints
+NY      = 12;     %     ''     y-gridpoints
 LX      = 2*pi/0.1;   % Size of the squared frequency domain
-LY      = 2*pi/0.3;   % Size of the squared frequency domain
+LY      = 2*pi/0.1;   % Size of the squared frequency domain
 NZ      = 24;    % number of perpendicular planes (parallel grid)
 NPOL    = 1;
 SG      = 0;     % Staggered z grids option
@@ -59,13 +61,13 @@ PARALLEL_BC = 'dirichlet'; %'dirichlet','periodic','shearless','disconnected'
 % PARALLEL_BC = 'periodic'; %'dirichlet','periodic','shearless','disconnected'
 SHIFT_Y = 0.0;
 %% TIME PARMETERS
-TMAX    = 50;  % Maximal time unit
-DT      = 1e-2;   % Time step
+TMAX    = 40;  % Maximal time unit
+DT      = 2e-2;   % Time step
 % DT      = 5e-4;   % Time step
 SPS0D   = 1;      % Sampling per time unit for 2D arrays
 SPS2D   = -1;      % Sampling per time unit for 2D arrays
 SPS3D   = 1;      % Sampling per time unit for 2D arrays
-SPS5D   = 1/2;    % Sampling per time unit for 5D arrays
+SPS5D   = 1/20;    % Sampling per time unit for 5D arrays
 SPSCP   = 0;    % Sampling per time unit for checkpoints
 JOB2LOAD= -1;
 %% OPTIONS
@@ -96,14 +98,14 @@ INIT_BLOB = 0; WIPE_TURB = 0; ACT_ON_MODES = 0;
 MU_X    = MU;     %
 MU_Y    = MU;     %
 N_HD    = 4;
-MU_Z    = 0.2;     %
+MU_Z    = 2.0;     %
 MU_P    = 0.0;     %
 MU_J    = 0.0;     %
 LAMBDAD = 0.0;
 NOISE0  = 1.0e-5; % Init noise amplitude
 BCKGD0  = 0.0;    % Init background
-GRADB   = 1.0;
-CURVB   = 1.0;
+k_gB   = 1.0;
+k_cB   = 1.0;
 COLL_KCUT = 1000;
 %%-------------------------------------------------------------------------
 %% RUN
@@ -151,24 +153,6 @@ options.normalized  = 1;
 fig = plot_ballooning(data,options);
 end
 
-if 0
-%% Hermite-Laguerre spectrum
-% options.TIME = 'avg';
-options.P2J        = 1;
-options.ST         = 1;
-options.PLOT_TYPE  = 'space-time';
-% options.PLOT_TYPE  =   'Tavg-1D';ls
-
-% options.PLOT_TYPE  = 'Tavg-2D';
-options.NORMALIZED = 1;
-options.JOBNUM     = 0;
-options.TIME       = [0 50];
-options.specie     = 'i';
-options.compz      = 'avg';
-fig = show_moments_spectrum(data,options);
-% fig = show_napjz(data,options);
-save_figure(data,fig)
-end
 
 if 0
 %% linear growth rate for 3D Zpinch (kz fourier transform)
@@ -182,16 +166,16 @@ save_figure(data,fig)
 end
 if 1
 %% Mode evolution
-options.NORMALIZED = 0;
-options.K2PLOT = 1;
-options.TIME   = [0:1000];
-% options.TIME   = [0.5:0.01:1].*data.Ts3D(end);
+options.NORMALIZED = 1;
+options.TIME   = [000:9000];
+options.KX_TW  = [0.5 1]*data.Ts3D(end); %kx Growth rate time window
+options.KY_TW  = [0.5 1]*data.Ts3D(end);  %ky Growth rate time window
 options.NMA    = 1;
-options.NMODES = 32;
-options.iz     = 'avg';
-options.ik     = 1;
+options.NMODES = 800;
+options.iz     = 'avg'; % avg or index
+options.ik     = 1; % sum, max or index
+options.fftz.flag = 0;
 fig = mode_growth_meter(data,options);
-save_figure(data,fig,'.png')
 end
 
 

wk/lin_KBM.m

@@ -91,8 +91,8 @@ MU_J    = 0.0;     %
 LAMBDAD = 0.0;
 NOISE0  = 0.0e-5; % Init noise amplitude
 BCKGD0  = 1.0;    % Init background
-GRADB   = 1.0;
-CURVB   = 1.0;
+k_gB   = 1.0;
+k_cB   = 1.0;
 %%-------------------------------------------------------------------------
 %% RUN
 setup

wk/lin_MTM.m

@@ -91,8 +91,8 @@ MU_J    = 0.0;     %
 LAMBDAD = 0.0;
 NOISE0  = 0.0e-5; % Init noise amplitude
 BCKGD0  = 1.0;    % Init background
-GRADB   = 1.0;
-CURVB   = 1.0;
+k_gB   = 1.0;
+k_cB   = 1.0;
 %%-------------------------------------------------------------------------
 %% RUN
 setup

wk/lin_RHT.m

@@ -92,8 +92,8 @@ MU_J    = 0.0;     %
 LAMBDAD = 0.0;
 NOISE0  = 0.0e-5; % Init noise amplitude
 BCKGD0  = 1.0;    % Init background
-GRADB   = 1.0;
-CURVB   = 1.0;
+k_gB   = 1.0;
+k_cB   = 1.0;
 COLL_KCUT = 1000;
 %%-------------------------------------------------------------------------
 %% RUN

wk/lin_TEM.m

@@ -91,8 +91,8 @@ MU_J    = 0.0;     %
 LAMBDAD = 0.0;
 NOISE0  = 0.0e-5; % Init noise amplitude
 BCKGD0  = 1.0;    % Init background
-GRADB   = 1.0;
-CURVB   = 1.0;
+k_gB   = 1.0;
+k_cB   = 1.0;
 %%-------------------------------------------------------------------------
 %% RUN
 setup

wk/local_run.m

@@ -23,8 +23,8 @@ J       = 2;
 Q0      = 1.0;       % safety factor
 SHEAR   = 0.0;       % magnetic shear
 EPS     = 0.0;      % inverse aspect ratio
-GRADB   = 1.0;       % Magnetic  gradient
-CURVB   = 1.0;       % Magnetic  curvature
+k_gB   = 1.0;       % Magnetic  gradient
+k_cB   = 1.0;       % Magnetic  curvature
 SG      = 0;         % Staggered z grids option
 %% TIME PARAMETERS
 TMAX    = 120;  % Maximal time unit