Mercurial > hg > octave-avbm
annotate examples/oregonator.cc @ 16640:3c2e457eeb72 default tip
ask for saving modified editor files if octave is closed (bug #38689)
* files-editor-tab.cc(constrctor): init new flag indicating if app is closing,
(check_file_modified): message box is modal if app is closing, no cancel,
parent of box is the editor's tab widget for a correct palcement of the box,
(conditional_close): new second arg: flag for closing app (default false),
it is stored in the tab's class wide flag
* file-editor-tab.h: second arg for conditional_close and new class wide flag
* file-editor.cc(destructor): sending close requests to all editor tabs with
flag indicating the application is closing
(add_file_editor_tab): new arg for fetab_close_request and conditional_close
* file-editor.h: new 2nd arg for fetab_close_request (closing app, def. false)
* main-window.cc(destructor): delete editor window first for showing the message
boxes for modified editor files in front of a complete gui
| author | Torsten <ttl@justmail.de> |
|---|---|
| date | Sat, 11 May 2013 18:20:31 +0200 |
| parents | 4295d634797d |
| children |
| rev | line source |
|---|---|
| 2689 | 1 #include <octave/oct.h> |
| 2 | |
| 3 DEFUN_DLD (oregonator, args, , | |
| 3162 | 4 "The `oregonator'.\n\ |
| 5 \n\ | |
| 6 Reference:\n\ | |
| 7 \n\ | |
| 8 Oscillations in chemical systems. IV. Limit cycle behavior in a\n\ | |
| 9 model of a real chemical reaction. Richard J. Field and Richard\n\ | |
| 10 M. Noyes, The Journal of Chemical Physics, Volume 60 Number 5,\n\ | |
| 11 March 1974.") | |
| 2689 | 12 { |
| 13 ColumnVector dx (3); | |
| 14 | |
| 3681 | 15 ColumnVector x (args(0).vector_value ()); |
| 2689 | 16 |
| 4205 | 17 dx(0) = 77.27 * (x(1) - x(0)*x(1) + x(0) - 8.375e-06*pow (x(0), 2.0)); |
| 2689 | 18 dx(1) = (x(2) - x(0)*x(1) - x(1)) / 77.27; |
| 19 dx(2) = 0.161*(x(0) - x(2)); | |
| 20 | |
| 21 return octave_value (dx); | |
| 22 } |