Mercurial > hg > octave-nkf
comparison scripts/control/jet707.m @ 3381:69b167451491
[project @ 1999-12-15 20:48:10 by jwe]
author | jwe |
---|---|
date | Wed, 15 Dec 1999 20:48:45 +0000 |
parents | 8dd4718801fd |
children | 10f21f7ccc7f |
comparison
equal
deleted
inserted
replaced
3380:f5edd74bdc6c | 3381:69b167451491 |
---|---|
1 # Copyright (C) 1997 Kai P. Mueller | 1 ## Copyright (C) 1997 Kai P. Mueller |
2 # | 2 ## |
3 # This file is part of Octave. | 3 ## This file is part of Octave. |
4 # | 4 ## |
5 # Octave is free software; you can redistribute it and/or modify it | 5 ## Octave is free software; you can redistribute it and/or modify it |
6 # under the terms of the GNU General Public License as published by the | 6 ## under the terms of the GNU General Public License as published by the |
7 # Free Software Foundation; either version 2, or (at your option) any | 7 ## Free Software Foundation; either version 2, or (at your option) any |
8 # later version. | 8 ## later version. |
9 # | 9 ## |
10 # Octave is distributed in the hope that it will be useful, but WITHOUT | 10 ## Octave is distributed in the hope that it will be useful, but WITHOUT |
11 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | 11 ## ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
12 # FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | 12 ## FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
13 # for more details. | 13 ## for more details. |
14 # | 14 ## |
15 # You should have received a copy of the GNU General Public License | 15 ## You should have received a copy of the GNU General Public License |
16 # along with Octave; see the file COPYING. If not, write to the Free | 16 ## along with Octave; see the file COPYING. If not, write to the Free |
17 # Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. | 17 ## Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. |
18 | 18 |
19 ## -*- texinfo -*- | 19 ## -*- texinfo -*- |
20 ## @deftypefn {Function File } { @var{outsys} =} jet707 ( ) | 20 ## @deftypefn {Function File } { @var{outsys} =} jet707 ( ) |
21 ## Creates linearized state space model of a Boeing 707-321 aircraft | 21 ## Creates linearized state space model of a Boeing 707-321 aircraft |
22 ## at v=80m/s. (M = 0.26, Ga0 = -3 deg, alpha0 = 4 deg, kappa = 50 deg) | 22 ## at v=80m/s. (M = 0.26, Ga0 = -3 deg, alpha0 = 4 deg, kappa = 50 deg) |
26 ## | 26 ## |
27 ## see also: ord2 | 27 ## see also: ord2 |
28 ## | 28 ## |
29 ## Contributed by Kai Mueller | 29 ## Contributed by Kai Mueller |
30 ## @end deftypefn | 30 ## @end deftypefn |
31 | |
32 | 31 |
33 function outsys = jet707() | 32 function outsys = jet707() |
34 # Written by Kai P. Mueller September 28, 1997 | 33 |
35 # Updates | 34 ## Written by Kai P. Mueller September 28, 1997 |
35 ## Updates | |
36 | 36 |
37 if (nargin != 0) | 37 if (nargin != 0) |
38 usage("outsys = jet707()") | 38 usage("outsys = jet707()") |
39 endif | 39 endif |
40 if (nargin > 1) | 40 if (nargin > 1) |