88 lines
1.8 KiB
Matlab
Executable File
88 lines
1.8 KiB
Matlab
Executable File
% Funzione che approssima il dato alla quarta cifra decimale (decimi di
|
|
% millimetri)
|
|
function [X_TuL,Y_TuL,Z_TuL,Xlocal_TuL,Ylocal_TuL,Zlocal_TuL,Xstar_TuL,Zstar_TuL,HShift_local_TuL,...
|
|
SegStar,TempDef_TuL,Speed_local_TuL,Acceleration_local_TuL,Area_TuL] = approx_TuL(X_TuL,...
|
|
Y_TuL,Z_TuL,Xlocal_TuL,Ylocal_TuL,Zlocal_TuL,Xstar_TuL,Zstar_TuL,HShift_local_TuL,...
|
|
SegStar,TempDef_TuL,Speed_local_TuL,Acceleration_local_TuL,Area_TuL,FileName)
|
|
|
|
fileID = fopen(FileName,'a');
|
|
fmt = '%s \r';
|
|
text = 'approx_TuL function started';
|
|
fprintf(fileID,fmt,text);
|
|
|
|
% X
|
|
conv = X_TuL*10000;
|
|
conv = round(conv);
|
|
X_TuL = conv/10000;
|
|
|
|
% X star
|
|
conv = Xstar_TuL*10000;
|
|
conv = round(conv);
|
|
Xstar_TuL = conv/10000;
|
|
|
|
% X local
|
|
conv = Xlocal_TuL*10000;
|
|
conv = round(conv);
|
|
Xlocal_TuL = conv/10000;
|
|
|
|
% Y
|
|
conv = Y_TuL*10000;
|
|
conv = round(conv);
|
|
Y_TuL = conv/10000;
|
|
|
|
% Y local
|
|
conv = Ylocal_TuL*10000;
|
|
conv = round(conv);
|
|
Ylocal_TuL = conv/10000;
|
|
|
|
% Z
|
|
conv = Z_TuL*10000;
|
|
conv = round(conv);
|
|
Z_TuL = conv/10000;
|
|
|
|
% Zstar
|
|
conv = Zstar_TuL*10000;
|
|
conv = round(conv);
|
|
Zstar_TuL = conv/10000;
|
|
|
|
% Z local
|
|
conv = Zlocal_TuL*10000;
|
|
conv = round(conv);
|
|
Zlocal_TuL = conv/10000;
|
|
|
|
% H Shift local
|
|
conv = HShift_local_TuL*10000;
|
|
conv = round(conv);
|
|
HShift_local_TuL = conv/10000;
|
|
|
|
% SegStar
|
|
conv = SegStar*10000;
|
|
conv = round(conv);
|
|
SegStar = conv/10000;
|
|
|
|
% TempDef
|
|
conv = TempDef_TuL*10;
|
|
conv = round(conv);
|
|
TempDef_TuL = conv/10;
|
|
|
|
% Speed
|
|
conv = Speed_local_TuL*10000;
|
|
conv = round(conv);
|
|
Speed_local_TuL = conv/10000;
|
|
|
|
% Acceleration
|
|
conv = Acceleration_local_TuL*10000;
|
|
conv = round(conv);
|
|
Acceleration_local_TuL = conv/10000;
|
|
|
|
% Area
|
|
conv = Area_TuL*10000;
|
|
conv = round(conv);
|
|
Area_TuL = conv/10000;
|
|
|
|
text = 'approx_TuL function worked correctly';
|
|
fprintf(fileID,fmt,text);
|
|
fclose(fileID);
|
|
|
|
end
|