BestOpacity

0001 clear
0002 
0003 %d = pipe_read('04-oct-2010:17:14:38', '04-oct-2010:19:33:03');
0004 
0005 %d = pipe_read('20-sep-2010:16:31:16','20-sep-2010:18:49:47'); %skydip
0006 
0007 %d = pipe_read('03-sep-2010:13:20:39', '03-sep-2010:14:17:21'); %test4
0008 
0009 d = pipe_read('24-aug-2010:01:17:09', '24-aug-2010:04:21:17'); %test4
0010 
0011 %d= pipe_read('28-aug-2010:05:07:28', '28-aug-2010:08:11:52'); %test5
0012 
0013 SkyDipMethod1;
0014 SkyDipMethod2;
0015 SkyDipMethod3;
0016 
0017 CalcOpacity
0018 
0019 a = CalcOpacity - ZenithOpacityMethodOne;
0020 b = CalcOpacity - ZenithOpacityMethodTwo;
0021 c = CalcOpacity - ZenithOpacityMethodThree;
0022 
0023 a = sqrt(a^2);
0024 b = sqrt(b^2);
0025 c = sqrt(c^2);
0026 
0027 if a < b && a <c;
0028    
0029    display ('Zenith opacity has been calculated using')
0030    ZenithOpacityMethodOne
0031 
0032 end  
0033 
0034 if b < c && b < a;
0035    
0036    display('Zenith opacity has been calculated using')
0037    ZenithOpacityMethodTwo
0038     
0039 end 
0040 
0041 if c < b && c < a;
0042    
0043    display('Zenith opacity has been calculated using')
0044    ZenithOpacityMethodThree
0045     
0046 end 
0047 
0048