1
<?xml version="1.0" encoding="UTF-8"?>
3
* Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
4
* Copyright (C) 2008 - INRIA
6
* This file must be used under the terms of the CeCILL.
7
* This source file is licensed as described in the file COPYING, which
8
* you should have received as part of this distribution. The terms
9
* are also available at
10
* http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
13
<refentry xmlns="http://docbook.org/ns/docbook" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:svg="http://www.w3.org/2000/svg" xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:db="http://docbook.org/ns/docbook" version="5.0-subset Scilab" xml:lang="ja" xml:id="gschur">
15
<refname>gschur</refname>
16
<refpurpose>一般化Schur分解 (古い関数). </refpurpose>
20
<synopsis>[As,Es]=gschur(A,E)
21
[As,Es,Q,Z]=gschur(A,E)
22
[As,Es,Z,dim] = gschur(A,E,flag)
23
[As,Es,Z,dim]= gschur(A,E,extern)
29
この関数は古い関数であり, <literal>schur</literal>関数に統合されています.
30
多くの場合, <literal>gschur</literal>関数は以前と同様に動作しますが,
34
最初の3つの構文は以下のように置き換えることができます
36
<programlisting role=""><![CDATA[
38
[As,Es,Q,Z]=schur(A,E);Q=Q' //NOTE THE TRANPOSITION HERE
39
[As,Es,Z,dim] = schur(A,E,flag)
48
<para>extern が Scilab関数の場合,
49
新しい呼び出し手順は, Nextern を以下のように定義するとき,
50
<literal>[As,Es,Z,dim]= schur(A,E,Nextern)</literal>
53
<programlisting role=""><![CDATA[
56
t=extern([1,R(1),R(3)])==1
59
t=extern([2,real(c+c'),real(c*c')])==1
68
<para>extern は,Fortran または Cで記述された外部関数の名前です.
71
<literal>[As,Es,Z,dim]= schur(A,E,'nextern')</literal>
77
<programlisting role=""><![CDATA[
78
logical function nextern(ar,ai,beta)
79
double precision ar,ai,beta
82
r=extern(1,ar,beta,0.0d0,0.0d0)
84
r=extern(2,0.0d0,0.0d0,2.0d0*ar,ar*ar+ai*ai)
90
<refsection role="see also">
92
<simplelist type="inline">
94
<link linkend="external">external</link>
97
<link linkend="schur">schur</link>