ddosia

Keybase proof

I hereby claim:

• I am ddosia on github.
• I am ddosia (https://keybase.io/ddosia) on keybase.
• I have a public key whose fingerprint is 1C2D 5488 4083 CA31 6A81 29B4 12F5 BB37 E3CC 5CED

To claim this, I am signing this object:

ddosia

Reload = fun(PathPattern) ->
    [Dir] = filelib:wildcard(PathPattern),
    Mods = filelib:fold_files(
        Dir, ".*.beam", false,
        fun(F, Acc) ->
            [list_to_atom(hd(string:tokens(lists:last(string:tokens(F, "/")), "."))) | Acc]
        end,
        []
    ),
    [l(M) || M <- Mods]

ddosia

open Core.Std
open Int64

let find_factor nums k = List.find nums ~f:(fun n -> k % n = 0L)

let rec next_prime primes n =
  match find_factor primes n with
  | Some _ -> next_prime primes (n + 1L)
  | None -> n