*************************************
www.BillHowell.ca,   Wed May  4 11:34:14 2016
Expression being tested : Eq_05 for uh@[,k+1] :=  
(D0*(uh|[,k])) + (A0*f_activn_uk) + (B0*f_activn_uk_lagged) + (KG*((yn|[,k]) - (yh|[,k])))
 
Raw result for uh@[,k+1] : 
+-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|(+ (+ (+ (* (D_loww@[0] + D_high@[0]) /2 uh@[0,k] )(+ (* (A_loww@[0,0] + A_high@[0,0]) /2 (f_activn@0 un@[0,k]) )(* (A_loww@[0,1] + A_high@[0,1]) /2 (f_activn@1 un@[1,k]) )(* (A_loww@[0,2] + A_high@[0,2]) /2 (f_activn@2 un@[2,k])
+-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|(+ (+ (+ (* (D_loww@[1] + D_high@[1]) /2 uh@[1,k] )(+ (* (A_loww@[1,0] + A_high@[1,0]) /2 (f_activn@0 un@[0,k]) )(* (A_loww@[1,1] + A_high@[1,1]) /2 (f_activn@1 un@[1,k]) )(* (A_loww@[1,2] + A_high@[1,2]) /2 (f_activn@2 un@[2,k])
+-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|(+ (+ (+ (* (D_loww@[2] + D_high@[2]) /2 uh@[2,k] )(+ (* (A_loww@[2,0] + A_high@[2,0]) /2 (f_activn@0 un@[0,k]) )(* (A_loww@[2,1] + A_high@[2,1]) /2 (f_activn@1 un@[1,k]) )(* (A_loww@[2,2] + A_high@[2,2]) /2 (f_activn@2 un@[2,k])
+-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
 ) ) )(+ (* (B_loww@[0,0] + B_high@[0,0]) /2 (f_activn@0 un@[0,k - tau@k]) )(* (B_loww@[0,1] + B_high@[0,1]) /2 (f_activn@1 un@[1,k - tau@k]) )(* (B_loww@[0,2] + B_high@[0,2]) /2 (f_activn@2 un@[2,k - tau@k]) ) ) )(+ (* KG@[0,0] (
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
 ) ) )(+ (* (B_loww@[1,0] + B_high@[1,0]) /2 (f_activn@0 un@[0,k - tau@k]) )(* (B_loww@[1,1] + B_high@[1,1]) /2 (f_activn@1 un@[1,k - tau@k]) )(* (B_loww@[1,2] + B_high@[1,2]) /2 (f_activn@2 un@[2,k - tau@k]) ) ) )(+ (* KG@[1,0] (
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
 ) ) )(+ (* (B_loww@[2,0] + B_high@[2,0]) /2 (f_activn@0 un@[0,k - tau@k]) )(* (B_loww@[2,1] + B_high@[2,1]) /2 (f_activn@1 un@[1,k - tau@k]) )(* (B_loww@[2,2] + B_high@[2,2]) /2 (f_activn@2 un@[2,k - tau@k]) ) ) )(+ (* KG@[2,0] (
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

---------------------------------------------------------------+
- yn@[0,k] yh@[0,k] ) )(* KG@[0,1] (- yn@[1,k] yh@[1,k] ) ) ) )|
---------------------------------------------------------------+
- yn@[0,k] yh@[0,k] ) )(* KG@[1,1] (- yn@[1,k] yh@[1,k] ) ) ) )|
---------------------------------------------------------------+
- yn@[0,k] yh@[0,k] ) )(* KG@[2,1] (- yn@[1,k] yh@[1,k] ) ) ) )|
---------------------------------------------------------------+