O}.xu  61L4,T6p.text4CZvC .data  ,Tۼl@.bss88.loader*.debug(: .except@:".3}1BP9 Pe)-1*@8`HA,A(| ~CxhpSN!A(AA(| QN!A(x9}sx}{x~xHa`@,AbDHA(| @__start!|A(( A X($Ad| DN!A(b (#Ac| CN!A(b((#Ac| CN!A(b0(#Ac| CN!A(b8(#Ac| CN!A(8!p}N 8!pN A__threads_init`|}&HTxp8@h`aXAP!H@80( aA:@!:: 998!`?88 P`_ "   ? _ ! #``? (_ $`HTq`;X8980:84888<8@H:H~x~8:D8(888h89~9>0~Rj Zbʘ2j˜4HuA(HA(8`8`88899>0HIA(`HA(88`88899 `HA(888X`!HA(H9A(8b:<;(9>88x889`HA(80888`H)A(84888`H A(88888`HA(8<888`HA(`!`HeA(8H8Hy`|`v;`(|`x,(@`8p8Hce`H`8p> (|`8 `H`8H8H`c8H `8H8H`|`v8|yxcH`|`v,(|{x;@(@ c:`88HcE`H9`#(8Zc|@cycCcc%H `P;`Z,8\@ccCceH`|P|z8 `H`8H8H)`8H8H`|`v;(|`x`,(@`88HcHu`#\(8;`8d`,@c[cceHA`|P||8 H`88`88899 `HA(8h8 8`HA(88h8`}8c8C 8`8(`H]A(HA(88`88899 HeA(8t8 8`HA(8988}8c8`C 88(HA(H=A(8 8`88899 `HA(88 8`HqA(88880`}8c8C 88(H%A(`!HA(8X8`88899 H)A(88 8`!HA(88 8`!HA(`!``H)A(8( 8>99?::@1:`v8`o  :x:9 8: ؒ_ 8p Ȑ b#88   <8 HaA(8b#8<`899 `H!A(88 88`HAA(HEA(,#A4,#@4x8b#888HA(88`88899 HA(888HUA(HA(888H8~889 P9?Lp9@Hm`L, @3T΀8p8А8`8֫89?Āȳؑ?9 ?_?_?THA(888`!HA(8г8 8`!`H]A(8X88`!HAA(88 8`!HA(<?X8X88`HA(`!``HeA(88 Hy`88 Hi`; 8`;8 `>HI`|`v8 |ex88H)`|ev8 |e(x8 x|)j;A0^H`|`v8 |yx8H`|`v|cx;|@ccC8c%HA`P::,8@cc#bH`|y> |P8 H`88 Ha`|`v8 |ex8;%HE`|`v;(|wx:`,(@c88`cDc`H~`#X(6cX`|@bc#8cH~m`|P> |y8 H`ca88`88899 `H!A(888HA(8:8X8~8c8C 88(HA(8X88`!HiA(8H88`!HMA(`!H~A(8`8(H`|`v8|{x8HH`|`vcd|fx8`8HH`@.08P8`88899 H~ A(8X88`!H~A(H~1A(88`88899 H}A(8L88`!H~iA(H}A(9v8x8;`ze`0`!@`!~(@,88`:`8hp~`,<`!~x@,\88`H~R8,<~@+88``zEz6d@~H(z>$z.8|Pz$8|eP~@"88}P;` }(!I_0PN^0@*88` 88~P;@8~# 8x~p@*88X~b88; 8 @ P~@)@88~x88;`8 HphHPP@~X@(|88 (~288:8 Px~@'88~H88:P08 @8X `Ph~(@&88~88:8 PxX`~@& 88(`~jH88 PP08.#@X(@%t88~88`p~x`h@$880P~Z88x@$0888`~j88@#88~888@ 0(H@"88,`! @"(_X0 |*@}8H9(?(|t?_8~ bH|"~q@8\`!|" 00``!}"(P_x}e/ hH(?}Ea}||ř||r@|r8|r}r0}*r?(}r|@ _}I8aK_aL}*raT|_|`} ,_| .}Jz|.`}k_`!|.``!}_~@t:`8| .|.};J}B| .|:8| .~}b}vZ| .,}UR|.|.~pbr~s~R|``A8|.| .| .| .|)|Ŋ|8c8|~<,A X`!8c8 }z`,A@ `>8}9I8o?9ia|Bb&b~R|L.|Z,`! `@d8c}R|Z@|%L.$|*8,`! | 78|?8 _A  | 7|?@(:98`9F~8 9g9(}"8|| .| }.af|R}J`! %,|).@| ;;;`@8|%.|@|'.|:`! |.}B,`|.|2A } ? ?T`!~7-@$8 88`88899 HMA(888`!HNMA(888`!HQA(888`!HNA(8888`HNA(8T88`!HMA(`!HMMA(;~v8~x>P{:d{#&8Hz#0XN_(8^@@8`!``@cD;@>8p8`h^~x@8`!P{ E{$6d@(^Z{#>${%.>H|P{$$88|eP"8:} }(2N"?P0@ 88`P8`8^>8`~*` ~ ~~xp@<89X^b8`8> 8~ ~ `~@p89x^8`8> 8h~x~`hp~HPX@@89X(^28`8> 8(~~~@880``^8`8>Pc88 8@~HX~0 ~(@88^8`8>c8 ~~~x@48`8 p8`88899 HIIA((888`!``HIA(888`!(HMqA((888`!HIA((`!HI-A(::(H@ pP?|"(`}I|Ū@_@908890|5?(0Xh`!|x8`!| @`!} ?H8`H `}j,_8?@(0@0?8|a|q} y}*}H}J~~ɪ}%:?}E2_ |@ `_|}}9}Yq}yy}:9|}})}J}k}9r:@:::`:@|;| .8:| .8}k| .|.9})| .}}J,|.||.}c~`!A8c8|~%,AH(`!8cH8(|*`,`A8(888`,@9 >9 : : 1:@v  :`x:98 8 8 <? 8_  c# `HFA(P;8 c#8889X9?PHEyA(c? _:8`~ p b|xP~@x|~"xdbb``!``HK A(:~޲bb8`,A HE1A(PXc#88 8899?PHDA(:b8 b|xP~b`HJqA(:~bb8`,A HDA( x?_X|h0|J(?|Z8P||Z? `!|tZ}|xP}:~K~2~&*`~"`~`c#X888 889P9?PHCA(:`b8 `~`bHIAA(:s~bb8`,A `HCeA(c#:`X88 P889P9?PHBA(8:`|rb ~"8baHHA(:s~bb8`,A `HBA(c#:`X88 889P9?PHBEA(8:`|zb ~"8baHHA(:s~bb8`,A `HB%A(c#:`X88 889P9?PHAA(8:`|b ~"8baHGaA(:s~bb8`,A ``HAA(c#:`X88 889P9?PHAA(8:`|b~"8b``!HFA(:s~bb8`,A``H@A(c#:`X880889P9?PH@eA(8:`|b~"8b```!HF!A(:s~bb8`,AH@MA(c#:`X88h889P9?PH?A(8:`|b~"8b```HEA(:s~bb8`,AH?A(~S8c~~ ~$~}z}r,Ap88`88899 H>A(8 88`!H?A(?888`!H?A(8888`!`H?eA(88`:8(`H?`|`v8(|ex8H?`|ev8(|f(x8|x|)j;0H?`|`v8(||x8H?`|`v|{x|@c|c8cH<`|}= |P8 H`88(H?=`|`vc|ex8H>uA(cAH=A(8c#888H>A(, @88,#`!@8P,#`!Z@8,#`!@8x,#`!b@8X,#`!@80,#`!2@`8,#`!@<8,#`!@8jKHpb9!a8`88l8899@H2A(|p|v`{$P|x_X{{C${D||c"cH@TKH8!}N 8@88@88`! H8hccH1`8`8::88 ;T`89;@!`|}&9ը 8NMB!:`?`!*8`!`!@X,@Lx.x$|dP|}8c(|8c`!``B@`!~ı8cC ~ı҈} TdATcMBQ@@~v8~x8xe$|hHcPx8`@|)j@8 `H0A(,6@`!!@\;`:V0VV)(A L3A@y0,#@(V>:8;:,6`AsWrMB,#MBQ@p;  W0W((L3@hsWMB,#LJ@; W@>| L@|x@,9A,9AD!!Aa |} N 8"8`8889) H/YA(!!AaK88`"8889) H/A(!!Aa``KHb8>9?!p8`88m8899@H.]A(|p},#@TW@>W>| LW> |` @,@$x.x$|P|}8@K|0@KpH.mA(KH.aA(K8>9?88`88m889p9@H-A(|p},6@; ;`@h;hV0VV(+A OFӂA@|x*,#@V>:,6@LK`H-A(``K8>9?88`88m889p9@H,A(|pH c -__read_diag_NMOD__xlfN19diag_data_name_listD1;`~|aA!9ը`p@!1`!`A 88y| 8`8c8`C 8`8BB88;T`~@ACHDAy`X`!,#@D|dvhX|{ x~`8;@{ce`P@88,;8`88`!B@H8Pxd|zP|dxd|`|`i`!88cC 8!}!AaN ``H*A(~8,#A$8,;88`!B@KX8>pb9!a8`88l8899@H*A(|p`X|dvh{d|{ x~`|c{ce`P@TK!8!}`!N h8@8h8@888`HUK"A-__read_diag_NMOD__xlfN19diag_data_chan_listC1`p`}`aA`W>!`|}&9ը 8NMB!:`?`!b8`!`!@X,@Lx.x$|dP|}8c(|8c`!``B@`!~ı8cC ~ı҈} TdATcMBQ@ x~v8~x8xe$|hcxp`@|)j@8X`H(A(,6@`!!@\;`BV0VV)(A L3ADy8,#@,V>B8;:,6`AsWrMB,#MBQ@p;  T0T((L3@hsWMB,#LJ@; W@>| L@|x@,9A,9AD!!Aa |} N 8"8`8889)H'YA(!!AaK88`"8889)H'A(!!Aa``KHb8>9?!p8`88m8899@H&]A(|p},#@TWC>W>|` LT> | @,@$x.x$|P|}8@K|0@KpH&mA( KH&]A(K8>9?88`88m889p9@H%A(|p},6@; ;`x;xV0VV(+A OFӂA@|x*,#@V>:,6@LK`H%A(``K8>9?88`88m889p9@H$A(|pH c -__read_diag_NMOD__xlfN19diag_data_chan_listD1;`|}&aA!;;;`;@``aAa!`xp8!q ;ը`!aИV؛a!AA(g `!,$```@8|c"|8c|+x|v|c 8|`P:,5@dg0||c"~`SBV@0VCVD(+A OFӂAs8,#@ V@>B~t:,5AV0V((L3@H8>9!88`88m889p9@H"A(|pq,#@ lV> Q 8x8`, Q `!~0Q ~vq~x(z>$z$|cQ@ 8:``!`:@,0Q @<8Pbcbq8@@K:8qx:1x8P8@`,0Ab-@:9@`!U0UU(+A OFӂA p,#@ U>byL:x8`8c|eo|vOoOp|xxd@ ,#@ :1O,AX@~,@7 V AtV 0(V (L3@H8>9!88`88m889p9@H A(|pw,#@ V > 8`W8vW xwW @xdw wHyF0`!|dv|c xw(|c8xd|"|@ D8W _~xyJ_`!|dv|c x`x~d`#`|`@8;_P8.5@_88`h`!HA(|tyA_,0d@8`8899 H A(a>@b888H A(c888`aHA(aH A(4,+`84 8 4848 4$ 8$(4,(8,04408484<88<@4D@8DH4LH8LP4TP8TX4\X8\`4d`8dAlb hlptb@8 |P | |:!>} }J|:|.|.}^Rx8x,|2`!$D`d ЄФA@8@4P808!^$!~,}|Z p}R!^(, 0}\R`|(.3,}B@| 8!>|:! }J]|+.3$}~Z|,.30@ @@x,e8|;.~|I.}>J|`|h.|.}^R}B|.|.}~Z%x8x|:`C`!eЅХ@@K,<`@8,4@p8`8!} |px!Aa!AaN bHA(88!} |KcHA(KLN@BA<@48s8 , | $|2!(| }J|*8`c#C AL8s|9<,`|8xd|*88`,a&@T@X`8`@}`,@$|.|289`,A|.:;Z|n}>Jx`,@K@8s8 0 $| (|2@!,|  }J|*8`c#C AL8s|A9<0`|8xd|*8<`,a&@P@X`8`}`,@$|.|289`,A|.:;Z|n}>Jx`,@Kh4lh8lp4tp8tK88899 H5A(a>@@8b88H=A(c888`aHA(8a8`!8HA(aHA(K 8>9!88`88l889p9@HA(|p_88`x`!HA(|ty@8>9!88`88l889p@9@HiA(|pH5A(||y@t8>9!88`88l889p9@`H A(|p```HA(w,#@8>9!88`88l889p9@HA(|pHA(KHiA(,#o@@8>9!88`88l889p9@HEA(|p 8>9! 88`88l8(89p9@HA(|pHmA(K@08>9!088`88m8889p9@HA(|pH}A(q|sy@T8>9!8@8`8@8l889p9@HQA(|pHA(KHA(K@8>9!@88`88m8H89p9@HA(|pH"C!__read_diag_NMOD_read_radiag_data``|aAaa<!;;```aA!xp89bը!   0q 8A Cae88c9889 `cCHA("c8X8aHHA(aHHA(, @s@ (0w|@  WAxW0(W(L3``@D!8>89!8`88m88p99@H5A(|pu,#@ W> :V0VAxV((L3``@D!8>89!8`88m88p99@HA(|p}0,#@ V>:`8,8` u :u 8u |v u|(xu0(x.@ 8:`!8r8}<:8`}PJ8 8` `!9};@|vH|x``!X@ x$x|c@ 8:`!0> y܁ਙ ,89DYPy\hytY9}x:y}": y(}, &y2}6$y(`<}@0:0y4F}J@98b98ը``@89`9B98aI88989) j j(j0j8H A(a|P88888`H EA(a`H A(8 8b;|8ը;x$x}'B8 |J,|:9$`!$`|``A8 9y|8yG$}9yJy $|Ry|:} B|:|B|"`!$dK؃L;yܨЀȨ訹c,̰XubPTyԀؐduhZ^ylurnvyxu|@:y`>@98b98ը`89`9B98aI88989) j j(j0j8H A(a|P88888`H 5A(aH A(8 8b;|8ը;x$x}'B8 |J,|:9$`!$|A$89y|8yG$}9yJy $|Ry|:} B|:|B|"`!$dKHA(}0|uy@P!08>9!088`88l8889p9@HA(|p`8>8! 9! 8`88l8(8p99@HA(|p```HMA(u|wy@0!8>9!88`88l889p9@H-A(|pHA(K|HA(K8ը8`888899 HA(ap8888H9A(8088`!apHEA(apb88H-A(apHA(`K8ը8`888899 HA(a`8 88`!HA(c88`!a`HA(a`8(88`!`HqA(8,a`88`!H}A(a`8088`!H9A(80a`88`!HEA(a`8888`!HA(8La`88`!``HA(a`8@88`!HA(8Ha`88`!HA(a`8H8 8`!HA(8Pa`88`!HA(a`8T88HUA(8Ta`88`!HaA(a``!HA(@, A 8ը8`888P8A99 H)A(ah8\8=8`!HA(88`ah8HA(8@ah88HA(ahHA(K8ըcC8888pHA(8ըcC88c899 HA(aP8888`HA(88 88`aPHA(8aP8 88`HaA(8aP888`HAA(8aP888`H!A(8aP888`HA(8aP888`HA(8aP888`HA(8aP888`HA(8aP888`HA(8aP888`HaA(aP``!H]A(, @Ā8ЁԨ!|`"9a؀ܐ~0a ~a~aĀ`>&~"a(~,<a48~@HLPDT`K8ը8`888899 `HA(aX88B8`!HA(aXH=A(@8!0}!Aa`!N  A#__read_diag_NMOD_read_radiag_header|fx|#x|3xH @bcopy @memmoveA( L| N A( L| N A( L| N A( L| N A( L| N A( L| N A( L| N A( L| N A( L| N A( L| N A( L| N A( L| N A( L| N A( L| N |v|x|v| x|||t||@,%,@L@``!98||88`( @( @888|}8,`( @ؠ( @8A,%@88|9`8},( @```!`( @H8@888|9$`8} `,( @K,%A<,$8A|`( M `N `K`K884|( @``!`@$48|8( @K,$8AK| |0|v|@y|0T} TA }$}%$0c|H@0AL , }IA %0c|H@0AL |$0M OA|+x|3xOB9 =) | T} TA}$0c|H@A@$, }IM 0c( AM LL!N @_clc A( L| N ('G@lg$r@0`*r`!B$`!)2AN ,`N 0N "@avgsdv0A( L| N 8A( L| N 9`|}&aA;;`!aA:@!xp`h``n`!A;H`? 9@PfH, H8`^? hP?X`hp|x^`~~`|v|Px |v)|8xx6dx& |2?|А$x(,0|1j4;Ap_8`^ x `; p89@9$9C?:_|`!8c@@X8pcX88@88@99>KA(8888K A(`!KA(8c@0X8tcX88P@88@99>KA(8888֐KyA(KA(8c@(x8xcx88@8899>K}A(8888KA(KA(`8c`@x8|cx8808899>KA(8888KeA(`KA(z.z$~@"8w(:(8(K `8x8K`8|8K`8p8K`8t8K`?b8(K`|`v8(|exb8 K`|ev8(|f(xb x|)j:pKi`|`v8(|sxbKQ`|`v`|cx`|:C8`|@bSbbeK`~SP: ~t,@bQbc8 b%Kq`|P|s8 H`b8(K`|`v8|ex8x8|v|(xK`|`v8(|exb|Ś88Ky`|`v8|ex8x8|v|(xKU`|`v8(|fxb| x|1j:ap`K!`8x8K`|`v8(|rxbK`|`v8|ex8x:%~ v~0xK`|`v|cx|:b`|@b/bcbaK)`~/P~z|b/@bOb8xaK`~OPc~z,@bQb8 b%K`|P|p8 H`b8(K!`|`v8|ex8x8|v|(xK`|`v8|ex8||Œ8|v|(xK`|`v8(|exb|Œ8PK`|`v8|ex8x8|v|(x`K`|`v8|ex8||Œ8|v|(xKa`|`v8(|fxb| x|1j:ApK1`8x8K!`8|8K`|`v8(|qxbK`|`v8|ex8x8|v|(xK`|`v8|ex8||ł:~v~xK`|`v|cx|z9a`|x@bbCbdaK`~xP}r|b@b.a8|aK`~.P:}r,@b0a8 bK`|P|o8 H`b8(K`|`v8|ex8x8|v|(xK`|`v8|ex8||Ŋ8|v|(xK`|`v8|ex8p|Ŋ8`|v`|(xK}`|`v8(|exb|Ŋ8hKY`|`v8|ex8x8|v|(xK5`|`v8|ex8||Ŋ8|v|(x`K `|`v8|ex8p|Ŋ8|v|(xK`|`v8(|fxb| x`|1j:!p`K`8x8K`8|8K`8p8Ky`|`v8(|nxbK]`|`v|cx8|v|x8x8K9`|`v8|ex8||ł8|v|(xK`|`v8|ex8p|ł:~v~xK`|`v|cx|z9a`|x@bb#bDa`K9`~xP|rb`|@a`8paK`~Pc,`}z@ba8 aK`|P|or8 H`b8(K`|`v8|ex8x8|v|(xK`|`v8|ex8||ł8|v|(xK`|`v8|ex8p|ł8|v|(xK`|`v8|ex8t|ł:K`z6dz&|`v|*|2:P|ox,P9@bab$bK`"P~b`|@ab8ta`K`~Pc~r,@bb8 aKq`|P|uz8 H`a`!9:,A88~(^@>X2Jb_ P8cCKe`cC8KU`;H|`v|`x,(@ `!8HcDK`; #N({r, @cYcccc%`K}`P;@;,8 @cc#cEKQ`|P?` |y8 H`9>P88889KA(8p88@8h| ``!8c8C 888(KYA(`!KA(9>x88889`nKA(KA(9>a88889KUA( H888`!KA(`KuA(8Ha889>89KA(8 X8 8 H A(88 X8 H A(88 88`KMA( `8 88`!K-A(P888`!K A(`!KA(9>8a8889K9A(KA(h;@,@  a? 8 $ ;%8; :::8899>@aa@7$@;9:`06`KA(ȓ_8888`KA(;8c88`!KA(Ȓ8888`KA(:8b88`!KA(8888`KA(:8b88`!K]A(`!KA(;Z;c88889,9>A;9>@88889KUA(KA(c@<* ;(;"<`eg 0: >: r:io@:@ :?9@99(c#888(88Y 9Y099Y8KA(h_S8888`!K5A(h`KA(z`6dzd&~`"8wP:P8PK`b8P``K`|fv|_|`0x:`C8,C8`!䐿@`beK` C8|`8 H`88`8899>hKA(h88| 8`8c`8C h88P88K A(hKA(;Zx9x,`A89>88889`n`KA(hP888`!KA(hK9A(9>a88889KA(PX888`!KEA(P`KA(9>8a8889KqA(KA(9>a8@8889`KAA(P8888``KA(8888`PKA(?8P8?88`KeA(_P888`~D`xd`|(P8|K)A(`8P888`KA(P`!`KA(9>0a8x8889`K%A(PH888KA(PKMA(`,@(pa_;`t@8| x$x$*; 8 K%`|`v;@P|cx~,P@`z88cE`K}` P8|`8 H`bc888899>X`K=A(H888P88PHA(88P88PHA(888P88`HKA(`:c8 KI`|`v8 |excK-`|ev8 |f(xc|x`|)j;!pK`|`v8 |xxcK`|`v|wx|b@cc#8bKE`|P|y8 `H`c8 K`|`vc$|exH88KA(cAHK5A(;:R,A8>pz9>88889`nKߡA(`KA(8 a888`!KA(! `h!xpaA!aA|} N x8|cx88h8899>(KA(88 88&|p|Bx}PKAA(KA(Kx8xcx888899>(K]A(8888|p|Bx}PKA(KiA(KX8tcX888899>KA(8888|p|Bx}PKIA(KA(`KX8pcX888899>KaA(8888|p|Bx}PKA(KmA(`K|p8(|x 8|P?8 0 `3H5`(.`0?8?K"ccreate_ctl_bcorXA( L| N |`8#`C c!888ap`!Ёp>6`!N6 (8@ *!(*!0*#8*!HA`88c`!H )`9x8|8 8@cA|t8atH m`; 3`+A  `!   !0}a~`&a68!P~`!N "Aw3movdat|``aA;!aA`8!xp8d;h`8!`;a|``!H`;{8|;{;8`,A;88aa8pAp3g}`]"=$~EA(7,S ~0s p`! 6ȡ@.F>ɡn H@Pa Ɂ0^f(08@H(!P( h@B0(`!z`!cH(`!: * !@!F!`HA(`s|`|P<`b8MT9<8a8tVp>h||6pt|*~2*!H=A(`r~ Tq>|c|P<`|`|``|d.pTx8a|8x}*HA(`n}To>|d|dP8||"Td||.p8a|"8|{*aHA(`<*0|g`h|P,|@|c}}1}_)|p}BT}(J|} R}<"|@ ,@} ,&} ~@0~`@`!!` A @a0a@``! >  > >@, @||)|ұ||2`@|`@,@<p` ||`'*||z|!|cP|P|c |caP|| P|`||1|t|P|P >|f |ca|+| `! > `! 8!}`hp!xAa!AaN xdp}|x&}&|c `!6 ||ȡ@.ȁ`& 6P|!|(P @|ȡP.` `!ȁ&0$$%*2K"Aw3reddat< `<<`8`%ELBA4% @||xN @@ e@^@#(!@AL@aM 8|N % <`A8|#xN "xA( L| N =*$|PPx&xj]$}h8PxgM|XP}PPxj6d|@Pxk&} 8Pxjd|RU+|c:T|gp||i(||p|c.p|B|Zxd|e"|P||p||(P|`!N  @iw3jdn= 9k9?.aAc!<`9C <`R`z<`y?d9#=W<`ff9Cfg|}`}~pW>{{td}{UdP{E|P{6dP{&|P9y>$;pP;{d{>$;P{.W|Жp`{\]${[M;P{X6dP{[&;P{Xdz|p|P;{6d{&W}$wP{&:P`W`}\P})X}J.p})p}j!{'{Aa}kPf|HP}&P%y.6d}^Py+&PPy>d}_U})R|(|0|*|p|"})px$}D(P|8|.p|jP|Z8xd|d8P|dp|d|(P|PN  @ w3fs26|!8appHiA(8!}N  A0errexitA( L| N A( L| N /gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/read_diag.f90>/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/read_diag.fIBX) data_fix%soi land_type = fix_ x_tmp(22) datadata_fix%sfc_wnd(iag1 = fix_tmp(2,26) if ( head0ag_1 ) then 4 data_fix%dtw 8 = rmiss_radiag <ag else d@data_fix%dtw = fDix_tmp(29) Hnd if ! TransfLre do ich=1,hePh)%tbobs =data_tT  ag else ddata_fix%dtw = fix_tmp(29) nd if ! Transf re do ich=1,heh)%tbobs =data_t=data_tmp(2,data_tmp(3,ich) >/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/read_diag.fIBbifixIBMREAD_RADIAG_HEADER: ***ERROR*** Unknown file format. Cannot readIBREAD_RADIAG_HEADER: isis=IB nchan=I npred=I angord= idiag=I iversion=IB inewpc=READ_RADIAG_HEADER: extra diagnostic information available, IBMiextra=IREAD_RADIAG_HEADER: **WARNING** header_fix%npred,npred=lat IBlon IBzsges IBobstim IBscanpos IBsatzen IBsatazm IBsolzen IBsolazm IBsungln IBfwater IBfland IBfice IBfsnow IBtwater IBtland IBtice IBtsnow IBtsoil IBsoilmoi IBlandtyp IBvegfrac IBsnowdep IBwndspd IBqc1 IBqc2 IBtref IBdtw IBdtc IBtz_tr IBobs IBomgbc IBomgnbc IBerrinv IBqcmark IBemiss IBtlap IBtb_tz IBbifix IBbilap IBbilap2 IBbicons IBbiang IBbiclw IBbisst IBDEALLOCATEIfDEALLOCATE/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/bcor.f90inputIsatnameIiyyIimmIiddIihhIidhhincrnchanlsuffiximkctlimkdataIretrievalI9/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/bcor.fIҀ/.@ IBM.ieee_dI.ctldiag_rad =IBdata_file=IBctl_file =IBsuffix =IBcall read_diag_headerIBM***ERROR*** problem reading diag file header, iflag=satype,dplat,n_chan=_IBMstring,satname=I***ERROR*** inconsistent instrument typesIBM satname,string =Iallocate arraysIcall create_ctl_bcorC4??}pdata_fix%land_frac,water,snow,ice = 57read in obs IBMnwater, nland, nice, nsnow, nmixed, ntotal = IBMnnwater, nnland, nnsnow, nnmixed, nntotal = IBM write output to lungrd=I, file=Ideallocate arraysIBM***PROBLEM reading diagnostic file. diag_rad=IB***ERROR*** invalid nchanl=I STOP programIBload missing value I into output arrays. IB into output arrays?/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/create_ctl_bcor.f90D/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/create_ctl_bcor.f /N /S /E /W  /dset ^-(/6 options template big_endian cray_32bit_ieee sequential/undef s /title s - -  /*XDEF is channel number 3/* x= is/ , channel= /  , iuse= /  , error= /  , wlth=  /  , freq=  /*YDEF is geographic region/ -P/xdef on/ linear 1.0 1.0/ydef on/ linear 1.0 1.0 /zdef 1 linear 1.0 1.0$/tdef 1 l/ linear /Z, iuse=-/ 06hr/ /vars 1 l- / 0 0 -  /endvars (-I, )I.ieee_dIF@* region=OY=?@(#)61 1.15 src/bos/usr/ccs/lib/libc/__threads_init.c, libcthrd, bos53H, h2006_10B1 3/5/06 16:44:58  vxP>vxP>vxP>vxP>vxP>vxP>vxP>vxP>vxP>v9xP>vExP>vNxP>X  4y3.%y4%m2%d2%h2 44444C4C4C4C4C4´´´´´BBBBB(   xvSxh9vTxh9vUxh9vYxh9vZxh9v[xh9vaxh9vgxh9vhxh9vixh9vjxh9vpxh9vqxh9vtxh9vxxh9vxh9vxh9vxh9vxh9vxh9vxh9vxh9vxh9v3xh9v4xh9v5xh9v6xh9v8xh9v:xh9vPxh9vRxh9vSxh9vUxh9vVxh9vWxh9vXxh9vYxh9vZxh9v[xh9v]xh9v^xh9vbxh9vcxh9vkxh9vlxh9vpxh9vtxh9v|xh9vxh9vxh9vxh9vxh9vxh9vxh9vxh9vxh9vxh9vxh9vxh9count penalty avgtotal avgfixang avglapse avglapse2 avgconst avgscangl avgclw sdvtotal sdvfixang sdvlapse sdvlapse2 sdvconst sdvscangl sdvclw global land water ice/snow mixed ̤ ̶̪̲̺̾  .%y4%m2%d2%h2janfebmaraprmayjunjulaugsepoctnovdecX(@8HPט(ظ @ڨ Pv@xhDvBxhDvExhDvGxhDvJxhDvLxhDvOxhDvQxhDv^xhDv_xhDv`xhDvaxhDvbxhDvfxhDvhxhDvjxhDvlxhDvnxhDvoxhDvpxhDvqxhDvrxhDvxhDvxhDvxhD<<LˀJ[Gj`Dz&\6`Q&\68  (P8h8XX,h8p۠6 ۰h 8@ @@%@ 2@ 9@ B@ M@\@y@@ @ @ @ @ @ @ @ @ @ $@ 3@ ?@ J@ _@ s@ ~@ @ 6p!  ? P? ? ? ?0?h????H??p??h??(?`????@?x??? ?X????8?p????P????0?h????H????(?`????@?x??? ? X? ? ?!?!8?!p?!?!?"?"P?"?"?"?#0?#h?#?#?*?*@?*p?*?*?+?+0?+`?+?+?+?+?,?, ?,0?,P?,`?-?-?-?.?.(?.P?.x?.?.?.?/?/@?/h?/?/?/?0?00?0X?0?1?1@?1x?1?1?2 ?2X?2?2?3?38?3p?3?3?4?4P?4?4?4?50?5h?5?5?6?6p?6x?6?6? 6? 6?6? 6?6?7?7? 7?7?7 ?7(?70?78?7@?7H?7P?7X?7`?7h?7p?7x?7? 7?7?7?7?7?7?7?7?7?7?7?7?7?7?7?8?8?/nwprod/lib:/usr/lpp/xlf/lib:/usr/lib:/liblibc.ashr_64.olibxlf90.aio_64.olibxlf90.amath_64.oerrno ___memmove64 ___fill64 __mod_initexit__free __malloc __n_pthreads__malloc_user_defined_name__crt0v _xlfReadUfmt_xlfReadUfmtDT _xlfBeginIO_xlfWriteLDInt_xlfWriteLDChar_xlfWriteLDReal _xlfEndIO_xlfGetErrorMsg1_xlfErrorExitWithLocexit_ _xlfWriteFmt _xlfIOCmd _xlfStop_xlfWriteUfmtArray_xlfReadUfmtArray _xladjtl_xlgetelemaddr _xlimdlo__start__default_char:t302=-5diag_header_fix_list:T7=s0;diag_header_chan_list:T10=s0;diag_data_name_list:T15=s0;diag_data_fix_list:T21=s0;diag_data_chan_list:T22=s0;diag_data_extra_list:T29=s0;:t1=-29:t2=-11:t3=-12:t4=-11:t6=-23 :t9=M-2;10 :t8=M-2;20diag_header_fix_list:t7=s88isis:8,0,160;id:9,160,80;obstype:9,240,80;jiter:-29,320,32;nchan:-29,352,32;npred:-29,384,32;idate:-29,416,32;ireal:-29,448,32;ipchan:-29,480,32;iextra:-29,512,32;jextra:-29,544,32;idiag:-29,576,32;angord:-29,608,32;iversion:-29,640,32;inewpc:-29,672,32;;diag_header_chan_list:t10=s32freq:-12,0,32;polar:-12,32,32;wave:-12,64,32;varch:-12,96,32;tlapmean:-12,128,32;iuse:-29,160,32;nuchan:-29,192,32;iochan:-29,224,32;;:t11=10 :t12=@R1;A11 :t13=@F;12:t14=13:t17=9:t18=@R1;@A;A9:t16=ar0;1;30;9;diag_data_name_list:t15=s360fix:16,0,17520;chn:18,2432,0;;:t5=-11 :t19=M-2;2jdiag_data_fix_list:t21=s120lat:-12,0,32;lon:-12,32,32;zsges:-12,64,32;obstime:-12,96,32;senscn_pos:-12,128,32;satzen_ang:-12,160,32;satazm_ang:-12,192,32;solzen_ang:-12,224,32;solazm_ang:-12,256,32;sungln_ang:-12,288,32;water_frac:-12,320,32;land_frac:-12,352,32;ice_frac:-12,384,32;snow_frac:-12,416,32;water_temp:-12,448,32;land_temp:-12,480,32;ice_temp:-12,512,32;snow_temp:-12,544,32;soil_temp:-12,576,32;soil_mois:-12,608,32;land_type:-12,640,32;veg_frac:-12,672,32;snow_depth:-12,704,32;sfc_wndspd:-12,736,32;qcdiag1:-12,768,32;qcdiag2:-12,800,32;tref:-12,832,32;dtw:-12,864,32;dtc:-12,896,32;tz_tr:-12,928,32;; :t23=-12:t24=@R1;@A;A-12diag_data_chan_list:t22=s120tbobs:-12,0,32;omgbc:-12,32,32;omgnbc:-12,64,32;errinv:-12,96,32;qcmark:-12,128,32;emiss:-12,160,32;tlap:-12,192,32;tb_tz:-12,224,32;bicons:-12,256,32;biang:-12,288,32;biclw:-12,320,32;bilap2:-12,352,32;bilap:-12,384,32;bifix:24,448,0;bisst:-12,896,32;;:t25=22 :t26=@R1;A25 :t27=@F;26:t28=27,diag_data_extra_list:t29=s4extra:-12,0,32;;:t30=29:t31=30 :t32=@R2;A31 :t33=@F;32:t34=33 :t20=-11 :t35=-12:t36=35:t37=@R2;@A;A-12 :t38=-12:t39=@R1;@A;A-12 :t40=-29 :t41=-29 :t42=-29 :t43=-29 :t44=-29:t303=Ziversion_radiag:c=i13784;iversion_radiag_1:c=i11104;iversion_radiag_2:c=i13784;ireal_radiag:c=i30;ipchan_radiag:c=i8;ireal_old_radiag:c=i26;!rmiss_radiag:c=r -9.8999999E+11;2__read_diag_NMOD__xlfN19diag_data_name_listC1:F-12__read_diag_NMOD__xlfN19diag_data_name_listD1:F-12__read_diag_NMOD__xlfN19diag_data_chan_listC1:F-12__read_diag_NMOD__xlfN19diag_data_chan_listD1:F-1'__read_diag_NMOD_read_radiag_data:F-11 :t304=@i;-29 ftin:v304 :t305=@i;7header_fix:v305 :t306=@i;-23retrieval:v306 :t307=@o;21data_fix:v307data_chan:v28data_extra:v34 :t308=@o;-29 iflag:v308ich:-29 iang:-29.bs data_tmp:V37 fix_tmp:V39.es)__read_diag_NMOD_read_radiag_header:F-11 :t309=@i;-29 ftin:v309 :t310=@i;-29npred_radiag:v310 :t311=@i;-23retrieval:v311 :t312=@o;7header_fix:v312header_chan:v14data_name:v15 :t313=@o;-29 iflag:v313:t314=@i;@l;-23lverbose:v314 string:19satid:9 sentype:9 sensat:8i:-29 jiter:-29 nchanl:-29 npred:-29 ianldate:-29 ireal:-29 ipchan:-29 iextra:-29 jextra:-29 loutall:-23__default_char:t374=-5diag_header_fix_list:T72=s0;diag_header_chan_list:T73=s0;diag_data_name_list:T78=s0;diag_data_fix_list:T82=s0;diag_data_chan_list:T83=s0;diag_data_extra_list:T90=s0;:t4=-29 :t5=M-2;10:t6=ar0;1;16;5 :t7=M-2;20 :t8=M-2;40:t9=ar0;1;5;8:t10=ar0;1;25;-29 :t11=-29:t12=@R1;@A;A-29 :t13=-29:t14=@R1;@A;A-29:t15=ar0;1;2;-12:t16=ar0;1;2;-12:t17=ar0;1;2;-12:t18=ar0;1;2;-12:t19=ar0;1;2;-12:t20=ar0;1;2;-12:t21=ar0;1;2;-12:t22=ar0;1;5;-12:t23=ar0;1;5;-12:t24=ar0;1;5;-12:t25=ar0;1;5;-12 :t26=-12:t27=@R1;@A;A-12 :t28=-12:t29=28:t30=@R2;@A;A-12 :t31=-12:t32=31:t33=@R2;@A;A-12 :t34=-12:t35=34:t36=@R2;@A;A-12 :t37=-12:t38=37:t39=@R2;@A;A-12 :t40=-12:t41=40:t42=@R2;@A;A-12 :t43=-12:t44=43:t45=44:t46=@R3;@A;A-12 :t47=-12:t48=47:t49=48:t50=@R3;@A;A-12 :t51=-12:t52=51:t53=52:t54=@R3;@A;A-12 :t55=-12:t56=55:t57=56:t58=@R3;@A;A-12 :t59=-12:t60=59:t61=60:t62=@R3;@A;A-12 :t63=-12:t64=63:t65=64:t66=@R3;@A;A-12 :t67=-12:t68=67:t69=68:t70=@R3;@A;A-12 :t71=-23diag_header_fix_list:t72=s88isis:7,0,160;id:5,160,80;obstype:5,240,80;jiter:-29,320,32;nchan:-29,352,32;npred:-29,384,32;idate:-29,416,32;ireal:-29,448,32;ipchan:-29,480,32;iextra:-29,512,32;jextra:-29,544,32;idiag:-29,576,32;angord:-29,608,32;iversion:-29,640,32;inewpc:-29,672,32;;diag_header_chan_list:t73=s32freq:-12,0,32;polar:-12,32,32;wave:-12,64,32;varch:-12,96,32;tlapmean:-12,128,32;iuse:-29,160,32;nuchan:-29,192,32;iochan:-29,224,32;;:t74=73 :t75=@R1;A74 :t76=@F;75:t77=76:t80=5:t81=@R1;@A;A5:t79=ar0;1;30;5;diag_data_name_list:t78=s360fix:79,0,27360;chn:81,2432,0;;jdiag_data_fix_list:t82=s120lat:-12,0,32;lon:-12,32,32;zsges:-12,64,32;obstime:-12,96,32;senscn_pos:-12,128,32;satzen_ang:-12,160,32;satazm_ang:-12,192,32;solzen_ang:-12,224,32;solazm_ang:-12,256,32;sungln_ang:-12,288,32;water_frac:-12,320,32;land_frac:-12,352,32;ice_frac:-12,384,32;snow_frac:-12,416,32;water_temp:-12,448,32;land_temp:-12,480,32;ice_temp:-12,512,32;snow_temp:-12,544,32;soil_temp:-12,576,32;soil_mois:-12,608,32;land_type:-12,640,32;veg_frac:-12,672,32;snow_depth:-12,704,32;sfc_wndspd:-12,736,32;qcdiag1:-12,768,32;qcdiag2:-12,800,32;tref:-12,832,32;dtw:-12,864,32;dtc:-12,896,32;tz_tr:-12,928,32;; :t84=-12:t85=@R1;@A;A-12diag_data_chan_list:t83=s120tbobs:-12,0,32;omgbc:-12,32,32;omgnbc:-12,64,32;errinv:-12,96,32;qcmark:-12,128,32;emiss:-12,160,32;tlap:-12,192,32;tb_tz:-12,224,32;bicons:-12,256,32;biang:-12,288,32;biclw:-12,320,32;bilap2:-12,352,32;bilap:-12,384,32;bifix:85,448,0;bisst:-12,896,32;;:t86=83 :t87=@R1;A86 :t88=@F;87:t89=88,diag_data_extra_list:t90=s4extra:-12,0,32;;:t91=90:t92=91 :t93=@R2;A92 :t94=@F;93:t95=94 bcor:F-29 ntype:c=i16;mregion:c=i25;surf_nregion:c=i5;iglobal:c=i1; iland:c=i2; iwater:c=i3;isnowice:c=i4; imixed:c=i5; satname:7 satsis:7dum:5 satype:5dplat:5 string:8 diag_rad:8 data_file:8 ctl_file:8 suffix:5 nregion:-29iyy:-29imm:-29idd:-29ihh:-29 idhh:-29 incr:-29 iread:-29 iflag:-29 n_chan:-29j:-29 idsat:-29k:-29ii:-29 nsub:-29jsub:10npred_radiag:-29 angord:-29pen:-12 rread:-12 weight:-12 rlat:-12 rlon:-12obs:-12 biascor:-12 obsges:-12obsgesnbc:-12 rterm:-12 cor_total:15cor_fixang:16 cor_lapse:17cor_lapse2:18 cor_const:19cor_scangl:20 cor_clw:21 no_obs:-23header_fix:72 data_name:78 data_fix:82 nsnow:-29 nland:-29 nwater:-29 nice:-29 nmixed:-29 ntotal:-29 nnsnow:-29 nnland:-29 nnwater:-29 nnmixed:-29 nntotal:-29 ftype:V6 stringd:V7 region:V9 luname:V-29 lungrd:V-29 lunctl:V-29 lndiag:V-29 io_chan:V12 nu_chan:V14 rmiss:V-12 rlatmin:V22 rlatmax:V23 rlonmin:V24 rlonmax:V25wavenumbr:V27 count:V30 error:V33use:V36frequency:V39 penalty:V42total_cor:V46fixang_cor:V50lapse_cor:V54lapse2_cor:V58const_cor:V62scangl_cor:V66 clw_cor:V70header_chan:V77data_chan:V89data_extra:V95retrieval:V-23 nchanl:V-29 imkctl:V-29 imkdata:V-29__default_char:t22=-5:t23=Z avgsdv:F-11 count:v-12 sum1:v-12 sum2:v-12 rmiss:v-12avg:-12sdv:-12 rterm1:-12 rterm2:-12 svar:-12__default_char:t116=-5 :t7=M-2;40 :t20=M-2;3:t21=ar0;1;12;20 :t22=M-2;4 :t23=M-2;13 :t24=M-2;80:t27=ar0;1;8;-29:t28=ar0;1;8;-29:t29=ar0;1;5;-12:t117=Zcreate_ctl_bcor:F-11 ntype:v-29:t6=ar0;1;T0;5 ftype:v6 n_chan:v-29 iyy:v-29 imm:v-29 idd:v-29 ihh:v-29 idhh:v-29 incr:v-29 ctl_file:v7 lunctl:v-29 satname:v8 satype:v5 dplat:v5 nregion:v-29:t9=ar0;1;T0;7 region:v9:t10=ar0;1;T0;-12 rlonmin:v10:t11=ar0;1;T0;-12 rlonmax:v11:t12=ar0;1;T0;-12 rlatmin:v12:t13=ar0;1;T0;-12 rlatmax:v13:t14=ar0;1;T0;-29 nu_chan:v14:t15=ar0;1;T0;-12use:v15:t16=ar0;1;T0;-12 error:v16:t17=ar0;1;T0;-12frequency:v17:t18=ar0;1;T0;-12wavenumbr:v18 cword:19 clatmin:20 clatmax:20 clonmin:22 clonmax:22 grad_file:7 string:24:t25=24 :t118=M-2;80 :t119=118:t120=@R1;A119 stringr:V120 iuse:-29 iyy2:-29 imm2:-29 idd2:-29 ihh2:-29 ntime:-29ida:27jda:28wavelength:-12fha:29mon:V21 stringd:V23__default_char:t16=-5:t17=Z errexit:F-11 iret:v-29 jret:-29__default_char:t20=-5:t21=Z iw3jdn:F-29 iw3jdn:-29 iyear:v-29 month:v-29 iday:v-29__default_char:t26=-5:t27=Z w3fs26:F-11 jldayn:v-29 idaywk:v-29 idayyr:v-29l:-29n:-29__default_char:t32=-5:t5=ar0;1;5;-12:t6=ar0;1;8;-29:t7=ar0;1;8;-29:t8=ar0;1;5;-12:t9=ar0;1;5;-12 :t10=-29:t33=Zw3movdat:F-11rinc:v5idat:v6jdat:v7rinc1:8rinc2:9 jldayn:-29 jdow:-29 jdoy:-29__default_char:t36=-5:t6=ar0;1;5;-12:t7=ar0;1;5;-29:t8=ar0;1;5;-29:t9=ar0;1;4;-29:t10=ar0;1;4;-29:t11=ar0;1;5;-29:t12=ar0;1;5;-29:t37=Zw3reddat:F-11it:v-29dinc:v6 np:c=i16;iinc:10jinc:11kinc:12ms:-29rp:-12itd:V7itm:V8itn:V9\   ` aP b dh h iT j &l0 n0 w w w xL x x yD y z A{ |@ $ h  6 : :p : ;0 ; ; <` < =( = = >` > ?( ? T U  U U V` V W( W W aL`>O@FH J J*68r~BvDPZn- 7D-P7x-pF7r-A$ADAdAx7, T,  L `, - F F 7 (- DF F 7 - F 0F @7 d- F F 7 DP l- U 7 P - F 7 <@ - F FF<F`Kx7 Lx, 8,l-FFFF7(@\ -F7-F7|%$-$4F$PZ$lZ$Z$Z$7%@P%d-%F%7%-%F%K&F&8Z&H7&l-&F&7&-&F&K'K'<K'`K'K'K'7'-(F(4K(TK(xK(K(K(7* ^*H^*x^*^*^+^+0^+-,F,7,P,--0_-d7---_.7.H-.x_.7.-/_/H7/x-/_/70-0P_070-0_1871h-1_172 -2@_2x73-38F3XK3xF3334444L,4\4xF474P4-4F475-58F5D76d6(6(6(6(6(7(7 (7(7$(70(7<(7H(7T(7`(7p(7-7F7789:::h:x::;(;4;;;<>X>h>>? ?0??-?F?7@-@ F@<F@XF@tF@7@@-@F@KA7AA@-A\FAxFA7APA-BFB$ZB@FBdKBKB7FD-FhFFZFFF7IPJ-Jx_J7J-K_KD7L -L@_Lx7L-L_M7MH-M_M7M-N _N\7N-N_N7O(-O`_O7O-O_P(7P-PFPKPFQQ,Q\QtQQ,QQFQ7RPR(S(S(S (S,(S8(SD(SP(S`(TTTTUU(UUUVVXVhVVW W0WWWX -X$FX@KXXFXd7XxYYLZ[[P\\]L^_P_#`P`,#`^P``(a(aPaHa(aPb bLcd6Pd`eLfgPg#hPh,#h^Phh(i(iPiLi(iPj jLkPl(mPn(oDo-o2o2o7pPqPsd(s(vX-vx2v2vPv2v7vPw w4wNPwwwPwwxPxDxP(x\xrPxxPxx(yPy<yHybPyy(y(yPyzL{-{P{ <{,7{|8LL-<7ZbbLzb-A7bLrbzLb-A7b"L`x((L-F8KPK\7nL-FFFKF8KTFxKFKFKFK,7BLd-FFK7LPL -,ULUlUUUUU U,ULUlU7VLx-F7(NRT>VfXZ\^`.dVf~hjltvxz|~4Pn-$A47-A7-<AH7-A7(8Ll0,@d,d,,Px,T,,T XhxT,0Xx0,<T,x-A7 -78-XAh7-iiAA A07T-\7-A@AdAAAA78-@7^-A7(L,-$A07x-A7-A7-$7L-xAAAA,A@7h-A7(,P-liiAH`,pA7-7P-A70-hAt7-A7,-dAp7<`sDsssN˜n* f? Pf? f? f? f?0f?hf?f?f?f?Hf?f?ph?h?hh?L?(L?`L?L?L?L?@L?xL?L?L? L?XL?L?L?L?8L?pL?L?L?L?PL?L?L?L?0L?hL?L?L?L?HL?L?L?L?(L?`L?L?L?L?@L?xL?L?L? L? XL? L? L?!L?!8L?!pL?!L?!L?"L?"PL?"L?"L?"L?#0L?#hL?#L?#L?*L?*@L?*pL?*L?*L?+L?+0L?+`L?+L?+N?+L?+L?,N?, L?,0N?,PL?,`N?-?-?-?.?.(?.P?.x?.?.?.?/?/@?/h?/?/?/?0?00?0X?0?1?1@?1x?1?1?2 ?2X?2?2?3?38?3p?3?3?4?4P?4?4?4?50?5h?5?5?6?6p?6xo#o$o%o&o%o&p'p(p'p (p)p*p)p*p +p$,p(+p,,p0-p4.p8-p<.p@/pD0pH/pL0pP1pT2pX1p\2p`3pd4ph3pl4pp5pt6px5p|6p7p8p7p8p9p:p9p:p;p<p;p<p>p?p@pApBpLq Uq$Mq(Nq0Mq4Oq8Pq@OqDQqHRqPQqTSqXTq\Sq`MqhUqlTqtNqxOqPqQqRqTqSqUqVqcqWqXqYqcq^qcqZqXrYr]r [r(]r,[r0]r4Xr@\rLYrT_rXar\`r`crhXrpcrtYr|XrZr[rZr\r]r\rYr]rXrZr[r\r]r^rrsss`spstsxssdsesksfsgsksfsgshtjtitjtktgt ht$jt(it,ktdmttotntotntotntqtptqtstyu tu(uu,yu0tu8uu<vuDxuHwuPxuTyu\uu`vudxuhwulyu{u}u|u}u|u}u|uv~vvDv Ev$Dv(Ev,Fv0Gv4Fv8Gv@vwww xP x\xyHy@ztzzz{4{@{H-{X2{d2{3{3|\5|6|5|6}49}<:}@8}H;}L<}P=}T>}X?}\@}`A}dB}hC}lD}pE}tF}x9}|:}6}8};}G}9};}6}8}<}8}9}<}8}9};}=}:}=}:}>~<~ =~?~ @~0>~4?~8A~HB~X@~\A~`C~pD~B~C~E~F~D~E~G~F~G~H~J~H~J~K~I~L~MNOP QRSTU W$X(K0G4I8L@IDJHLPITJXM`YdIhMpItLxNJKNJKOMNPQOPRSQRTU S$T(W8X@UDXHWLXPYTXXY`ZdYhZp`t[x\]^`Z[Z[YZ[\[\][\]^]^`abgcdfa geabc,d<eLaPfTa\b`fdbhcldpetfbfbgg $08DHLPhnjiklnmijikjkjl k$l0mDnXo\p`opop qpoqp0q4p\q`rdslrpstrsrsrsrsrsrstzvuwxzyuvuwv w(v0x8w<xHy\zp{t|x{ |{|}| {$}(|<}@|\}`~dl~pt~~~~~~6x532.l 4(@)   $(,048<@DHT `h|(X h   H " L# $ ' ( D* P0 X6 `0 h6 p0 t2 x6 2 0 2 6 2 3 4 3 4 3 68L9 :hBCDEDENOP\DRP\XU`WtVR\ZXUVYW\[XYZU\[WVRSRSRS\RXY [ZRSR$S(]@^fecdcecedfdcdfcdcdcd ef$c(d,c4d<cDdLfPcTdXc\d`cddlkpilikjkjlkhli ji j$k0j4l<jHlXj\mdjtmjmqyyzz{{yy|}}zz{~{|}}~  $(,048<@DHLP\`dptx  $(,08<HP`(,8@DHT\ $,048<@DHLT\`dlptx|    0                           !!!! !!!!! !$!(!,!0!4!8!<!@!D!H!L!P!T!X!\!`!d!h!l!p!t!x!|!!!!!!!!!!!!!!!!!!!!!!"""" """"" "$","0"8"D"H"L"X"\"`"l"p"t""""""""""""""""""### ### #,#0#4#@#D#H#T#\#l#x##################$$$$$$$$$$$$%%%%(%H%&P&''''''''''(()*(*P***++8+<+@+D+H+L+`+d+p+t++++,$,-l. . /P / 0 1@ 1234455L6W67777r7s8\9 U9W9(V9@U9D\9HX9LV9PW9TY9XX9\Y9`Z9hU9l[9p\9t[9xW9V9\9X9Y9[9Z9^9b9E>dD?;?<@=@+A ,A$AA!A"A'B)CD*CT)CX*F(/F0Gp1H2HT4Hx9H:H;H<H=H4H7H9H>H8H;H>H9H:H7H;H8H:H>H=H<H4H5H4H5H4H5H>I?I@IXBI\CIlBItCIDJEKGLHM IMJNdKOLOMP4NPxORPRRS7S8S9S:S;S<S=S>S7S9T8T ;T:T>T:T =T(<T0>T@@TP*W,)W#Xl$^  4 $<@HLT\<<T"#P'p(,L/l,6\789p:8;d<|?=>=>=?@?@ ?@AHBpDCDE8FTGHI,JHK]^0_a_di m*%          Œ”˜ , 04 8Hx  $(0 8@H LP X \` d l t x |                ,<<Ldhl<@H LTXh l  `0HP$,48DP TX |              $(,048HTX !( 0!4 8!%DHLPX\`dpx|   , ; K [ e v           "- 8 = D MZu6}k6k6uk6Zk6k6Mk6-k6k7k7Dk7k7vk7 k7(ek70=k78 k7@k7H[k7Pk7Xk7`k7h;k7p,k7xk7k7k7k7k7Kk7k7k7k7k7k7k7k7k7k7k7k8k88kg gk6p 66668g#=`k`e  ke6u66666lg5O?a,;Z.:EXl4AVt -:F[h}Yk59Y v4YdY4 4 @4 4 (4 @04 X4 tYdY v @ @ Ye\e]@ v @  ]@ebeb`( vA  b`edee@W v %A  % ;eLejej` v@AH@ qje      $ 6 I Z i uh  zez@ fAf zte ` h  &p 7 Jx Y m     i  & 5 C T b q eUPk  (k8k@RgO <\} 5J_t)>KWly$1=I^kw %1FS_k8NZfwkT9" LTJATJ`eN4 4 @4 4 4 04 4 4 !H2@MWd`pp}048<@DL T.=G U_jwH'5F X(i0{8@ P '6ETcsN (hH p,<@LX\l~`PX($`7G[m   Xeq(hkk8Xkqg.jOk9 ho\e08 @ H $ 3 ? K Z ieXk gjO v ,  !!!2k9  C !>4e(!W!f!y ! ! ! ! ! (! 0! 8! @! H $ P" X" `"# h"0"A p"T"b x"x" "" "" "" ## #6#B #X#f #|# ##p#t#x#|#H#$$ $)$:$H$[ G$l= $y$$$$$($$$ $$ e6hk 2,k X8pk@g&O% %%€k9€@ P%0Œe%Ap%O°e! gIO%\}%vk9  %e9%0%8%@%e>*gO%%k9  *%eI0&8%@%H%P&X&!&1&; =0eWLgXO&E&_&s&&&&&k9r L:&e-&&'''t')|'8x'Ee5{g|O'R&_'l'''''''k9 (wC(w^(0ej@(H&P($4 (0(>(J(V(b(my 8(x (( e۰k 6 kLg_xlirflr.fk9@ ۠kg_xljltrm.fk9J T g]A)dmv~  gYbYYYYYYYYYY Y Y Y Y Y Y *Y 4Y >Y HY RY \Y fY pY zY Y Y Y$ Y$ Y$ Y( Y( Y( Y, Y, Y, Y0 Y0 Y0 Y4 Y4 $Y4 .Y8 8Y8 BY8 LY< VY< `Y< jY@ tY@ ~Y@ YD YD YD YD  g  g( k((   g k(  g k(  g k( % g< k(< !* gd k(d &/ g k( +4 g ,k( ,09 g ?k( ?5> g Jk( J:C g, Zk(, Z?H gT hk(T hDM g| yk(| yIR g k( NW g k( S\ g k( Xa g k( ]f g k( bk g k( gp g k( l g k( q _xlfReadUfmt_xlfReadUfmtDT_xlfBeginIO_xlfWriteLDInt_xlfWriteLDChar_xlfWriteLDReal_xlfEndIO_xlfGetErrorMsg1_xlfErrorExitWithLocexit__xlfWriteFmt_xlfIOCmd_xlfStop_xlfWriteUfmtArray_xlfReadUfmtArray_xladjtl_xlgetelemaddr_xlimdloerrno___memmove64.___memmove64___fill64.___fill64__mod_initexit__free__malloc__n_pthreads__malloc_user_defined_name__crt0vTOC__C_runtime_pstartup_$STATIC_$STATIC_BSScrt0_64.s.__startp_xargcp_xargvp_xrcfgp_xrc.file../../../../../../../src/bos/usr/ccs/lib/libc/__threads_init.cTue Feb 12 10:37:47 2008 C for AIX Compiler Version 6.0.0.5 --- .__threads_init_malloc_user_defined_name__pth_init_routine_bsd_init_routine_xti_tli_init_routine_nsl_init_routine__dce_compat_init_routine/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/read_diag.f90Thu Apr 5 09:50:36 2012 IBM XL Fortran for AIX, V12.1 (5724-U82) Version 12.01.0000.0001.__read_diag_NMOD__&&_read_diag.bbread_diag.eb.__read_diag_NMOD__xlfN19diag_data_name_listC1.bf.ef.__read_diag_NMOD__xlfN19diag_data_name_listD1.__read_diag_NMOD__xlfN19diag_data_chan_listC1.__read_diag_NMOD__xlfN19diag_data_chan_listD1.__read_diag_NMOD_read_radiag_data.__read_diag_NMOD_read_radiag_header/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/bcor.f90Thu Apr 5 09:50:37 2012 .bcor.main/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/avgsdv.f90Thu Apr 5 09:50:38 2012 .avgsdv/gpfs/c/nco/ops/nwpara/sorc/gdas_verf_radbcor.fd/create_ctl_bcor.f90.create_ctl_bcor/gpfs/c/nco/ops/com/pmb/wx11jy/RFC/GRIB_UTILS/lib/sorc/w3/errexit.fTue Oct 18 14:38:55 2011 .errexit/gpfs/c/nco/ops/com/pmb/wx11jy/RFC/GRIB_UTILS/lib/sorc/w3/iw3jdn.fTue Oct 18 14:39:06 2011 .iw3jdn/gpfs/c/nco/ops/com/pmb/wx11jy/RFC/GRIB_UTILS/lib/sorc/w3/w3fs26.fTue Oct 18 14:39:41 2011 .w3fs26/gpfs/c/nco/ops/com/pmb/wx11jy/RFC/GRIB_UTILS/lib/sorc/w3/w3movdat.fTue Oct 18 14:39:57 2011 .w3movdat/gpfs/c/nco/ops/com/pmb/wx11jy/RFC/GRIB_UTILS/lib/sorc/w3/w3reddat.fTue Oct 18 14:39:59 2011 .w3reddatFri Nov 6 21:33:24 2009 IBM XL Fortran for AIX, V12.1 (5724-U82) Version 12.01.0000.0006._xlirflr._xljltrmmoveeq.s.bcopy.ovbcopy._moveeq.memcpy.memmovenoname.fsav.$SAVEF14.Ssavef14._savef14.$SAVEF15.Ssavef15._savef15.$SAVEF16.Ssavef16._savef16.$SAVEF17.Ssavef17._savef17.$SAVEF18.Ssavef18._savef18.$SAVEF19.Ssavef19._savef19.$SAVEF20.Ssavef20._savef20.$SAVEF21.Ssavef21._savef21.$SAVEF22.Ssavef22._savef22.$SAVEF23.Ssavef23._savef23.$SAVEF24.Ssavef24._savef24.$SAVEF25.Ssavef25._savef25.$SAVEF26.Ssavef26._savef26.$SAVEF27.Ssavef27._savef27.$SAVEF28.Ssavef28._savef28.$SAVEF29.Ssavef29._savef29.$SAVEF30.Ssavef30._savef30.$SAVEF31.Ssavef31._savef31._savef3clc.s._clcglink64.s.exit.__malloc._xlfErrorExitWithLoc._xlgetelemaddr._xlfGetErrorMsg1.__free._xlfBeginIO._xlfReadUfmtArray._xlfEndIO._xlfReadUfmtDT._xlfWriteFmt._xlfWriteLDChar._xlfWriteLDInt._xlfIOCmd._xlfReadUfmt._xlfWriteLDReal._xlfWriteUfmtArray._xlfStop._xladjtl.exit_._xlimdlo