cannorin

let bisect f l r =
  let rec bisect l r i =
    seq {
      let xl, xr = f l, f r
      let sl, sr = int (sign xl), int (sign xr)
      if sl <> sr then
        printfn "[%i] f(%f) = %f, f(%f) = %f" i l xl r xr
        yield (l, r)
        let c = (l + r) / 2.0
        let x = f c

cannorin

VRCSDKBaseInputManager.get: Unknown, arity = 1, orig = VRCSDKBaseInputManager.__get__IsUsingHandController__SystemFuncSystemBoolean
VRCSDKBaseInputManager.set: Unknown, arity = 1, orig = VRCSDKBaseInputManager.__set__IsUsingHandController__SystemFuncSystemBoolean
VRCSDKBaseInputManager.get: Unknown, arity = 1, orig = VRCSDKBaseInputManager.__get__GetLastUsedInputMethod__SystemFuncVRCSDKBaseVRCInputMethod
VRCSDKBaseInputManager.set: Unknown, arity = 1, orig = VRCSDKBaseInputManager.__set__GetLastUsedInputMethod__SystemFuncVRCSDKBaseVRCInputMethod
VRCSDKBaseNetworking.get: Unknown, arity = 1, orig = VRCSDKBaseNetworking.__get__IsNetworkSettled__SystemFuncSystemBoolean
VRCSDKBaseNetworking.set: Unknown, arity = 1, orig = VRCSDKBaseNetworking.__set__IsNetworkSettled__SystemFuncSystemBoolean
VRCSDKBaseNetworking.get: Unknown, arity = 1, orig = VRCSDKBaseNetworking.__get__IsMaster__SystemFuncSystemBoolean
VRCSDKBaseNetworking.set: Unknown, arity = 1, orig = VRCSDKBaseNetworking.__set__IsMaster__SystemFuncSystemBool

cannorin

SystemBoolean.op_Equality :: StaticFunc ([|"SystemBoolean"; "SystemBoolean"|],Some "SystemBoolean"), orig = SystemBoolean.__op_Equality__SystemBoolean_SystemBoolean__SystemBoolean
SystemBoolean.op_Inequality :: StaticFunc ([|"SystemBoolean"; "SystemBoolean"|],Some "SystemBoolean"), orig = SystemBoolean.__op_Inequality__SystemBoolean_SystemBoolean__SystemBoolean
SystemBoolean.op_LogicalAnd :: StaticFunc ([|"SystemBoolean"; "SystemBoolean"|],Some "SystemBoolean"), orig = SystemBoolean.__op_LogicalAnd__SystemBoolean_SystemBoolean__SystemBoolean
SystemBoolean.op_LogicalOr :: StaticFunc ([|"SystemBoolean"; "SystemBoolean"|],Some "SystemBoolean"), orig = SystemBoolean.__op_LogicalOr__SystemBoolean_SystemBoolean__SystemBoolean
SystemBoolean.op_LogicalXor :: StaticFunc ([|"SystemBoolean"; "SystemBoolean"|],Some "SystemBoolean"), orig = SystemBoolean.__op_LogicalXor__SystemBoolean_SystemBoolean__SystemBoolean
SystemBoolean.op_ConditionalAnd :: StaticFunc ([|"SystemBoolean"; "SystemBoolean"|],Some "SystemBoolean"), ori

cannorin

IEnumerableT
SystemArray
SystemBase64FormattingOptions
SystemBoolean
SystemBooleanArray
SystemBooleanRef
SystemByte
SystemByteArray
SystemByteRef
SystemChar

cannorin

@@warning("-27")

type never

module Never = {
  type t = never
  exception Never
  let absurd : t => 'a = x => raise(Never)
}

cannorin

#!/bin/bash

# This code is licensed under CC0.
# http://creativecommons.org/publicdomain/zero/1.0/deed.en

# Requirements:
# - sysstat (mpstat)
# - bc
# - curl
# - collectd