#!/usr/local/bin/ocamlrun T)*VD C 2" @(()*c( ` 5?[o n2$ ] 5?[] h `c]c(m] mh `cY 2!"Z(6 CyV([]()* ^()* ^()* ^()* ^(](]()* ^(](](](]I()* ^(](](]()* ^(c!](cC%c!c%C +I(c!](c!]L(]%g ^]("g ^](!&!&&^(g ^]("g ^(!&!&&^()* ]n}V5 % $)* ]n}V5 % `(h6 'h6')* _](]]()*c _()* ]n}V5% `()*]h `(V D C ]2%c(,c] %l6'l6')* _](6^(6^M(5 ^V5 ^V5%d(c(V5(5(5%()*] ] n] h ha ha(g u((m()* ^V(()* ^V((6@[6@[+ +6? + + + +livgTg>iv 6]>6]>6]>6]>6]>6 ]> +^+H +9+ + + ,c]i]j] + + + + ++z +l +_ +P +D +9"+ ,}%+,+ + + ++++~+r+b+R+=+. + + +? + + + 6!^ + + + + + + + + #! +p)(* +^. +R +I +=3 +. +!79 +< +A@B')+-/13579;=?ACTVXZ\^`bdfhjlnprvvvz|~>K;9"T)*V D 2&()*|V  $eq o  n n2  n2  n n$ )*c TC\ n^ n? T\C^ C_ C~V  C^"c C_ |Uc()* "._ {V ^2$ o$ _ {V ^ 2$ o$ )* nn  , ^^$)* + + ,O |V hh$ e q oh^ ^  h   h c h $)* " ^"^ _ 2' _()*Y #Z( CyV D _([)* " ^ _ 2&)*f q zVcT5#6 @[ ^"^ _ 2&h_( _()*Y"Z( CyVD ([)* nn ? {V0^ ^"h}V I^ C^"h}V IC( {V^ ^"( {V(@[)* + ,,, +\,Ok qh T\ ^  # ~Ucj T \ ^h ^  _h"" ~Uci{Vd ^h ^i _h _( )*? Oh T\C ^ " I ~UcC()*?hO T\^ C" I |UcC()*VD C _  2&(VD C h"^ ,i &:()*( ^ @ 2&,c O &)*O :(c ^ h " ^ i  T\^ " _  |Uc()*c O T\^ " |Uc()*O :(c ^ ! ^ i  T\^ ! _  |Uc()*c O T \^ ! |Uc()*O n}U  On}V5$8"% {V"h T\n ^ n_  ~Uc(c T\n ^ n_  |Uc()*  O n}V5%8"% n T \ _  |Uc()*  O n}V5&8"%:( ^ ^ i T\n^ _  |Uc(VD C O h ^ &2%:(, %)*V D C On2&()*V-D Ch O T\ ^ n_  |Uc On2&c()*, h "^ ,h "()*O O :(c T^ n^ h  T\^ _  |Ucc  T\^  n_  |Uc(O :(c ^ ^ i  T\^ _  |Uc()*: ^ h  T\^ Q |Uc()*:(c ! ^ i  T\! _  |Uc(+ + +p + + + +- + + +_ +$ + + + ,+v +0 +6'? +al  +  !$&(>9(T)*V D 2&()*VD C ( 2&5)8"%5*8"%)*V D C @ 2&(VD C 2! 8"&c()*VD C ! 2" @(c()*V D C ! 2&c()*VD C "2'()*VD C 2# &()* VVD C DC "  2# @( Uc(5+8"%)* VVD C DC " 2' Uc(5,8"%)* VVD C DC    # 2$U(5-8"%)* VV!D C DC    2   ' U(5.8"%)*VD C !V 2&(d()*VD C !U 2&(c()* VVD C DC "V 2' ( Ud(5/8"%)* VVD C DC "U 2' ( Uc(508"%)*VD C ^U 2&(c()*VD C yU 2&(c()*VD C D C ^V(2&5?[)*VD C D C yV(2&5?[)*VD C C ^U2&(c()*VD C C yU2&(c()*VD C C ^V(2" @(c()*VD C C yV(2" @(c()*VD C !V( 2&5?[VD C D C 2! D C @ @@(51()* VVD C DC 2" @@(Uc(528"%)*8( ! 8("%)*( yV^  ^@2' ^@2'O , h ')*VD C !V  @2' @2'! !@()*,hh ')*VD C !V  @2& 2&%,c %)* VVD C DC "@2' U(538"%)*, h ')*VD C !@2&()*,h &c &VD (548"%VC (558"%h&,Z+ + + ,[7" ,}+ , ,+ ,,,,+e ,,,,W,,,,,,,2,O,k,,,,+ + ,,+l +"  !#%')+.0/358:9>>BDCGIKM>')96Taz ((AZ  (('\ (57(58( 59(5:(]V d] h S(l]l\h Sgd ql0ni Sg l qrl0nj Sg rl0nk S(5;8"%(+ + +c +? >9<T)* ~V5?[ RyV(  2$)*5?[ RyV(  2')*h ')*] ~V5=8"%Y #cdZ(6 CyVc([)*] }V5>8"%Y   ]  cdZ(6 CyVc([)*] ~V5?8"% ')* ] ')*] }V5@8"% ] $)*h ] $8<&8<&)*](!h R !h S(8<&8<&)*] (]h  T\R! S |Uc(c?h ] TH\R   TTT ST TTeT ]VdTg Cn I |Uc] CyV(C]h Ic ] T\R " \1#=T+  3g\CSgnCSTgg\CSgtCSTVg\CSCSTF ]VCST7l\CSgd ql0nCSg l qrl0nCSg rl0nCS |Uac(]Cha]CnI]Cha]CnI(]CnI()*V?D Ch?h? +86 "C]p Cn] ]h ha]?  +86 "(5A()*c ] T \R ! |Uc()*] n}U ]n}V5B8"%a()* ] n}V5C8"% `()* ] n}V5D8"%] h a(] ] h ha()*] h `(+ + + + +T +1 + + +^ +R +G +) + + ,+ + ,"+ ++j +9 +,     "$&(>9ET!?[V +?&c&)* ^c(c]h] D C iv lqph? +lllllllllllllllllllll6F? +    "$&(*,.22664;>9GTA)*Dh C 8"/$)*E Dn}V " DC8">  Dn J()*Dh C $)*] Dn E }V "DCh 8E  J()*h}U h}U]n}V5H8"! Dn E }V "DC  8E  J()*D E ~Vd " C_ J()*E ? T\Cjp ICDn}UcC] Dhh C8E ICK(c JF IC] K(c J(D(Dh C8E'dT8G }V7GT ] h >(+ + + + + +o +O + + ++ +   >  9IT ~Vc( R %8I"2%043 $)*8I"1%)* "4%)* !4%)* ] ,c%  ~V 8I! 8I!(R % 8I"2%043$)*8I"1%)*h "8I"4%)*c !8I"4% ] 8I! ,c% 8"&8"& ~Vc( R %8"-"2%043 $)*8"."1%)* "4%)* !4%)* ] ,c%  @&)*R  T5W"T T 2+( 2& 3&   ^&   ^M& &yV  &   "&   ^&   ^^& i8E"& 8"!&)* '   ^t&)*R  STWTT]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]a]a]]]]e]]]]]]]]]]]]]]]]]]]aaa]]]]%]]]w]]6J&TJT8R  T;W!!%%%%%%%%%%%!%%%%!%%%%%!%%%%%!%%!TT+%(&T+(+(+(R  T;W!!%%%%%%%%%%%!%%%%!%%%%%!%%%%%!%%!TT+|(&R  T;W!!%%%%%%%%%%%!%%%%!%%%%%!%%%%%!%%!TT+(& +(+( +( +y(&)*,-h & )* }V8I%R * 8I"2&VD C 8"!8I"2&&)*V o 8I! ,86! & o 8E')*] ~Vh@(R 1:  ]o8E#]L@(-i2& 2&)*,Ydh"ZT6 CyVc "T[ D C ]{V5g 8E" V ]hh 8E T ] ]oh 8E (()* ]o 8E#6K8""8"%+ +~ + + + +N +C +%+  > 9LT)*VD C D C ^V( 2& 5?[7GO{V 8G^T5M W&?MC6N ^V5O ^V 6P8L#TcTcT6E D C   6Q8L TC 6R8L#TC 6S8L#T"5T ^U5U ^Vc8"G%e8"G%)*C  +f8GOTf\C8G^ ]5c ^-.Y "ZT6 CyV?!T[ YW"HCh !TCi ITCh ITCC{VC8G^ !TTTCC{VBC8G^ Y ]L!ZT'6 CyVD6V ^VT5W  A !T[TTOTQCC{VC8G^ ] !TT'T)C T\C8G^ !C{UcT?!ZT CyV D ?!T[T"Y !ZT CyV D ?!T[C{Uc(E C 6X8L')*6Y8L" +86 "Y 6Z"cZ(6 CyV"5[8L!Y 6\"cZ(6 CyV5]8L%[[5^? ,n+h? +  >9_TDC @I(I(c?6`? + + ?6a6b h 6cA@ 6dA@8_#C!C!C "86 & 7"< &""&)*! + &)*Y 8"<!ZT6 CyV5eT[ ^V%YT\c8"<!^UcZ(6 CyV5f8"%[c 8"B&"&)*! + &!&)*+ & &)*8"(! Y!8"6!Z( 8"6![)*8"8! Y!8"E!Z( 8"E![)*! 8"8! 8"(! #8"6!8"E%! "(5g 8"&)* 8"." &)*8"8! 8"(! "8"6!8"E%)*g] Y2T)\ gh  8"=  7"?[ h  8"/ dUcZ(8" CyVc([8"8! ! 8"E!(8"D!l] 8I! Y6T)\ gh  8"=  7"?[ h  8I dU8I!Z(8" CyV8I%[+ + +I +) + + + + + +  +  +p  +O +   ++ +v Yc!ZT6 CyVD6h8""8"#!d8"G!T[    >9ic8"J!:9jalloc_dummyupdate_dummyarray_get_addrarray_get_floatarray_getarray_set_addrarray_set_floatarray_setarray_unsafe_get_floatarray_unsafe_getarray_unsafe_set_addrarray_unsafe_set_floatarray_unsafe_setmake_vectmake_arraycompareequalnotequallessthanlessequalgreaterthangreaterequaloutput_valueoutput_value_to_stringoutput_value_to_bufferformat_floatfloat_of_stringint_of_floatfloat_of_intneg_floatabs_floatadd_floatsub_floatmul_floatdiv_floatexp_floatfloor_floatfmod_floatfrexp_floatldexp_floatlog_floatlog10_floatmodf_floatsqrt_floatpower_floatsin_floatsinh_floatcos_floatcosh_floattan_floattanh_floatasin_floatacos_floatatan_floatatan2_floatceil_floateq_floatneq_floatle_floatlt_floatge_floatgt_floatfloat_of_bytesclassify_floatgc_statgc_countersgc_getgc_setgc_minorgc_majorgc_full_majorgc_compactionhash_univ_paraminput_valueinput_value_from_stringmarshal_data_sizeint_of_stringformat_intint32_negint32_addint32_subint32_mulint32_divint32_modint32_andint32_orint32_xorint32_shift_leftint32_shift_rightint32_shift_right_unsignedint32_of_intint32_to_intint32_of_floatint32_to_floatint32_formatint32_of_stringint64_negint64_addint64_subint64_mulint64_divint64_modint64_andint64_orint64_xorint64_shift_leftint64_shift_rightint64_shift_right_unsignedint64_of_intint64_to_intint64_of_floatint64_to_floatint64_of_int32int64_to_int32int64_of_nativeintint64_to_nativeintint64_formatint64_of_stringint64_bits_of_floatint64_float_of_bitsnativeint_negnativeint_addnativeint_subnativeint_mulnativeint_divnativeint_modnativeint_andnativeint_ornativeint_xornativeint_shift_leftnativeint_shift_rightnativeint_shift_right_unsignednativeint_of_intnativeint_to_intnativeint_of_floatnativeint_to_floatnativeint_of_int32nativeint_to_int32nativeint_formatnativeint_of_stringcaml_open_descriptor_incaml_open_descriptor_outcaml_out_channels_listchannel_descriptorcaml_close_channelcaml_channel_sizecaml_set_binary_modecaml_flush_partialcaml_flushcaml_output_charcaml_output_intcaml_output_partialcaml_outputcaml_seek_outcaml_pos_outcaml_input_charcaml_input_intcaml_inputcaml_seek_incaml_pos_incaml_input_scan_linelex_enginemd5_stringmd5_changet_global_datareify_bytecoderealloc_globalget_current_environmentinvoke_traced_functionstatic_allocstatic_freestatic_resizeobj_is_blockobj_tagobj_blockobj_dupobj_truncateparse_engineinstall_signal_handlerml_string_lengthcreate_stringstring_getstring_setstring_equalstring_notequalblit_stringfill_stringis_printablebitvect_testsys_exitsys_opensys_closesys_file_existssys_removesys_renamesys_chdirsys_getcwdsys_getenvsys_get_argvsys_system_commandsys_timesys_random_seedsys_get_configterminfo_setupterminfo_backupterminfo_standoutterminfo_resumeregister_named_valueweak_createweak_setweak_getweak_get_copyweak_checkfinal_registerensure_stack_capacitydynlink_open_libdynlink_close_libdynlink_lookup_symboldynlink_add_primitivedynlink_get_current_libsw.-Out_of_memory)Sys_error'Failure0Invalid_argument+End_of_file0Division_by_zero)Not_found-Match_failure.Stack_overflow.Sys_blocked_io.Assert_failure,really_input%input@F@@G@&outputACDF@ACDG@%%.12g"%d%false$true.bool_of_string$true%false+char_of_int/Pervasives.Exit((((((<5Pervasives.do_at_exit@(array.ml*Array.blit*Array.fill)Array.sub,Array.Bottom@(List.nth#nth)List.map2*List.iter2/List.fold_left20List.fold_right2-List.for_all2,List.exists2@@,List.combine-List.rev_map2"tl"hd@"\'"\\"\n"\t(Char.chr@5String.rcontains_from4String.contains_from2String.rindex_from1String.index_from +String.blit+String.fill*String.sub@)Sys.Break@4Buffer.add_substring@!%3printf: bad format @#(?)&--help%-help9%s: unknown option `%s'. 1%s: wrong argument `%s'; option `%s' expects %s. #%s: option `%s' needs an argument. (%s: %s. %-help&--help-int_of_string*an integer( %s %s #%s %-help & -help display this list of options &--help & --help display this list of options 'Arg.Bad@&banner w : set the contents of file as the banner (default name for the banner file is "banner"). Usage: banner [-b | --banner ] This command adds a banner to the top of each file given in the list of argument files. The text of the banner is the contents of a that can be fixed with the [-b] option (default banner file name is "banner"). The text of a banner must be comprised between two identical lines, the ``banner markers'' (hence the first and the last lines of the banner file must be identical). Two banners are considered similar if they have the same banner markers. If a file already had a similar banner, this banner is removed before adding the contents of the . This way, slight modifications of the banner are easily handled. Prior to add a banner to the file "f", a checkpoint of "f" is written in the file named [f~].(--banner"-b 'replace_banner: end of banner not found!~-Fatal error: @@C5k@@*Add_bannerAi@A@#ArgA_@B@%ArrayAh@@&BufferAI@A@$CharA|@@$ListAv@ABC@*PervasivesAb@@&PrintfAL@A@(Std_exitAj@@&StringAE@AB@#SysAG@O-Match_failureAG@ACDP-Out_of_memoryA@@Q0Invalid_argumentAC@AR'FailureAB@S)Not_foundAF@AT)Sys_errorAA@BCU+End_of_fileAD@V0Division_by_zeroAE@AW.Stack_overflowAH@X.Sys_blocked_ioAI@Y.Assert_failureAJ@ABCDECODEDLPTDLLSPRIM DATASYMBCaml1999X007