1 %# Copyright (C) 2007-2012, Thomas Treichl <treichl@users.sourceforge.net>
2 %# OdePkg - A package for solving ordinary differential equations and more
4 %# This program is free software; you can redistribute it and/or modify
5 %# it under the terms of the GNU General Public License as published by
6 %# the Free Software Foundation; either version 2 of the License, or
7 %# (at your option) any later version.
9 %# This program is distributed in the hope that it will be useful,
10 %# but WITHOUT ANY WARRANTY; without even the implied warranty of
11 %# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 %# GNU General Public License for more details.
14 %# You should have received a copy of the GNU General Public License
15 %# along with this program; if not, write to the Free Software
16 %# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19 %# @deftypefn {Function File} {[@var{}] =} odeexamples (@var{})
20 %# Open the differential equations examples menu and allow the user to select a submenu of ODE, DAE, IDE or DDE examples.
23 function [] = odeexamples (varargin)
25 vfam = 1; while (vfam > 0)
28 ['OdePkg examples main menu:\n', ...
29 '==========================\n', ...
31 ' (1) Open the ODE examples menu\n', ...
32 ' (2) Open the DAE examples menu\n', ...
33 ' (3) Open the IDE examples menu\n', ...
34 ' (4) Open the DDE examples menu\n', ...
36 vfam = input ('Please choose a number from above or press <Enter> to return: ');
51 %# Local Variables: ***