Skip to content
Snippets Groups Projects
Commit ec833a8f authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann :seedling:
Browse files

scripts update

parent de0ac4c5
No related branches found
No related tags found
No related merge requests found
...@@ -72,9 +72,11 @@ while(CONTINUE) ...@@ -72,9 +72,11 @@ while(CONTINUE)
tmp = Nipj_; sz = size(tmp); tmp = Nipj_; sz = size(tmp);
Nipj_ = zeros(cat(1,[Pi_new,Ji_new]',sz(3:end)')'); Nipj_ = zeros(cat(1,[Pi_new,Ji_new]',sz(3:end)')');
Nipj_(1:Pi_old,1:Ji_old,:,:,:,:) = tmp; Nipj_(1:Pi_old,1:Ji_old,:,:,:,:) = tmp;
if(KIN_E)
tmp = Nepj_; sz = size(tmp); tmp = Nepj_; sz = size(tmp);
% Nepj_ = zeros(cat(1,[Pe_new,Je_new]',sz(3:end)')'); Nepj_ = zeros(cat(1,[Pe_new,Je_new]',sz(3:end)')');
% Nepj_(1:Pe_old,1:Je_old,:,:,:,:) = tmp; Nepj_(1:Pe_old,1:Je_old,:,:,:,:) = tmp;
end
end end
if W_SAPJ if W_SAPJ
tmp = Sipj_; sz = size(tmp); tmp = Sipj_; sz = size(tmp);
......
...@@ -41,9 +41,9 @@ linear_gr.ce = abs(ce); ...@@ -41,9 +41,9 @@ linear_gr.ce = abs(ce);
linear_gr.ky = kys; linear_gr.ky = kys;
if PLOT >0 if PLOT >0
figure figure
plot(linear_gr.ky,linear_gr.g_ky(:,end),'DisplayName','$Re(\omega_{k_y})$'); hold on; plot(linear_gr.ky,linear_gr.g_ky(:,end),'-o','DisplayName','$Re(\omega_{k_y})$'); hold on;
plot(linear_gr.ky,linear_gr.w_ky(:,end),'DisplayName','$Im(\omega_{k_y})$'); hold on; plot(linear_gr.ky,linear_gr.w_ky(:,end),'-o','DisplayName','$Im(\omega_{k_y})$'); hold on;
plot(linear_gr.ky,linear_gr.ce (:,end),'DisplayName','$\epsilon$'); hold on; plot(linear_gr.ky,linear_gr.ce (:,end),'-o','DisplayName','$\epsilon$'); hold on;
xlim([min(linear_gr.ky) max(linear_gr.ky)]); xlim([min(linear_gr.ky) max(linear_gr.ky)]);
xlabel('$k_y$'); xlabel('$k_y$');
legend('show'); legend('show');
......
...@@ -50,7 +50,7 @@ options.NAME = '\phi'; ...@@ -50,7 +50,7 @@ options.NAME = '\phi';
% options.NAME = 'n_i^{NZ}'; % options.NAME = 'n_i^{NZ}';
% options.NAME = '\Gamma_x'; % options.NAME = '\Gamma_x';
% options.NAME = 'n_i'; % options.NAME = 'n_i';
options.PLAN = 'kxky'; options.PLAN = 'xz';
% options.NAME = 'f_i'; % options.NAME = 'f_i';
% options.PLAN = 'sx'; % options.PLAN = 'sx';
options.COMP = 'avg'; options.COMP = 'avg';
...@@ -78,7 +78,7 @@ options.PLAN = 'kxky'; ...@@ -78,7 +78,7 @@ options.PLAN = 'kxky';
% options.NAME = 'f_i'; % options.NAME = 'f_i';
% options.PLAN = 'sx'; % options.PLAN = 'sx';
options.COMP = 'avg'; options.COMP = 'avg';
options.TIME = [300 400 600]; options.TIME = [100];
data.a = data.EPS * 2e3; data.a = data.EPS * 2e3;
fig = photomaton(data,options); fig = photomaton(data,options);
% save_figure(data,fig) % save_figure(data,fig)
......
...@@ -23,19 +23,19 @@ xlabel('CBC drive [\%]'); ylabel('Radial Heat Flux $Q_x^\infty$'); ...@@ -23,19 +23,19 @@ xlabel('CBC drive [\%]'); ylabel('Radial Heat Flux $Q_x^\infty$');
KN = 2.22; KN = 2.22;
KT = [1.00 0.90 0.80 0.70 0.60 0.50]*6.96; KT = [1.00 0.90 0.80 0.70 0.60 0.50]*6.96;
gm42 = [32.2 16.8 0.00 0.00 1.74 0.00]; gm42 = [32.2 18.8 10.5 5.89 1.74 0.00];
gm42_err = [05.2 02.8 0.00 0.00 0.53 0.00]; gm42_err = [05.2 03.8 2.10 1.66 0.53 0.00];
gm84 = [0.00 0.00 0.00 0.00 0.00 0.00]; gm84 = [0.00 13.2 7.66 3.20 0.00 0.00];
gm84_err = [0.00 0.00 0.00 0.00 0.00 0.00]; gm84_err = [0.00 2.79 1.93 0.98 0.00 0.00];
gne = [0.00 0.00 0.00 0.00 0.00 0.00]; gne = [0.00 0.00 0.00 0.00 0.00 0.00];
gne_err = [0.00 0.00 0.00 0.00 0.00 0.00]; gne_err = [0.00 0.00 0.00 0.00 0.00 0.00];
figure figure
errorbar(KT./KN,gm42,gm42_err,'o-', 'LineWidth',1.5); hold on; errorbar(KT,gm42./KT,gm42_err./KT,'o-', 'LineWidth',1.5); hold on;
errorbar(KT./KN,gm84,gm84_err,'o-', 'LineWidth',1.5); errorbar(KT,gm84./KT,gm84_err./KT,'o-', 'LineWidth',1.5);
errorbar(KT./KN, gne, gne_err,'x-k','LineWidth',1.5); errorbar(KT, gne./KT, gne_err./KT,'x-k','LineWidth',1.5);
% set(gca, 'YScale', 'log') % set(gca, 'YScale', 'log')
legend('GM (4,2)','GM (8,4)','Gene') legend('GM (4,2)','GM (8,4)','Gene')
xlabel('$\eta=\kappa_T/\kappa_N$'); ylabel('Radial Heat Flux $Q_x^\infty$'); xlabel('$\eta=\kappa_T/\kappa_N$'); ylabel('$\chi_i$');
...@@ -2,21 +2,26 @@ ...@@ -2,21 +2,26 @@
helazdir = '/home/ahoffman/HeLaZ/'; helazdir = '/home/ahoffman/HeLaZ/';
% Directory of the simulation (from results) % Directory of the simulation (from results)
% if 1% Local results % if 1% Local results
outfile =''; % outfile ='volcokas/64x32x16x5x3_kin_e_npol_1';
%% Dimits %% Dimits
% outfile ='shearless_cyclone/128x64x16x5x3_Dim_90'; % outfile ='shearless_cyclone/128x64x16x5x3_Dim_90';
outfile ='shearless_cyclone/64x32x16x5x3_Dim_50'; % outfile ='shearless_cyclone/128x64x16x9x5_Dim_scan/128x64x16x9x5_Dim_60';
% outfile ='shearless_cyclone/128x64x16x5x3_Dim_scan/128x64x16x5x3_Dim_70';
% outfile ='shearless_cyclone/64x32x16x5x3_Dim_scan/64x32x16x5x3_Dim_70';
%% AVS %% AVS
% outfile = 'volcokas/64x32x16x5x3_kin_e_npol_1'; % outfile = 'volcokas/64x32x16x5x3_kin_e_npol_1';
% outfile = 'volcokas/64x32x16x5x3_kin_e_npol_1';
%% Bechmark outfile = 'shearless_cyclone/64x32x160x5x3_CBC_Npol_10_kine';
%% CBC
% outfile ='shearless_cyclone/64x32x16x5x3_CBC_080'; % outfile ='shearless_cyclone/64x32x16x5x3_CBC_080';
% outfile ='shearless_cyclone/64x32x16x5x3_CBC_100'; % outfile ='shearless_cyclone/64x32x16x5x3_CBC_scan/64x32x16x5x3_CBC_100';
% outfile ='shearless_cyclone/64x32x16x5x3_CBC_120'; % outfile ='shearless_cyclone/64x32x16x5x3_CBC_120';
% outfile ='shearless_cyclone/64x32x16x9x5_CBC_080'; % outfile ='shearless_cyclone/64x32x16x9x5_CBC_080';
% outfile ='shearless_cyclone/64x32x16x9x5_CBC_100'; % outfile ='shearless_cyclone/64x32x16x9x5_CBC_100';
% outfile ='shearless_cyclone/64x32x16x9x5_CBC_120'; % outfile ='shearless_cyclone/64x32x16x9x5_CBC_120';
% outfile = 'shearless_cyclone/64x32x16x5x3_CBC_CO/64x32x16x5x3_CBC_LRGK';
run analysis_HeLaZ run analysis_HeLaZ
% Hflux_x = 0; % Hflux_x = 0;
% Hflux_x = 0 * data.Ts5D; % Hflux_x = 0 * data.Ts5D;
filename = '/home/ahoffman/HeLaZ/results/shearless_cyclone/64x32x16x5x3_CBC_100/outputs_00.h5'; % filename = '/home/ahoffman/HeLaZ/results/shearless_cyclone/64x32x16x5x3_CBC_100/outputs_00.h5';
kernel_i = h5read(filename,'/data/metric/kernel_i'); filename = '/misc/HeLaZ_outputs/results/shearless_cyclone/64x32x160x5x3_CBC_Npol_10_kine/outputs_00.h5';
kernel_i = h5read(filename,'/data/metric/kernel_i'); sigma = 0.0738;
Jacobian = h5read(filename,'/data/metric/Jacobian'); Jacobian = h5read(filename,'/data/metric/Jacobian');
STEPS = 1:numel(data.Ts5D); STEPS = 1:numel(data.Ts5D);
Hflux_x = 1:numel(STEPS); Hflux_x = 1:numel(STEPS);
...@@ -35,9 +36,9 @@ for it = STEPS ...@@ -35,9 +36,9 @@ for it = STEPS
correct_op = zeros(Nky,Nkx,Nz); correct_op = zeros(Nky,Nkx,Nz);
for in = 1:Nj for in = 1:Nj
n = in-1; n = in-1;
Kn = squeeze(kernel_i(in,:,:,:,1)); Kn = squeeze(kernel_i(in,:,:,:,1))*sigma^(2*n);
N2n = squeeze(data.Nipj(3,in ,:,:,:,it5d)); N2n = squeeze(data.Nepj(3,in ,:,:,:,it5d));
N0n = squeeze(data.Nipj(1,in ,:,:,:,it5d)); N0n = squeeze(data.Nepj(1,in ,:,:,:,it5d));
sumkernmom = sumkernmom + ... sumkernmom = sumkernmom + ...
Kn.* (c2n(n) .* N2n + c0n(n) .* N0n); Kn.* (c2n(n) .* N2n + c0n(n) .* N0n);
......
...@@ -13,22 +13,22 @@ EXECNAME = 'helaz3'; ...@@ -13,22 +13,22 @@ EXECNAME = 'helaz3';
CLUSTER.TIME = '99:00:00'; % allocation time hh:mm:ss CLUSTER.TIME = '99:00:00'; % allocation time hh:mm:ss
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% PHYSICAL PARAMETERS %% PHYSICAL PARAMETERS
NU = 0.05; % Collision frequency NU = 0.1; % Collision frequency
TAU = 1.0; % e/i temperature ratio TAU = 1.0; % e/i temperature ratio
K_N = 0;%2.22; % Density gradient drive K_N = 2.22; % Density gradient drive
K_T = 0;%6.96; % Temperature ''' K_T = 6.96; % Temperature '''
K_E = 0.0; % Electrostat ''' K_E = 0.0; % Electrostat '''
SIGMA_E = 0.05196152422706632;%0.0233380; % mass ratio sqrt(m_a/m_i) (correct = 0.0233380) SIGMA_E = 0.05196152422706632;%0.0233380; % mass ratio sqrt(m_a/m_i) (correct = 0.0233380)
KIN_E = 0; % 1: kinetic electrons, 2: adiabatic electrons KIN_E = 0; % 1: kinetic electrons, 2: adiabatic electrons
%% GRID PARAMETERS %% GRID PARAMETERS
PMAXE = 8; % Hermite basis size of electrons PMAXE = 4; % Hermite basis size of electrons
JMAXE = 4; % Laguerre " JMAXE = 2; % Laguerre "
PMAXI = 8; % " ions PMAXI = 4; % " ions
JMAXI = 4; % " JMAXI = 2; % "
NX = 2; % real space x-gridpoints NX = 20; % real space x-gridpoints
NY = 1; % '' y-gridpoints NY = 2; % '' y-gridpoints
LX = 100; % Size of the squared frequency domain LX = 100; % Size of the squared frequency domain
LY = 60; % Size of the squared frequency domain LY = 20; % Size of the squared frequency domain
NZ = 32; % number of perpendicular planes (parallel grid) NZ = 32; % number of perpendicular planes (parallel grid)
NPOL = 1; NPOL = 1;
SG = 0; % Staggered z grids option SG = 0; % Staggered z grids option
...@@ -36,11 +36,11 @@ SG = 0; % Staggered z grids option ...@@ -36,11 +36,11 @@ SG = 0; % Staggered z grids option
% GEOMETRY= 'Z-pinch'; % Z-pinch overwrites q0, shear and eps % GEOMETRY= 'Z-pinch'; % Z-pinch overwrites q0, shear and eps
GEOMETRY= 's-alpha'; GEOMETRY= 's-alpha';
Q0 = 1.4; % safety factor Q0 = 1.4; % safety factor
SHEAR = 0.0; % magnetic shear (Not implemented yet) SHEAR = 0.8; % magnetic shear (Not implemented yet)
EPS = 0.18; % inverse aspect ratio EPS = 0.18; % inverse aspect ratio
%% TIME PARMETERS %% TIME PARMETERS
TMAX = 50; % Maximal time unit TMAX = 50; % Maximal time unit
DT = 2e-2; % Time step DT = 1e-2; % Time step
SPS0D = 20; % Sampling per time unit for 2D arrays SPS0D = 20; % Sampling per time unit for 2D arrays
SPS2D = 0; % Sampling per time unit for 2D arrays SPS2D = 0; % Sampling per time unit for 2D arrays
SPS3D = 20; % Sampling per time unit for 2D arrays SPS3D = 20; % Sampling per time unit for 2D arrays
...@@ -48,7 +48,7 @@ SPS5D = 1; % Sampling per time unit for 5D arrays ...@@ -48,7 +48,7 @@ SPS5D = 1; % Sampling per time unit for 5D arrays
SPSCP = 0; % Sampling per time unit for checkpoints SPSCP = 0; % Sampling per time unit for checkpoints
JOB2LOAD= -1; JOB2LOAD= -1;
%% OPTIONS %% OPTIONS
SIMID = 'Ros_Hin_test'; % Name of the simulation SIMID = 'linear_CBC'; % Name of the simulation
LINEARITY = 'linear'; % activate non-linearity (is cancelled if KXEQ0 = 1) LINEARITY = 'linear'; % activate non-linearity (is cancelled if KXEQ0 = 1)
% Collision operator % Collision operator
% (LB:L.Bernstein, DG:Dougherty, SG:Sugama, LR: Lorentz, LD: Landau) % (LB:L.Bernstein, DG:Dougherty, SG:Sugama, LR: Lorentz, LD: Landau)
...@@ -59,7 +59,7 @@ INIT_ZF = 0; ZF_AMP = 0.0; ...@@ -59,7 +59,7 @@ INIT_ZF = 0; ZF_AMP = 0.0;
CLOS = 0; % Closure model (0: =0 truncation, 1: gyrofluid closure (p+2j<=Pmax))s CLOS = 0; % Closure model (0: =0 truncation, 1: gyrofluid closure (p+2j<=Pmax))s
NL_CLOS = 0; % nonlinear closure model (-2:nmax=jmax; -1:nmax=jmax-j; >=0:nmax=NL_CLOS) NL_CLOS = 0; % nonlinear closure model (-2:nmax=jmax; -1:nmax=jmax-j; >=0:nmax=NL_CLOS)
KERN = 0; % Kernel model (0 : GK) KERN = 0; % Kernel model (0 : GK)
INIT_OPT= 'mom00'; % Start simulation with a noisy mom00/phi/allmom INIT_OPT= 'phi'; % Start simulation with a noisy mom00/phi/allmom
%% OUTPUTS %% OUTPUTS
W_DOUBLE = 1; W_DOUBLE = 1;
W_GAMMA = 1; W_HF = 1; W_GAMMA = 1; W_HF = 1;
...@@ -90,8 +90,8 @@ system(['rm fort*.90']); ...@@ -90,8 +90,8 @@ system(['rm fort*.90']);
% Run linear simulation % Run linear simulation
if RUN if RUN
% system(['cd ../results/',SIMID,'/',PARAMS,'/; time mpirun -np 4 ',HELAZDIR,'bin/',EXECNAME,' 1 4 1 0; cd ../../../wk']) % system(['cd ../results/',SIMID,'/',PARAMS,'/; time mpirun -np 4 ',HELAZDIR,'bin/',EXECNAME,' 1 4 1 0; cd ../../../wk'])
% system(['cd ../results/',SIMID,'/',PARAMS,'/; mpirun -np 1 ',HELAZDIR,'bin/',EXECNAME,' 1 1 1 0; cd ../../../wk']) system(['cd ../results/',SIMID,'/',PARAMS,'/; mpirun -np 1 ',HELAZDIR,'bin/',EXECNAME,' 1 1 1 0; cd ../../../wk'])
system(['cd ../results/',SIMID,'/',PARAMS,'/; mpirun -np 4 ',HELAZDIR,'bin/',EXECNAME,' 1 1 4 0; cd ../../../wk']) % system(['cd ../results/',SIMID,'/',PARAMS,'/; mpirun -np 4 ',HELAZDIR,'bin/',EXECNAME,' 1 1 4 0; cd ../../../wk'])
% system(['cd ../results/',SIMID,'/',PARAMS,'/; mpirun -np 6 ',HELAZDIR,'bin/',EXECNAME,' 1 6 1 0; cd ../../../wk']) % system(['cd ../results/',SIMID,'/',PARAMS,'/; mpirun -np 6 ',HELAZDIR,'bin/',EXECNAME,' 1 6 1 0; cd ../../../wk'])
end end
...@@ -104,7 +104,7 @@ JOBNUMMIN = 00; JOBNUMMAX = 00; ...@@ -104,7 +104,7 @@ JOBNUMMIN = 00; JOBNUMMAX = 00;
data = compile_results(LOCALDIR,JOBNUMMIN,JOBNUMMAX); %Compile the results from first output found to JOBNUMMAX if existing data = compile_results(LOCALDIR,JOBNUMMIN,JOBNUMMAX); %Compile the results from first output found to JOBNUMMAX if existing
%% Short analysis %% Short analysis
if 0 if 1
%% linear growth rate (adapted for 2D zpinch and fluxtube) %% linear growth rate (adapted for 2D zpinch and fluxtube)
trange = [0.5 1]*data.Ts3D(end); trange = [0.5 1]*data.Ts3D(end);
nplots = 1; nplots = 1;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment