function a = set(a,prop_name,val)% SET set the value of given property% Copyright (C) 1999-2000 Antti Honkela, Harri Valpola,% and Xavier Giannakopoulos.%% This package comes with ABSOLUTELY NO WARRANTY; for details% see License.txt in the program package.  This is free software,% and you are welcome to redistribute it under certain conditions;% see License.txt for details.switch prop_name case 'E'  a.expection = val; case 'Var'  a.variance = val; otherwise  error('Bad property.')end