load waves_tension_25_50y

figure(1)
clf
subplot(411)
plot(time(1:1201),(Tdyn_50y_b(1066:2266)))
axis([0 120 0 8000])
4*std(Tdyn_50y_b(1066:2266))
mean(Tdyn_50y_b(1066:2266))
title('4000-Meter Benthic Mooring (w/ 25-Meter Snubber) - 50-Year Return Sea State')
ylabel('Ten. (lbs)','fontsize',12,'fontangle','italic');
text(6,6400,'Surface Buoy  (T_{mean} = 1580 lbs  4\sigma_T = 1820 lbs)')


subplot(412)
plot(time(1:1201),(Tdyn_50y_x(1066:2266)))
axis([0 120 0 8000])
4*std(Tdyn_50y_x(1066:2266))
Tm=mean(Tdyn_50y_x(1066:2266))
ylabel('Ten. (lbs)','fontsize',12,'fontangle','italic');
text(6,6400,'Snubber/EM-cable  (T_{mean} = 1340 lbs  4\sigma_T = 1750 lbs)')

subplot(413)
plot(time(1:1201),(Tdyn_50y_s(1066:2266)))
axis([0 120 0 8000])
4*std(Tdyn_50y_s(1066:2266))
mean(Tdyn_50y_s(1066:2266))
ylabel('Ten. (lbs)','fontsize',12,'fontangle','italic');
text(6,6400,'Subsurface Buoy  (T_{mean} = 3240 lbs  4\sigma_T = 1140 lbs)')

subplot(414)
plot(time(1:1201),(Tdyn_50y_a(1066:2266)))
axis([0 120 0 8000])
4*std(Tdyn_50y_a(1066:2266))
mean(Tdyn_50y_a(1066:2266))
ylabel('Ten. (lbs)','fontsize',12,'fontangle','italic');
text(6,6400,'Anchor  (T_{mean} = 4080 lbs  4\sigma_T = 2230 lbs)')
xlabel('Time (s)','fontsize',12,'fontangle','italic');

