wolffd@0: function hp = gppak(net)
wolffd@0: %GPPAK	Combines GP hyperparameters into one vector.
wolffd@0: %
wolffd@0: %	Description
wolffd@0: %	HP = GPPAK(NET) takes a Gaussian Process data structure NET and
wolffd@0: %	combines the hyperparameters into a single row vector HP.
wolffd@0: %
wolffd@0: %	See also
wolffd@0: %	GP, GPUNPAK, GPFWD, GPERR, GPGRAD
wolffd@0: %
wolffd@0: 
wolffd@0: %	Copyright (c) Ian T Nabney (1996-2001)
wolffd@0: 
wolffd@0: % Check arguments for consistency
wolffd@0: errstring = consist(net, 'gp');
wolffd@0: if ~isempty(errstring);
wolffd@0:   error(errstring);
wolffd@0: end
wolffd@0: hp = [net.bias, net.noise, net.inweights, net.fpar];