diff --git a/doc/hamproptbl.m b/doc/hamproptbl.m
index 9b5c6c0..e8992e5 100644
--- a/doc/hamproptbl.m
+++ b/doc/hamproptbl.m
@@ -1,5 +1,7 @@
#!/usr/bin/octave
+graphics_toolkit ("gnuplot");
+
aftbln = 5;
afval = [80 100 125 150 175 200];
@@ -45,7 +47,7 @@ for t=1:2;
endfor;
printf("\n};\n");
-clf;
+f=figure("visible","off");
plot(afval,afcpc(1,:),"1+;CP 1;",...
afval,afcpc(2,:),"2+;CP 2;",...
afval,afctc(1,:),"3+;CT 1;",...
@@ -58,9 +60,9 @@ grid on;
xlabel("AF -- Activity Factor");
ylabel("CP/CT Factor");
title("CP/CT versus AF");
-print("propafcpct.eps","-depsc2","-portrait","-color");
+print(f, "propafcpct.eps","-depsc2","-portrait","-color");
-clf;
+f=figure("visible","off");
plot(afval,afcpc(1,:)-polyval(afcpp(1,:),afval),"1+-;CP J=0 error;",...
afval,afcpc(2,:)-polyval(afcpp(2,:),afval),"2+-;CP J>=0.5 error;",...
afval,afctc(1,:)-polyval(afctp(1,:),afval),"3+-;CT J=0 error;",...
@@ -69,7 +71,7 @@ grid on;
xlabel("AF -- Activity Factor");
ylabel("CP/CT Factor Approximation Error");
title("CP/CT versus AF Approximation Error");
-print("propafcpcterr.eps","-depsc2","-portrait","-color");
+print(f, "propafcpcterr.eps","-depsc2","-portrait","-color");
zjstal = 0:0.4:3.2;
cpstal = [ .05 .12 .22 .35 .49 .65 .82 1.01 1.19 ;
@@ -146,6 +148,7 @@ for t=1:4;
endfor;
printf("\n};\n\n");
+f=figure("visible","off");
plot(zjstal,cpstal(1,:),"1+;CPstall 2 Blade;",...
zjstal,cpstal(2,:),"2+;CPstall 4 Blade;",...
zjstal,cpstal(3,:),"3+;CPstall 6 Blade;",...
@@ -158,8 +161,9 @@ grid on;
xlabel("ZJ");
ylabel("CP Stall");
title("CP Stall versus ZJ");
-print("propcpstal.eps","-depsc2","-portrait","-color");
+print(f,"propcpstal.eps","-depsc2","-portrait","-color");
+f=figure("visible","off");
plot(zjstal,cpstal(1,:)-polyval(cpstalp(1,:),zjstal),"1+-;CPstall 2 Blade error;",...
zjstal,cpstal(2,:)-polyval(cpstalp(2,:),zjstal),"2+-;CPstall 4 Blade error;",...
zjstal,cpstal(3,:)-polyval(cpstalp(3,:),zjstal),"3+-;CPstall 6 Blade error;",...
@@ -168,8 +172,9 @@ grid on;
xlabel("ZJ");
ylabel("CP Stall Approximation Error");
title("CP Stall versus ZJ Approximation Error");
-print("propcpstalerr.eps","-depsc2","-portrait","-color");
+print(f,"propcpstalerr.eps","-depsc2","-portrait","-color");
+f=figure("visible","off");
plot(zjstal,ctstal(1,:),"1+;CTstall 2 Blade;",...
zjstal,ctstal(2,:),"2+;CTstall 4 Blade;",...
zjstal,ctstal(3,:),"3+;CTstall 6 Blade;",...
@@ -182,8 +187,9 @@ grid on;
xlabel("ZJ");
ylabel("CT Stall");
title("CT Stall versus ZJ");
-print("propctstal.eps","-depsc2","-portrait","-color");
+print(f,"propctstal.eps","-depsc2","-portrait","-color");
+f=figure("visible","off");
plot(zjstal,ctstal(1,:)-polyval(ctstalp(1,:),zjstal),"1+-;CTstall 2 Blade error;",...
zjstal,ctstal(2,:)-polyval(ctstalp(2,:),zjstal),"2+-;CTstall 4 Blade error;",...
zjstal,ctstal(3,:)-polyval(ctstalp(3,:),zjstal),"3+-;CTstall 6 Blade error;",...
@@ -192,7 +198,7 @@ grid on;
xlabel("ZJ");
ylabel("CT Stall Approximation Error");
title("CT Stall versus ZJ Approximation Error");
-print("propctstalerr.eps","-depsc2","-portrait","-color");
+print(f,"propctstalerr.eps","-depsc2","-portrait","-color");
inn = [ 10 6 8 8 7 10 6 ];
@@ -367,7 +373,7 @@ endfor;
printf("\n};\n");
for bldidx=1:4;
- clf;
+ f=figure("visible","off");
col=jet(7);
for t=7:-1:1;
plot(cpang(t+(bldidx-1)*7,1:inn(t)),bldang(t,1:inn(t)),sprintf("+;J=%3.1f;",zjj(t)),"color",col(t,:));
@@ -387,11 +393,11 @@ for bldidx=1:4;
ylabel("Blade Angle");
title(sprintf("%u Blade Propeller",bldidx*2));
axis([-0.5 1.5 0 70]);
- print(sprintf("propbldangcp%u.eps",bldidx),"-depsc2","-portrait","-color");
+ print(f,sprintf("propbldangcp%u.eps",bldidx),"-depsc2","-portrait","-color");
axis([0.0 0.4 0 40]);
- print(sprintf("propbldangcp%ud.eps",bldidx),"-depsc2","-portrait","-color");
+ print(f,sprintf("propbldangcp%ud.eps",bldidx),"-depsc2","-portrait","-color");
- clf;
+ f=figure("visible","off");
col=jet(7);
for t=1:7;
plot(ctang(t+(bldidx-1)*7,1:inn(t)),bldang(t,1:inn(t)),sprintf("+;J=%3.1f;",zjj(t)),"color",col(t,:));
@@ -411,9 +417,9 @@ for bldidx=1:4;
ylabel("Blade Angle");
title(sprintf("%u Blade Propeller",bldidx*2));
axis([-0.2 0.6 0 70]);
- print(sprintf("propbldangct%u.eps",bldidx),"-depsc2","-portrait","-color");
+ print(f,sprintf("propbldangct%u.eps",bldidx),"-depsc2","-portrait","-color");
axis([0.0 0.2 0 40]);
- print(sprintf("propbldangct%ud.eps",bldidx),"-depsc2","-portrait","-color");
+ print(f,sprintf("propbldangct%ud.eps",bldidx),"-depsc2","-portrait","-color");
endfor;
# Figure 1 from 1971 Report
@@ -450,7 +456,7 @@ for t=1:7;
endfor;
printf("\n};\n");
-clf;
+f=figure("visible","off");
col=jet(7);
for t=1:4;
plot(cpec,btdcr(t,:),sprintf("+;%u Blades;",t*2),"color",col(2*t-1,:));
@@ -463,4 +469,4 @@ hold off;
xlabel("Effective Power Coefficient CPE1");
ylabel("PBL");
grid on;
-print("proppbl.eps","-depsc2","-portrait","-color");
+print(f,"proppbl.eps","-depsc2","-portrait","-color");
diff --git a/doc/hartzellf7666a2af.m b/doc/hartzellf7666a2af.m
index f39ccf4..dfc0fee 100644
--- a/doc/hartzellf7666a2af.m
+++ b/doc/hartzellf7666a2af.m
@@ -1,5 +1,7 @@
#!/usr/bin/octave
+graphics_toolkit ("gnuplot");
+
# diam 192
t = [ 0 5.5 ;
@@ -93,6 +95,7 @@ P = polyfit(74/2-t(:,1)/2.54,t(:,2)/2.54,polyorder);
r=((round(rmin*1e2)*1e-2):1e-2:rmax);
w=polyval(P,r);
+figure("visible","off");
plot(r,w,";Approximation;",...
74/2-t(:,1)/2.54,t(:,2)/2.54,"+;Measurements;");
line([rcowling rcowling],[0 10],"displayname","Cowling","color","cyan");
diff --git a/doc/p28rperf.m b/doc/p28rperf.m
index 0bff680..f69bf35 100644
--- a/doc/p28rperf.m
+++ b/doc/p28rperf.m
@@ -1,5 +1,7 @@
#!/usr/bin/octave
+graphics_toolkit ("gnuplot");
+
global const_g = 9.80665; % gravity const.
global const_m = 28.9644; % Molecular Weight of air
global const_r = 8.31432; % gas const. for air
@@ -75,6 +77,7 @@ CD0geardownflaps40=CD0geardown+0.06;
alt=0:100:15000;
[p t rho]=icaoatmo(alt);
+figure("visible","off");
clf;
ax=plotyy(alt,p,alt,rho,@plot,@plot);
title("ICAO Standard Atmosphere");
@@ -188,7 +191,7 @@ set(ax(2),"ylim",[0 1200]);
set(ax(1),"ycolor",[0 0 0]);
set(ax(2),"ycolor",[0 0 0]);
legend(ax, "location","northwest");
-legend(ax, "show");
+#legend(ax, "show");
print("p28rslgndrun.eps","-depsc2","-portrait","-color");
clf;
@@ -207,7 +210,7 @@ set(ax(2),"ylim",[0 80]);
set(ax(1),"ycolor",[0 0 0]);
set(ax(2),"ycolor",[0 0 0]);
legend(ax, "location","northwest");
-legend(ax, "show");
+#legend(ax, "show");
print("p28rslgndrunprop.eps","-depsc2","-portrait","-color");
CD0s=[CD0 CD0geardown];