Skip to content

Instantly share code, notes, and snippets.

@yatsuta
yatsuta / deriv.hs
Created June 1, 2010 01:07
derivative system of Gaussian function and its log likelyhood
import Data.List
import Data.Maybe
-- ****************************************************************
-- * data type definition
-- ****************************************************************
type VarName = String
@yatsuta
yatsuta / prml.erl
Created April 9, 2010 11:16
PRML Max-sum Implementation for Erlang
-module(prml).
-compile(export_all).
%% fn, calc
make_fn(VarArg, Body) -> {VarArg, Body}.
map_var_arg(VarBinding, VarArg) ->
[lookup_dom_val(Var, VarBinding) || Var <- VarArg].