Initial commit
[pftoolbox.git] / GUI / model_generate_p0.m
blob218c03e4fa29742810925fb664712aea1f3bb0a8
1 function danl_generate_p0(hObject);\r
2 % Sorry, I didn't have enough time to write nice and documented GUI code.\r
3 \r
4 % Toolbox for nonlinear filtering.\r
5 % Copyright (C) 2005  Jakob Rosén <jakob.rosen@gmail.com>\r
6 %\r
7 % This program is free software; you can redistribute it and/or\r
8 % modify it under the terms of the GNU General Public License\r
9 % as published by the Free Software Foundation; either version 2\r
10 % of the License, or (at your option) any later version.\r
11 %\r
12 % This program is distributed in the hope that it will be useful,\r
13 % but WITHOUT ANY WARRANTY; without even the implied warranty of\r
14 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
15 % GNU General Public License for more details.\r
16 %\r
17 % You should have received a copy of the GNU General Public License\r
18 % along with this program; if not, write to the Free Software\r
19 % Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.\r
21 handles=guidata(hObject);\r
23 if get(handles.check_p0,'Value')\r
24         p0=gauss(eye(handles.states));\r
25         set(handles.p0_select,'value',2);       % 2=gauss. Make dynamic!\r
26         set(handles.p0_edit,'String',get(p0,'R_str'));  % 2=gauss. Make dynamic!\r
27         handles.p0=p0;\r
28 end\r
30 guidata(hObject,handles);\r