cal/cal/normcomp.cal

{ RCSid $Id$ }
{
        Compute overlap between two normal distribution functions,
        defined by mean1, mean2, stdev1 and stdev2.

        2/10/95         Greg Ward

        relies on gauss.cal and norm.cal
}
min(a,b) : if(a-b, b, a);
max(a,b) : if(a-b, a, b);

Z1(u) = Z((u - mean1)/stdev1) / stdev1;
Z2(u) = Z((u - mean2)/stdev2) / stdev2;

f(u) = min(Z1(u),Z2(u));

xmin = min(mean1-3*stdev1, mean2-3*stdev2);
xmax = max(mean1+3*stdev1, mean2+3*stdev2);
Revision:	1.2
Committed:	Wed Nov 21 18:10:45 2018 UTC (5 years, 6 months ago) by greg
Branch:	MAIN
Changes since 1.1:	+1 -0 lines
Log Message:	Added missing RCSid tag
#	Content
1	{ RCSid $Id$ }
2	{
3	Compute overlap between two normal distribution functions,
4	defined by mean1, mean2, stdev1 and stdev2.
5
6	2/10/95 Greg Ward
7
8	relies on gauss.cal and norm.cal
9	}
10	min(a,b) : if(a-b, b, a);
11	max(a,b) : if(a-b, a, b);
12
13	Z1(u) = Z((u - mean1)/stdev1) / stdev1;
14	Z2(u) = Z((u - mean2)/stdev2) / stdev2;
15
16	f(u) = min(Z1(u),Z2(u));
17
18	xmin = min(mean1-3stdev1, mean2-3stdev2);
19	xmax = max(mean1+3stdev1, mean2+3stdev2);