Just a pointer to [http://yudkowsky.net/bayes/bayes.html].

Example Tcl code at [Bayesian Networks].