lp1>%&nbsp;09-jun-2004,&nbsp;VF</span><br>
<span class=help1>%&nbsp;17-may-2004,&nbsp;VF</span><br>
<br>
<hr>
<span class=comment>%&nbsp;allows&nbsp;input&nbsp;model&nbsp;to&nbsp;be&nbsp;cell</span><br>
lin_model&nbsp;=&nbsp;c2s(&nbsp;lin_model&nbsp;);<br>
<br>
<span class=comment>%&nbsp;check&nbsp;dimension</span><br>
[m,&nbsp;nfun]&nbsp;=&nbsp;size(&nbsp;lin_model.W&nbsp;);<br>
n&nbsp;=&nbsp;(-3&nbsp;+&nbsp;sqrt(&nbsp;9&nbsp;+&nbsp;8*m&nbsp;))/2;<br>
<span class=keyword>if</span>&nbsp;round(n)&nbsp;~=&nbs