Merge pull request #23 from QURIresearch/log-function

Add Log function to Squiggle
This commit is contained in:
Ozzie Gooen 2022-02-17 22:15:29 -05:00 committed by GitHub
commit 0587bc4e10
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 15 additions and 0 deletions

View File

@ -8,4 +8,8 @@ describe("A simple result", () => {
let foo = run("normal(5,2)"); let foo = run("normal(5,2)");
expect(1).toEqual(1); expect(1).toEqual(1);
}); });
test("log(1) = 0", () => {
let foo = run("log(1)");
expect(foo).toEqual({ tag: 'Ok', value: { hd: { NAME: 'Float', VAL: 0}, tl: 0}});
})
}); });

View File

@ -186,6 +186,17 @@ let all = [
}, },
(), (),
), ),
Function.T.make(
~name="log",
~outputType=#Float,
~inputTypes=[#Float],
~run=x =>
switch x {
| [#Float(a)] => Ok(#SymbolicDist(#Float(Js.Math.log(a))))
| e => wrongInputsError(e)
},
(),
),
makeDistFloat("pdf", (dist, float) => floatFromDist(#Pdf(float), dist)), makeDistFloat("pdf", (dist, float) => floatFromDist(#Pdf(float), dist)),
makeDistFloat("inv", (dist, float) => floatFromDist(#Inv(float), dist)), makeDistFloat("inv", (dist, float) => floatFromDist(#Inv(float), dist)),
makeDistFloat("cdf", (dist, float) => floatFromDist(#Cdf(float), dist)), makeDistFloat("cdf", (dist, float) => floatFromDist(#Cdf(float), dist)),