API tools faq
paste
Advertisement
Guest User

Untitled

a guest
May 17th, 2017
96
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 127.62 KB | None | 0 0
raw download clone embed print report
  1. 13:38 $ mono ../fsharp/Release/net40/bin/fsi.exe
  2.  
  3. F# Interactive for F# 4.1
  4. Freely distributed under the Apache 2.0 Open Source License
  5.  
  6. For help type #help;;
  7.  
  8. > open System
  9. open System.Reflection
  10. open System.Reflection.Emit
  11. let assemblyBuilder1028156023 = System.AppDomain.CurrentDomain.DefineDynamicAssembly(AssemblyName(Name="FSI-ASSEMBLY"),enum 3,".")
  12. let moduleBuilder430293066 = assemblyBuilder1028156023.DefineDynamicModule("FSI-ASSEMBLY","FSI-ASSEMBLY.dll",true)
  13. let typeBuilder469169281 = moduleBuilder430293066.DefineType("FSI_0001",enum 385)
  14. moduleBuilder430293066.GetType("FSI_0001",false,false) |> ignore
  15. let typeBuilder1562124200 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0001>.$FSI_0001",enum 384)
  16. moduleBuilder430293066.GetType("<StartupCode$FSI_0001>.$FSI_0001",false,false) |> ignore
  17. typeBuilder469169281.SetParent(typeof<System.Object>)
  18. typeBuilder1562124200.SetParent(typeof<System.Object>)
  19. let methodBuilder569342189 = typeBuilder1562124200.DefineMethod("main@",enum 22,enum 1)
  20. methodBuilder569342189.SetParameters([||])
  21. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  22. methodBuilder569342189.SetImplementationFlags(enum 0)
  23. typeBuilder469169281.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  24. let ilg1459150094 = methodBuilder569342189.GetILGenerator()
  25. let label1459150094_0 = ilg1459150094.DefineLabel()
  26. let label1459150094_1 = ilg1459150094.DefineLabel()
  27. let label1459150094_2 = ilg1459150094.DefineLabel()
  28. ilg1459150094.Emit(OpCodes.Nop)
  29. ilg1459150094.MarkLabel(label1459150094_2)
  30. ilg1459150094.MarkLabel(label1459150094_1)
  31. ilg1459150094.MarkLabel(label1459150094_0)
  32. ilg1459150094.Emit(OpCodes.Ret)
  33. typeBuilder469169281.CreateType()
  34. typeBuilder1562124200.CreateType()
  35. typeBuilder2078651136.CreateType()
  36. typeBuilder2049352408.CreateType()
  37. typeBuilder2049352408.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  38. - open Syste.IO;;
  39. open Syste.IO;;
  40. -----^^^^^
  41.  
  42. /Users/jason/src/fsharp739/stdin(1,6): error FS0039: The namespace or module 'Syste' is not defined. Maybe you want one of the following:
  43. System
  44.  
  45. > open System.IO;;
  46. let typeBuilder1513345341 = moduleBuilder430293066.DefineType("FSI_0003",enum 385)
  47. moduleBuilder430293066.GetType("FSI_0003",false,false) |> ignore
  48. let typeBuilder1789723055 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0003>.$FSI_0003",enum 384)
  49. moduleBuilder430293066.GetType("<StartupCode$FSI_0003>.$FSI_0003",false,false) |> ignore
  50. typeBuilder1513345341.SetParent(typeof<System.Object>)
  51. typeBuilder1789723055.SetParent(typeof<System.Object>)
  52. let methodBuilder569342189 = typeBuilder1789723055.DefineMethod("main@",enum 22,enum 1)
  53. methodBuilder569342189.SetParameters([||])
  54. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  55. methodBuilder569342189.SetImplementationFlags(enum 0)
  56. typeBuilder1513345341.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  57. let ilg627633359 = methodBuilder569342189.GetILGenerator()
  58. let label627633359_0 = ilg627633359.DefineLabel()
  59. let label627633359_1 = ilg627633359.DefineLabel()
  60. let label627633359_2 = ilg627633359.DefineLabel()
  61. ilg627633359.Emit(OpCodes.Nop)
  62. ilg627633359.MarkLabel(label627633359_2)
  63. ilg627633359.MarkLabel(label627633359_1)
  64. ilg627633359.MarkLabel(label627633359_0)
  65. ilg627633359.Emit(OpCodes.Ret)
  66. typeBuilder1513345341.CreateType()
  67. typeBuilder1789723055.CreateType()
  68. typeBuilder2049353104.CreateType()
  69. typeBuilder2059732376.CreateType()
  70. typeBuilder2059732376.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  71. > type Observation = { Label:string; Pixels:int[] };;
  72. let typeBuilder22988282 = moduleBuilder430293066.DefineType("FSI_0004",enum 385)
  73. moduleBuilder430293066.GetType("FSI_0004",false,false) |> ignore
  74. let typeBuilder980813727 = typeBuilder22988282.DefineNestedType("Observation",enum 8450)
  75. moduleBuilder430293066.GetType("FSI_0004+Observation",false,false) |> ignore
  76. let typeBuilder1856045891 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0004>.$FSI_0004",enum 384)
  77. moduleBuilder430293066.GetType("<StartupCode$FSI_0004>.$FSI_0004",false,false) |> ignore
  78. typeBuilder22988282.SetParent(typeof<System.Object>)
  79. typeBuilder980813727.SetParent(typeof<System.Object>)
  80. typeBuilder1856045891.SetParent(typeof<System.Object>)
  81. typeBuilder980813727.AddInterfaceImplementation(System.IEquatable`1[FSI_0004+Observation])
  82. typeBuilder980813727.AddInterfaceImplementation(System.Collections.IStructuralEquatable)
  83. typeBuilder980813727.AddInterfaceImplementation(System.IComparable`1[FSI_0004+Observation])
  84. typeBuilder980813727.AddInterfaceImplementation(System.IComparable)
  85. typeBuilder980813727.AddInterfaceImplementation(System.Collections.IStructuralComparable)
  86. let methodBuilder298307973 = typeBuilder980813727.DefineMethod("get_Label",enum 2182,enum 32)
  87. methodBuilder298307973.SetParameters([||])
  88. methodBuilder298307973.SetReturnType(typeof<System.String>)
  89. methodBuilder298307973.SetImplementationFlags(enum 0)
  90. let methodBuilder771301806 = typeBuilder980813727.DefineMethod("get_Pixels",enum 2182,enum 32)
  91. methodBuilder771301806.SetParameters([||])
  92. methodBuilder771301806.SetReturnType(typeof<System.Int32[]>)
  93. methodBuilder771301806.SetImplementationFlags(enum 0)
  94. let constructorBuilder91382678 = typeBuilder980813727.DefineConstructor(enum 2054,CallingConventions.HasThis,[|System.String; System.Int32[]|])
  95. constructorBuilder91382678.SetImplementationFlags(enum 0)
  96. let methodBuilder891462610 = typeBuilder980813727.DefineMethod("ToString",enum 582,enum 32)
  97. methodBuilder891462610.SetParameters([||])
  98. methodBuilder891462610.SetReturnType(typeof<System.String>)
  99. methodBuilder891462610.SetImplementationFlags(enum 0)
  100. let methodBuilder2129836076 = typeBuilder980813727.DefineMethod("CompareTo",enum 230,enum 32)
  101. methodBuilder2129836076.SetParameters([|FSI_0004+Observation|])
  102. methodBuilder2129836076.SetReturnType(typeof<System.Int32>)
  103. methodBuilder2129836076.SetImplementationFlags(enum 0)
  104. let methodBuilder2129836076 = typeBuilder980813727.DefineMethod("CompareTo",enum 230,enum 32)
  105. methodBuilder2129836076.SetParameters([|System.Object|])
  106. methodBuilder2129836076.SetReturnType(typeof<System.Int32>)
  107. methodBuilder2129836076.SetImplementationFlags(enum 0)
  108. let methodBuilder2129836076 = typeBuilder980813727.DefineMethod("CompareTo",enum 230,enum 32)
  109. methodBuilder2129836076.SetParameters([|System.Object; System.Collections.IComparer|])
  110. methodBuilder2129836076.SetReturnType(typeof<System.Int32>)
  111. methodBuilder2129836076.SetImplementationFlags(enum 0)
  112. let methodBuilder481831937 = typeBuilder980813727.DefineMethod("GetHashCode",enum 230,enum 32)
  113. methodBuilder481831937.SetParameters([|System.Collections.IEqualityComparer|])
  114. methodBuilder481831937.SetReturnType(typeof<System.Int32>)
  115. methodBuilder481831937.SetImplementationFlags(enum 0)
  116. let methodBuilder481831937 = typeBuilder980813727.DefineMethod("GetHashCode",enum 230,enum 32)
  117. methodBuilder481831937.SetParameters([||])
  118. methodBuilder481831937.SetReturnType(typeof<System.Int32>)
  119. methodBuilder481831937.SetImplementationFlags(enum 0)
  120. let methodBuilder1014339031 = typeBuilder980813727.DefineMethod("Equals",enum 230,enum 32)
  121. methodBuilder1014339031.SetParameters([|System.Object; System.Collections.IEqualityComparer|])
  122. methodBuilder1014339031.SetReturnType(typeof<System.Boolean>)
  123. methodBuilder1014339031.SetImplementationFlags(enum 0)
  124. let methodBuilder1014339031 = typeBuilder980813727.DefineMethod("Equals",enum 230,enum 32)
  125. methodBuilder1014339031.SetParameters([|FSI_0004+Observation|])
  126. methodBuilder1014339031.SetReturnType(typeof<System.Boolean>)
  127. methodBuilder1014339031.SetImplementationFlags(enum 0)
  128. let methodBuilder1014339031 = typeBuilder980813727.DefineMethod("Equals",enum 230,enum 32)
  129. methodBuilder1014339031.SetParameters([|System.Object|])
  130. methodBuilder1014339031.SetReturnType(typeof<System.Boolean>)
  131. methodBuilder1014339031.SetImplementationFlags(enum 0)
  132. let fieldBuilder421721425 = typeBuilder980813727.DefineField("Label@",typeof<System.String>,enum 3)
  133. let fieldBuilder1202562495 = typeBuilder980813727.DefineField("Pixels@",typeof<System.Int32[]>,enum 3)
  134. typeBuilder980813727.DefineProperty(""Label"",enum 0,typeof<System.String>,[||])
  135. typeBuilder980813727.DefineProperty(""Pixels"",enum 0,typeof<System.Int32[]>,[||])
  136. let methodBuilder569342189 = typeBuilder1856045891.DefineMethod("main@",enum 22,enum 1)
  137. methodBuilder569342189.SetParameters([||])
  138. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  139. methodBuilder569342189.SetImplementationFlags(enum 0)
  140. typeBuilder22988282.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  141. let ilg304548258 = methodBuilder298307973.GetILGenerator()
  142. ilg304548258.Emit(OpCodes.Ldarg, int16 0)
  143. ilg304548258.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  144. ilg304548258.Emit(OpCodes.Ret)
  145. let ilg1522739917 = methodBuilder771301806.GetILGenerator()
  146. ilg1522739917.Emit(OpCodes.Ldarg, int16 0)
  147. ilg1522739917.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  148. ilg1522739917.Emit(OpCodes.Ret)
  149. constructorBuilder91382678.DefineParameter(1,enum 0,"label")
  150. constructorBuilder91382678.DefineParameter(2,enum 0,"pixels")
  151. ilg2114022140.Emit(OpCodes.Ldarg, int16 0)
  152. ilg2114022140.Emit(OpCodes.Call,constructor_Object)
  153. ilg2114022140.Emit(OpCodes.Ldarg, int16 0)
  154. ilg2114022140.Emit(OpCodes.Ldarg, int16 1)
  155. ilg2114022140.Emit(OpCodes.Stfld, fieldBuilder421721425) // field Label@
  156. ilg2114022140.Emit(OpCodes.Ldarg, int16 0)
  157. ilg2114022140.Emit(OpCodes.Ldarg, int16 2)
  158. ilg2114022140.Emit(OpCodes.Stfld, fieldBuilder1202562495) // field Pixels@
  159. ilg2114022140.Emit(OpCodes.Ret)
  160. let ilg1230371896 = methodBuilder891462610.GetILGenerator()
  161. ilg1230371896.Emit(OpCodes.Ldstr,"@%+A")
  162. ilg1230371896.Emit(OpCodes.Newobj,constructor_PrintfFormat`5)
  163. ilg1230371896.Emit(OpCodes.Call, methodBuilder1916221604) // method PrintFormatToString
  164. ilg1230371896.Emit(OpCodes.Ldarg, int16 0)
  165. ilg1230371896.Emit(OpCodes.Callvirt, methodBuilder8470992) // method Invoke
  166. ilg1230371896.Emit(OpCodes.Ret)
  167. methodBuilder891462610.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  168. methodBuilder2129836076.DefineParameter(1,enum 0,"obj")
  169. let ilg1245631380 = methodBuilder2129836076.GetILGenerator()
  170. ilg1245631380.DeclareLocal(typeof<System.Int32>,false)
  171. ilg1245631380.DeclareLocal(typeof<System.Collections.IComparer>,false)
  172. let label1245631380_0 = ilg1245631380.DefineLabel()
  173. let label1245631380_1 = ilg1245631380.DefineLabel()
  174. let label1245631380_2 = ilg1245631380.DefineLabel()
  175. let label1245631380_3 = ilg1245631380.DefineLabel()
  176. let label1245631380_4 = ilg1245631380.DefineLabel()
  177. let label1245631380_5 = ilg1245631380.DefineLabel()
  178. let label1245631380_6 = ilg1245631380.DefineLabel()
  179. let label1245631380_7 = ilg1245631380.DefineLabel()
  180. let label1245631380_8 = ilg1245631380.DefineLabel()
  181. let label1245631380_9 = ilg1245631380.DefineLabel()
  182. let label1245631380_10 = ilg1245631380.DefineLabel()
  183. let label1245631380_11 = ilg1245631380.DefineLabel()
  184. let label1245631380_12 = ilg1245631380.DefineLabel()
  185. let label1245631380_13 = ilg1245631380.DefineLabel()
  186. let label1245631380_14 = ilg1245631380.DefineLabel()
  187. let label1245631380_15 = ilg1245631380.DefineLabel()
  188. let label1245631380_16 = ilg1245631380.DefineLabel()
  189. let label1245631380_17 = ilg1245631380.DefineLabel()
  190. let label1245631380_18 = ilg1245631380.DefineLabel()
  191. let label1245631380_19 = ilg1245631380.DefineLabel()
  192. let label1245631380_20 = ilg1245631380.DefineLabel()
  193. let label1245631380_21 = ilg1245631380.DefineLabel()
  194. let label1245631380_22 = ilg1245631380.DefineLabel()
  195. let label1245631380_23 = ilg1245631380.DefineLabel()
  196. let label1245631380_24 = ilg1245631380.DefineLabel()
  197. let label1245631380_25 = ilg1245631380.DefineLabel()
  198. let label1245631380_26 = ilg1245631380.DefineLabel()
  199. let label1245631380_27 = ilg1245631380.DefineLabel()
  200. let label1245631380_28 = ilg1245631380.DefineLabel()
  201. let label1245631380_29 = ilg1245631380.DefineLabel()
  202. let label1245631380_30 = ilg1245631380.DefineLabel()
  203. let label1245631380_31 = ilg1245631380.DefineLabel()
  204. let label1245631380_32 = ilg1245631380.DefineLabel()
  205. let label1245631380_33 = ilg1245631380.DefineLabel()
  206. let label1245631380_34 = ilg1245631380.DefineLabel()
  207. let label1245631380_35 = ilg1245631380.DefineLabel()
  208. let label1245631380_36 = ilg1245631380.DefineLabel()
  209. let label1245631380_37 = ilg1245631380.DefineLabel()
  210. let label1245631380_38 = ilg1245631380.DefineLabel()
  211. let label1245631380_39 = ilg1245631380.DefineLabel()
  212. let label1245631380_40 = ilg1245631380.DefineLabel()
  213. let label1245631380_41 = ilg1245631380.DefineLabel()
  214. let label1245631380_42 = ilg1245631380.DefineLabel()
  215. let label1245631380_43 = ilg1245631380.DefineLabel()
  216. let label1245631380_44 = ilg1245631380.DefineLabel()
  217. let label1245631380_45 = ilg1245631380.DefineLabel()
  218. let label1245631380_46 = ilg1245631380.DefineLabel()
  219. let label1245631380_47 = ilg1245631380.DefineLabel()
  220. let label1245631380_48 = ilg1245631380.DefineLabel()
  221. let label1245631380_49 = ilg1245631380.DefineLabel()
  222. let label1245631380_50 = ilg1245631380.DefineLabel()
  223. let label1245631380_51 = ilg1245631380.DefineLabel()
  224. let label1245631380_52 = ilg1245631380.DefineLabel()
  225. let label1245631380_53 = ilg1245631380.DefineLabel()
  226. let label1245631380_54 = ilg1245631380.DefineLabel()
  227. let label1245631380_55 = ilg1245631380.DefineLabel()
  228. let label1245631380_56 = ilg1245631380.DefineLabel()
  229. ilg1245631380.Emit(OpCodes.Nop)
  230. ilg1245631380.MarkLabel(label1245631380_0)
  231. ilg1245631380.Emit(OpCodes.Ldarg, int16 0)
  232. ilg1245631380.Emit(OpCodes.Ldnull)
  233. ilg1245631380.Emit(OpCodes.Cgt_un)
  234. ilg1245631380.Emit(OpCodes.Brfalse,label1245631380_41)
  235. ilg1245631380.MarkLabel(label1245631380_3)
  236. ilg1245631380.MarkLabel(label1245631380_2)
  237. ilg1245631380.MarkLabel(label1245631380_1)
  238. ilg1245631380.Emit(OpCodes.Ldarg, int16 1)
  239. ilg1245631380.Emit(OpCodes.Ldnull)
  240. ilg1245631380.Emit(OpCodes.Cgt_un)
  241. ilg1245631380.Emit(OpCodes.Brfalse,label1245631380_34)
  242. ilg1245631380.MarkLabel(label1245631380_8)
  243. ilg1245631380.MarkLabel(label1245631380_7)
  244. ilg1245631380.MarkLabel(label1245631380_6)
  245. ilg1245631380.MarkLabel(label1245631380_5)
  246. ilg1245631380.MarkLabel(label1245631380_4)
  247. ilg1245631380.Emit(OpCodes.Call, methodBuilder430375444) // method get_GenericComparer
  248. ilg1245631380.Emit(OpCodes.Stloc, int16 1)
  249. ilg1245631380.Emit(OpCodes.Ldarg, int16 0)
  250. ilg1245631380.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  251. ilg1245631380.Emit(OpCodes.Ldarg, int16 1)
  252. ilg1245631380.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  253. ilg1245631380.Emit(OpCodes.Call, methodBuilder1026119192) // method CompareOrdinal
  254. ilg1245631380.MarkLabel(label1245631380_9)
  255. ilg1245631380.Emit(OpCodes.Stloc, int16 0)
  256. ilg1245631380.Emit(OpCodes.Ldloc, int16 0)
  257. ilg1245631380.Emit(OpCodes.Ldc_I4, 0)
  258. ilg1245631380.Emit(OpCodes.Bge,label1245631380_14)
  259. ilg1245631380.MarkLabel(label1245631380_12)
  260. ilg1245631380.MarkLabel(label1245631380_11)
  261. ilg1245631380.MarkLabel(label1245631380_10)
  262. ilg1245631380.Emit(OpCodes.Ldloc, int16 0)
  263. ilg1245631380.Emit(OpCodes.Ret)
  264. ilg1245631380.MarkLabel(label1245631380_17)
  265. ilg1245631380.MarkLabel(label1245631380_16)
  266. ilg1245631380.MarkLabel(label1245631380_15)
  267. ilg1245631380.MarkLabel(label1245631380_14)
  268. ilg1245631380.MarkLabel(label1245631380_13)
  269. ilg1245631380.Emit(OpCodes.Ldloc, int16 0)
  270. ilg1245631380.Emit(OpCodes.Ldc_I4, 0)
  271. ilg1245631380.Emit(OpCodes.Ble,label1245631380_22)
  272. ilg1245631380.MarkLabel(label1245631380_20)
  273. ilg1245631380.MarkLabel(label1245631380_19)
  274. ilg1245631380.MarkLabel(label1245631380_18)
  275. ilg1245631380.Emit(OpCodes.Ldloc, int16 0)
  276. ilg1245631380.Emit(OpCodes.Ret)
  277. ilg1245631380.MarkLabel(label1245631380_25)
  278. ilg1245631380.MarkLabel(label1245631380_24)
  279. ilg1245631380.MarkLabel(label1245631380_23)
  280. ilg1245631380.MarkLabel(label1245631380_22)
  281. ilg1245631380.MarkLabel(label1245631380_21)
  282. ilg1245631380.Emit(OpCodes.Call, methodBuilder430375444) // method get_GenericComparer
  283. ilg1245631380.Emit(OpCodes.Ldarg, int16 0)
  284. ilg1245631380.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  285. ilg1245631380.Emit(OpCodes.Ldarg, int16 1)
  286. ilg1245631380.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  287. ilg1245631380.MarkLabel(label1245631380_26)
  288. ilg1245631380.Emit(OpCodes.Tail_)
  289. ilg1245631380.Emit(OpCodes.Call, methodBuilder1832792028) // method GenericComparisonWithComparerIntrinsic
  290. ilg1245631380.Emit(OpCodes.Ret)
  291. ilg1245631380.Emit(OpCodes.Ret)
  292. ilg1245631380.MarkLabel(label1245631380_37)
  293. ilg1245631380.MarkLabel(label1245631380_36)
  294. ilg1245631380.MarkLabel(label1245631380_35)
  295. ilg1245631380.MarkLabel(label1245631380_34)
  296. ilg1245631380.MarkLabel(label1245631380_33)
  297. ilg1245631380.MarkLabel(label1245631380_32)
  298. ilg1245631380.MarkLabel(label1245631380_31)
  299. ilg1245631380.MarkLabel(label1245631380_30)
  300. ilg1245631380.MarkLabel(label1245631380_29)
  301. ilg1245631380.MarkLabel(label1245631380_28)
  302. ilg1245631380.MarkLabel(label1245631380_27)
  303. ilg1245631380.Emit(OpCodes.Ldc_I4, 1)
  304. ilg1245631380.Emit(OpCodes.Ret)
  305. ilg1245631380.MarkLabel(label1245631380_44)
  306. ilg1245631380.MarkLabel(label1245631380_43)
  307. ilg1245631380.MarkLabel(label1245631380_42)
  308. ilg1245631380.MarkLabel(label1245631380_41)
  309. ilg1245631380.MarkLabel(label1245631380_40)
  310. ilg1245631380.MarkLabel(label1245631380_39)
  311. ilg1245631380.MarkLabel(label1245631380_38)
  312. ilg1245631380.Emit(OpCodes.Ldarg, int16 1)
  313. ilg1245631380.Emit(OpCodes.Ldnull)
  314. ilg1245631380.Emit(OpCodes.Cgt_un)
  315. ilg1245631380.Emit(OpCodes.Brfalse,label1245631380_49)
  316. ilg1245631380.MarkLabel(label1245631380_47)
  317. ilg1245631380.MarkLabel(label1245631380_46)
  318. ilg1245631380.MarkLabel(label1245631380_45)
  319. ilg1245631380.Emit(OpCodes.Ldc_I4, -1)
  320. ilg1245631380.Emit(OpCodes.Ret)
  321. ilg1245631380.MarkLabel(label1245631380_52)
  322. ilg1245631380.MarkLabel(label1245631380_51)
  323. ilg1245631380.MarkLabel(label1245631380_50)
  324. ilg1245631380.MarkLabel(label1245631380_49)
  325. ilg1245631380.MarkLabel(label1245631380_48)
  326. ilg1245631380.Emit(OpCodes.Ldc_I4, 0)
  327. ilg1245631380.Emit(OpCodes.Ret)
  328. ilg1245631380.MarkLabel(label1245631380_56)
  329. ilg1245631380.MarkLabel(label1245631380_55)
  330. ilg1245631380.MarkLabel(label1245631380_54)
  331. ilg1245631380.MarkLabel(label1245631380_53)
  332. methodBuilder2129836076.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  333. methodBuilder2129836076.DefineParameter(1,enum 0,"obj")
  334. let ilg1007717551 = methodBuilder2129836076.GetILGenerator()
  335. let label1007717551_0 = ilg1007717551.DefineLabel()
  336. let label1007717551_1 = ilg1007717551.DefineLabel()
  337. let label1007717551_2 = ilg1007717551.DefineLabel()
  338. ilg1007717551.MarkLabel(label1007717551_0)
  339. ilg1007717551.Emit(OpCodes.Nop)
  340. ilg1007717551.Emit(OpCodes.Ldarg, int16 0)
  341. ilg1007717551.Emit(OpCodes.Ldarg, int16 1)
  342. ilg1007717551.Emit(OpCodes.Unbox_any, typeof<FSI_0004+Observation>)
  343. ilg1007717551.MarkLabel(label1007717551_1)
  344. ilg1007717551.Emit(OpCodes.Tail_)
  345. ilg1007717551.Emit(OpCodes.Callvirt, methodBuilder2129836076) // method CompareTo
  346. ilg1007717551.Emit(OpCodes.Ret)
  347. ilg1007717551.Emit(OpCodes.Ret)
  348. ilg1007717551.MarkLabel(label1007717551_2)
  349. methodBuilder2129836076.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  350. methodBuilder2129836076.DefineParameter(1,enum 0,"obj")
  351. methodBuilder2129836076.DefineParameter(2,enum 0,"comp")
  352. let ilg482027429 = methodBuilder2129836076.GetILGenerator()
  353. ilg482027429.DeclareLocal(typeof<FSI_0004+Observation>,false)
  354. ilg482027429.DeclareLocal(typeof<System.Int32>,false)
  355. let label482027429_0 = ilg482027429.DefineLabel()
  356. let label482027429_1 = ilg482027429.DefineLabel()
  357. let label482027429_2 = ilg482027429.DefineLabel()
  358. let label482027429_3 = ilg482027429.DefineLabel()
  359. let label482027429_4 = ilg482027429.DefineLabel()
  360. let label482027429_5 = ilg482027429.DefineLabel()
  361. let label482027429_6 = ilg482027429.DefineLabel()
  362. let label482027429_7 = ilg482027429.DefineLabel()
  363. let label482027429_8 = ilg482027429.DefineLabel()
  364. let label482027429_9 = ilg482027429.DefineLabel()
  365. let label482027429_10 = ilg482027429.DefineLabel()
  366. let label482027429_11 = ilg482027429.DefineLabel()
  367. let label482027429_12 = ilg482027429.DefineLabel()
  368. let label482027429_13 = ilg482027429.DefineLabel()
  369. let label482027429_14 = ilg482027429.DefineLabel()
  370. let label482027429_15 = ilg482027429.DefineLabel()
  371. let label482027429_16 = ilg482027429.DefineLabel()
  372. let label482027429_17 = ilg482027429.DefineLabel()
  373. let label482027429_18 = ilg482027429.DefineLabel()
  374. let label482027429_19 = ilg482027429.DefineLabel()
  375. let label482027429_20 = ilg482027429.DefineLabel()
  376. let label482027429_21 = ilg482027429.DefineLabel()
  377. let label482027429_22 = ilg482027429.DefineLabel()
  378. let label482027429_23 = ilg482027429.DefineLabel()
  379. let label482027429_24 = ilg482027429.DefineLabel()
  380. let label482027429_25 = ilg482027429.DefineLabel()
  381. let label482027429_26 = ilg482027429.DefineLabel()
  382. let label482027429_27 = ilg482027429.DefineLabel()
  383. let label482027429_28 = ilg482027429.DefineLabel()
  384. let label482027429_29 = ilg482027429.DefineLabel()
  385. let label482027429_30 = ilg482027429.DefineLabel()
  386. let label482027429_31 = ilg482027429.DefineLabel()
  387. let label482027429_32 = ilg482027429.DefineLabel()
  388. let label482027429_33 = ilg482027429.DefineLabel()
  389. let label482027429_34 = ilg482027429.DefineLabel()
  390. let label482027429_35 = ilg482027429.DefineLabel()
  391. let label482027429_36 = ilg482027429.DefineLabel()
  392. let label482027429_37 = ilg482027429.DefineLabel()
  393. let label482027429_38 = ilg482027429.DefineLabel()
  394. let label482027429_39 = ilg482027429.DefineLabel()
  395. let label482027429_40 = ilg482027429.DefineLabel()
  396. let label482027429_41 = ilg482027429.DefineLabel()
  397. let label482027429_42 = ilg482027429.DefineLabel()
  398. let label482027429_43 = ilg482027429.DefineLabel()
  399. let label482027429_44 = ilg482027429.DefineLabel()
  400. let label482027429_45 = ilg482027429.DefineLabel()
  401. let label482027429_46 = ilg482027429.DefineLabel()
  402. let label482027429_47 = ilg482027429.DefineLabel()
  403. let label482027429_48 = ilg482027429.DefineLabel()
  404. let label482027429_49 = ilg482027429.DefineLabel()
  405. let label482027429_50 = ilg482027429.DefineLabel()
  406. let label482027429_51 = ilg482027429.DefineLabel()
  407. let label482027429_52 = ilg482027429.DefineLabel()
  408. let label482027429_53 = ilg482027429.DefineLabel()
  409. let label482027429_54 = ilg482027429.DefineLabel()
  410. let label482027429_55 = ilg482027429.DefineLabel()
  411. let label482027429_56 = ilg482027429.DefineLabel()
  412. ilg482027429.MarkLabel(label482027429_0)
  413. ilg482027429.Emit(OpCodes.Nop)
  414. ilg482027429.MarkLabel(label482027429_1)
  415. ilg482027429.Emit(OpCodes.Ldarg, int16 1)
  416. ilg482027429.Emit(OpCodes.Unbox_any, typeof<FSI_0004+Observation>)
  417. ilg482027429.Emit(OpCodes.Stloc, int16 0)
  418. ilg482027429.Emit(OpCodes.Ldarg, int16 0)
  419. ilg482027429.Emit(OpCodes.Ldnull)
  420. ilg482027429.Emit(OpCodes.Cgt_un)
  421. ilg482027429.Emit(OpCodes.Brfalse,label482027429_40)
  422. ilg482027429.MarkLabel(label482027429_4)
  423. ilg482027429.MarkLabel(label482027429_3)
  424. ilg482027429.MarkLabel(label482027429_2)
  425. ilg482027429.Emit(OpCodes.Ldarg, int16 1)
  426. ilg482027429.Emit(OpCodes.Unbox_any, typeof<FSI_0004+Observation>)
  427. ilg482027429.Emit(OpCodes.Ldnull)
  428. ilg482027429.Emit(OpCodes.Cgt_un)
  429. ilg482027429.Emit(OpCodes.Brfalse,label482027429_33)
  430. ilg482027429.MarkLabel(label482027429_8)
  431. ilg482027429.MarkLabel(label482027429_7)
  432. ilg482027429.MarkLabel(label482027429_6)
  433. ilg482027429.MarkLabel(label482027429_5)
  434. ilg482027429.Emit(OpCodes.Ldarg, int16 0)
  435. ilg482027429.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  436. ilg482027429.Emit(OpCodes.Ldloc, int16 0)
  437. ilg482027429.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  438. ilg482027429.Emit(OpCodes.Call, methodBuilder1026119192) // method CompareOrdinal
  439. ilg482027429.Emit(OpCodes.Stloc, int16 1)
  440. ilg482027429.Emit(OpCodes.Ldloc, int16 1)
  441. ilg482027429.Emit(OpCodes.Ldc_I4, 0)
  442. ilg482027429.Emit(OpCodes.Bge,label482027429_13)
  443. ilg482027429.MarkLabel(label482027429_11)
  444. ilg482027429.MarkLabel(label482027429_10)
  445. ilg482027429.MarkLabel(label482027429_9)
  446. ilg482027429.Emit(OpCodes.Ldloc, int16 1)
  447. ilg482027429.Emit(OpCodes.Ret)
  448. ilg482027429.MarkLabel(label482027429_16)
  449. ilg482027429.MarkLabel(label482027429_15)
  450. ilg482027429.MarkLabel(label482027429_14)
  451. ilg482027429.MarkLabel(label482027429_13)
  452. ilg482027429.MarkLabel(label482027429_12)
  453. ilg482027429.Emit(OpCodes.Ldloc, int16 1)
  454. ilg482027429.Emit(OpCodes.Ldc_I4, 0)
  455. ilg482027429.Emit(OpCodes.Ble,label482027429_21)
  456. ilg482027429.MarkLabel(label482027429_19)
  457. ilg482027429.MarkLabel(label482027429_18)
  458. ilg482027429.MarkLabel(label482027429_17)
  459. ilg482027429.Emit(OpCodes.Ldloc, int16 1)
  460. ilg482027429.Emit(OpCodes.Ret)
  461. ilg482027429.MarkLabel(label482027429_24)
  462. ilg482027429.MarkLabel(label482027429_23)
  463. ilg482027429.MarkLabel(label482027429_22)
  464. ilg482027429.MarkLabel(label482027429_21)
  465. ilg482027429.MarkLabel(label482027429_20)
  466. ilg482027429.Emit(OpCodes.Ldarg, int16 2)
  467. ilg482027429.Emit(OpCodes.Ldarg, int16 0)
  468. ilg482027429.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  469. ilg482027429.Emit(OpCodes.Ldloc, int16 0)
  470. ilg482027429.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  471. ilg482027429.MarkLabel(label482027429_25)
  472. ilg482027429.Emit(OpCodes.Tail_)
  473. ilg482027429.Emit(OpCodes.Call, methodBuilder1832792028) // method GenericComparisonWithComparerIntrinsic
  474. ilg482027429.Emit(OpCodes.Ret)
  475. ilg482027429.Emit(OpCodes.Ret)
  476. ilg482027429.MarkLabel(label482027429_36)
  477. ilg482027429.MarkLabel(label482027429_35)
  478. ilg482027429.MarkLabel(label482027429_34)
  479. ilg482027429.MarkLabel(label482027429_33)
  480. ilg482027429.MarkLabel(label482027429_32)
  481. ilg482027429.MarkLabel(label482027429_31)
  482. ilg482027429.MarkLabel(label482027429_30)
  483. ilg482027429.MarkLabel(label482027429_29)
  484. ilg482027429.MarkLabel(label482027429_28)
  485. ilg482027429.MarkLabel(label482027429_27)
  486. ilg482027429.MarkLabel(label482027429_26)
  487. ilg482027429.Emit(OpCodes.Ldc_I4, 1)
  488. ilg482027429.Emit(OpCodes.Ret)
  489. ilg482027429.MarkLabel(label482027429_43)
  490. ilg482027429.MarkLabel(label482027429_42)
  491. ilg482027429.MarkLabel(label482027429_41)
  492. ilg482027429.MarkLabel(label482027429_40)
  493. ilg482027429.MarkLabel(label482027429_39)
  494. ilg482027429.MarkLabel(label482027429_38)
  495. ilg482027429.MarkLabel(label482027429_37)
  496. ilg482027429.Emit(OpCodes.Ldarg, int16 1)
  497. ilg482027429.Emit(OpCodes.Unbox_any, typeof<FSI_0004+Observation>)
  498. ilg482027429.Emit(OpCodes.Ldnull)
  499. ilg482027429.Emit(OpCodes.Cgt_un)
  500. ilg482027429.Emit(OpCodes.Brfalse,label482027429_48)
  501. ilg482027429.MarkLabel(label482027429_46)
  502. ilg482027429.MarkLabel(label482027429_45)
  503. ilg482027429.MarkLabel(label482027429_44)
  504. ilg482027429.Emit(OpCodes.Ldc_I4, -1)
  505. ilg482027429.Emit(OpCodes.Ret)
  506. ilg482027429.MarkLabel(label482027429_51)
  507. ilg482027429.MarkLabel(label482027429_50)
  508. ilg482027429.MarkLabel(label482027429_49)
  509. ilg482027429.MarkLabel(label482027429_48)
  510. ilg482027429.MarkLabel(label482027429_47)
  511. ilg482027429.Emit(OpCodes.Ldc_I4, 0)
  512. ilg482027429.Emit(OpCodes.Ret)
  513. ilg482027429.MarkLabel(label482027429_56)
  514. ilg482027429.MarkLabel(label482027429_55)
  515. ilg482027429.MarkLabel(label482027429_54)
  516. ilg482027429.MarkLabel(label482027429_53)
  517. ilg482027429.MarkLabel(label482027429_52)
  518. methodBuilder2129836076.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  519. methodBuilder481831937.DefineParameter(1,enum 0,"comp")
  520. let ilg187187065 = methodBuilder481831937.GetILGenerator()
  521. ilg187187065.DeclareLocal(typeof<System.Int32>,false)
  522. ilg187187065.DeclareLocal(typeof<System.String>,false)
  523. let label187187065_0 = ilg187187065.DefineLabel()
  524. let label187187065_1 = ilg187187065.DefineLabel()
  525. let label187187065_2 = ilg187187065.DefineLabel()
  526. let label187187065_3 = ilg187187065.DefineLabel()
  527. let label187187065_4 = ilg187187065.DefineLabel()
  528. let label187187065_5 = ilg187187065.DefineLabel()
  529. let label187187065_6 = ilg187187065.DefineLabel()
  530. let label187187065_7 = ilg187187065.DefineLabel()
  531. let label187187065_8 = ilg187187065.DefineLabel()
  532. let label187187065_9 = ilg187187065.DefineLabel()
  533. let label187187065_10 = ilg187187065.DefineLabel()
  534. let label187187065_11 = ilg187187065.DefineLabel()
  535. let label187187065_12 = ilg187187065.DefineLabel()
  536. let label187187065_13 = ilg187187065.DefineLabel()
  537. let label187187065_14 = ilg187187065.DefineLabel()
  538. let label187187065_15 = ilg187187065.DefineLabel()
  539. let label187187065_16 = ilg187187065.DefineLabel()
  540. let label187187065_17 = ilg187187065.DefineLabel()
  541. let label187187065_18 = ilg187187065.DefineLabel()
  542. let label187187065_19 = ilg187187065.DefineLabel()
  543. let label187187065_20 = ilg187187065.DefineLabel()
  544. let label187187065_21 = ilg187187065.DefineLabel()
  545. let label187187065_22 = ilg187187065.DefineLabel()
  546. let label187187065_23 = ilg187187065.DefineLabel()
  547. let label187187065_24 = ilg187187065.DefineLabel()
  548. let label187187065_25 = ilg187187065.DefineLabel()
  549. let label187187065_26 = ilg187187065.DefineLabel()
  550. ilg187187065.Emit(OpCodes.Nop)
  551. ilg187187065.MarkLabel(label187187065_0)
  552. ilg187187065.Emit(OpCodes.Ldarg, int16 0)
  553. ilg187187065.Emit(OpCodes.Ldnull)
  554. ilg187187065.Emit(OpCodes.Cgt_un)
  555. ilg187187065.Emit(OpCodes.Brfalse,label187187065_21)
  556. ilg187187065.MarkLabel(label187187065_4)
  557. ilg187187065.MarkLabel(label187187065_3)
  558. ilg187187065.MarkLabel(label187187065_2)
  559. ilg187187065.MarkLabel(label187187065_1)
  560. ilg187187065.Emit(OpCodes.Ldc_I4, 0)
  561. ilg187187065.Emit(OpCodes.Stloc, int16 0)
  562. ilg187187065.Emit(OpCodes.Ldc_I4, -1640531527)
  563. ilg187187065.Emit(OpCodes.Ldarg, int16 1)
  564. ilg187187065.Emit(OpCodes.Ldarg, int16 0)
  565. ilg187187065.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  566. ilg187187065.MarkLabel(label187187065_5)
  567. ilg187187065.Emit(OpCodes.Call, methodBuilder1142292769) // method GenericHashWithComparerIntrinsic
  568. ilg187187065.MarkLabel(label187187065_6)
  569. ilg187187065.Emit(OpCodes.Ldloc, int16 0)
  570. ilg187187065.Emit(OpCodes.Ldc_I4, 6)
  571. ilg187187065.Emit(OpCodes.Shl)
  572. ilg187187065.Emit(OpCodes.Ldloc, int16 0)
  573. ilg187187065.Emit(OpCodes.Ldc_I4, 2)
  574. ilg187187065.Emit(OpCodes.Shr)
  575. ilg187187065.Emit(OpCodes.Add)
  576. ilg187187065.Emit(OpCodes.Add)
  577. ilg187187065.Emit(OpCodes.Add)
  578. ilg187187065.Emit(OpCodes.Stloc, int16 0)
  579. ilg187187065.Emit(OpCodes.Ldc_I4, -1640531527)
  580. ilg187187065.MarkLabel(label187187065_7)
  581. ilg187187065.Emit(OpCodes.Ldarg, int16 0)
  582. ilg187187065.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  583. ilg187187065.Emit(OpCodes.Stloc, int16 1)
  584. ilg187187065.Emit(OpCodes.Ldloc, int16 1)
  585. ilg187187065.Emit(OpCodes.Brfalse,label187187065_12)
  586. ilg187187065.MarkLabel(label187187065_10)
  587. ilg187187065.MarkLabel(label187187065_9)
  588. ilg187187065.MarkLabel(label187187065_8)
  589. ilg187187065.Emit(OpCodes.Ldloc, int16 1)
  590. ilg187187065.Emit(OpCodes.Call, methodBuilder46982790) // method GetHashCode
  591. ilg187187065.Emit(OpCodes.Nop)
  592. ilg187187065.Emit(OpCodes.Br,label187187065_17)
  593. ilg187187065.MarkLabel(label187187065_15)
  594. ilg187187065.MarkLabel(label187187065_14)
  595. ilg187187065.MarkLabel(label187187065_13)
  596. ilg187187065.MarkLabel(label187187065_12)
  597. ilg187187065.MarkLabel(label187187065_11)
  598. ilg187187065.Emit(OpCodes.Ldc_I4, 0)
  599. ilg187187065.Emit(OpCodes.Nop)
  600. ilg187187065.MarkLabel(label187187065_18)
  601. ilg187187065.MarkLabel(label187187065_17)
  602. ilg187187065.MarkLabel(label187187065_16)
  603. ilg187187065.Emit(OpCodes.Ldloc, int16 0)
  604. ilg187187065.Emit(OpCodes.Ldc_I4, 6)
  605. ilg187187065.Emit(OpCodes.Shl)
  606. ilg187187065.Emit(OpCodes.Ldloc, int16 0)
  607. ilg187187065.Emit(OpCodes.Ldc_I4, 2)
  608. ilg187187065.Emit(OpCodes.Shr)
  609. ilg187187065.Emit(OpCodes.Add)
  610. ilg187187065.Emit(OpCodes.Add)
  611. ilg187187065.Emit(OpCodes.Add)
  612. ilg187187065.Emit(OpCodes.Stloc, int16 0)
  613. ilg187187065.Emit(OpCodes.Ldloc, int16 0)
  614. ilg187187065.Emit(OpCodes.Ret)
  615. ilg187187065.MarkLabel(label187187065_24)
  616. ilg187187065.MarkLabel(label187187065_23)
  617. ilg187187065.MarkLabel(label187187065_22)
  618. ilg187187065.MarkLabel(label187187065_21)
  619. ilg187187065.MarkLabel(label187187065_20)
  620. ilg187187065.MarkLabel(label187187065_19)
  621. ilg187187065.Emit(OpCodes.Ldc_I4, 0)
  622. ilg187187065.Emit(OpCodes.Ret)
  623. ilg187187065.MarkLabel(label187187065_26)
  624. ilg187187065.MarkLabel(label187187065_25)
  625. methodBuilder481831937.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  626. let ilg207744281 = methodBuilder481831937.GetILGenerator()
  627. let label207744281_0 = ilg207744281.DefineLabel()
  628. let label207744281_1 = ilg207744281.DefineLabel()
  629. let label207744281_2 = ilg207744281.DefineLabel()
  630. let label207744281_3 = ilg207744281.DefineLabel()
  631. let label207744281_4 = ilg207744281.DefineLabel()
  632. ilg207744281.MarkLabel(label207744281_1)
  633. ilg207744281.MarkLabel(label207744281_0)
  634. ilg207744281.Emit(OpCodes.Nop)
  635. ilg207744281.Emit(OpCodes.Ldarg, int16 0)
  636. ilg207744281.Emit(OpCodes.Call, methodBuilder339609756) // method get_GenericEqualityComparer
  637. ilg207744281.MarkLabel(label207744281_2)
  638. ilg207744281.Emit(OpCodes.Callvirt, methodBuilder481831937) // method GetHashCode
  639. ilg207744281.Emit(OpCodes.Ret)
  640. ilg207744281.MarkLabel(label207744281_4)
  641. ilg207744281.MarkLabel(label207744281_3)
  642. methodBuilder481831937.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  643. methodBuilder1014339031.DefineParameter(1,enum 0,"obj")
  644. methodBuilder1014339031.DefineParameter(2,enum 0,"comp")
  645. let ilg1617249579 = methodBuilder1014339031.GetILGenerator()
  646. ilg1617249579.DeclareLocal(typeof<FSI_0004+Observation>,false)
  647. let label1617249579_0 = ilg1617249579.DefineLabel()
  648. let label1617249579_1 = ilg1617249579.DefineLabel()
  649. let label1617249579_2 = ilg1617249579.DefineLabel()
  650. let label1617249579_3 = ilg1617249579.DefineLabel()
  651. let label1617249579_4 = ilg1617249579.DefineLabel()
  652. let label1617249579_5 = ilg1617249579.DefineLabel()
  653. let label1617249579_6 = ilg1617249579.DefineLabel()
  654. let label1617249579_7 = ilg1617249579.DefineLabel()
  655. let label1617249579_8 = ilg1617249579.DefineLabel()
  656. let label1617249579_9 = ilg1617249579.DefineLabel()
  657. let label1617249579_10 = ilg1617249579.DefineLabel()
  658. let label1617249579_11 = ilg1617249579.DefineLabel()
  659. let label1617249579_12 = ilg1617249579.DefineLabel()
  660. let label1617249579_13 = ilg1617249579.DefineLabel()
  661. let label1617249579_14 = ilg1617249579.DefineLabel()
  662. let label1617249579_15 = ilg1617249579.DefineLabel()
  663. let label1617249579_16 = ilg1617249579.DefineLabel()
  664. let label1617249579_17 = ilg1617249579.DefineLabel()
  665. let label1617249579_18 = ilg1617249579.DefineLabel()
  666. let label1617249579_19 = ilg1617249579.DefineLabel()
  667. let label1617249579_20 = ilg1617249579.DefineLabel()
  668. let label1617249579_21 = ilg1617249579.DefineLabel()
  669. let label1617249579_22 = ilg1617249579.DefineLabel()
  670. let label1617249579_23 = ilg1617249579.DefineLabel()
  671. let label1617249579_24 = ilg1617249579.DefineLabel()
  672. let label1617249579_25 = ilg1617249579.DefineLabel()
  673. let label1617249579_26 = ilg1617249579.DefineLabel()
  674. let label1617249579_27 = ilg1617249579.DefineLabel()
  675. let label1617249579_28 = ilg1617249579.DefineLabel()
  676. let label1617249579_29 = ilg1617249579.DefineLabel()
  677. let label1617249579_30 = ilg1617249579.DefineLabel()
  678. let label1617249579_31 = ilg1617249579.DefineLabel()
  679. let label1617249579_32 = ilg1617249579.DefineLabel()
  680. let label1617249579_33 = ilg1617249579.DefineLabel()
  681. let label1617249579_34 = ilg1617249579.DefineLabel()
  682. let label1617249579_35 = ilg1617249579.DefineLabel()
  683. ilg1617249579.Emit(OpCodes.Nop)
  684. ilg1617249579.MarkLabel(label1617249579_0)
  685. ilg1617249579.Emit(OpCodes.Ldarg, int16 0)
  686. ilg1617249579.Emit(OpCodes.Ldnull)
  687. ilg1617249579.Emit(OpCodes.Cgt_un)
  688. ilg1617249579.Emit(OpCodes.Brfalse,label1617249579_29)
  689. ilg1617249579.MarkLabel(label1617249579_4)
  690. ilg1617249579.MarkLabel(label1617249579_3)
  691. ilg1617249579.MarkLabel(label1617249579_2)
  692. ilg1617249579.MarkLabel(label1617249579_1)
  693. ilg1617249579.Emit(OpCodes.Ldarg, int16 1)
  694. ilg1617249579.Emit(OpCodes.Isinst, typeof<FSI_0004+Observation>)
  695. ilg1617249579.Emit(OpCodes.Stloc, int16 0)
  696. ilg1617249579.Emit(OpCodes.Ldloc, int16 0)
  697. ilg1617249579.Emit(OpCodes.Brfalse,label1617249579_21)
  698. ilg1617249579.MarkLabel(label1617249579_7)
  699. ilg1617249579.MarkLabel(label1617249579_6)
  700. ilg1617249579.MarkLabel(label1617249579_5)
  701. ilg1617249579.Emit(OpCodes.Ldarg, int16 0)
  702. ilg1617249579.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  703. ilg1617249579.Emit(OpCodes.Ldloc, int16 0)
  704. ilg1617249579.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  705. ilg1617249579.Emit(OpCodes.Call, methodBuilder1080939438) // method Equals
  706. ilg1617249579.Emit(OpCodes.Brfalse,label1617249579_14)
  707. ilg1617249579.MarkLabel(label1617249579_10)
  708. ilg1617249579.MarkLabel(label1617249579_9)
  709. ilg1617249579.MarkLabel(label1617249579_8)
  710. ilg1617249579.Emit(OpCodes.Ldarg, int16 2)
  711. ilg1617249579.Emit(OpCodes.Ldarg, int16 0)
  712. ilg1617249579.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  713. ilg1617249579.Emit(OpCodes.Ldloc, int16 0)
  714. ilg1617249579.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  715. ilg1617249579.MarkLabel(label1617249579_11)
  716. ilg1617249579.Emit(OpCodes.Tail_)
  717. ilg1617249579.Emit(OpCodes.Call, methodBuilder2142339345) // method GenericEqualityWithComparerIntrinsic
  718. ilg1617249579.Emit(OpCodes.Ret)
  719. ilg1617249579.Emit(OpCodes.Ret)
  720. ilg1617249579.MarkLabel(label1617249579_17)
  721. ilg1617249579.MarkLabel(label1617249579_16)
  722. ilg1617249579.MarkLabel(label1617249579_15)
  723. ilg1617249579.MarkLabel(label1617249579_14)
  724. ilg1617249579.MarkLabel(label1617249579_13)
  725. ilg1617249579.MarkLabel(label1617249579_12)
  726. ilg1617249579.Emit(OpCodes.Ldc_I4, 0)
  727. ilg1617249579.Emit(OpCodes.Ret)
  728. ilg1617249579.MarkLabel(label1617249579_24)
  729. ilg1617249579.MarkLabel(label1617249579_23)
  730. ilg1617249579.MarkLabel(label1617249579_22)
  731. ilg1617249579.MarkLabel(label1617249579_21)
  732. ilg1617249579.MarkLabel(label1617249579_20)
  733. ilg1617249579.MarkLabel(label1617249579_19)
  734. ilg1617249579.MarkLabel(label1617249579_18)
  735. ilg1617249579.Emit(OpCodes.Ldc_I4, 0)
  736. ilg1617249579.Emit(OpCodes.Ret)
  737. ilg1617249579.MarkLabel(label1617249579_32)
  738. ilg1617249579.MarkLabel(label1617249579_31)
  739. ilg1617249579.MarkLabel(label1617249579_30)
  740. ilg1617249579.MarkLabel(label1617249579_29)
  741. ilg1617249579.MarkLabel(label1617249579_28)
  742. ilg1617249579.MarkLabel(label1617249579_27)
  743. ilg1617249579.MarkLabel(label1617249579_26)
  744. ilg1617249579.MarkLabel(label1617249579_25)
  745. ilg1617249579.Emit(OpCodes.Ldarg, int16 1)
  746. ilg1617249579.Emit(OpCodes.Ldnull)
  747. ilg1617249579.Emit(OpCodes.Cgt_un)
  748. ilg1617249579.Emit(OpCodes.Ldc_I4, 0)
  749. ilg1617249579.Emit(OpCodes.Ceq)
  750. ilg1617249579.Emit(OpCodes.Ret)
  751. ilg1617249579.MarkLabel(label1617249579_35)
  752. ilg1617249579.MarkLabel(label1617249579_34)
  753. ilg1617249579.MarkLabel(label1617249579_33)
  754. methodBuilder1014339031.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  755. methodBuilder1014339031.DefineParameter(1,enum 0,"obj")
  756. let ilg388884960 = methodBuilder1014339031.GetILGenerator()
  757. let label388884960_0 = ilg388884960.DefineLabel()
  758. let label388884960_1 = ilg388884960.DefineLabel()
  759. let label388884960_2 = ilg388884960.DefineLabel()
  760. let label388884960_3 = ilg388884960.DefineLabel()
  761. let label388884960_4 = ilg388884960.DefineLabel()
  762. let label388884960_5 = ilg388884960.DefineLabel()
  763. let label388884960_6 = ilg388884960.DefineLabel()
  764. let label388884960_7 = ilg388884960.DefineLabel()
  765. let label388884960_8 = ilg388884960.DefineLabel()
  766. let label388884960_9 = ilg388884960.DefineLabel()
  767. let label388884960_10 = ilg388884960.DefineLabel()
  768. let label388884960_11 = ilg388884960.DefineLabel()
  769. let label388884960_12 = ilg388884960.DefineLabel()
  770. let label388884960_13 = ilg388884960.DefineLabel()
  771. let label388884960_14 = ilg388884960.DefineLabel()
  772. let label388884960_15 = ilg388884960.DefineLabel()
  773. let label388884960_16 = ilg388884960.DefineLabel()
  774. let label388884960_17 = ilg388884960.DefineLabel()
  775. let label388884960_18 = ilg388884960.DefineLabel()
  776. let label388884960_19 = ilg388884960.DefineLabel()
  777. let label388884960_20 = ilg388884960.DefineLabel()
  778. let label388884960_21 = ilg388884960.DefineLabel()
  779. let label388884960_22 = ilg388884960.DefineLabel()
  780. let label388884960_23 = ilg388884960.DefineLabel()
  781. let label388884960_24 = ilg388884960.DefineLabel()
  782. let label388884960_25 = ilg388884960.DefineLabel()
  783. let label388884960_26 = ilg388884960.DefineLabel()
  784. let label388884960_27 = ilg388884960.DefineLabel()
  785. let label388884960_28 = ilg388884960.DefineLabel()
  786. let label388884960_29 = ilg388884960.DefineLabel()
  787. let label388884960_30 = ilg388884960.DefineLabel()
  788. let label388884960_31 = ilg388884960.DefineLabel()
  789. let label388884960_32 = ilg388884960.DefineLabel()
  790. let label388884960_33 = ilg388884960.DefineLabel()
  791. ilg388884960.Emit(OpCodes.Nop)
  792. ilg388884960.MarkLabel(label388884960_0)
  793. ilg388884960.Emit(OpCodes.Ldarg, int16 0)
  794. ilg388884960.Emit(OpCodes.Ldnull)
  795. ilg388884960.Emit(OpCodes.Cgt_un)
  796. ilg388884960.Emit(OpCodes.Brfalse,label388884960_27)
  797. ilg388884960.MarkLabel(label388884960_3)
  798. ilg388884960.MarkLabel(label388884960_2)
  799. ilg388884960.MarkLabel(label388884960_1)
  800. ilg388884960.Emit(OpCodes.Ldarg, int16 1)
  801. ilg388884960.Emit(OpCodes.Ldnull)
  802. ilg388884960.Emit(OpCodes.Cgt_un)
  803. ilg388884960.Emit(OpCodes.Brfalse,label388884960_20)
  804. ilg388884960.MarkLabel(label388884960_6)
  805. ilg388884960.MarkLabel(label388884960_5)
  806. ilg388884960.MarkLabel(label388884960_4)
  807. ilg388884960.Emit(OpCodes.Ldarg, int16 0)
  808. ilg388884960.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  809. ilg388884960.Emit(OpCodes.Ldarg, int16 1)
  810. ilg388884960.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  811. ilg388884960.Emit(OpCodes.Call, methodBuilder1080939438) // method Equals
  812. ilg388884960.Emit(OpCodes.Brfalse,label388884960_13)
  813. ilg388884960.MarkLabel(label388884960_9)
  814. ilg388884960.MarkLabel(label388884960_8)
  815. ilg388884960.MarkLabel(label388884960_7)
  816. ilg388884960.Emit(OpCodes.Ldarg, int16 0)
  817. ilg388884960.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  818. ilg388884960.Emit(OpCodes.Ldarg, int16 1)
  819. ilg388884960.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  820. ilg388884960.MarkLabel(label388884960_10)
  821. ilg388884960.Emit(OpCodes.Tail_)
  822. ilg388884960.Emit(OpCodes.Call, methodBuilder1921354316) // method GenericEqualityERIntrinsic
  823. ilg388884960.Emit(OpCodes.Ret)
  824. ilg388884960.Emit(OpCodes.Ret)
  825. ilg388884960.MarkLabel(label388884960_16)
  826. ilg388884960.MarkLabel(label388884960_15)
  827. ilg388884960.MarkLabel(label388884960_14)
  828. ilg388884960.MarkLabel(label388884960_13)
  829. ilg388884960.MarkLabel(label388884960_12)
  830. ilg388884960.MarkLabel(label388884960_11)
  831. ilg388884960.Emit(OpCodes.Ldc_I4, 0)
  832. ilg388884960.Emit(OpCodes.Ret)
  833. ilg388884960.MarkLabel(label388884960_23)
  834. ilg388884960.MarkLabel(label388884960_22)
  835. ilg388884960.MarkLabel(label388884960_21)
  836. ilg388884960.MarkLabel(label388884960_20)
  837. ilg388884960.MarkLabel(label388884960_19)
  838. ilg388884960.MarkLabel(label388884960_18)
  839. ilg388884960.MarkLabel(label388884960_17)
  840. ilg388884960.Emit(OpCodes.Ldc_I4, 0)
  841. ilg388884960.Emit(OpCodes.Ret)
  842. ilg388884960.MarkLabel(label388884960_30)
  843. ilg388884960.MarkLabel(label388884960_29)
  844. ilg388884960.MarkLabel(label388884960_28)
  845. ilg388884960.MarkLabel(label388884960_27)
  846. ilg388884960.MarkLabel(label388884960_26)
  847. ilg388884960.MarkLabel(label388884960_25)
  848. ilg388884960.MarkLabel(label388884960_24)
  849. ilg388884960.Emit(OpCodes.Ldarg, int16 1)
  850. ilg388884960.Emit(OpCodes.Ldnull)
  851. ilg388884960.Emit(OpCodes.Cgt_un)
  852. ilg388884960.Emit(OpCodes.Ldc_I4, 0)
  853. ilg388884960.Emit(OpCodes.Ceq)
  854. ilg388884960.Emit(OpCodes.Ret)
  855. ilg388884960.MarkLabel(label388884960_33)
  856. ilg388884960.MarkLabel(label388884960_32)
  857. ilg388884960.MarkLabel(label388884960_31)
  858. methodBuilder1014339031.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  859. methodBuilder1014339031.DefineParameter(1,enum 0,"obj")
  860. let ilg1747068137 = methodBuilder1014339031.GetILGenerator()
  861. ilg1747068137.DeclareLocal(typeof<FSI_0004+Observation>,false)
  862. let label1747068137_0 = ilg1747068137.DefineLabel()
  863. let label1747068137_1 = ilg1747068137.DefineLabel()
  864. let label1747068137_2 = ilg1747068137.DefineLabel()
  865. let label1747068137_3 = ilg1747068137.DefineLabel()
  866. let label1747068137_4 = ilg1747068137.DefineLabel()
  867. let label1747068137_5 = ilg1747068137.DefineLabel()
  868. let label1747068137_6 = ilg1747068137.DefineLabel()
  869. let label1747068137_7 = ilg1747068137.DefineLabel()
  870. let label1747068137_8 = ilg1747068137.DefineLabel()
  871. let label1747068137_9 = ilg1747068137.DefineLabel()
  872. let label1747068137_10 = ilg1747068137.DefineLabel()
  873. let label1747068137_11 = ilg1747068137.DefineLabel()
  874. let label1747068137_12 = ilg1747068137.DefineLabel()
  875. let label1747068137_13 = ilg1747068137.DefineLabel()
  876. let label1747068137_14 = ilg1747068137.DefineLabel()
  877. ilg1747068137.Emit(OpCodes.Nop)
  878. ilg1747068137.MarkLabel(label1747068137_1)
  879. ilg1747068137.MarkLabel(label1747068137_0)
  880. ilg1747068137.Emit(OpCodes.Ldarg, int16 1)
  881. ilg1747068137.Emit(OpCodes.Isinst, typeof<FSI_0004+Observation>)
  882. ilg1747068137.Emit(OpCodes.Stloc, int16 0)
  883. ilg1747068137.Emit(OpCodes.Ldloc, int16 0)
  884. ilg1747068137.Emit(OpCodes.Brfalse,label1747068137_8)
  885. ilg1747068137.MarkLabel(label1747068137_4)
  886. ilg1747068137.MarkLabel(label1747068137_3)
  887. ilg1747068137.MarkLabel(label1747068137_2)
  888. ilg1747068137.Emit(OpCodes.Ldarg, int16 0)
  889. ilg1747068137.Emit(OpCodes.Ldloc, int16 0)
  890. ilg1747068137.MarkLabel(label1747068137_5)
  891. ilg1747068137.Emit(OpCodes.Tail_)
  892. ilg1747068137.Emit(OpCodes.Callvirt, methodBuilder1014339031) // method Equals
  893. ilg1747068137.Emit(OpCodes.Ret)
  894. ilg1747068137.Emit(OpCodes.Ret)
  895. ilg1747068137.MarkLabel(label1747068137_11)
  896. ilg1747068137.MarkLabel(label1747068137_10)
  897. ilg1747068137.MarkLabel(label1747068137_9)
  898. ilg1747068137.MarkLabel(label1747068137_8)
  899. ilg1747068137.MarkLabel(label1747068137_7)
  900. ilg1747068137.MarkLabel(label1747068137_6)
  901. ilg1747068137.Emit(OpCodes.Ldc_I4, 0)
  902. ilg1747068137.Emit(OpCodes.Ret)
  903. ilg1747068137.MarkLabel(label1747068137_14)
  904. ilg1747068137.MarkLabel(label1747068137_13)
  905. ilg1747068137.MarkLabel(label1747068137_12)
  906. methodBuilder1014339031.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  907. typeBuilder980813727.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 2uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  908. let ilg1749611399 = methodBuilder569342189.GetILGenerator()
  909. let label1749611399_0 = ilg1749611399.DefineLabel()
  910. let label1749611399_1 = ilg1749611399.DefineLabel()
  911. let label1749611399_2 = ilg1749611399.DefineLabel()
  912. ilg1749611399.Emit(OpCodes.Nop)
  913. ilg1749611399.MarkLabel(label1749611399_2)
  914. ilg1749611399.MarkLabel(label1749611399_1)
  915. ilg1749611399.MarkLabel(label1749611399_0)
  916. ilg1749611399.Emit(OpCodes.Ret)
  917. typeBuilder22988282.CreateType()
  918. typeBuilder980813727.CreateType()
  919. typeBuilder1856045891.CreateType()
  920. typeBuilder2059733072.CreateType()
  921. typeBuilder2059733544.CreateType()
  922. typeBuilder2057140584.CreateType()
  923. typeBuilder2057140584.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  924. type Observation =
  925. {Label: string;
  926. Pixels: int [];}
  927.  
  928. > let toObservation (csvData:string) =
  929. - let columns = csvData.Split(',')
  930. - let label = columns.[0]
  931. - let pixels = columns.[1..] |> Array.map int
  932. - { Label = label; Pixels = pixels };;
  933. let typeBuilder1784720634 = moduleBuilder430293066.DefineType("FSI_0005",enum 385)
  934. moduleBuilder430293066.GetType("FSI_0005",false,false) |> ignore
  935. let typeBuilder1353090105 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0005>.$FSI_0005",enum 384)
  936. moduleBuilder430293066.GetType("<StartupCode$FSI_0005>.$FSI_0005",false,false) |> ignore
  937. typeBuilder1784720634.SetParent(typeof<System.Object>)
  938. typeBuilder1353090105.SetParent(typeof<System.Object>)
  939. let methodBuilder1497372679 = typeBuilder1784720634.DefineMethod("toObservation",enum 22,enum 1)
  940. methodBuilder1497372679.SetParameters([|System.String|])
  941. methodBuilder1497372679.SetReturnType(typeof<FSI_0004+Observation>)
  942. methodBuilder1497372679.SetImplementationFlags(enum 0)
  943. let methodBuilder569342189 = typeBuilder1353090105.DefineMethod("main@",enum 22,enum 1)
  944. methodBuilder569342189.SetParameters([||])
  945. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  946. methodBuilder569342189.SetImplementationFlags(enum 0)
  947. methodBuilder1497372679.DefineParameter(1,enum 0,"csvData")
  948. let ilg857823477 = methodBuilder1497372679.GetILGenerator()
  949. ilg857823477.DeclareLocal(typeof<System.String[]>,false)
  950. ilg857823477.DeclareLocal(typeof<System.String[]>,false)
  951. ilg857823477.DeclareLocal(typeof<System.Tuple`2[[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>,false)
  952. ilg857823477.DeclareLocal(typeof<System.Int32>,false)
  953. ilg857823477.DeclareLocal(typeof<System.Int32>,false)
  954. ilg857823477.DeclareLocal(typeof<System.Int32>,false)
  955. ilg857823477.DeclareLocal(typeof<System.Int32>,false)
  956. ilg857823477.DeclareLocal(typeof<System.String[]>,false)
  957. ilg857823477.DeclareLocal(typeof<System.String>,false)
  958. ilg857823477.DeclareLocal(typeof<System.Int32>,false)
  959. ilg857823477.DeclareLocal(typeof<System.Int32>,false)
  960. ilg857823477.DeclareLocal(typeof<System.Int32[]>,false)
  961. let label857823477_0 = ilg857823477.DefineLabel()
  962. let label857823477_1 = ilg857823477.DefineLabel()
  963. let label857823477_2 = ilg857823477.DefineLabel()
  964. let label857823477_3 = ilg857823477.DefineLabel()
  965. let label857823477_4 = ilg857823477.DefineLabel()
  966. let label857823477_5 = ilg857823477.DefineLabel()
  967. let label857823477_6 = ilg857823477.DefineLabel()
  968. let label857823477_7 = ilg857823477.DefineLabel()
  969. let label857823477_8 = ilg857823477.DefineLabel()
  970. let label857823477_9 = ilg857823477.DefineLabel()
  971. let label857823477_10 = ilg857823477.DefineLabel()
  972. let label857823477_11 = ilg857823477.DefineLabel()
  973. let label857823477_12 = ilg857823477.DefineLabel()
  974. let label857823477_13 = ilg857823477.DefineLabel()
  975. let label857823477_14 = ilg857823477.DefineLabel()
  976. let label857823477_15 = ilg857823477.DefineLabel()
  977. let label857823477_16 = ilg857823477.DefineLabel()
  978. let label857823477_17 = ilg857823477.DefineLabel()
  979. let label857823477_18 = ilg857823477.DefineLabel()
  980. let label857823477_19 = ilg857823477.DefineLabel()
  981. let label857823477_20 = ilg857823477.DefineLabel()
  982. let label857823477_21 = ilg857823477.DefineLabel()
  983. let label857823477_22 = ilg857823477.DefineLabel()
  984. let label857823477_23 = ilg857823477.DefineLabel()
  985. let label857823477_24 = ilg857823477.DefineLabel()
  986. let label857823477_25 = ilg857823477.DefineLabel()
  987. let label857823477_26 = ilg857823477.DefineLabel()
  988. let label857823477_27 = ilg857823477.DefineLabel()
  989. let label857823477_28 = ilg857823477.DefineLabel()
  990. let label857823477_29 = ilg857823477.DefineLabel()
  991. let label857823477_30 = ilg857823477.DefineLabel()
  992. let label857823477_31 = ilg857823477.DefineLabel()
  993. let label857823477_32 = ilg857823477.DefineLabel()
  994. let label857823477_33 = ilg857823477.DefineLabel()
  995. let label857823477_34 = ilg857823477.DefineLabel()
  996. let label857823477_35 = ilg857823477.DefineLabel()
  997. let label857823477_36 = ilg857823477.DefineLabel()
  998. let label857823477_37 = ilg857823477.DefineLabel()
  999. let label857823477_38 = ilg857823477.DefineLabel()
  1000. let label857823477_39 = ilg857823477.DefineLabel()
  1001. let label857823477_40 = ilg857823477.DefineLabel()
  1002. let label857823477_41 = ilg857823477.DefineLabel()
  1003. let label857823477_42 = ilg857823477.DefineLabel()
  1004. let label857823477_43 = ilg857823477.DefineLabel()
  1005. let label857823477_44 = ilg857823477.DefineLabel()
  1006. let label857823477_45 = ilg857823477.DefineLabel()
  1007. let label857823477_46 = ilg857823477.DefineLabel()
  1008. let label857823477_47 = ilg857823477.DefineLabel()
  1009. let label857823477_48 = ilg857823477.DefineLabel()
  1010. let label857823477_49 = ilg857823477.DefineLabel()
  1011. let label857823477_50 = ilg857823477.DefineLabel()
  1012. let label857823477_51 = ilg857823477.DefineLabel()
  1013. let label857823477_52 = ilg857823477.DefineLabel()
  1014. let label857823477_53 = ilg857823477.DefineLabel()
  1015. let label857823477_54 = ilg857823477.DefineLabel()
  1016. let label857823477_55 = ilg857823477.DefineLabel()
  1017. let label857823477_56 = ilg857823477.DefineLabel()
  1018. let label857823477_57 = ilg857823477.DefineLabel()
  1019. let label857823477_58 = ilg857823477.DefineLabel()
  1020. let label857823477_59 = ilg857823477.DefineLabel()
  1021. let label857823477_60 = ilg857823477.DefineLabel()
  1022. ilg857823477.MarkLabel(label857823477_0)
  1023. ilg857823477.Emit(OpCodes.Nop)
  1024. ilg857823477.MarkLabel(label857823477_1)
  1025. ilg857823477.Emit(OpCodes.Ldarg, int16 0)
  1026. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1027. ilg857823477.Emit(OpCodes.Newarr, typeof<System.Char>)
  1028. ilg857823477.Emit(OpCodes.Dup)
  1029. ilg857823477.Emit(OpCodes.Ldc_I4, 0)
  1030. ilg857823477.Emit(OpCodes.Ldc_I4, 44)
  1031. ilg857823477.Emit(OpCodes.Stelem, typeof<System.Char>)
  1032. ilg857823477.Emit(OpCodes.Callvirt, methodBuilder2064337704) // method Split
  1033. ilg857823477.Emit(OpCodes.Stloc, int16 0)
  1034. ilg857823477.Emit(OpCodes.Ldloc, int16 0)
  1035. ilg857823477.Emit(OpCodes.Ldc_I4, 0)
  1036. ilg857823477.Emit(OpCodes.Ldelem, typeof<System.String>)
  1037. ilg857823477.MarkLabel(label857823477_4)
  1038. ilg857823477.MarkLabel(label857823477_3)
  1039. ilg857823477.MarkLabel(label857823477_2)
  1040. ilg857823477.Emit(OpCodes.Ldloc, int16 0)
  1041. ilg857823477.Emit(OpCodes.Ldlen)
  1042. ilg857823477.Emit(OpCodes.Conv_I4)
  1043. ilg857823477.Emit(OpCodes.Stloc, int16 3)
  1044. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1045. ilg857823477.Emit(OpCodes.Ldc_I4, 0)
  1046. ilg857823477.Emit(OpCodes.Ldloc, int16 3)
  1047. ilg857823477.Emit(OpCodes.Add)
  1048. ilg857823477.Emit(OpCodes.Bgt,label857823477_9)
  1049. ilg857823477.MarkLabel(label857823477_7)
  1050. ilg857823477.MarkLabel(label857823477_6)
  1051. ilg857823477.MarkLabel(label857823477_5)
  1052. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1053. ilg857823477.Emit(OpCodes.Ldc_I4, 0)
  1054. ilg857823477.Emit(OpCodes.Ldloc, int16 3)
  1055. ilg857823477.Emit(OpCodes.Add)
  1056. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1057. ilg857823477.Emit(OpCodes.Sub)
  1058. ilg857823477.Emit(OpCodes.Newobj,constructor_Tuple`2)
  1059. ilg857823477.Emit(OpCodes.Nop)
  1060. ilg857823477.Emit(OpCodes.Br,label857823477_14)
  1061. ilg857823477.MarkLabel(label857823477_12)
  1062. ilg857823477.MarkLabel(label857823477_11)
  1063. ilg857823477.MarkLabel(label857823477_10)
  1064. ilg857823477.MarkLabel(label857823477_9)
  1065. ilg857823477.MarkLabel(label857823477_8)
  1066. ilg857823477.Emit(OpCodes.Newobj,constructor_IndexOutOfRangeException)
  1067. ilg857823477.Emit(OpCodes.Throw)
  1068. ilg857823477.MarkLabel(label857823477_15)
  1069. ilg857823477.MarkLabel(label857823477_14)
  1070. ilg857823477.MarkLabel(label857823477_13)
  1071. ilg857823477.Emit(OpCodes.Stloc, int16 2)
  1072. ilg857823477.MarkLabel(label857823477_16)
  1073. ilg857823477.Emit(OpCodes.Ldloc, int16 2)
  1074. ilg857823477.Emit(OpCodes.Call, methodBuilder632992012) // method get_Item1
  1075. ilg857823477.Emit(OpCodes.Stloc, int16 3)
  1076. ilg857823477.MarkLabel(label857823477_17)
  1077. ilg857823477.Emit(OpCodes.Ldloc, int16 2)
  1078. ilg857823477.Emit(OpCodes.Call, methodBuilder413268616) // method get_Item2
  1079. ilg857823477.Emit(OpCodes.Stloc, int16 4)
  1080. ilg857823477.MarkLabel(label857823477_18)
  1081. ilg857823477.Emit(OpCodes.Ldloc, int16 4)
  1082. ilg857823477.Emit(OpCodes.Ldloc, int16 3)
  1083. ilg857823477.Emit(OpCodes.Sub)
  1084. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1085. ilg857823477.Emit(OpCodes.Add)
  1086. ilg857823477.Emit(OpCodes.Stloc, int16 5)
  1087. ilg857823477.MarkLabel(label857823477_19)
  1088. ilg857823477.Emit(OpCodes.Ldloc, int16 5)
  1089. ilg857823477.Emit(OpCodes.Ldc_I4, 0)
  1090. ilg857823477.Emit(OpCodes.Bge,label857823477_24)
  1091. ilg857823477.MarkLabel(label857823477_22)
  1092. ilg857823477.MarkLabel(label857823477_21)
  1093. ilg857823477.MarkLabel(label857823477_20)
  1094. ilg857823477.Emit(OpCodes.Ldc_I4, 0)
  1095. ilg857823477.Emit(OpCodes.Nop)
  1096. ilg857823477.Emit(OpCodes.Br,label857823477_29)
  1097. ilg857823477.MarkLabel(label857823477_27)
  1098. ilg857823477.MarkLabel(label857823477_26)
  1099. ilg857823477.MarkLabel(label857823477_25)
  1100. ilg857823477.MarkLabel(label857823477_24)
  1101. ilg857823477.MarkLabel(label857823477_23)
  1102. ilg857823477.Emit(OpCodes.Ldloc, int16 5)
  1103. ilg857823477.Emit(OpCodes.Nop)
  1104. ilg857823477.MarkLabel(label857823477_29)
  1105. ilg857823477.MarkLabel(label857823477_28)
  1106. ilg857823477.Emit(OpCodes.Stloc, int16 6)
  1107. ilg857823477.MarkLabel(label857823477_30)
  1108. ilg857823477.Emit(OpCodes.Ldloc, int16 6)
  1109. ilg857823477.Emit(OpCodes.Newarr, typeof<System.String>)
  1110. ilg857823477.Emit(OpCodes.Stloc, int16 7)
  1111. ilg857823477.MarkLabel(label857823477_31)
  1112. ilg857823477.Emit(OpCodes.Stloc, int16 8)
  1113. ilg857823477.Emit(OpCodes.Ldc_I4, 0)
  1114. ilg857823477.Emit(OpCodes.Stloc, int16 10)
  1115. ilg857823477.Emit(OpCodes.Ldloc, int16 6)
  1116. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1117. ilg857823477.Emit(OpCodes.Sub)
  1118. ilg857823477.Emit(OpCodes.Stloc, int16 9)
  1119. ilg857823477.Emit(OpCodes.Ldloc, int16 9)
  1120. ilg857823477.Emit(OpCodes.Ldloc, int16 10)
  1121. ilg857823477.Emit(OpCodes.Blt,label857823477_34)
  1122. ilg857823477.MarkLabel(label857823477_32)
  1123. ilg857823477.Emit(OpCodes.Ldloc, int16 7)
  1124. ilg857823477.Emit(OpCodes.Ldloc, int16 10)
  1125. ilg857823477.Emit(OpCodes.Ldloc, int16 0)
  1126. ilg857823477.Emit(OpCodes.Ldloc, int16 3)
  1127. ilg857823477.Emit(OpCodes.Ldloc, int16 10)
  1128. ilg857823477.Emit(OpCodes.Add)
  1129. ilg857823477.Emit(OpCodes.Ldelem, typeof<System.String>)
  1130. ilg857823477.Emit(OpCodes.Stelem, typeof<System.String>)
  1131. ilg857823477.Emit(OpCodes.Ldloc, int16 10)
  1132. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1133. ilg857823477.Emit(OpCodes.Add)
  1134. ilg857823477.Emit(OpCodes.Stloc, int16 10)
  1135. ilg857823477.MarkLabel(label857823477_33)
  1136. ilg857823477.Emit(OpCodes.Ldloc, int16 10)
  1137. ilg857823477.Emit(OpCodes.Ldloc, int16 9)
  1138. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1139. ilg857823477.Emit(OpCodes.Add)
  1140. ilg857823477.Emit(OpCodes.Bne_un,label857823477_32)
  1141. ilg857823477.MarkLabel(label857823477_34)
  1142. ilg857823477.Emit(OpCodes.Ldloc, int16 8)
  1143. ilg857823477.Emit(OpCodes.Ldloc, int16 7)
  1144. ilg857823477.MarkLabel(label857823477_40)
  1145. ilg857823477.MarkLabel(label857823477_39)
  1146. ilg857823477.MarkLabel(label857823477_38)
  1147. ilg857823477.MarkLabel(label857823477_37)
  1148. ilg857823477.MarkLabel(label857823477_36)
  1149. ilg857823477.MarkLabel(label857823477_35)
  1150. ilg857823477.Emit(OpCodes.Stloc, int16 1)
  1151. ilg857823477.Emit(OpCodes.Ldloc, int16 1)
  1152. ilg857823477.Emit(OpCodes.Box, typeof<System.String[]>)
  1153. ilg857823477.Emit(OpCodes.Brfalse,label857823477_45)
  1154. ilg857823477.MarkLabel(label857823477_43)
  1155. ilg857823477.MarkLabel(label857823477_42)
  1156. ilg857823477.MarkLabel(label857823477_41)
  1157. ilg857823477.Emit(OpCodes.Nop)
  1158. ilg857823477.Emit(OpCodes.Br,label857823477_50)
  1159. ilg857823477.MarkLabel(label857823477_48)
  1160. ilg857823477.MarkLabel(label857823477_47)
  1161. ilg857823477.MarkLabel(label857823477_46)
  1162. ilg857823477.MarkLabel(label857823477_45)
  1163. ilg857823477.MarkLabel(label857823477_44)
  1164. ilg857823477.Emit(OpCodes.Ldstr,"@array")
  1165. ilg857823477.Emit(OpCodes.Newobj,constructor_ArgumentNullException)
  1166. ilg857823477.Emit(OpCodes.Throw)
  1167. ilg857823477.MarkLabel(label857823477_51)
  1168. ilg857823477.MarkLabel(label857823477_50)
  1169. ilg857823477.MarkLabel(label857823477_49)
  1170. ilg857823477.Emit(OpCodes.Ldloc, int16 1)
  1171. ilg857823477.Emit(OpCodes.Ldlen)
  1172. ilg857823477.Emit(OpCodes.Conv_I4)
  1173. ilg857823477.Emit(OpCodes.Newarr, typeof<System.Int32>)
  1174. ilg857823477.Emit(OpCodes.Stloc, int16 11)
  1175. ilg857823477.MarkLabel(label857823477_52)
  1176. ilg857823477.Emit(OpCodes.Stloc, int16 8)
  1177. ilg857823477.Emit(OpCodes.Ldc_I4, 0)
  1178. ilg857823477.Emit(OpCodes.Stloc, int16 3)
  1179. ilg857823477.Emit(OpCodes.Br,label857823477_56)
  1180. ilg857823477.MarkLabel(label857823477_53)
  1181. ilg857823477.Emit(OpCodes.Ldloc, int16 11)
  1182. ilg857823477.Emit(OpCodes.Ldloc, int16 3)
  1183. ilg857823477.Emit(OpCodes.Ldloc, int16 1)
  1184. ilg857823477.Emit(OpCodes.Ldloc, int16 3)
  1185. ilg857823477.Emit(OpCodes.Ldelem, typeof<System.String>)
  1186. ilg857823477.MarkLabel(label857823477_54)
  1187. ilg857823477.Emit(OpCodes.Call, methodBuilder525591110) // method ParseInt32
  1188. ilg857823477.MarkLabel(label857823477_55)
  1189. ilg857823477.Emit(OpCodes.Stelem, typeof<System.Int32>)
  1190. ilg857823477.Emit(OpCodes.Ldloc, int16 3)
  1191. ilg857823477.Emit(OpCodes.Ldc_I4, 1)
  1192. ilg857823477.Emit(OpCodes.Add)
  1193. ilg857823477.Emit(OpCodes.Stloc, int16 3)
  1194. ilg857823477.MarkLabel(label857823477_56)
  1195. ilg857823477.Emit(OpCodes.Ldloc, int16 3)
  1196. ilg857823477.Emit(OpCodes.Ldloc, int16 11)
  1197. ilg857823477.Emit(OpCodes.Ldlen)
  1198. ilg857823477.Emit(OpCodes.Conv_I4)
  1199. ilg857823477.Emit(OpCodes.Blt,label857823477_53)
  1200. ilg857823477.MarkLabel(label857823477_57)
  1201. ilg857823477.Emit(OpCodes.Ldloc, int16 8)
  1202. ilg857823477.Emit(OpCodes.Ldloc, int16 11)
  1203. ilg857823477.MarkLabel(label857823477_59)
  1204. ilg857823477.MarkLabel(label857823477_58)
  1205. ilg857823477.Emit(OpCodes.Newobj,constructor_Observation)
  1206. ilg857823477.Emit(OpCodes.Ret)
  1207. ilg857823477.MarkLabel(label857823477_60)
  1208. typeBuilder1784720634.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  1209. let ilg182748722 = methodBuilder569342189.GetILGenerator()
  1210. let label182748722_0 = ilg182748722.DefineLabel()
  1211. let label182748722_1 = ilg182748722.DefineLabel()
  1212. let label182748722_2 = ilg182748722.DefineLabel()
  1213. ilg182748722.Emit(OpCodes.Nop)
  1214. ilg182748722.MarkLabel(label182748722_2)
  1215. ilg182748722.MarkLabel(label182748722_1)
  1216. ilg182748722.MarkLabel(label182748722_0)
  1217. ilg182748722.Emit(OpCodes.Ret)
  1218. typeBuilder1784720634.CreateType()
  1219. typeBuilder1353090105.CreateType()
  1220. typeBuilder2132183336.CreateType()
  1221. typeBuilder2132184880.CreateType()
  1222. typeBuilder2132184880.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  1223. val toObservation : csvData:string -> Observation
  1224.  
  1225. > let reader path =
  1226. - let data = File.ReadAllLines path
  1227. - data.[1..]
  1228. - |> Array.map toObservation;;
  1229. let typeBuilder1438368486 = moduleBuilder430293066.DefineType("FSI_0006",enum 385)
  1230. moduleBuilder430293066.GetType("FSI_0006",false,false) |> ignore
  1231. let typeBuilder1995295303 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0006>.$FSI_0006",enum 384)
  1232. moduleBuilder430293066.GetType("<StartupCode$FSI_0006>.$FSI_0006",false,false) |> ignore
  1233. typeBuilder1438368486.SetParent(typeof<System.Object>)
  1234. typeBuilder1995295303.SetParent(typeof<System.Object>)
  1235. let methodBuilder51169761 = typeBuilder1438368486.DefineMethod("reader",enum 22,enum 1)
  1236. methodBuilder51169761.SetParameters([|System.String|])
  1237. methodBuilder51169761.SetReturnType(typeof<FSI_0004+Observation[]>)
  1238. methodBuilder51169761.SetImplementationFlags(enum 0)
  1239. let methodBuilder569342189 = typeBuilder1995295303.DefineMethod("main@",enum 22,enum 1)
  1240. methodBuilder569342189.SetParameters([||])
  1241. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  1242. methodBuilder569342189.SetImplementationFlags(enum 0)
  1243. methodBuilder51169761.DefineParameter(1,enum 0,"path")
  1244. let ilg1541684003 = methodBuilder51169761.GetILGenerator()
  1245. ilg1541684003.DeclareLocal(typeof<System.String[]>,false)
  1246. ilg1541684003.DeclareLocal(typeof<System.String[]>,false)
  1247. ilg1541684003.DeclareLocal(typeof<System.Tuple`2[[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>,false)
  1248. ilg1541684003.DeclareLocal(typeof<System.Int32>,false)
  1249. ilg1541684003.DeclareLocal(typeof<System.Int32>,false)
  1250. ilg1541684003.DeclareLocal(typeof<System.Int32>,false)
  1251. ilg1541684003.DeclareLocal(typeof<System.Int32>,false)
  1252. ilg1541684003.DeclareLocal(typeof<System.String[]>,false)
  1253. ilg1541684003.DeclareLocal(typeof<System.Int32>,false)
  1254. ilg1541684003.DeclareLocal(typeof<System.Int32>,false)
  1255. ilg1541684003.DeclareLocal(typeof<FSI_0004+Observation[]>,false)
  1256. let label1541684003_0 = ilg1541684003.DefineLabel()
  1257. let label1541684003_1 = ilg1541684003.DefineLabel()
  1258. let label1541684003_2 = ilg1541684003.DefineLabel()
  1259. let label1541684003_3 = ilg1541684003.DefineLabel()
  1260. let label1541684003_4 = ilg1541684003.DefineLabel()
  1261. let label1541684003_5 = ilg1541684003.DefineLabel()
  1262. let label1541684003_6 = ilg1541684003.DefineLabel()
  1263. let label1541684003_7 = ilg1541684003.DefineLabel()
  1264. let label1541684003_8 = ilg1541684003.DefineLabel()
  1265. let label1541684003_9 = ilg1541684003.DefineLabel()
  1266. let label1541684003_10 = ilg1541684003.DefineLabel()
  1267. let label1541684003_11 = ilg1541684003.DefineLabel()
  1268. let label1541684003_12 = ilg1541684003.DefineLabel()
  1269. let label1541684003_13 = ilg1541684003.DefineLabel()
  1270. let label1541684003_14 = ilg1541684003.DefineLabel()
  1271. let label1541684003_15 = ilg1541684003.DefineLabel()
  1272. let label1541684003_16 = ilg1541684003.DefineLabel()
  1273. let label1541684003_17 = ilg1541684003.DefineLabel()
  1274. let label1541684003_18 = ilg1541684003.DefineLabel()
  1275. let label1541684003_19 = ilg1541684003.DefineLabel()
  1276. let label1541684003_20 = ilg1541684003.DefineLabel()
  1277. let label1541684003_21 = ilg1541684003.DefineLabel()
  1278. let label1541684003_22 = ilg1541684003.DefineLabel()
  1279. let label1541684003_23 = ilg1541684003.DefineLabel()
  1280. let label1541684003_24 = ilg1541684003.DefineLabel()
  1281. let label1541684003_25 = ilg1541684003.DefineLabel()
  1282. let label1541684003_26 = ilg1541684003.DefineLabel()
  1283. let label1541684003_27 = ilg1541684003.DefineLabel()
  1284. let label1541684003_28 = ilg1541684003.DefineLabel()
  1285. let label1541684003_29 = ilg1541684003.DefineLabel()
  1286. let label1541684003_30 = ilg1541684003.DefineLabel()
  1287. let label1541684003_31 = ilg1541684003.DefineLabel()
  1288. let label1541684003_32 = ilg1541684003.DefineLabel()
  1289. let label1541684003_33 = ilg1541684003.DefineLabel()
  1290. let label1541684003_34 = ilg1541684003.DefineLabel()
  1291. let label1541684003_35 = ilg1541684003.DefineLabel()
  1292. let label1541684003_36 = ilg1541684003.DefineLabel()
  1293. let label1541684003_37 = ilg1541684003.DefineLabel()
  1294. let label1541684003_38 = ilg1541684003.DefineLabel()
  1295. let label1541684003_39 = ilg1541684003.DefineLabel()
  1296. let label1541684003_40 = ilg1541684003.DefineLabel()
  1297. let label1541684003_41 = ilg1541684003.DefineLabel()
  1298. let label1541684003_42 = ilg1541684003.DefineLabel()
  1299. let label1541684003_43 = ilg1541684003.DefineLabel()
  1300. let label1541684003_44 = ilg1541684003.DefineLabel()
  1301. let label1541684003_45 = ilg1541684003.DefineLabel()
  1302. let label1541684003_46 = ilg1541684003.DefineLabel()
  1303. let label1541684003_47 = ilg1541684003.DefineLabel()
  1304. let label1541684003_48 = ilg1541684003.DefineLabel()
  1305. let label1541684003_49 = ilg1541684003.DefineLabel()
  1306. let label1541684003_50 = ilg1541684003.DefineLabel()
  1307. let label1541684003_51 = ilg1541684003.DefineLabel()
  1308. let label1541684003_52 = ilg1541684003.DefineLabel()
  1309. let label1541684003_53 = ilg1541684003.DefineLabel()
  1310. let label1541684003_54 = ilg1541684003.DefineLabel()
  1311. let label1541684003_55 = ilg1541684003.DefineLabel()
  1312. let label1541684003_56 = ilg1541684003.DefineLabel()
  1313. let label1541684003_57 = ilg1541684003.DefineLabel()
  1314. let label1541684003_58 = ilg1541684003.DefineLabel()
  1315. let label1541684003_59 = ilg1541684003.DefineLabel()
  1316. let label1541684003_60 = ilg1541684003.DefineLabel()
  1317. ilg1541684003.MarkLabel(label1541684003_0)
  1318. ilg1541684003.Emit(OpCodes.Nop)
  1319. ilg1541684003.MarkLabel(label1541684003_1)
  1320. ilg1541684003.Emit(OpCodes.Ldarg, int16 0)
  1321. ilg1541684003.Emit(OpCodes.Call, methodBuilder1633614213) // method ReadAllLines
  1322. ilg1541684003.Emit(OpCodes.Stloc, int16 0)
  1323. ilg1541684003.MarkLabel(label1541684003_4)
  1324. ilg1541684003.MarkLabel(label1541684003_3)
  1325. ilg1541684003.MarkLabel(label1541684003_2)
  1326. ilg1541684003.Emit(OpCodes.Ldloc, int16 0)
  1327. ilg1541684003.Emit(OpCodes.Ldlen)
  1328. ilg1541684003.Emit(OpCodes.Conv_I4)
  1329. ilg1541684003.Emit(OpCodes.Stloc, int16 3)
  1330. ilg1541684003.Emit(OpCodes.Ldc_I4, 1)
  1331. ilg1541684003.Emit(OpCodes.Ldc_I4, 0)
  1332. ilg1541684003.Emit(OpCodes.Ldloc, int16 3)
  1333. ilg1541684003.Emit(OpCodes.Add)
  1334. ilg1541684003.Emit(OpCodes.Bgt,label1541684003_9)
  1335. ilg1541684003.MarkLabel(label1541684003_7)
  1336. ilg1541684003.MarkLabel(label1541684003_6)
  1337. ilg1541684003.MarkLabel(label1541684003_5)
  1338. ilg1541684003.Emit(OpCodes.Ldc_I4, 1)
  1339. ilg1541684003.Emit(OpCodes.Ldc_I4, 0)
  1340. ilg1541684003.Emit(OpCodes.Ldloc, int16 3)
  1341. ilg1541684003.Emit(OpCodes.Add)
  1342. ilg1541684003.Emit(OpCodes.Ldc_I4, 1)
  1343. ilg1541684003.Emit(OpCodes.Sub)
  1344. ilg1541684003.Emit(OpCodes.Newobj,constructor_Tuple`2)
  1345. ilg1541684003.Emit(OpCodes.Nop)
  1346. ilg1541684003.Emit(OpCodes.Br,label1541684003_14)
  1347. ilg1541684003.MarkLabel(label1541684003_12)
  1348. ilg1541684003.MarkLabel(label1541684003_11)
  1349. ilg1541684003.MarkLabel(label1541684003_10)
  1350. ilg1541684003.MarkLabel(label1541684003_9)
  1351. ilg1541684003.MarkLabel(label1541684003_8)
  1352. ilg1541684003.Emit(OpCodes.Newobj,constructor_IndexOutOfRangeException)
  1353. ilg1541684003.Emit(OpCodes.Throw)
  1354. ilg1541684003.MarkLabel(label1541684003_15)
  1355. ilg1541684003.MarkLabel(label1541684003_14)
  1356. ilg1541684003.MarkLabel(label1541684003_13)
  1357. ilg1541684003.Emit(OpCodes.Stloc, int16 2)
  1358. ilg1541684003.MarkLabel(label1541684003_16)
  1359. ilg1541684003.Emit(OpCodes.Ldloc, int16 2)
  1360. ilg1541684003.Emit(OpCodes.Call, methodBuilder632992012) // method get_Item1
  1361. ilg1541684003.Emit(OpCodes.Stloc, int16 3)
  1362. ilg1541684003.MarkLabel(label1541684003_17)
  1363. ilg1541684003.Emit(OpCodes.Ldloc, int16 2)
  1364. ilg1541684003.Emit(OpCodes.Call, methodBuilder413268616) // method get_Item2
  1365. ilg1541684003.Emit(OpCodes.Stloc, int16 4)
  1366. ilg1541684003.MarkLabel(label1541684003_18)
  1367. ilg1541684003.Emit(OpCodes.Ldloc, int16 4)
  1368. ilg1541684003.Emit(OpCodes.Ldloc, int16 3)
  1369. ilg1541684003.Emit(OpCodes.Sub)
  1370. ilg1541684003.Emit(OpCodes.Ldc_I4, 1)
  1371. ilg1541684003.Emit(OpCodes.Add)
  1372. ilg1541684003.Emit(OpCodes.Stloc, int16 5)
  1373. ilg1541684003.MarkLabel(label1541684003_19)
  1374. ilg1541684003.Emit(OpCodes.Ldloc, int16 5)
  1375. ilg1541684003.Emit(OpCodes.Ldc_I4, 0)
  1376. ilg1541684003.Emit(OpCodes.Bge,label1541684003_24)
  1377. ilg1541684003.MarkLabel(label1541684003_22)
  1378. ilg1541684003.MarkLabel(label1541684003_21)
  1379. ilg1541684003.MarkLabel(label1541684003_20)
  1380. ilg1541684003.Emit(OpCodes.Ldc_I4, 0)
  1381. ilg1541684003.Emit(OpCodes.Nop)
  1382. ilg1541684003.Emit(OpCodes.Br,label1541684003_29)
  1383. ilg1541684003.MarkLabel(label1541684003_27)
  1384. ilg1541684003.MarkLabel(label1541684003_26)
  1385. ilg1541684003.MarkLabel(label1541684003_25)
  1386. ilg1541684003.MarkLabel(label1541684003_24)
  1387. ilg1541684003.MarkLabel(label1541684003_23)
  1388. ilg1541684003.Emit(OpCodes.Ldloc, int16 5)
  1389. ilg1541684003.Emit(OpCodes.Nop)
  1390. ilg1541684003.MarkLabel(label1541684003_29)
  1391. ilg1541684003.MarkLabel(label1541684003_28)
  1392. ilg1541684003.Emit(OpCodes.Stloc, int16 6)
  1393. ilg1541684003.MarkLabel(label1541684003_30)
  1394. ilg1541684003.Emit(OpCodes.Ldloc, int16 6)
  1395. ilg1541684003.Emit(OpCodes.Newarr, typeof<System.String>)
  1396. ilg1541684003.Emit(OpCodes.Stloc, int16 7)
  1397. ilg1541684003.MarkLabel(label1541684003_31)
  1398. ilg1541684003.Emit(OpCodes.Ldc_I4, 0)
  1399. ilg1541684003.Emit(OpCodes.Stloc, int16 9)
  1400. ilg1541684003.Emit(OpCodes.Ldloc, int16 6)
  1401. ilg1541684003.Emit(OpCodes.Ldc_I4, 1)
  1402. ilg1541684003.Emit(OpCodes.Sub)
  1403. ilg1541684003.Emit(OpCodes.Stloc, int16 8)
  1404. ilg1541684003.Emit(OpCodes.Ldloc, int16 8)
  1405. ilg1541684003.Emit(OpCodes.Ldloc, int16 9)
  1406. ilg1541684003.Emit(OpCodes.Blt,label1541684003_34)
  1407. ilg1541684003.MarkLabel(label1541684003_32)
  1408. ilg1541684003.Emit(OpCodes.Ldloc, int16 7)
  1409. ilg1541684003.Emit(OpCodes.Ldloc, int16 9)
  1410. ilg1541684003.Emit(OpCodes.Ldloc, int16 0)
  1411. ilg1541684003.Emit(OpCodes.Ldloc, int16 3)
  1412. ilg1541684003.Emit(OpCodes.Ldloc, int16 9)
  1413. ilg1541684003.Emit(OpCodes.Add)
  1414. ilg1541684003.Emit(OpCodes.Ldelem, typeof<System.String>)
  1415. ilg1541684003.Emit(OpCodes.Stelem, typeof<System.String>)
  1416. ilg1541684003.Emit(OpCodes.Ldloc, int16 9)
  1417. ilg1541684003.Emit(OpCodes.Ldc_I4, 1)
  1418. ilg1541684003.Emit(OpCodes.Add)
  1419. ilg1541684003.Emit(OpCodes.Stloc, int16 9)
  1420. ilg1541684003.MarkLabel(label1541684003_33)
  1421. ilg1541684003.Emit(OpCodes.Ldloc, int16 9)
  1422. ilg1541684003.Emit(OpCodes.Ldloc, int16 8)
  1423. ilg1541684003.Emit(OpCodes.Ldc_I4, 1)
  1424. ilg1541684003.Emit(OpCodes.Add)
  1425. ilg1541684003.Emit(OpCodes.Bne_un,label1541684003_32)
  1426. ilg1541684003.MarkLabel(label1541684003_34)
  1427. ilg1541684003.Emit(OpCodes.Ldloc, int16 7)
  1428. ilg1541684003.MarkLabel(label1541684003_40)
  1429. ilg1541684003.MarkLabel(label1541684003_39)
  1430. ilg1541684003.MarkLabel(label1541684003_38)
  1431. ilg1541684003.MarkLabel(label1541684003_37)
  1432. ilg1541684003.MarkLabel(label1541684003_36)
  1433. ilg1541684003.MarkLabel(label1541684003_35)
  1434. ilg1541684003.Emit(OpCodes.Stloc, int16 1)
  1435. ilg1541684003.Emit(OpCodes.Ldloc, int16 1)
  1436. ilg1541684003.Emit(OpCodes.Box, typeof<System.String[]>)
  1437. ilg1541684003.Emit(OpCodes.Brfalse,label1541684003_45)
  1438. ilg1541684003.MarkLabel(label1541684003_43)
  1439. ilg1541684003.MarkLabel(label1541684003_42)
  1440. ilg1541684003.MarkLabel(label1541684003_41)
  1441. ilg1541684003.Emit(OpCodes.Nop)
  1442. ilg1541684003.Emit(OpCodes.Br,label1541684003_50)
  1443. ilg1541684003.MarkLabel(label1541684003_48)
  1444. ilg1541684003.MarkLabel(label1541684003_47)
  1445. ilg1541684003.MarkLabel(label1541684003_46)
  1446. ilg1541684003.MarkLabel(label1541684003_45)
  1447. ilg1541684003.MarkLabel(label1541684003_44)
  1448. ilg1541684003.Emit(OpCodes.Ldstr,"@array")
  1449. ilg1541684003.Emit(OpCodes.Newobj,constructor_ArgumentNullException)
  1450. ilg1541684003.Emit(OpCodes.Throw)
  1451. ilg1541684003.MarkLabel(label1541684003_51)
  1452. ilg1541684003.MarkLabel(label1541684003_50)
  1453. ilg1541684003.MarkLabel(label1541684003_49)
  1454. ilg1541684003.Emit(OpCodes.Ldloc, int16 1)
  1455. ilg1541684003.Emit(OpCodes.Ldlen)
  1456. ilg1541684003.Emit(OpCodes.Conv_I4)
  1457. ilg1541684003.Emit(OpCodes.Newarr, typeof<FSI_0004+Observation>)
  1458. ilg1541684003.Emit(OpCodes.Stloc, int16 10)
  1459. ilg1541684003.MarkLabel(label1541684003_52)
  1460. ilg1541684003.Emit(OpCodes.Ldc_I4, 0)
  1461. ilg1541684003.Emit(OpCodes.Stloc, int16 3)
  1462. ilg1541684003.Emit(OpCodes.Br,label1541684003_56)
  1463. ilg1541684003.MarkLabel(label1541684003_53)
  1464. ilg1541684003.Emit(OpCodes.Ldloc, int16 10)
  1465. ilg1541684003.Emit(OpCodes.Ldloc, int16 3)
  1466. ilg1541684003.Emit(OpCodes.Ldloc, int16 1)
  1467. ilg1541684003.Emit(OpCodes.Ldloc, int16 3)
  1468. ilg1541684003.Emit(OpCodes.Ldelem, typeof<System.String>)
  1469. ilg1541684003.MarkLabel(label1541684003_54)
  1470. ilg1541684003.Emit(OpCodes.Call, methodBuilder1497372679) // method toObservation
  1471. ilg1541684003.MarkLabel(label1541684003_55)
  1472. ilg1541684003.Emit(OpCodes.Stelem, typeof<FSI_0004+Observation>)
  1473. ilg1541684003.Emit(OpCodes.Ldloc, int16 3)
  1474. ilg1541684003.Emit(OpCodes.Ldc_I4, 1)
  1475. ilg1541684003.Emit(OpCodes.Add)
  1476. ilg1541684003.Emit(OpCodes.Stloc, int16 3)
  1477. ilg1541684003.MarkLabel(label1541684003_56)
  1478. ilg1541684003.Emit(OpCodes.Ldloc, int16 3)
  1479. ilg1541684003.Emit(OpCodes.Ldloc, int16 10)
  1480. ilg1541684003.Emit(OpCodes.Ldlen)
  1481. ilg1541684003.Emit(OpCodes.Conv_I4)
  1482. ilg1541684003.Emit(OpCodes.Blt,label1541684003_53)
  1483. ilg1541684003.MarkLabel(label1541684003_57)
  1484. ilg1541684003.Emit(OpCodes.Ldloc, int16 10)
  1485. ilg1541684003.Emit(OpCodes.Ret)
  1486. ilg1541684003.MarkLabel(label1541684003_60)
  1487. ilg1541684003.MarkLabel(label1541684003_59)
  1488. ilg1541684003.MarkLabel(label1541684003_58)
  1489. typeBuilder1438368486.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  1490. let ilg2115706101 = methodBuilder569342189.GetILGenerator()
  1491. let label2115706101_0 = ilg2115706101.DefineLabel()
  1492. let label2115706101_1 = ilg2115706101.DefineLabel()
  1493. let label2115706101_2 = ilg2115706101.DefineLabel()
  1494. ilg2115706101.Emit(OpCodes.Nop)
  1495. ilg2115706101.MarkLabel(label2115706101_2)
  1496. ilg2115706101.MarkLabel(label2115706101_1)
  1497. ilg2115706101.MarkLabel(label2115706101_0)
  1498. ilg2115706101.Emit(OpCodes.Ret)
  1499. typeBuilder1438368486.CreateType()
  1500. typeBuilder1995295303.CreateType()
  1501. typeBuilder2132185576.CreateType()
  1502. typeBuilder2132187328.CreateType()
  1503. typeBuilder2132187328.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  1504. val reader : path:string -> Observation []
  1505.  
  1506. > let manhattanDistance(pixels1:int[], pixels2:int[]) =
  1507. - Array.zip pixels1 pixels2
  1508. - |> Array.map (fun (x, y) -> abs(x-y))
  1509. - |> Array.sum ;;
  1510. let typeBuilder399681458 = moduleBuilder430293066.DefineType("FSI_0007",enum 385)
  1511. moduleBuilder430293066.GetType("FSI_0007",false,false) |> ignore
  1512. let typeBuilder1154100404 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0007>.$FSI_0007",enum 384)
  1513. moduleBuilder430293066.GetType("<StartupCode$FSI_0007>.$FSI_0007",false,false) |> ignore
  1514. typeBuilder399681458.SetParent(typeof<System.Object>)
  1515. typeBuilder1154100404.SetParent(typeof<System.Object>)
  1516. let methodBuilder824980409 = typeBuilder399681458.DefineMethod("manhattanDistance",enum 22,enum 1)
  1517. methodBuilder824980409.SetParameters([|System.Int32[]; System.Int32[]|])
  1518. methodBuilder824980409.SetReturnType(typeof<System.Int32>)
  1519. methodBuilder824980409.SetImplementationFlags(enum 0)
  1520. let methodBuilder569342189 = typeBuilder1154100404.DefineMethod("main@",enum 22,enum 1)
  1521. methodBuilder569342189.SetParameters([||])
  1522. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  1523. methodBuilder569342189.SetImplementationFlags(enum 0)
  1524. methodBuilder824980409.DefineParameter(1,enum 0,"pixels1")
  1525. methodBuilder824980409.DefineParameter(2,enum 0,"pixels2")
  1526. let ilg1338386250 = methodBuilder824980409.GetILGenerator()
  1527. ilg1338386250.DeclareLocal(typeof<System.Int32[]>,false)
  1528. ilg1338386250.DeclareLocal(typeof<System.Tuple`2[[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]][]>,false)
  1529. ilg1338386250.DeclareLocal(typeof<System.Int32[]>,false)
  1530. ilg1338386250.DeclareLocal(typeof<System.Int32>,false)
  1531. ilg1338386250.DeclareLocal(typeof<System.Tuple`2[[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>,false)
  1532. ilg1338386250.DeclareLocal(typeof<System.Int32>,false)
  1533. ilg1338386250.DeclareLocal(typeof<System.Int32>,false)
  1534. let label1338386250_0 = ilg1338386250.DefineLabel()
  1535. let label1338386250_1 = ilg1338386250.DefineLabel()
  1536. let label1338386250_2 = ilg1338386250.DefineLabel()
  1537. let label1338386250_3 = ilg1338386250.DefineLabel()
  1538. let label1338386250_4 = ilg1338386250.DefineLabel()
  1539. let label1338386250_5 = ilg1338386250.DefineLabel()
  1540. let label1338386250_6 = ilg1338386250.DefineLabel()
  1541. let label1338386250_7 = ilg1338386250.DefineLabel()
  1542. let label1338386250_8 = ilg1338386250.DefineLabel()
  1543. let label1338386250_9 = ilg1338386250.DefineLabel()
  1544. let label1338386250_10 = ilg1338386250.DefineLabel()
  1545. let label1338386250_11 = ilg1338386250.DefineLabel()
  1546. let label1338386250_12 = ilg1338386250.DefineLabel()
  1547. let label1338386250_13 = ilg1338386250.DefineLabel()
  1548. let label1338386250_14 = ilg1338386250.DefineLabel()
  1549. let label1338386250_15 = ilg1338386250.DefineLabel()
  1550. let label1338386250_16 = ilg1338386250.DefineLabel()
  1551. let label1338386250_17 = ilg1338386250.DefineLabel()
  1552. let label1338386250_18 = ilg1338386250.DefineLabel()
  1553. let label1338386250_19 = ilg1338386250.DefineLabel()
  1554. let label1338386250_20 = ilg1338386250.DefineLabel()
  1555. let label1338386250_21 = ilg1338386250.DefineLabel()
  1556. let label1338386250_22 = ilg1338386250.DefineLabel()
  1557. let label1338386250_23 = ilg1338386250.DefineLabel()
  1558. let label1338386250_24 = ilg1338386250.DefineLabel()
  1559. let label1338386250_25 = ilg1338386250.DefineLabel()
  1560. let label1338386250_26 = ilg1338386250.DefineLabel()
  1561. let label1338386250_27 = ilg1338386250.DefineLabel()
  1562. let label1338386250_28 = ilg1338386250.DefineLabel()
  1563. let label1338386250_29 = ilg1338386250.DefineLabel()
  1564. let label1338386250_30 = ilg1338386250.DefineLabel()
  1565. let label1338386250_31 = ilg1338386250.DefineLabel()
  1566. let label1338386250_32 = ilg1338386250.DefineLabel()
  1567. let label1338386250_33 = ilg1338386250.DefineLabel()
  1568. let label1338386250_34 = ilg1338386250.DefineLabel()
  1569. let label1338386250_35 = ilg1338386250.DefineLabel()
  1570. let label1338386250_36 = ilg1338386250.DefineLabel()
  1571. let label1338386250_37 = ilg1338386250.DefineLabel()
  1572. let label1338386250_38 = ilg1338386250.DefineLabel()
  1573. let label1338386250_39 = ilg1338386250.DefineLabel()
  1574. let label1338386250_40 = ilg1338386250.DefineLabel()
  1575. let label1338386250_41 = ilg1338386250.DefineLabel()
  1576. let label1338386250_42 = ilg1338386250.DefineLabel()
  1577. let label1338386250_43 = ilg1338386250.DefineLabel()
  1578. let label1338386250_44 = ilg1338386250.DefineLabel()
  1579. ilg1338386250.MarkLabel(label1338386250_0)
  1580. ilg1338386250.Emit(OpCodes.Nop)
  1581. ilg1338386250.MarkLabel(label1338386250_2)
  1582. ilg1338386250.MarkLabel(label1338386250_1)
  1583. ilg1338386250.Emit(OpCodes.Ldarg, int16 0)
  1584. ilg1338386250.Emit(OpCodes.Ldarg, int16 1)
  1585. ilg1338386250.MarkLabel(label1338386250_3)
  1586. ilg1338386250.Emit(OpCodes.Call, methodBuilder278103040) // method Zip
  1587. ilg1338386250.MarkLabel(label1338386250_4)
  1588. ilg1338386250.Emit(OpCodes.Stloc, int16 1)
  1589. ilg1338386250.Emit(OpCodes.Ldloc, int16 1)
  1590. ilg1338386250.Emit(OpCodes.Box, typeof<System.Tuple`2[[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]][]>)
  1591. ilg1338386250.Emit(OpCodes.Brfalse,label1338386250_9)
  1592. ilg1338386250.MarkLabel(label1338386250_7)
  1593. ilg1338386250.MarkLabel(label1338386250_6)
  1594. ilg1338386250.MarkLabel(label1338386250_5)
  1595. ilg1338386250.Emit(OpCodes.Nop)
  1596. ilg1338386250.Emit(OpCodes.Br,label1338386250_14)
  1597. ilg1338386250.MarkLabel(label1338386250_12)
  1598. ilg1338386250.MarkLabel(label1338386250_11)
  1599. ilg1338386250.MarkLabel(label1338386250_10)
  1600. ilg1338386250.MarkLabel(label1338386250_9)
  1601. ilg1338386250.MarkLabel(label1338386250_8)
  1602. ilg1338386250.Emit(OpCodes.Ldstr,"@array")
  1603. ilg1338386250.Emit(OpCodes.Newobj,constructor_ArgumentNullException)
  1604. ilg1338386250.Emit(OpCodes.Throw)
  1605. ilg1338386250.MarkLabel(label1338386250_15)
  1606. ilg1338386250.MarkLabel(label1338386250_14)
  1607. ilg1338386250.MarkLabel(label1338386250_13)
  1608. ilg1338386250.Emit(OpCodes.Ldloc, int16 1)
  1609. ilg1338386250.Emit(OpCodes.Ldlen)
  1610. ilg1338386250.Emit(OpCodes.Conv_I4)
  1611. ilg1338386250.Emit(OpCodes.Newarr, typeof<System.Int32>)
  1612. ilg1338386250.Emit(OpCodes.Stloc, int16 2)
  1613. ilg1338386250.MarkLabel(label1338386250_16)
  1614. ilg1338386250.Emit(OpCodes.Ldc_I4, 0)
  1615. ilg1338386250.Emit(OpCodes.Stloc, int16 3)
  1616. ilg1338386250.Emit(OpCodes.Br,label1338386250_24)
  1617. ilg1338386250.MarkLabel(label1338386250_17)
  1618. ilg1338386250.Emit(OpCodes.Ldloc, int16 2)
  1619. ilg1338386250.Emit(OpCodes.Ldloc, int16 3)
  1620. ilg1338386250.MarkLabel(label1338386250_18)
  1621. ilg1338386250.Emit(OpCodes.Ldloc, int16 1)
  1622. ilg1338386250.Emit(OpCodes.Ldloc, int16 3)
  1623. ilg1338386250.Emit(OpCodes.Ldelem, typeof<System.Tuple`2[[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>)
  1624. ilg1338386250.Emit(OpCodes.Stloc, int16 4)
  1625. ilg1338386250.MarkLabel(label1338386250_19)
  1626. ilg1338386250.Emit(OpCodes.Ldloc, int16 4)
  1627. ilg1338386250.Emit(OpCodes.Call, methodBuilder632992012) // method get_Item1
  1628. ilg1338386250.Emit(OpCodes.Stloc, int16 5)
  1629. ilg1338386250.MarkLabel(label1338386250_20)
  1630. ilg1338386250.Emit(OpCodes.Ldloc, int16 4)
  1631. ilg1338386250.Emit(OpCodes.Call, methodBuilder413268616) // method get_Item2
  1632. ilg1338386250.Emit(OpCodes.Stloc, int16 6)
  1633. ilg1338386250.Emit(OpCodes.Ldloc, int16 5)
  1634. ilg1338386250.Emit(OpCodes.Ldloc, int16 6)
  1635. ilg1338386250.Emit(OpCodes.Sub)
  1636. ilg1338386250.Emit(OpCodes.Call, methodBuilder1831780891) // method Abs
  1637. ilg1338386250.MarkLabel(label1338386250_23)
  1638. ilg1338386250.MarkLabel(label1338386250_22)
  1639. ilg1338386250.MarkLabel(label1338386250_21)
  1640. ilg1338386250.Emit(OpCodes.Stelem, typeof<System.Int32>)
  1641. ilg1338386250.Emit(OpCodes.Ldloc, int16 3)
  1642. ilg1338386250.Emit(OpCodes.Ldc_I4, 1)
  1643. ilg1338386250.Emit(OpCodes.Add)
  1644. ilg1338386250.Emit(OpCodes.Stloc, int16 3)
  1645. ilg1338386250.MarkLabel(label1338386250_24)
  1646. ilg1338386250.Emit(OpCodes.Ldloc, int16 3)
  1647. ilg1338386250.Emit(OpCodes.Ldloc, int16 2)
  1648. ilg1338386250.Emit(OpCodes.Ldlen)
  1649. ilg1338386250.Emit(OpCodes.Conv_I4)
  1650. ilg1338386250.Emit(OpCodes.Blt,label1338386250_17)
  1651. ilg1338386250.MarkLabel(label1338386250_25)
  1652. ilg1338386250.Emit(OpCodes.Ldloc, int16 2)
  1653. ilg1338386250.MarkLabel(label1338386250_27)
  1654. ilg1338386250.MarkLabel(label1338386250_26)
  1655. ilg1338386250.Emit(OpCodes.Stloc, int16 0)
  1656. ilg1338386250.Emit(OpCodes.Ldloc, int16 0)
  1657. ilg1338386250.Emit(OpCodes.Box, typeof<System.Int32[]>)
  1658. ilg1338386250.Emit(OpCodes.Brfalse,label1338386250_32)
  1659. ilg1338386250.MarkLabel(label1338386250_30)
  1660. ilg1338386250.MarkLabel(label1338386250_29)
  1661. ilg1338386250.MarkLabel(label1338386250_28)
  1662. ilg1338386250.Emit(OpCodes.Nop)
  1663. ilg1338386250.Emit(OpCodes.Br,label1338386250_37)
  1664. ilg1338386250.MarkLabel(label1338386250_35)
  1665. ilg1338386250.MarkLabel(label1338386250_34)
  1666. ilg1338386250.MarkLabel(label1338386250_33)
  1667. ilg1338386250.MarkLabel(label1338386250_32)
  1668. ilg1338386250.MarkLabel(label1338386250_31)
  1669. ilg1338386250.Emit(OpCodes.Ldstr,"@array")
  1670. ilg1338386250.Emit(OpCodes.Newobj,constructor_ArgumentNullException)
  1671. ilg1338386250.Emit(OpCodes.Throw)
  1672. ilg1338386250.MarkLabel(label1338386250_38)
  1673. ilg1338386250.MarkLabel(label1338386250_37)
  1674. ilg1338386250.MarkLabel(label1338386250_36)
  1675. ilg1338386250.Emit(OpCodes.Ldc_I4, 0)
  1676. ilg1338386250.Emit(OpCodes.Stloc, int16 3)
  1677. ilg1338386250.MarkLabel(label1338386250_39)
  1678. ilg1338386250.Emit(OpCodes.Ldc_I4, 0)
  1679. ilg1338386250.Emit(OpCodes.Stloc, int16 5)
  1680. ilg1338386250.Emit(OpCodes.Br,label1338386250_41)
  1681. ilg1338386250.MarkLabel(label1338386250_40)
  1682. ilg1338386250.Emit(OpCodes.Ldloc, int16 3)
  1683. ilg1338386250.Emit(OpCodes.Ldloc, int16 0)
  1684. ilg1338386250.Emit(OpCodes.Ldloc, int16 5)
  1685. ilg1338386250.Emit(OpCodes.Ldelem, typeof<System.Int32>)
  1686. ilg1338386250.Emit(OpCodes.Add_ovf)
  1687. ilg1338386250.Emit(OpCodes.Stloc, int16 3)
  1688. ilg1338386250.Emit(OpCodes.Ldloc, int16 5)
  1689. ilg1338386250.Emit(OpCodes.Ldc_I4, 1)
  1690. ilg1338386250.Emit(OpCodes.Add)
  1691. ilg1338386250.Emit(OpCodes.Stloc, int16 5)
  1692. ilg1338386250.MarkLabel(label1338386250_41)
  1693. ilg1338386250.Emit(OpCodes.Ldloc, int16 5)
  1694. ilg1338386250.Emit(OpCodes.Ldloc, int16 0)
  1695. ilg1338386250.Emit(OpCodes.Ldlen)
  1696. ilg1338386250.Emit(OpCodes.Conv_I4)
  1697. ilg1338386250.Emit(OpCodes.Blt,label1338386250_40)
  1698. ilg1338386250.MarkLabel(label1338386250_42)
  1699. ilg1338386250.Emit(OpCodes.Ldloc, int16 3)
  1700. ilg1338386250.Emit(OpCodes.Ret)
  1701. ilg1338386250.MarkLabel(label1338386250_44)
  1702. ilg1338386250.MarkLabel(label1338386250_43)
  1703. typeBuilder399681458.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  1704. let ilg1107381558 = methodBuilder569342189.GetILGenerator()
  1705. let label1107381558_0 = ilg1107381558.DefineLabel()
  1706. let label1107381558_1 = ilg1107381558.DefineLabel()
  1707. let label1107381558_2 = ilg1107381558.DefineLabel()
  1708. ilg1107381558.Emit(OpCodes.Nop)
  1709. ilg1107381558.MarkLabel(label1107381558_2)
  1710. ilg1107381558.MarkLabel(label1107381558_1)
  1711. ilg1107381558.MarkLabel(label1107381558_0)
  1712. ilg1107381558.Emit(OpCodes.Ret)
  1713. typeBuilder399681458.CreateType()
  1714. typeBuilder1154100404.CreateType()
  1715. typeBuilder2088646896.CreateType()
  1716. typeBuilder2088648176.CreateType()
  1717. typeBuilder2088648176.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  1718. val manhattanDistance : pixels1:int [] * pixels2:int [] -> int
  1719.  
  1720. > let train (trainingSet:Observation[]) =
  1721. - let classify (pixels:int[]) =
  1722. - trainingSet
  1723. - |> Array.minBy (fun x -> manhattanDistance(x.Pixels, pixels))
  1724. - |> fun x -> x.Label
  1725. - classify;;
  1726. let typeBuilder1188409622 = moduleBuilder430293066.DefineType("FSI_0008",enum 385)
  1727. moduleBuilder430293066.GetType("FSI_0008",false,false) |> ignore
  1728. let typeBuilder1901786604 = typeBuilder1188409622.DefineNestedType("train@19",enum 8197)
  1729. moduleBuilder430293066.GetType("FSI_0008+train@19",false,false) |> ignore
  1730. let typeBuilder1885727103 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0008>.$FSI_0008",enum 384)
  1731. moduleBuilder430293066.GetType("<StartupCode$FSI_0008>.$FSI_0008",false,false) |> ignore
  1732. typeBuilder1188409622.SetParent(typeof<System.Object>)
  1733. typeBuilder1901786604.SetParent(typeof<Microsoft.FSharp.Core.FSharpFunc`2[[System.Int32[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>)
  1734. typeBuilder1885727103.SetParent(typeof<System.Object>)
  1735. let methodBuilder828994452 = typeBuilder1188409622.DefineMethod("train",enum 22,enum 1)
  1736. methodBuilder828994452.SetParameters([|FSI_0004+Observation[]|])
  1737. methodBuilder828994452.SetReturnType(typeof<Microsoft.FSharp.Core.FSharpFunc`2[[System.Int32[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>)
  1738. methodBuilder828994452.SetImplementationFlags(enum 0)
  1739. let constructorBuilder2049749495 = typeBuilder1901786604.DefineConstructor(enum 2051,CallingConventions.HasThis,[|FSI_0004+Observation[]|])
  1740. constructorBuilder2049749495.SetImplementationFlags(enum 0)
  1741. let methodBuilder1327901770 = typeBuilder1901786604.DefineMethod("Invoke",enum 582,enum 32)
  1742. methodBuilder1327901770.SetParameters([|System.Int32[]|])
  1743. methodBuilder1327901770.SetReturnType(typeof<System.String>)
  1744. methodBuilder1327901770.SetImplementationFlags(enum 0)
  1745. let fieldBuilder1378898689 = typeBuilder1901786604.DefineField("trainingSet",typeof<FSI_0004+Observation[]>,enum 6)
  1746. let methodBuilder569342189 = typeBuilder1885727103.DefineMethod("main@",enum 22,enum 1)
  1747. methodBuilder569342189.SetParameters([||])
  1748. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  1749. methodBuilder569342189.SetImplementationFlags(enum 0)
  1750. methodBuilder828994452.DefineParameter(1,enum 0,"trainingSet")
  1751. let ilg79761432 = methodBuilder828994452.GetILGenerator()
  1752. let label79761432_0 = ilg79761432.DefineLabel()
  1753. ilg79761432.MarkLabel(label79761432_0)
  1754. ilg79761432.Emit(OpCodes.Nop)
  1755. ilg79761432.Emit(OpCodes.Ldarg, int16 0)
  1756. ilg79761432.Emit(OpCodes.Newobj,constructor_train@19)
  1757. ilg79761432.Emit(OpCodes.Ret)
  1758. typeBuilder1188409622.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  1759. constructorBuilder2049749495.DefineParameter(1,enum 0,"trainingSet")
  1760. ilg893651724.Emit(OpCodes.Ldarg, int16 0)
  1761. ilg893651724.Emit(OpCodes.Call,constructor_FSharpFunc`2)
  1762. ilg893651724.Emit(OpCodes.Ldarg, int16 0)
  1763. ilg893651724.Emit(OpCodes.Ldarg, int16 1)
  1764. ilg893651724.Emit(OpCodes.Stfld, fieldBuilder1378898689) // field trainingSet
  1765. ilg893651724.Emit(OpCodes.Ret)
  1766. methodBuilder1327901770.DefineParameter(1,enum 0,"pixels")
  1767. let ilg1421037354 = methodBuilder1327901770.GetILGenerator()
  1768. ilg1421037354.DeclareLocal(typeof<FSI_0004+Observation>,false)
  1769. ilg1421037354.DeclareLocal(typeof<System.Int32>,false)
  1770. ilg1421037354.DeclareLocal(typeof<FSI_0004+Observation>,false)
  1771. ilg1421037354.DeclareLocal(typeof<System.Int32>,false)
  1772. ilg1421037354.DeclareLocal(typeof<System.Int32>,false)
  1773. let label1421037354_0 = ilg1421037354.DefineLabel()
  1774. let label1421037354_1 = ilg1421037354.DefineLabel()
  1775. let label1421037354_2 = ilg1421037354.DefineLabel()
  1776. let label1421037354_3 = ilg1421037354.DefineLabel()
  1777. let label1421037354_4 = ilg1421037354.DefineLabel()
  1778. let label1421037354_5 = ilg1421037354.DefineLabel()
  1779. let label1421037354_6 = ilg1421037354.DefineLabel()
  1780. let label1421037354_7 = ilg1421037354.DefineLabel()
  1781. let label1421037354_8 = ilg1421037354.DefineLabel()
  1782. let label1421037354_9 = ilg1421037354.DefineLabel()
  1783. let label1421037354_10 = ilg1421037354.DefineLabel()
  1784. let label1421037354_11 = ilg1421037354.DefineLabel()
  1785. let label1421037354_12 = ilg1421037354.DefineLabel()
  1786. let label1421037354_13 = ilg1421037354.DefineLabel()
  1787. let label1421037354_14 = ilg1421037354.DefineLabel()
  1788. let label1421037354_15 = ilg1421037354.DefineLabel()
  1789. let label1421037354_16 = ilg1421037354.DefineLabel()
  1790. let label1421037354_17 = ilg1421037354.DefineLabel()
  1791. let label1421037354_18 = ilg1421037354.DefineLabel()
  1792. let label1421037354_19 = ilg1421037354.DefineLabel()
  1793. let label1421037354_20 = ilg1421037354.DefineLabel()
  1794. let label1421037354_21 = ilg1421037354.DefineLabel()
  1795. let label1421037354_22 = ilg1421037354.DefineLabel()
  1796. let label1421037354_23 = ilg1421037354.DefineLabel()
  1797. let label1421037354_24 = ilg1421037354.DefineLabel()
  1798. let label1421037354_25 = ilg1421037354.DefineLabel()
  1799. let label1421037354_26 = ilg1421037354.DefineLabel()
  1800. let label1421037354_27 = ilg1421037354.DefineLabel()
  1801. let label1421037354_28 = ilg1421037354.DefineLabel()
  1802. let label1421037354_29 = ilg1421037354.DefineLabel()
  1803. let label1421037354_30 = ilg1421037354.DefineLabel()
  1804. let label1421037354_31 = ilg1421037354.DefineLabel()
  1805. let label1421037354_32 = ilg1421037354.DefineLabel()
  1806. let label1421037354_33 = ilg1421037354.DefineLabel()
  1807. let label1421037354_34 = ilg1421037354.DefineLabel()
  1808. let label1421037354_35 = ilg1421037354.DefineLabel()
  1809. let label1421037354_36 = ilg1421037354.DefineLabel()
  1810. let label1421037354_37 = ilg1421037354.DefineLabel()
  1811. let label1421037354_38 = ilg1421037354.DefineLabel()
  1812. let label1421037354_39 = ilg1421037354.DefineLabel()
  1813. let label1421037354_40 = ilg1421037354.DefineLabel()
  1814. let label1421037354_41 = ilg1421037354.DefineLabel()
  1815. let label1421037354_42 = ilg1421037354.DefineLabel()
  1816. let label1421037354_43 = ilg1421037354.DefineLabel()
  1817. let label1421037354_44 = ilg1421037354.DefineLabel()
  1818. let label1421037354_45 = ilg1421037354.DefineLabel()
  1819. let label1421037354_46 = ilg1421037354.DefineLabel()
  1820. let label1421037354_47 = ilg1421037354.DefineLabel()
  1821. let label1421037354_48 = ilg1421037354.DefineLabel()
  1822. ilg1421037354.MarkLabel(label1421037354_0)
  1823. ilg1421037354.Emit(OpCodes.Nop)
  1824. ilg1421037354.Emit(OpCodes.Ldarg, int16 0)
  1825. ilg1421037354.Emit(OpCodes.Ldfld, fieldBuilder1378898689) // field trainingSet
  1826. ilg1421037354.Emit(OpCodes.Box, typeof<FSI_0004+Observation[]>)
  1827. ilg1421037354.Emit(OpCodes.Brfalse,label1421037354_5)
  1828. ilg1421037354.MarkLabel(label1421037354_3)
  1829. ilg1421037354.MarkLabel(label1421037354_2)
  1830. ilg1421037354.MarkLabel(label1421037354_1)
  1831. ilg1421037354.Emit(OpCodes.Nop)
  1832. ilg1421037354.Emit(OpCodes.Br,label1421037354_10)
  1833. ilg1421037354.MarkLabel(label1421037354_8)
  1834. ilg1421037354.MarkLabel(label1421037354_7)
  1835. ilg1421037354.MarkLabel(label1421037354_6)
  1836. ilg1421037354.MarkLabel(label1421037354_5)
  1837. ilg1421037354.MarkLabel(label1421037354_4)
  1838. ilg1421037354.Emit(OpCodes.Ldstr,"@array")
  1839. ilg1421037354.Emit(OpCodes.Newobj,constructor_ArgumentNullException)
  1840. ilg1421037354.Emit(OpCodes.Throw)
  1841. ilg1421037354.MarkLabel(label1421037354_10)
  1842. ilg1421037354.MarkLabel(label1421037354_9)
  1843. ilg1421037354.Emit(OpCodes.Ldarg, int16 0)
  1844. ilg1421037354.Emit(OpCodes.Ldfld, fieldBuilder1378898689) // field trainingSet
  1845. ilg1421037354.Emit(OpCodes.Ldlen)
  1846. ilg1421037354.Emit(OpCodes.Conv_I4)
  1847. ilg1421037354.Emit(OpCodes.Brtrue,label1421037354_15)
  1848. ilg1421037354.MarkLabel(label1421037354_13)
  1849. ilg1421037354.MarkLabel(label1421037354_12)
  1850. ilg1421037354.MarkLabel(label1421037354_11)
  1851. ilg1421037354.Emit(OpCodes.Call, methodBuilder1920636765) // method get_InputArrayEmptyString
  1852. ilg1421037354.Emit(OpCodes.Ldstr,"@array")
  1853. ilg1421037354.Emit(OpCodes.Newobj,constructor_ArgumentException)
  1854. ilg1421037354.Emit(OpCodes.Throw)
  1855. ilg1421037354.MarkLabel(label1421037354_18)
  1856. ilg1421037354.MarkLabel(label1421037354_17)
  1857. ilg1421037354.MarkLabel(label1421037354_16)
  1858. ilg1421037354.MarkLabel(label1421037354_15)
  1859. ilg1421037354.MarkLabel(label1421037354_14)
  1860. ilg1421037354.Emit(OpCodes.Nop)
  1861. ilg1421037354.MarkLabel(label1421037354_21)
  1862. ilg1421037354.MarkLabel(label1421037354_20)
  1863. ilg1421037354.MarkLabel(label1421037354_19)
  1864. ilg1421037354.Emit(OpCodes.Ldarg, int16 0)
  1865. ilg1421037354.Emit(OpCodes.Ldfld, fieldBuilder1378898689) // field trainingSet
  1866. ilg1421037354.Emit(OpCodes.Ldc_I4, 0)
  1867. ilg1421037354.Emit(OpCodes.Ldelem, typeof<FSI_0004+Observation>)
  1868. ilg1421037354.Emit(OpCodes.Stloc, int16 0)
  1869. ilg1421037354.MarkLabel(label1421037354_23)
  1870. ilg1421037354.MarkLabel(label1421037354_22)
  1871. ilg1421037354.Emit(OpCodes.Ldloc, int16 0)
  1872. ilg1421037354.Emit(OpCodes.Stloc, int16 2)
  1873. ilg1421037354.Emit(OpCodes.Ldloc, int16 2)
  1874. ilg1421037354.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  1875. ilg1421037354.Emit(OpCodes.Ldarg, int16 1)
  1876. ilg1421037354.MarkLabel(label1421037354_24)
  1877. ilg1421037354.Emit(OpCodes.Call, methodBuilder824980409) // method manhattanDistance
  1878. ilg1421037354.MarkLabel(label1421037354_26)
  1879. ilg1421037354.MarkLabel(label1421037354_25)
  1880. ilg1421037354.Emit(OpCodes.Stloc, int16 1)
  1881. ilg1421037354.MarkLabel(label1421037354_27)
  1882. ilg1421037354.Emit(OpCodes.Ldc_I4, 1)
  1883. ilg1421037354.Emit(OpCodes.Stloc, int16 3)
  1884. ilg1421037354.Emit(OpCodes.Br,label1421037354_45)
  1885. ilg1421037354.MarkLabel(label1421037354_28)
  1886. ilg1421037354.MarkLabel(label1421037354_29)
  1887. ilg1421037354.Emit(OpCodes.Ldarg, int16 0)
  1888. ilg1421037354.Emit(OpCodes.Ldfld, fieldBuilder1378898689) // field trainingSet
  1889. ilg1421037354.Emit(OpCodes.Ldloc, int16 3)
  1890. ilg1421037354.Emit(OpCodes.Ldelem, typeof<FSI_0004+Observation>)
  1891. ilg1421037354.Emit(OpCodes.Stloc, int16 2)
  1892. ilg1421037354.MarkLabel(label1421037354_30)
  1893. ilg1421037354.Emit(OpCodes.Ldloc, int16 2)
  1894. ilg1421037354.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  1895. ilg1421037354.Emit(OpCodes.Ldarg, int16 1)
  1896. ilg1421037354.MarkLabel(label1421037354_31)
  1897. ilg1421037354.Emit(OpCodes.Call, methodBuilder824980409) // method manhattanDistance
  1898. ilg1421037354.MarkLabel(label1421037354_32)
  1899. ilg1421037354.Emit(OpCodes.Stloc, int16 4)
  1900. ilg1421037354.Emit(OpCodes.Ldloc, int16 4)
  1901. ilg1421037354.Emit(OpCodes.Ldloc, int16 1)
  1902. ilg1421037354.Emit(OpCodes.Bge,label1421037354_37)
  1903. ilg1421037354.MarkLabel(label1421037354_35)
  1904. ilg1421037354.MarkLabel(label1421037354_34)
  1905. ilg1421037354.MarkLabel(label1421037354_33)
  1906. ilg1421037354.Emit(OpCodes.Ldloc, int16 4)
  1907. ilg1421037354.Emit(OpCodes.Stloc, int16 1)
  1908. ilg1421037354.Emit(OpCodes.Ldloc, int16 2)
  1909. ilg1421037354.Emit(OpCodes.Stloc, int16 0)
  1910. ilg1421037354.Emit(OpCodes.Nop)
  1911. ilg1421037354.Emit(OpCodes.Br,label1421037354_42)
  1912. ilg1421037354.MarkLabel(label1421037354_40)
  1913. ilg1421037354.MarkLabel(label1421037354_39)
  1914. ilg1421037354.MarkLabel(label1421037354_38)
  1915. ilg1421037354.MarkLabel(label1421037354_37)
  1916. ilg1421037354.MarkLabel(label1421037354_36)
  1917. ilg1421037354.Emit(OpCodes.Nop)
  1918. ilg1421037354.MarkLabel(label1421037354_44)
  1919. ilg1421037354.MarkLabel(label1421037354_43)
  1920. ilg1421037354.MarkLabel(label1421037354_42)
  1921. ilg1421037354.MarkLabel(label1421037354_41)
  1922. ilg1421037354.Emit(OpCodes.Ldloc, int16 3)
  1923. ilg1421037354.Emit(OpCodes.Ldc_I4, 1)
  1924. ilg1421037354.Emit(OpCodes.Add)
  1925. ilg1421037354.Emit(OpCodes.Stloc, int16 3)
  1926. ilg1421037354.MarkLabel(label1421037354_45)
  1927. ilg1421037354.Emit(OpCodes.Ldloc, int16 3)
  1928. ilg1421037354.Emit(OpCodes.Ldarg, int16 0)
  1929. ilg1421037354.Emit(OpCodes.Ldfld, fieldBuilder1378898689) // field trainingSet
  1930. ilg1421037354.Emit(OpCodes.Ldlen)
  1931. ilg1421037354.Emit(OpCodes.Conv_I4)
  1932. ilg1421037354.Emit(OpCodes.Blt,label1421037354_28)
  1933. ilg1421037354.MarkLabel(label1421037354_46)
  1934. ilg1421037354.Emit(OpCodes.Ldloc, int16 0)
  1935. ilg1421037354.MarkLabel(label1421037354_48)
  1936. ilg1421037354.MarkLabel(label1421037354_47)
  1937. ilg1421037354.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  1938. ilg1421037354.Emit(OpCodes.Ret)
  1939. let ilg602720266 = methodBuilder569342189.GetILGenerator()
  1940. let label602720266_0 = ilg602720266.DefineLabel()
  1941. let label602720266_1 = ilg602720266.DefineLabel()
  1942. let label602720266_2 = ilg602720266.DefineLabel()
  1943. ilg602720266.Emit(OpCodes.Nop)
  1944. ilg602720266.MarkLabel(label602720266_2)
  1945. ilg602720266.MarkLabel(label602720266_1)
  1946. ilg602720266.MarkLabel(label602720266_0)
  1947. ilg602720266.Emit(OpCodes.Ret)
  1948. typeBuilder1188409622.CreateType()
  1949. typeBuilder1901786604.CreateType()
  1950. typeBuilder1885727103.CreateType()
  1951. typeBuilder2088648872.CreateType()
  1952. typeBuilder2088649576.CreateType()
  1953. typeBuilder2088651232.CreateType()
  1954. typeBuilder2088651232.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  1955. val train : trainingSet:Observation [] -> (int [] -> string)
  1956.  
  1957. > let trainingPath = @"/Users/jason/src/fsharp739/trainingsample.csv"
  1958. - let trainingData = reader trainingPath
  1959. - let classifier = train trainingData;;
  1960. let typeBuilder699407224 = moduleBuilder430293066.DefineType("FSI_0009",enum 385)
  1961. moduleBuilder430293066.GetType("FSI_0009",false,false) |> ignore
  1962. let typeBuilder438051506 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0009>.$FSI_0009",enum 384)
  1963. moduleBuilder430293066.GetType("<StartupCode$FSI_0009>.$FSI_0009",false,false) |> ignore
  1964. typeBuilder699407224.SetParent(typeof<System.Object>)
  1965. typeBuilder438051506.SetParent(typeof<System.Object>)
  1966. let methodBuilder1678039414 = typeBuilder699407224.DefineMethod("get_trainingPath",enum 2070,enum 1)
  1967. methodBuilder1678039414.SetParameters([||])
  1968. methodBuilder1678039414.SetReturnType(typeof<System.String>)
  1969. methodBuilder1678039414.SetImplementationFlags(enum 0)
  1970. let methodBuilder244275259 = typeBuilder699407224.DefineMethod("get_trainingData",enum 2070,enum 1)
  1971. methodBuilder244275259.SetParameters([||])
  1972. methodBuilder244275259.SetReturnType(typeof<FSI_0004+Observation[]>)
  1973. methodBuilder244275259.SetImplementationFlags(enum 0)
  1974. let methodBuilder1834149566 = typeBuilder699407224.DefineMethod("get_classifier",enum 2070,enum 1)
  1975. methodBuilder1834149566.SetParameters([||])
  1976. methodBuilder1834149566.SetReturnType(typeof<Microsoft.FSharp.Core.FSharpFunc`2[[System.Int32[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>)
  1977. methodBuilder1834149566.SetImplementationFlags(enum 0)
  1978. let constructorBuilder1179556118 = typeBuilder699407224.DefineConstructor(enum 2065,CallingConventions.Standard,[||])
  1979. constructorBuilder1179556118.SetImplementationFlags(enum 0)
  1980. let fieldBuilder2032959347 = typeBuilder699407224.DefineField("trainingData@",typeof<FSI_0004+Observation[]>,enum 19)
  1981. let fieldBuilder951167156 = typeBuilder699407224.DefineField("classifier@",typeof<Microsoft.FSharp.Core.FSharpFunc`2[[System.Int32[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>,enum 19)
  1982. typeBuilder699407224.DefineProperty(""trainingPath"",enum 0,typeof<System.String>,[||])
  1983. typeBuilder699407224.DefineProperty(""trainingData"",enum 0,typeof<FSI_0004+Observation[]>,[||])
  1984. typeBuilder699407224.DefineProperty(""classifier"",enum 0,typeof<Microsoft.FSharp.Core.FSharpFunc`2[[System.Int32[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089]]>,[||])
  1985. let methodBuilder569342189 = typeBuilder438051506.DefineMethod("main@",enum 22,enum 1)
  1986. methodBuilder569342189.SetParameters([||])
  1987. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  1988. methodBuilder569342189.SetImplementationFlags(enum 0)
  1989. let fieldBuilder1853232049 = typeBuilder438051506.DefineField("init@",typeof<System.Int32>,enum 19)
  1990. let ilg355528968 = methodBuilder1678039414.GetILGenerator()
  1991. let label355528968_0 = ilg355528968.DefineLabel()
  1992. ilg355528968.Emit(OpCodes.Nop)
  1993. ilg355528968.MarkLabel(label355528968_0)
  1994. ilg355528968.Emit(OpCodes.Ldstr,"@/Users/jason/src/fsharp739/trainingsample.csv")
  1995. ilg355528968.Emit(OpCodes.Ret)
  1996. methodBuilder1678039414.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  1997. methodBuilder1678039414.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  1998. let ilg1761125360 = methodBuilder244275259.GetILGenerator()
  1999. ilg1761125360.Emit(OpCodes.Ldsfld, fieldBuilder2032959347) // field trainingData@
  2000. ilg1761125360.Emit(OpCodes.Ret)
  2001. let ilg672280645 = methodBuilder1834149566.GetILGenerator()
  2002. ilg672280645.Emit(OpCodes.Ldsfld, fieldBuilder951167156) // field classifier@
  2003. ilg672280645.Emit(OpCodes.Ret)
  2004. ilg1113033797.Emit(OpCodes.Ldc_I4, 0)
  2005. ilg1113033797.Emit(OpCodes.Stsfld, fieldBuilder1853232049) // field init@
  2006. ilg1113033797.Emit(OpCodes.Ldsfld, fieldBuilder1853232049) // field init@
  2007. ilg1113033797.Emit(OpCodes.Pop)
  2008. ilg1113033797.Emit(OpCodes.Ret)
  2009. typeBuilder699407224.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  2010. let ilg1128717158 = methodBuilder569342189.GetILGenerator()
  2011. let label1128717158_0 = ilg1128717158.DefineLabel()
  2012. let label1128717158_1 = ilg1128717158.DefineLabel()
  2013. let label1128717158_2 = ilg1128717158.DefineLabel()
  2014. let label1128717158_3 = ilg1128717158.DefineLabel()
  2015. let label1128717158_4 = ilg1128717158.DefineLabel()
  2016. let label1128717158_5 = ilg1128717158.DefineLabel()
  2017. let label1128717158_6 = ilg1128717158.DefineLabel()
  2018. ilg1128717158.MarkLabel(label1128717158_1)
  2019. ilg1128717158.MarkLabel(label1128717158_0)
  2020. ilg1128717158.Emit(OpCodes.Nop)
  2021. ilg1128717158.Emit(OpCodes.Nop)
  2022. ilg1128717158.Emit(OpCodes.Ldstr,"@/Users/jason/src/fsharp739/trainingsample.csv")
  2023. ilg1128717158.MarkLabel(label1128717158_2)
  2024. ilg1128717158.Emit(OpCodes.Call, methodBuilder51169761) // method reader
  2025. ilg1128717158.MarkLabel(label1128717158_3)
  2026. ilg1128717158.Emit(OpCodes.Stsfld, fieldBuilder2032959347) // field trainingData@
  2027. ilg1128717158.Emit(OpCodes.Call, methodBuilder244275259) // method get_trainingData
  2028. ilg1128717158.MarkLabel(label1128717158_4)
  2029. ilg1128717158.Emit(OpCodes.Call, methodBuilder828994452) // method train
  2030. ilg1128717158.MarkLabel(label1128717158_5)
  2031. ilg1128717158.Emit(OpCodes.Stsfld, fieldBuilder951167156) // field classifier@
  2032. ilg1128717158.MarkLabel(label1128717158_6)
  2033. ilg1128717158.Emit(OpCodes.Ret)
  2034. typeBuilder699407224.CreateType()
  2035. typeBuilder438051506.CreateType()
  2036. typeBuilder2088652000.CreateType()
  2037. typeBuilder2088653736.CreateType()
  2038. typeBuilder2088653736.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  2039. val trainingPath : string = "/Users/jason/src/fsharp739/trainingsample.csv"
  2040. val trainingData : Observation [] =
  2041. [|{Label = "1";
  2042. Pixels =
  2043. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2044. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2045. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2046. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2047. 0; 0; 0; 0; ...|];};
  2048. {Label = "0";
  2049. Pixels =
  2050. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2051. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2052. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2053. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2054. 0; 0; 0; 0; ...|];};
  2055. {Label = "1";
  2056. Pixels =
  2057. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2058. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2059. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2060. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2061. 0; 0; 0; 0; ...|];};
  2062. {Label = "4";
  2063. Pixels =
  2064. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2065. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2066. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2067. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2068. 0; 0; 0; 0; ...|];};
  2069. {Label = "0";
  2070. Pixels =
  2071. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2072. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2073. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2074. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2075. 0; 0; 0; 0; ...|];};
  2076. {Label = "0";
  2077. Pixels =
  2078. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2079. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2080. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2081. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2082. 0; 0; 0; 0; ...|];};
  2083. {Label = "7";
  2084. Pixels =
  2085. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2086. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2087. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2088. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2089. 0; 0; 0; 0; ...|];};
  2090. {Label = "3";
  2091. Pixels =
  2092. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2093. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2094. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2095. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2096. 0; 0; 0; 0; ...|];};
  2097. {Label = "5";
  2098. Pixels =
  2099. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2100. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2101. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2102. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2103. 0; 0; 0; 0; ...|];};
  2104. {Label = "3";
  2105. Pixels =
  2106. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2107. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2108. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; ...|];};
  2109. ...|]
  2110. val classifier : (int [] -> string)
  2111.  
  2112. > let validationPath = @"/Users/jason/src/fsharp739/validationsample.csv"
  2113. - let validationData = reader validationPath
  2114. - validationData
  2115. - |> Array.averageBy (fun x -> if classifier x.Pixels = x.Label then 1. else 0.)
  2116. - |> printfn "Correct: %.3f";;
  2117. let typeBuilder1483169245 = moduleBuilder430293066.DefineType("FSI_0010",enum 385)
  2118. moduleBuilder430293066.GetType("FSI_0010",false,false) |> ignore
  2119. let typeBuilder1249774500 = moduleBuilder430293066.DefineType("<StartupCode$FSI_0010>.$FSI_0010",enum 384)
  2120. moduleBuilder430293066.GetType("<StartupCode$FSI_0010>.$FSI_0010",false,false) |> ignore
  2121. typeBuilder1483169245.SetParent(typeof<System.Object>)
  2122. typeBuilder1249774500.SetParent(typeof<System.Object>)
  2123. let methodBuilder1375111665 = typeBuilder1483169245.DefineMethod("get_validationPath",enum 2070,enum 1)
  2124. methodBuilder1375111665.SetParameters([||])
  2125. methodBuilder1375111665.SetReturnType(typeof<System.String>)
  2126. methodBuilder1375111665.SetImplementationFlags(enum 0)
  2127. let methodBuilder547203256 = typeBuilder1483169245.DefineMethod("get_validationData",enum 2070,enum 1)
  2128. methodBuilder547203256.SetParameters([||])
  2129. methodBuilder547203256.SetReturnType(typeof<FSI_0004+Observation[]>)
  2130. methodBuilder547203256.SetImplementationFlags(enum 0)
  2131. let methodBuilder1368407990 = typeBuilder1483169245.DefineMethod("get_it",enum 2070,enum 1)
  2132. methodBuilder1368407990.SetParameters([||])
  2133. methodBuilder1368407990.SetReturnType(typeof<Microsoft.FSharp.Core.Unit>)
  2134. methodBuilder1368407990.SetImplementationFlags(enum 0)
  2135. let methodBuilder1200342502 = typeBuilder1483169245.DefineMethod("get_x@1",enum 2067,enum 1)
  2136. methodBuilder1200342502.SetParameters([||])
  2137. methodBuilder1200342502.SetReturnType(typeof<System.Double>)
  2138. methodBuilder1200342502.SetImplementationFlags(enum 0)
  2139. let methodBuilder837191787 = typeBuilder1483169245.DefineMethod("f@1",enum 19,enum 1)
  2140. methodBuilder837191787.SetParameters([|FSI_0004+Observation|])
  2141. methodBuilder837191787.SetReturnType(typeof<System.Double>)
  2142. methodBuilder837191787.SetImplementationFlags(enum 0)
  2143. let methodBuilder157183567 = typeBuilder1483169245.DefineMethod("get_acc@1",enum 2067,enum 1)
  2144. methodBuilder157183567.SetParameters([||])
  2145. methodBuilder157183567.SetReturnType(typeof<System.Double>)
  2146. methodBuilder157183567.SetImplementationFlags(enum 0)
  2147. let methodBuilder134902595 = typeBuilder1483169245.DefineMethod("set_acc@1",enum 2067,enum 1)
  2148. methodBuilder134902595.SetParameters([|System.Double|])
  2149. methodBuilder134902595.SetReturnType(typeof<System.Void>)
  2150. methodBuilder134902595.SetImplementationFlags(enum 0)
  2151. let methodBuilder1265773080 = typeBuilder1483169245.DefineMethod("get_x@1-1",enum 2067,enum 1)
  2152. methodBuilder1265773080.SetParameters([||])
  2153. methodBuilder1265773080.SetReturnType(typeof<System.Double>)
  2154. methodBuilder1265773080.SetImplementationFlags(enum 0)
  2155. let methodBuilder1200342204 = typeBuilder1483169245.DefineMethod("get_n@1",enum 2067,enum 1)
  2156. methodBuilder1200342204.SetParameters([||])
  2157. methodBuilder1200342204.SetReturnType(typeof<System.Int32>)
  2158. methodBuilder1200342204.SetImplementationFlags(enum 0)
  2159. let methodBuilder1918816934 = typeBuilder1483169245.DefineMethod("get_fp@1",enum 2067,enum 1)
  2160. methodBuilder1918816934.SetParameters([||])
  2161. methodBuilder1918816934.SetReturnType(typeof<Microsoft.FSharp.Core.PrintfFormat`4[[Microsoft.FSharp.Core.FSharpFunc`2[[System.Double, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a]], FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a],[System.IO.TextWriter, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a]]>)
  2162. methodBuilder1918816934.SetImplementationFlags(enum 0)
  2163. let constructorBuilder1085188118 = typeBuilder1483169245.DefineConstructor(enum 2065,CallingConventions.Standard,[||])
  2164. constructorBuilder1085188118.SetImplementationFlags(enum 0)
  2165. let fieldBuilder1639855349 = typeBuilder1483169245.DefineField("validationData@",typeof<FSI_0004+Observation[]>,enum 19)
  2166. let fieldBuilder1088168529 = typeBuilder1483169245.DefineField("it@",typeof<Microsoft.FSharp.Core.Unit>,enum 19)
  2167. let fieldBuilder1902741643 = typeBuilder1483169245.DefineField("x@1",typeof<System.Double>,enum 19)
  2168. let fieldBuilder1703410531 = typeBuilder1483169245.DefineField("acc@1",typeof<System.Double>,enum 19)
  2169. let fieldBuilder2119321421 = typeBuilder1483169245.DefineField("x@1-1",typeof<System.Double>,enum 19)
  2170. let fieldBuilder643021585 = typeBuilder1483169245.DefineField("n@1",typeof<System.Int32>,enum 19)
  2171. let fieldBuilder687373648 = typeBuilder1483169245.DefineField("fp@1",typeof<Microsoft.FSharp.Core.PrintfFormat`4[[Microsoft.FSharp.Core.FSharpFunc`2[[System.Double, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a]], FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a],[System.IO.TextWriter, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a]]>,enum 19)
  2172. typeBuilder1483169245.DefineProperty(""validationPath"",enum 0,typeof<System.String>,[||])
  2173. typeBuilder1483169245.DefineProperty(""validationData"",enum 0,typeof<FSI_0004+Observation[]>,[||])
  2174. typeBuilder1483169245.DefineProperty(""it"",enum 0,typeof<Microsoft.FSharp.Core.Unit>,[||])
  2175. typeBuilder1483169245.DefineProperty(""x@1"",enum 0,typeof<System.Double>,[||])
  2176. typeBuilder1483169245.DefineProperty(""acc@1"",enum 0,typeof<System.Double>,[||])
  2177. typeBuilder1483169245.DefineProperty(""x@1-1"",enum 0,typeof<System.Double>,[||])
  2178. typeBuilder1483169245.DefineProperty(""n@1"",enum 0,typeof<System.Int32>,[||])
  2179. typeBuilder1483169245.DefineProperty(""fp@1"",enum 0,typeof<Microsoft.FSharp.Core.PrintfFormat`4[[Microsoft.FSharp.Core.FSharpFunc`2[[System.Double, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a]], FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a],[System.IO.TextWriter, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a],[Microsoft.FSharp.Core.Unit, FSharp.Core, Version=4.4.1.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a]]>,[||])
  2180. let methodBuilder569342189 = typeBuilder1249774500.DefineMethod("main@",enum 22,enum 1)
  2181. methodBuilder569342189.SetParameters([||])
  2182. methodBuilder569342189.SetReturnType(typeof<System.Void>)
  2183. methodBuilder569342189.SetImplementationFlags(enum 0)
  2184. let fieldBuilder417599762 = typeBuilder1249774500.DefineField("init@",typeof<System.Int32>,enum 19)
  2185. let ilg708354741 = methodBuilder1375111665.GetILGenerator()
  2186. let label708354741_0 = ilg708354741.DefineLabel()
  2187. ilg708354741.Emit(OpCodes.Nop)
  2188. ilg708354741.MarkLabel(label708354741_0)
  2189. ilg708354741.Emit(OpCodes.Ldstr,"@/Users/jason/src/fsharp739/validationsample.csv")
  2190. ilg708354741.Emit(OpCodes.Ret)
  2191. methodBuilder1375111665.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  2192. methodBuilder1375111665.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  2193. let ilg1678413247 = methodBuilder547203256.GetILGenerator()
  2194. ilg1678413247.Emit(OpCodes.Ldsfld, fieldBuilder1639855349) // field validationData@
  2195. ilg1678413247.Emit(OpCodes.Ret)
  2196. let ilg1842823150 = methodBuilder1368407990.GetILGenerator()
  2197. ilg1842823150.Emit(OpCodes.Ldsfld, fieldBuilder1088168529) // field it@
  2198. ilg1842823150.Emit(OpCodes.Ret)
  2199. let ilg1034479625 = methodBuilder1200342502.GetILGenerator()
  2200. ilg1034479625.Emit(OpCodes.Ldsfld, fieldBuilder1902741643) // field x@1
  2201. ilg1034479625.Emit(OpCodes.Ret)
  2202. methodBuilder837191787.DefineParameter(1,enum 0,"x")
  2203. let ilg1568493902 = methodBuilder837191787.GetILGenerator()
  2204. let label1568493902_0 = ilg1568493902.DefineLabel()
  2205. let label1568493902_1 = ilg1568493902.DefineLabel()
  2206. let label1568493902_2 = ilg1568493902.DefineLabel()
  2207. let label1568493902_3 = ilg1568493902.DefineLabel()
  2208. let label1568493902_4 = ilg1568493902.DefineLabel()
  2209. let label1568493902_5 = ilg1568493902.DefineLabel()
  2210. let label1568493902_6 = ilg1568493902.DefineLabel()
  2211. let label1568493902_7 = ilg1568493902.DefineLabel()
  2212. let label1568493902_8 = ilg1568493902.DefineLabel()
  2213. let label1568493902_9 = ilg1568493902.DefineLabel()
  2214. let label1568493902_10 = ilg1568493902.DefineLabel()
  2215. ilg1568493902.MarkLabel(label1568493902_0)
  2216. ilg1568493902.Emit(OpCodes.Nop)
  2217. ilg1568493902.Emit(OpCodes.Call, methodBuilder1834149566) // method get_classifier
  2218. ilg1568493902.Emit(OpCodes.Ldarg, int16 0)
  2219. ilg1568493902.Emit(OpCodes.Ldfld, fieldBuilder1202562495) // field Pixels@
  2220. ilg1568493902.Emit(OpCodes.Callvirt, methodBuilder900374384) // method Invoke
  2221. ilg1568493902.Emit(OpCodes.Ldarg, int16 0)
  2222. ilg1568493902.Emit(OpCodes.Ldfld, fieldBuilder421721425) // field Label@
  2223. ilg1568493902.Emit(OpCodes.Call, methodBuilder1080939438) // method Equals
  2224. ilg1568493902.Emit(OpCodes.Brfalse,label1568493902_5)
  2225. ilg1568493902.MarkLabel(label1568493902_3)
  2226. ilg1568493902.MarkLabel(label1568493902_2)
  2227. ilg1568493902.MarkLabel(label1568493902_1)
  2228. ilg1568493902.Emit(OpCodes.Ret)
  2229. ilg1568493902.MarkLabel(label1568493902_8)
  2230. ilg1568493902.MarkLabel(label1568493902_7)
  2231. ilg1568493902.MarkLabel(label1568493902_6)
  2232. ilg1568493902.MarkLabel(label1568493902_5)
  2233. ilg1568493902.MarkLabel(label1568493902_4)
  2234. ilg1568493902.Emit(OpCodes.Ret)
  2235. ilg1568493902.MarkLabel(label1568493902_10)
  2236. ilg1568493902.MarkLabel(label1568493902_9)
  2237. methodBuilder837191787.SetCustomAttribute(Void .ctor(), [|1uy; 0uy; 0uy; 0uy|])
  2238. let ilg1545640822 = methodBuilder157183567.GetILGenerator()
  2239. ilg1545640822.Emit(OpCodes.Ldsfld, fieldBuilder1703410531) // field acc@1
  2240. ilg1545640822.Emit(OpCodes.Ret)
  2241. methodBuilder134902595.DefineParameter(1,enum 0,"value")
  2242. let ilg1361603923 = methodBuilder134902595.GetILGenerator()
  2243. ilg1361603923.Emit(OpCodes.Ldarg, int16 0)
  2244. ilg1361603923.Emit(OpCodes.Stsfld, fieldBuilder1703410531) // field acc@1
  2245. ilg1361603923.Emit(OpCodes.Ret)
  2246. let ilg788335654 = methodBuilder1265773080.GetILGenerator()
  2247. ilg788335654.Emit(OpCodes.Ldsfld, fieldBuilder2119321421) // field x@1-1
  2248. ilg788335654.Emit(OpCodes.Ret)
  2249. let ilg629328867 = methodBuilder1200342204.GetILGenerator()
  2250. ilg629328867.Emit(OpCodes.Ldsfld, fieldBuilder643021585) // field n@1
  2251. ilg629328867.Emit(OpCodes.Ret)
  2252. let ilg1860696991 = methodBuilder1918816934.GetILGenerator()
  2253. ilg1860696991.Emit(OpCodes.Ldsfld, fieldBuilder687373648) // field fp@1
  2254. ilg1860696991.Emit(OpCodes.Ret)
  2255. ilg112258211.Emit(OpCodes.Ldc_I4, 0)
  2256. ilg112258211.Emit(OpCodes.Stsfld, fieldBuilder417599762) // field init@
  2257. ilg112258211.Emit(OpCodes.Ldsfld, fieldBuilder417599762) // field init@
  2258. ilg112258211.Emit(OpCodes.Pop)
  2259. ilg112258211.Emit(OpCodes.Ret)
  2260. typeBuilder1483169245.SetCustomAttribute(Void .ctor(SourceConstructFlags), [|1uy; 0uy; 7uy; 0uy; 0uy; 0uy; 0uy; 0uy|])
  2261. let ilg1762266700 = methodBuilder569342189.GetILGenerator()
  2262. ilg1762266700.DeclareLocal(typeof<System.Int32>,false)
  2263. let label1762266700_0 = ilg1762266700.DefineLabel()
  2264. let label1762266700_1 = ilg1762266700.DefineLabel()
  2265. let label1762266700_2 = ilg1762266700.DefineLabel()
  2266. let label1762266700_3 = ilg1762266700.DefineLabel()
  2267. let label1762266700_4 = ilg1762266700.DefineLabel()
  2268. let label1762266700_5 = ilg1762266700.DefineLabel()
  2269. let label1762266700_6 = ilg1762266700.DefineLabel()
  2270. let label1762266700_7 = ilg1762266700.DefineLabel()
  2271. let label1762266700_8 = ilg1762266700.DefineLabel()
  2272. let label1762266700_9 = ilg1762266700.DefineLabel()
  2273. let label1762266700_10 = ilg1762266700.DefineLabel()
  2274. let label1762266700_11 = ilg1762266700.DefineLabel()
  2275. let label1762266700_12 = ilg1762266700.DefineLabel()
  2276. let label1762266700_13 = ilg1762266700.DefineLabel()
  2277. let label1762266700_14 = ilg1762266700.DefineLabel()
  2278. let label1762266700_15 = ilg1762266700.DefineLabel()
  2279. let label1762266700_16 = ilg1762266700.DefineLabel()
  2280. let label1762266700_17 = ilg1762266700.DefineLabel()
  2281. let label1762266700_18 = ilg1762266700.DefineLabel()
  2282. let label1762266700_19 = ilg1762266700.DefineLabel()
  2283. let label1762266700_20 = ilg1762266700.DefineLabel()
  2284. let label1762266700_21 = ilg1762266700.DefineLabel()
  2285. let label1762266700_22 = ilg1762266700.DefineLabel()
  2286. let label1762266700_23 = ilg1762266700.DefineLabel()
  2287. let label1762266700_24 = ilg1762266700.DefineLabel()
  2288. let label1762266700_25 = ilg1762266700.DefineLabel()
  2289. let label1762266700_26 = ilg1762266700.DefineLabel()
  2290. let label1762266700_27 = ilg1762266700.DefineLabel()
  2291. let label1762266700_28 = ilg1762266700.DefineLabel()
  2292. let label1762266700_29 = ilg1762266700.DefineLabel()
  2293. let label1762266700_30 = ilg1762266700.DefineLabel()
  2294. let label1762266700_31 = ilg1762266700.DefineLabel()
  2295. let label1762266700_32 = ilg1762266700.DefineLabel()
  2296. let label1762266700_33 = ilg1762266700.DefineLabel()
  2297. let label1762266700_34 = ilg1762266700.DefineLabel()
  2298. let label1762266700_35 = ilg1762266700.DefineLabel()
  2299. let label1762266700_36 = ilg1762266700.DefineLabel()
  2300. let label1762266700_37 = ilg1762266700.DefineLabel()
  2301. let label1762266700_38 = ilg1762266700.DefineLabel()
  2302. let label1762266700_39 = ilg1762266700.DefineLabel()
  2303. let label1762266700_40 = ilg1762266700.DefineLabel()
  2304. let label1762266700_41 = ilg1762266700.DefineLabel()
  2305. let label1762266700_42 = ilg1762266700.DefineLabel()
  2306. let label1762266700_43 = ilg1762266700.DefineLabel()
  2307. let label1762266700_44 = ilg1762266700.DefineLabel()
  2308. let label1762266700_45 = ilg1762266700.DefineLabel()
  2309. let label1762266700_46 = ilg1762266700.DefineLabel()
  2310. ilg1762266700.MarkLabel(label1762266700_1)
  2311. ilg1762266700.MarkLabel(label1762266700_0)
  2312. ilg1762266700.Emit(OpCodes.Nop)
  2313. ilg1762266700.Emit(OpCodes.Nop)
  2314. ilg1762266700.Emit(OpCodes.Ldstr,"@/Users/jason/src/fsharp739/validationsample.csv")
  2315. ilg1762266700.MarkLabel(label1762266700_2)
  2316. ilg1762266700.Emit(OpCodes.Call, methodBuilder51169761) // method reader
  2317. ilg1762266700.MarkLabel(label1762266700_3)
  2318. ilg1762266700.Emit(OpCodes.Stsfld, fieldBuilder1639855349) // field validationData@
  2319. ilg1762266700.MarkLabel(label1762266700_5)
  2320. ilg1762266700.MarkLabel(label1762266700_4)
  2321. ilg1762266700.Emit(OpCodes.Call, methodBuilder547203256) // method get_validationData
  2322. ilg1762266700.Emit(OpCodes.Box, typeof<FSI_0004+Observation[]>)
  2323. ilg1762266700.Emit(OpCodes.Brfalse,label1762266700_10)
  2324. ilg1762266700.MarkLabel(label1762266700_8)
  2325. ilg1762266700.MarkLabel(label1762266700_7)
  2326. ilg1762266700.MarkLabel(label1762266700_6)
  2327. ilg1762266700.Emit(OpCodes.Nop)
  2328. ilg1762266700.Emit(OpCodes.Br,label1762266700_15)
  2329. ilg1762266700.MarkLabel(label1762266700_13)
  2330. ilg1762266700.MarkLabel(label1762266700_12)
  2331. ilg1762266700.MarkLabel(label1762266700_11)
  2332. ilg1762266700.MarkLabel(label1762266700_10)
  2333. ilg1762266700.MarkLabel(label1762266700_9)
  2334. ilg1762266700.Emit(OpCodes.Ldstr,"@array")
  2335. ilg1762266700.Emit(OpCodes.Newobj,constructor_ArgumentNullException)
  2336. ilg1762266700.Emit(OpCodes.Throw)
  2337. ilg1762266700.MarkLabel(label1762266700_15)
  2338. ilg1762266700.MarkLabel(label1762266700_14)
  2339. ilg1762266700.Emit(OpCodes.Call, methodBuilder547203256) // method get_validationData
  2340. ilg1762266700.Emit(OpCodes.Ldlen)
  2341. ilg1762266700.Emit(OpCodes.Conv_I4)
  2342. ilg1762266700.Emit(OpCodes.Brtrue,label1762266700_20)
  2343. ilg1762266700.MarkLabel(label1762266700_18)
  2344. ilg1762266700.MarkLabel(label1762266700_17)
  2345. ilg1762266700.MarkLabel(label1762266700_16)
  2346. ilg1762266700.Emit(OpCodes.Call, methodBuilder1920636765) // method get_InputArrayEmptyString
  2347. ilg1762266700.Emit(OpCodes.Ldstr,"@array")
  2348. ilg1762266700.Emit(OpCodes.Newobj,constructor_ArgumentException)
  2349. ilg1762266700.Emit(OpCodes.Throw)
  2350. ilg1762266700.MarkLabel(label1762266700_23)
  2351. ilg1762266700.MarkLabel(label1762266700_22)
  2352. ilg1762266700.MarkLabel(label1762266700_21)
  2353. ilg1762266700.MarkLabel(label1762266700_20)
  2354. ilg1762266700.MarkLabel(label1762266700_19)
  2355. ilg1762266700.Emit(OpCodes.Nop)
  2356. ilg1762266700.MarkLabel(label1762266700_26)
  2357. ilg1762266700.MarkLabel(label1762266700_25)
  2358. ilg1762266700.MarkLabel(label1762266700_24)
  2359. ilg1762266700.Emit(OpCodes.Stsfld, fieldBuilder1703410531) // field acc@1
  2360. ilg1762266700.MarkLabel(label1762266700_27)
  2361. ilg1762266700.Emit(OpCodes.Ldc_I4, 0)
  2362. ilg1762266700.Emit(OpCodes.Stloc, int16 0)
  2363. ilg1762266700.Emit(OpCodes.Br,label1762266700_31)
  2364. ilg1762266700.MarkLabel(label1762266700_28)
  2365. ilg1762266700.Emit(OpCodes.Call, methodBuilder157183567) // method get_acc@1
  2366. ilg1762266700.Emit(OpCodes.Call, methodBuilder547203256) // method get_validationData
  2367. ilg1762266700.Emit(OpCodes.Ldloc, int16 0)
  2368. ilg1762266700.Emit(OpCodes.Ldelem, typeof<FSI_0004+Observation>)
  2369. ilg1762266700.MarkLabel(label1762266700_29)
  2370. ilg1762266700.Emit(OpCodes.Call, methodBuilder837191787) // method f@1
  2371. ilg1762266700.MarkLabel(label1762266700_30)
  2372. ilg1762266700.Emit(OpCodes.Add)
  2373. ilg1762266700.Emit(OpCodes.Call, methodBuilder134902595) // method set_acc@1
  2374. ilg1762266700.Emit(OpCodes.Ldloc, int16 0)
  2375. ilg1762266700.Emit(OpCodes.Ldc_I4, 1)
  2376. ilg1762266700.Emit(OpCodes.Add)
  2377. ilg1762266700.Emit(OpCodes.Stloc, int16 0)
  2378. ilg1762266700.MarkLabel(label1762266700_31)
  2379. ilg1762266700.Emit(OpCodes.Ldloc, int16 0)
  2380. ilg1762266700.Emit(OpCodes.Call, methodBuilder547203256) // method get_validationData
  2381. ilg1762266700.Emit(OpCodes.Ldlen)
  2382. ilg1762266700.Emit(OpCodes.Conv_I4)
  2383. ilg1762266700.Emit(OpCodes.Blt,label1762266700_28)
  2384. ilg1762266700.MarkLabel(label1762266700_33)
  2385. ilg1762266700.MarkLabel(label1762266700_32)
  2386. ilg1762266700.Emit(OpCodes.Call, methodBuilder157183567) // method get_acc@1
  2387. ilg1762266700.Emit(OpCodes.Stsfld, fieldBuilder2119321421) // field x@1-1
  2388. ilg1762266700.MarkLabel(label1762266700_34)
  2389. ilg1762266700.Emit(OpCodes.Call, methodBuilder547203256) // method get_validationData
  2390. ilg1762266700.Emit(OpCodes.Ldlen)
  2391. ilg1762266700.Emit(OpCodes.Conv_I4)
  2392. ilg1762266700.Emit(OpCodes.Stsfld, fieldBuilder643021585) // field n@1
  2393. ilg1762266700.Emit(OpCodes.Call, methodBuilder1265773080) // method get_x@1-1
  2394. ilg1762266700.Emit(OpCodes.Call, methodBuilder1200342204) // method get_n@1
  2395. ilg1762266700.Emit(OpCodes.Conv_r8)
  2396. ilg1762266700.Emit(OpCodes.Div)
  2397. ilg1762266700.MarkLabel(label1762266700_38)
  2398. ilg1762266700.MarkLabel(label1762266700_37)
  2399. ilg1762266700.MarkLabel(label1762266700_36)
  2400. ilg1762266700.MarkLabel(label1762266700_35)
  2401. ilg1762266700.Emit(OpCodes.Stsfld, fieldBuilder1902741643) // field x@1
  2402. ilg1762266700.MarkLabel(label1762266700_39)
  2403. ilg1762266700.Emit(OpCodes.Ldstr,"@Correct: %.3f")
  2404. ilg1762266700.MarkLabel(label1762266700_40)
  2405. ilg1762266700.Emit(OpCodes.Newobj,constructor_PrintfFormat`5)
  2406. ilg1762266700.MarkLabel(label1762266700_41)
  2407. ilg1762266700.Emit(OpCodes.Stsfld, fieldBuilder687373648) // field fp@1
  2408. ilg1762266700.Emit(OpCodes.Call, methodBuilder1724790682) // method get_Out
  2409. ilg1762266700.Emit(OpCodes.Call, methodBuilder1918816934) // method get_fp@1
  2410. ilg1762266700.MarkLabel(label1762266700_42)
  2411. ilg1762266700.Emit(OpCodes.Call, methodBuilder1703009748) // method PrintFormatLineToTextWriter
  2412. ilg1762266700.MarkLabel(label1762266700_43)
  2413. ilg1762266700.Emit(OpCodes.Call, methodBuilder1200342502) // method get_x@1
  2414. ilg1762266700.Emit(OpCodes.Callvirt, methodBuilder1950036026) // method Invoke
  2415. ilg1762266700.MarkLabel(label1762266700_45)
  2416. ilg1762266700.MarkLabel(label1762266700_44)
  2417. ilg1762266700.Emit(OpCodes.Stsfld, fieldBuilder1088168529) // field it@
  2418. ilg1762266700.MarkLabel(label1762266700_46)
  2419. ilg1762266700.Emit(OpCodes.Ret)
  2420. typeBuilder1483169245.CreateType()
  2421. typeBuilder1249774500.CreateType()
  2422. typeBuilder2081693784.CreateType()
  2423. typeBuilder2132823128.CreateType()
  2424. typeBuilder2132823128.InvokeMember("main@",enum 280,null,null,[||],Globalization.CultureInfo.InvariantCulture)
  2425. Correct: 0.934
  2426. val validationPath : string =
  2427. "/Users/jason/src/fsharp739/validationsample.csv"
  2428. val validationData : Observation [] =
  2429. [|{Label = "8";
  2430. Pixels =
  2431. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2432. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2433. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2434. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2435. 0; 0; 0; 0; ...|];};
  2436. {Label = "7";
  2437. Pixels =
  2438. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2439. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2440. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2441. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2442. 0; 0; 0; 0; ...|];};
  2443. {Label = "2";
  2444. Pixels =
  2445. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2446. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2447. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2448. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2449. 0; 0; 0; 0; ...|];};
  2450. {Label = "6";
  2451. Pixels =
  2452. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2453. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2454. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2455. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2456. 0; 0; 0; 0; ...|];};
  2457. {Label = "3";
  2458. Pixels =
  2459. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2460. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2461. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2462. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2463. 0; 0; 0; 0; ...|];};
  2464. {Label = "1";
  2465. Pixels =
  2466. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2467. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2468. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2469. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2470. 0; 0; 0; 0; ...|];};
  2471. {Label = "2";
  2472. Pixels =
  2473. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2474. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2475. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2476. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2477. 0; 0; 0; 0; ...|];};
  2478. {Label = "6";
  2479. Pixels =
  2480. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2481. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2482. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 76; 254; 221; 0; 0; 0; 0;
  2483. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 6; 185;
  2484. 253; 220; 0; 0; 0; 0; 0; 0; ...|];};
  2485. {Label = "6";
  2486. Pixels =
  2487. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2488. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2489. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 46; 236; 45;
  2490. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2491. 107; 167; 254; 45; 0; 0; ...|];};
  2492. {Label = "6";
  2493. Pixels =
  2494. [|0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2495. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0;
  2496. 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 0; 16; 234; 181; 0; 0; 0;
  2497. ...|];}; ...|]
  2498. val it : unit = ()
  2499.  
  2500. >
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!