36 lines
813 B
Elixir
36 lines
813 B
Elixir
defmodule Scopes.CSys do
|
|
require Logger
|
|
|
|
alias Scopes.Core.Actor
|
|
alias Scopes.Shape
|
|
|
|
def neuron(scope) do
|
|
Logger.info([scope: inspect(scope)])
|
|
Actor.create(fn msg -> process(msg, scope) end)
|
|
# Environ.register(env, ac, ...)
|
|
end
|
|
|
|
def update_neuron(scope) do
|
|
Actor.become(self(), fn msg -> process(msg, scope) end)
|
|
end
|
|
|
|
def synapse(rcvr, op, delay \\ 0) do
|
|
fn msg -> Actor.send(rcvr, op.(msg), delay) end
|
|
end
|
|
|
|
# helper functions
|
|
|
|
def process(msg, scope) do
|
|
proc(scope).(msg, scope)
|
|
end
|
|
|
|
def send_value(rcvr, val) do
|
|
msg = Shape.create([:csys, :data], data: %{value: val})
|
|
Actor.send(rcvr, msg)
|
|
end
|
|
|
|
def state(scope), do: elem(scope, 0)
|
|
def proc(scope), do: elem(scope, 1)
|
|
def syns(scope), do: elem(scope, 2)
|
|
def env(scope), do: elem(scope, 3)
|
|
end
|