Home > . > uniform_specification.m

uniform_specification

PURPOSE

SYNOPSIS

function [m,s,p1,p2] = uniform_specification(m,s,p3,p4)

DESCRIPTION

 Copyright (C) 2004 Michel Juillard

CROSS-REFERENCE INFORMATION

This function calls:

This function is called by:

set_prior

SOURCE CODE

0001 % Copyright (C) 2004 Michel Juillard
0002 %
0003 function [m,s,p1,p2] = uniform_specification(m,s,p3,p4)
0004     if ~(isnan(p3) | isnan(p4))
0005       p1 = p3;
0006       p2 = p4;
0007       m = (p3+p4)/2;
0008       s = (p4-p3)/(sqrt(12));
0009     else
0010       p1 = m-s*sqrt(3);
0011       p2 = m+s*sqrt(3);
0012     end