attempt to resolve "credibleIntervalToDistribution"

This commit is contained in:
Umur Ozkul 2022-05-19 20:12:46 +02:00
parent 27609cd058
commit 516627629f

View File

@ -188,14 +188,15 @@ module SymbolicConstructors = {
let twoFloat = name => let twoFloat = name =>
switch name { switch name {
| "normal" => Ok(SymbolicDist.Normal.make)
| "uniform" => Ok(SymbolicDist.Uniform.make)
| "beta" => Ok(SymbolicDist.Beta.make) | "beta" => Ok(SymbolicDist.Beta.make)
| "lognormal" => Ok(SymbolicDist.Lognormal.make)
| "logistic" => Ok(SymbolicDist.Logistic.make)
| "cauchy" => Ok(SymbolicDist.Cauchy.make) | "cauchy" => Ok(SymbolicDist.Cauchy.make)
| "credibleIntervalToDistribution" => Ok(SymbolicDist.From90thPercentile.make)
| "gamma" => Ok(SymbolicDist.Gamma.make) | "gamma" => Ok(SymbolicDist.Gamma.make)
| "to" => Ok(SymbolicDist.From90thPercentile.make) | "logistic" => Ok(SymbolicDist.Logistic.make)
| "lognormal" => Ok(SymbolicDist.Lognormal.make)
| "normal" => Ok(SymbolicDist.Normal.make)
| "to" => Ok(SymbolicDist.From90thPercentile.make) // as credibleIntervalToDistribution is defined "to" might be redundant
| "uniform" => Ok(SymbolicDist.Uniform.make)
| _ => Error("Unreachable state") | _ => Error("Unreachable state")
} }