function [] = chap_3_prob_71() % % Written by: % -- % John L. Weatherwax 2006-08-28 % % email: wax@alum.mit.edu % % Please send comments and especially bug reports to the % above email address. % %----- format rat; pD = (1/8)*(1/8 + 3/8) + (3/8)*( 1/8 + (1/2)*(3/8) ) + (3/8)*( (1/2)*(1/8) ) pG = (1/8)*( 3/8 + 1/8 ) + (3/8)*( (1/2)*(3/8) + (1/8) ) + (3/8)*(1/2)*(1/8) pB = (3/8)*( (1/2)*(3/8) + (1/2)*(3/8) ) + (3/8)*( (1/2)*(1/8) + (3/8) + (3/8) + (1/2)*(1/8) ) + (1/8) pD + pG + pB