


REDUCEVECTORG [y_s ]= reducevectorg( py_g, uset )
Input in global workspace:
uset uset.pv_* partitioning vectors and sizes
uset.*size *=n,m etc.

0001 function [y_s]= Reducevectorg( y_g,uset ) 0002 % REDUCEVECTORG [y_s ]= reducevectorg( py_g, uset ) 0003 % 0004 % 0005 % Input in global workspace: 0006 % 0007 % uset uset.pv_* partitioning vectors and sizes 0008 % uset.*size *=n,m etc. 0009 0010 if ( uset.ssize>0 ) 0011 if ~isempty(y_g), 0012 y_n= y_g(uset.pv_n,:); 0013 y_s= y_n(uset.pv_s,:); 0014 else 0015 y_s=[]; 0016 end 0017 else 0018 y_s=[]; 0019 end