%%
clear;
close all;
clc

%% Coherence
load('../raw_data/id31_microstation_2017_11_17_coh.mat', 'coh_hexa_x',...
                                                        'coh_hexa_y',...
                                                        'coh_hexa_z',...
                                                        'coh_marble_x',...
                                                        'coh_marble_y',...
                                                        'coh_marble_z');

%% Save Coherence data
save('../data/id31_microstation_2017_11_17_coh.mat', ...
     'coh_marble_x', ...
     'coh_hexa_x', ...
     'coh_marble_y', ...
     'coh_hexa_y', ...
     'coh_marble_z', ...
     'coh_hexa_z');


%% Frequency Response
load('../raw_data/id31_microstation_2017_11_17_frf.mat', 'freq_frf', ...
                                                        'frf_hexa_x',...
                                                        'frf_hexa_y',...
                                                        'frf_hexa_z',...
                                                        'frf_marble_x',...
                                                        'frf_marble_y',...
                                                        'frf_marble_z');

force_factor = 1;
accel_factor = 1000;
scale_factor = accel_factor/force_factor;

frf_hexa_x =  scale_factor*frf_hexa_x;
frf_hexa_y = -scale_factor*frf_hexa_y;
frf_hexa_z = -scale_factor*frf_hexa_z;

frf_marble_x =  scale_factor*frf_marble_x;
frf_marble_y =  scale_factor*frf_marble_y;
frf_marble_z = -scale_factor*frf_marble_z;

%% Save Frequency Response Data
save('../data/id31_microstation_2017_11_17_frf.mat', ...
     'freq_frf', ...
     'frf_marble_x', ...
     'frf_hexa_x', ...
     'frf_marble_y', ...
     'frf_hexa_y', ...
     'frf_marble_z', ...
     'frf_hexa_z');