#!/usr/local/bin/ocamlrun T)* VC D 2" @(()*c|Vc( `h yV5?[o n2$ ]h yV5?[c }V] h `c]c(m] mh `cY 2!"Z( 6 CyV(T[]()* ^()* ^()* ^()* ^(](]()* ^(](](](]G()* ^(](](]()* ^(c!](hC%h!c%C +I(]](h!](h!]J(]%l ^]("g ^](!&!&&^(l ^]("g ^(!&!&&^()*c {U ]n}V5 % $)*c {U ]n}V5 % `(h6 'h6 ')* _](]]()*c _()*c {U ]n}V5% `()*]h `(l6'l6')* _](6^(6^K(6 ^Vc(5 ^Vd(5%V5(5(c {Ug }V5%()*] ] n] h ha ha(g u(c ~V(m()* ^V(()* ^V((6@[6@[+ +6?6? + + + +hlivyVgTg>iv  +p +W +H +) + + ,c]i]j] + + + ++ + + + +t +i+G ,+,+  + + ++++++++r+b +Q +E +9+)? + + +  + + + + + + + + #! +)(* +. +x +o +c3 +T +G79 +6 +,?>@&(*,.02468:<>@BRTVXZ\^`bdhhhlnpuuuu>E59T))* V D 2&()*|V  $eq o  n n2  n2  n n$ )*c TE\ n^ n? T\C^ C_ C~Vc C^"}Uc C_ |Uc()*c "|V._ {V ^2$ o$ _ {V ^ 2$ o$ )* nn  , ^^$)* + + ,O |V hh$ e q oh^ ^  h   h c h $)* "h ^"}V^ _ 2' _()*Y #Z(  CyV D _(T[)* " ^ _ 2&)*f q YzZT hXV 58@[c ^"{V^ _c }V 2&h_( _()*Y"Z(  CyVD (T[)* nn ? {V0c ^ ^"{V Ic ^ C^"{V IC( {Vc ^ ^"{V( {V(@[)* + ,,,+V,Ok qh T\ ^  # ~Ucj T \ ^h ^  _h"" ~Ucd }Vd ^h ^i _h _( )*? Oh T\C ^ " I ~UcC()*?hO T\^ C" I |UcC()* VC D _ 2&(VC D h"^ ,i &:()*c {V( ^ @ 2&,c O &)*Oh yV:(c ^ h " ^ i  T\^ " _  |Uc()*c O T\^ " |Uc()*Oh yV:(c ^ ! ^ i  T\^ ! _  |Uc()*c O T \^ ! |Uc()*c{Uc {UO n}Uc{U On}V58% {V"h T\n ^ n_  ~Uc(c T\n ^ n_  |Uc()*c {Uc {U O n}V58% n T \ _  |Uc()*c {Uc {U O n}V58%c yV:( ^ ^ i T\n^ _  |Uc( VC Dh O}V h ^ &2%:(, %)* V C D On2&()* V-C Dh O T\^ n_  |Uc On2&c()*, h "^ ,h "()*O Oh yV c yV:(ch }VT^ n^ h  T\^ _  |Ucc  T\^  n_  |Uc(Oh yV:(c ^ ^ i  T\^ _  |Uc()*: ^ h  T\^ Q |Uc()*c yV:(c ! ^ i  T\! _  |Uc(+ + +n + + + +! + +q +N + + + + ,+b + +6 ? +Ll  +  !$&(>9!T)* V D 2&()* V C DhyV(c}V 2&5"8%5#8%)* V C D @ 2&( VC D 2! 8&c()* VC D ! 2" @(c()* V C D !2&c()* VC D "2' ()* VC D 2# &()* V!C D VC D  "  2# @( T  VTc(5$8%)* VC D VC D  " 2'T  VTc(5%8%)* V C D VC D    # 2$T  VT(5&8%)* V$C D VC D  2   'T  VT(5'8%)* VC D !V2&(d()* VC D !U2&(c()* V!C D VC D  "V 2'( T  VTd(5(8%)* V!C D VC D  "U 2'( T  VTc(5)8%)* VC D ^U2&(c()* VC D yU2&(c()* VC C D D ^V(2& 5?[)* VC C D D yV(2& 5?[)* VC C D ^U2&(c()* VC C D yU2&(c()* VC C D ^V(2" @(c()* VC C D yV(2" @(c()* VC D !V(2&5?[)* VC D !V @2'  @2' ! !@()*,hh ' VC C D D 2! C D @ @@( 5*()* VC D VC D 2" @@( T  VTc(5+8%)*8! ! 8!"%)*c |V( yV^  ^@2' ^@2'O , h ')* VC D !V  @2&2&%,c %)* VC D VC D  "@2'T  VT(5,8%)*, h ')* VC D  !@2&()*,h &c & VD (5-8% VC (5.8%h&,+ + + ,7 , + , ,(+ ,:,L,_,r+b ,,,,H,^,t,,,,,-,J,c,{,,+ ,,,+ +M  !#%')+.0/358:9>>BDCGIKM>')9/TG Fn(G Fn()* Gn D^(G Go ] h GDa(d M(dhhhhh]608 " +> ()*h 87$+%chllllll]l] "> ()*] "h }VTdMc G{VBEj p ] h DaJKFoLGnMGnMGnMEohD Da EoDhaFnLGoMGoMGoM(+i +G +< + + + + +    >91Tc(C%G oG oF^(G oG oE^(G F^(hG }VG G oE^(G F^()* G o D^()* ` W&*2:p!GFnMGFnM i2&?[c!cj2&c!ck2&YG C^!l@ZT  CyVcl@TTT[ C D 2&52G !cl2&]V  ]E^y( D^y()* ,QG G GGGGG MMY ch "Z( GM M MMMM CyVD ( +I[c(  cGhD8! cM(Gj ph ^ h ^ h ^ h^ hhC8! I hhD8! J hhE8! K hhF8! LM(53?64?hhhhhhhhhhhldhld^ hld^ hld^ hld^ > +n +T +M?  + +%+++++ +     > 95T'W 2C8%C8%C668!57 ^XV 8!588!D2%598!C2!5:8!D2!5;8%W C?(C?(c D C3#2!6<@(D2! C2!@()*W*C ^V?(?(C?( D 2# C@( D 2# C 2#@(W/5?C YC8/" 2!Z(6 CyVV5=8!?([C?(D2! C@(D2! C2!@(W C?%C?(D C@(C DV5>8! @!c8!2! ^V 4& 4"2%)*V%5?8!8!5@8!!5A8!!c8!W$(C yV(?( D2# C@( D2# C2#@()*V5B8!!g 8!!c8!W  !2& @(c D1'4! 4!@(V#C6C8!C8!5D8!D!c8!D2%(5E?h?i ,,I,,x,   >  9FT)* i85$5G8%e 85"h 85" (e 85"h 85" @(c 85" (c(e 85"h 85"6H8!8F!c8!7FC 8F! @@8FI(c 85" (c 85" (c 85" ?(d 85" (c 85" (e 85"h 85" @(d 85"h 85" @(d 85"h 85" @(c 85"85@[clhllllll> hl@6I6J6K6L6M6N6Ol 6P6Q + + + + +v +i +Z +M +@ + + + + + +>85    > + ?9RTOc 3&)* _ W "&)-1T*1%c(81!?(d(e(g(f(g(g(g( C! 2&5S?6T , >9UT:5V8!8F!8F!c8!8F!8F!6W8!8F!c8%8F!c8%Y:781! 8U8R" +8/ "7FC8F !c8!c8! +8/ "cZT?8U CyV35X8!7FC8/!8!5Y8!7FC8F !c8!5Z8!c8A!T[:9[c8D!:9\alloc_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_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_stringnativeint_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_descriptorchannel_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_globalavailable_primitivesget_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_checkfinal_registerWlt-Out_of_memory)Sys_error'Failure0Invalid_argument+End_of_file0Division_by_zero)Not_found-Match_failure.Stack_overflow.Sys_blocked_io,really_input%input@F@@G@&outputACDF@ACDG@%%.12g"%d%false$true.bool_of_string$true%false+char_of_int/Pervasives.Exit9Pervasives.Assert_failure@(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@ @,syntax error.Parsing.YYexit3Parsing.Parse_error@!\ !.!(! !) ,NotFound(e) &Eval: &Alpha ": $ -> &Beta: $let # = +Node.NoEval@&parser(Parsed: >> <   .  <  <.   @)Lexer.Eof::t::       @.Interpreting: (Result: *There are . in the list. (hmmm... @@`=]@@%ArrayAa@@%LexerAU@AB@&LexingAq@@$ListAo@@&LparseA[@ABC@$NodeAF@@&ParserAR@A@'ParsingAu@BD@*PervasivesA[@@(Std_exitA\@AO-Match_failureAG@BP-Out_of_memoryA@@Q0Invalid_argumentAC@ACR'FailureAB@S)Not_foundAF@AT)Sys_errorAA@BU+End_of_fileAD@V0Division_by_zeroAE@AW.Stack_overflowAH@X.Sys_blocked_ioAI@ABCDECODElPRIM DATAkSYMBtCaml1999X006