close all
clear all

C = 0.12;  %O-Ring Compression
fc = 2;  %lbs/inch due to length  Table 5-9, (pg 5-9) Parker O-Ring Book
fh = 18; %lbs/in^2 due to area  Table 5-10, (pg 5-9) Parker O-Ring Book


W = .210;  %O-Ring Size (diameter in inches)
A_1 = .8:.1:4.8  %Bore Diameter


A = A_1;
B1 = A-2*(1-C)*W;
Fs_1 = fc*pi*A+fh*(pi/4)*(A.^2-B1.^2)


C = 0.14;  %O-Ring Compression
W = .275;  %O-Ring Size (diameter in inches)
A_2 = 5:.5:10  %Bore Diameter

A = A_2
B1 = A-2*(1-C)*W;
Fs_2 = fc*pi*A+fh*(pi/4)*(A.^2-B1.^2)


figure
plot(A_1,Fs_1,A_2,Fs_2)
xlabel('Bore Diameter (in)');
ylabel('Drag Force (lbs)');
legend('2-2xx','2-3xx','Location','NorthWest');

figure
plot