
%  Convert outputs.

fac = 21.6; 

%  UUUUU:  DU, PGF, COR, RES     

%  Momentum Tendencies:(   2.34   0.33)kg/m/s; (  50.5   7.2)T/m/6h
U1 = [50.5    65.8   -16.9     1.6] / fac;
V1 = [ 7.2   -13.6    23.2    -2.4] / fac;

%  Momentum Tendencies:(   0.29   0.59)kg/m/s; (   6.3  12.8)T/m/6h    
U2 = [  6.3    13.9   -13.2     5.6 ] / fac;
V2 = [ 12.8   -16.0    37.4    -8.7 ] / fac;

%  Momentum Tendencies:(   0.37   0.30)kg/m/s; (   7.9   6.5)T/m/6h
U3 = [ 7.9     2.0     3.4     2.4 ] / fac;
V3 = [ 6.5   -19.6    29.8    -3.7 ] / fac;

%  Momentum Tendencies:(   0.31  -0.02)kg/m/s; (   6.6  -0.5)T/m/6h
U4 = [   6.6    -3.4     9.7     0.3 ] / fac;
V4 = [  -0.5   -19.0    19.7    -1.2 ] / fac;

%  Momentum Tendencies:(  -0.22   0.94)kg/m/s; (  -4.7  20.4)T/m/6h
U5 = [  -4.7   -16.6    12.6    -0.7 ] / fac;
V5 = [  20.4   -10.0    30.7    -0.3 ] / fac;

fprintf(' U1:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', U1(2),U1(3),U1(4),U1(1));
fprintf(' U2:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', U2(2),U2(3),U2(4),U2(1));
fprintf(' U3:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', U3(2),U3(3),U3(4),U3(1));
fprintf(' U4:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', U4(2),U4(3),U4(4),U4(1));
fprintf(' U5:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n\n', U5(2),U5(3),U5(4),U5(1));

fprintf(' V1:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', V1(2),V1(3),V1(4),V1(1));
fprintf(' V2:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', V2(2),V2(3),V2(4),V2(1));
fprintf(' V3:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', V3(2),V3(3),V3(4),V3(1));
fprintf(' V4:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', V4(2),V4(3),V4(4),V4(1));
fprintf(' V5:   ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f \n', V5(2),V5(3),V5(4),V5(1));

meanU = (abs(U1)+abs(U2)+abs(U3)+abs(U4)+abs(U5))/5;
fprintf(' Mean U \n ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f   \n', ...
meanU(2),meanU(3),meanU(4),meanU(1));

meanV = (abs(V1)+abs(V2)+abs(V3)+abs(V4)+abs(V5))/5;
fprintf(' Mean V \n ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f   \n', ...
meanV(2),meanV(3),meanV(4),meanV(1));

ageoU(1) = (U1(2)+U1(3));
ageoU(2) = (U2(2)+U2(3));
ageoU(3) = (U3(2)+U3(3));
ageoU(4) = (U4(2)+U4(3));
ageoU(5) = (U5(2)+U5(3));
aaumean = mean(abs(ageoU));
fprintf(' Ageo U eqn ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f  %4.2f    %g \n', ageoU, aaumean);

ageoV(1) = (V1(2)+V1(3));
ageoV(2) = (V2(2)+V2(3));
ageoV(3) = (V3(2)+V3(3));
ageoV(4) = (V4(2)+V4(3));
ageoV(5) = (V5(2)+U5(3));
aavmean = mean(abs(ageoV));
fprintf(' Ageo V eqn ' )
fprintf(' %4.2f   %4.2f   %4.2f   %4.2f   %4.2f    %g \n', ageoV, aavmean);


