close all
clear all

UHS_filenm = 'uhs-epoch-seconds.csv';

%SM_filenm = 'ShipMotions_Thursday_HeaveCompTest.dat';


UHS_data = readtable(UHS_filenm);
%SM_data = readtable(SM_filenm);

UHS_t = datetime(UHS_data.epoch_sec, 'ConvertFrom', 'posixtime');
%SM_t = datetime(SM_data.Var1, 'ConvertFrom', 'posixtime');

UHS_lineout = UHS_data.rov_wire_length;
UHS_v = UHS_data.rov_wire_speed;
UHS_T = UHS_data.rov_tension;



figure
ah1 = subplot(3,1,1)
plot(UHS_t,UHS_T)
ylabel('Tension (t)');
grid on;


ah2 = subplot(3,1,2)
plot(UHS_t,UHS_v)
ylabel('Wire Speed (m/s) (positive is paying out');
grid on;

ah3 = subplot(3,1,3)
plot(UHS_t,UHS_lineout)
ylabel('Wire Out (m)');
grid on;

linkaxes([ah1 ah2 ah3],'x')

f