## [9003f5]: inst / ord2.m Maximize Restore History

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 ## Copyright (C) 1997, 2000, 2004, 2005, 2006, 2007 Kai P. Mueller ## ## ## This program is free software; you can redistribute it and/or modify it ## under the terms of the GNU General Public License as published by ## the Free Software Foundation; either version 3 of the License, or (at ## your option) any later version. ## ## This program is distributed in the hope that it will be useful, but ## WITHOUT ANY WARRANTY; without even the implied warranty of ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ## General Public License for more details. ## ## You should have received a copy of the GNU General Public License ## along with this program; see the file COPYING. If not, see ## . ## -*- texinfo -*- ## @deftypefn {Function File} {} ord2 (@var{nfreq}, @var{damp}, @var{gain}) ## Creates a continuous 2nd order system with parameters: ## ## @strong{Inputs} ## @table @var ## @item nfreq ## natural frequency [Hz]. (not in rad/s) ## @item damp ## damping coefficient ## @item gain ## dc-gain ## This is steady state value only for damp > 0. ## gain is assumed to be 1.0 if omitted. ## @end table ## ## @strong{Output} ## @table @var ## @item outsys ## system data structure has representation with ## @ifinfo ## @math{w = 2 * pi * nfreq}: ## @end ifinfo ## @iftex ## @tex ## $w = 2 \pi f$: ## @end tex ## @end iftex ## @example ## @group ## / \ ## | / -2w*damp -w \ / w \ | ## G = | | |, | |, [ 0 gain ], 0 | ## | \ w 0 / \ 0 / | ## \ / ## @end group ## @end example ## @end table ## @strong{See also} @command{jet707} (@acronym{MIMO} example, Boeing 707-321 ## aircraft model) ## @end deftypefn ## Author: Kai P. Mueller ## Created: September 28, 1997 function outsys = ord2 (nfreq, damp, gain) ## Updates if (nargin == 2 || nargin == 3) if (nargin == 2) gain = 1.0; endif w = 2.0 * pi * nfreq; outsys = ss ([-2.0*w*damp, -w; w, 0], [w; 0], [0, gain]); else print_usage (); endif endfunction