-
Notifications
You must be signed in to change notification settings - Fork 6
/
Plot_Figures.m
42 lines (38 loc) · 1.05 KB
/
Plot_Figures.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
if (PLOT_E)
% Plot first few Even Energy levels
plot(EvenIt,EvenE);
title_txt = ['Energy vs Iterations (EVEN)'];
title(title_txt);
xlabel('Iterations[It]');
ylabel('Energy[E]');
% Plot first few Odd Energy levels
figure;
plot(OddIt,OddE);
title_txt = ['Energy vs Iterations (ODD)'];
title(title_txt);
xlabel('Iterations[It]');
ylabel('Energy[E]');
end
if (PLOT_T)
% Plot Entropy
figure;
semilogx(temp(2:ITMAX),simp(2:ITMAX));
title_txt = 'Entropy vs Temperature';
title(title_txt);
xlabel('Temperature[T]');
ylabel('Entropy[Savg]');
% Plot TChi
figure;
semilogx(temp(2:ITMAX),tchiimp(2:ITMAX));
title_txt = 'TChi vs Temperature';
title(title_txt);
xlabel('Temperature[T]');
ylabel('[TChi]');
% Plot Specific Heat
figure;
semilogx(temp(2:ITMAX),Cvimp(2:ITMAX));
title_txt = 'Specific Heat vs Temperature';
title(title_txt);
xlabel('Temperature[T]');
ylabel('Specific Heat [Cv]');
end