//------------------
//
// ii-prt-vl3+4-reliability.sci
//
// author: gerd d-h
// first: april-15, 2004
// last: may-5, 2004
//
// idea: some auxiliary functions for the computation of aspects
// of reliability
//
//---------------------------------------
//  Constants
//
// e = 2.71828...
// pi = 3.14159...
//
//-------------------------------------

function y=reliability(t,t0,lambda),y=exp(-lambda*(t-t0)),endfunction

function y=unreliability(t,t0,lambda),y=1-reliability(t,t0,lambda),endfunction

function y=lambda1(rel,time), y = -1 * (log(rel)/time), endfunction

function y=reltime(rel,lamb), y = -1 * (log(rel)/lamb), endfunction