JPH03503347A - 多重通路歪みを補正するシステム - Google Patents

Abstract

(57)【要約】本公報は電子出願前の出願データであるため要約のデータは記録されません。

Description

【発明の詳細な説明】 適応型テレビジョンゴースト消去システム本発明は、ゴーストの無い入力信号に 応答してゴーストのある信号を発生するチャネル・モデルを最初に発生するテレ ビジョンゴースト信号消去システムに関する。

それから、このモデルに基づいて、このシステムはゴーストのある信号からゴー スト信号成分を実質的に取り除くゴースト消去フィルタを形成する。

テレビジョン受信は多重通路歪み、すなわち不所望の多重信号の受信に長いこと 悩まされてきた。建築物および他の大きな物体から反射されるか、または十分に 終端されていないケーブル回路網から生じるこれらの不所望の信号は、直接のテ レビジョン信号が遅延された変形信号きして現われ、通常、再生画像のゴースト 信号と呼ばれる。

このゴースト信号は、直接信号とゴースト信号間の信号経路の長さに関係する関 数として直接信号から遅延している。成る受像機の位置から別の受像機の位置ま でのこの関係の不規則性は、ゴースト搬送波信号の位相が直接信号の位相と任意 の関係を有することを示す。直接信号からゴースト信号を完全に取り除くために は、ゴースト信号の振幅、その遅延および直接のテレビジョン信号の搬送波位相 に対するゴースト信号の搬送波位相を考察することが必要である。

ゴースト信号の相対位相の重要性を理解するためには、テレビジョン信号そのも のについて更に知ることが有用である。ＮＴＳＣ規格の下では、テレビジョン信 号は残留側波帯形式で伝送される。ベースバンド信号の比較的低い周波数成分（ ０−１、２５Ｍ　Ｈｚ　）は両側波帯変調（１）ＳＭ）され、一方、高い周波数 成分（１，２５−４゜７５　Ｍ　Ｈｚ　）は単側波帯変調（ＳＳＭ）される。こ の信号のＤ　Ｓ　Ｍ部分の２つの側波帯域の直角成分は互いに相殺するから、Ｄ ＳＭのビデオ信号の直角成分は実質的に零である。しかしながら、この信号のＳ ＳＭ部分の直角成分は零でなく、ゴースト信号として、変調されたビデオ信号の 同相の部分に干渉することがある。

解析すると、変調されたビデオ信号ｖ　（ｔ）の同相成分および直角成分は（１ ）式で定義される複素ベースパンＩ・と等価な次式により表される。

ｖ　（ｔ）＝ｖ　１　　（ｔ）＋ｊｖｑ　（ｔ）　　　　　（１）ここで、ｊは −１の平方根に相当する複素量であり、Ｖｌ　（１）およびｖ、（ｔ）は、信号 ｖ　（ｔ）が、例えば、画像搬送波信号に関してそれぞれ同相であり、また直角 位相である振動信号を使用して中間周波（ＩＦ）信号から同期復調されると得ら れるベースバンド信号である。

信号ｖ　（ｔ）が多重通路の伝送チャネルに供給されると、ゴースト歪み信号が 発生する。

第１図は直接信号およびゴースト信号の相対位相の重要性を示す。例えば、直接 信号が波形１０で表される２Ｔパルスである場合、直接の搬送波信号とゴースト の搬送波信号間の相対位相角度かそれぞれＯｏ、９００．１８０°、または−９ ０’　　（２７００）であるなら、ゴースト信号は波形１．０，１．２．１４ま たは１６で表される。

さらに、直接信号経路とゴースト信号経路間の関係がランダムであるがら、任意 の中間波形も起こり得る。

直接信号とゴースト信号の相対振幅および相対位相情報は、テレビジョン信号を 同相（Ｉ）成分および直角（Ｑ）成分に復調することにより決定することができ る。

■成分はテレビジョン信号の画像搬送波と同相であり、Ｑ成分は画像搬送波に対 して９０’位相シフトされている信号と同相である。これらの成分は複素平面に おけるテレビジョン信号を表し、複素平面においてＩ成分およびＱ成分はそれぞ れ実軸および虚軸の座標に対応する。

ビデオ信号の同相成分および直角成分をそれぞれ実成分および虚成分と呼ぶ約束 がこの出願を通じて使われる。

１９７７年５月に発行されたコンシューマ　エレクトロニクスに関するアイ・イ ー・イー・イー・トランザクション（ＩＥＥＥ　Ｔ「ａｎｓａｃｔｉｏｎｓ　ｏ ｎ　Ｃｏｎｓｕｍｅｒ　Ｅｌｅｃｔ「ｏｎｉｃｓ）の第１７５頁−第１８１頁に 掲載されたエイチ、セディック（Ｈ，Ｔｈｅｄｉｃｋ）氏による「テレビジョン 放送のための適応型多重通路等化」という題目の論文に述べられているように、 ゴースト信号を発生する伝送経路は、直接信号が減衰定数ａにより振幅が減少さ れ、また、時間期間τたけ遅延されてゴースト信号を形成するフィードフォワー ド・システムとしてモデル化される。多重通路のゴースト信号を含んでいるビデ オ信号は（２）式で表される。

ここで、ａ、は複素係数、τ、は１番目の信号経路の相対時間遅延である。この 式のｎ　（ｔ）の項は受信雑音である。直接信号経路を含め全部でに個の信号経 路（すなわち、Ｋ−１個のゴースト信号）がある。複素係数ａ。

の大きさおよび位相はそれぞれｉ番目の信号経路の相対減衰定数および搬送波位 相である。ｉ＝１を直接信号経路とする。理想的には、多重通路の問題がないと 、ａ１＝１、τ　＝０、またｉ−２，・・・Ｋについてはａ■＋ 一〇である。

（２）式で表されるゴーストのある信号は、元の信号にノイズが加わったものの 多様な変形信号の加重合計にすぎない。ゴーストを除去する構成を持たない受像 機では、ｒ　（ｔ）の実部または大きさのどちらがが復号される。これがテレビ ジョン表示において重なり合った画像、すなわちゴーストを発生する。

ビデオ信号の同相成分および直角成分に作用するゴースト消去システムが提案さ れている。このようなシステムの一例は「適応型テレビジョンのゴースト除去シ ステム」という名称の米国特許第４，７０３，３５７号明細書に示されている。

この特許に示されるシステムは、受信されるビデオ信号からゴースト信号を適応 的に取り除くために複素フィルタ係数を有するディジタルＩＩＲフィルタを使用 する。このＩＩＲフィルタは、最初は直接信号に対してゴースト信号の時間遅延 を決定するために相関器として動作し、その後ゴースト消去フィルタとして動作 するよう制御信号により条件付けられる。この相関器によって決定される遅延値 はＦＩＲフィルタのタップを形成する可変遅延要素中に予めセットされ、またタ ップ係数は予め定められる値に設定される。次いでゴースト消去システムはトレ ーニング期間の間濾波されたビデオ信号をモニターし、またトレーニング期間に おけるフィルタの出力のゴースト信号を最小にする方向に係数値を変える。

前述の特許に記載されたシステムは一定のサンプリング周波数でゴーストのある ビデオ信号をサンプリングするアナログ・ディジタル変換器（ＡＤＣ）を含んで いるディジタル・システムである。したがって、ゴースト消去フィルタにより処 理される信号は離散的サンプリング点てのみ有効である。これは、ゴースト信号 がザンプリング期間の整数倍でない時間量だけ主信号に対して遅延している場合 問題になる。この場合、フィルタにより消去されるゴースト信号は受信ビデオ信 号に混入する信号と同じではないかも知れず、従って、ゴースト信号のかなりの アーティファクト（ａ＋１ｉｌａｃｌ）が処理済みのビデオ信号中に残っている 。

より簡単なＩＩＲフィルタを使用し、サンプリング期間の整数倍でない時間遅延 を有するゴースト信号を補正することのできるディジタルのゴースト消去システ ムが提供されるならば好都合である。

発明の概要 本発明は、トレーニング期間の間、受信されたゴーストのあるビデオ信号を解析 する制御処理回路を含み、ゴーストのあるビデオ信号を発生した伝送チャネルを 記述するチャネル・モデルを定式化するゴースト消去システムにおいて具体化さ れる。次いで制御処理回路はこのチャネル・モデルを複素１１Ｒフイルタ用に１ 組の係数値に変換する。本発明の第１の実施例では、データ処理回路により発生 される１組の係数値は、サンプリング期間の整数倍てない相対時間遅延を有する ゴースト信号を有効に消去するために複数の時間順次のサンプルの中から遅延サ ンプルを補間するようＩＩＲフィルタを条件付ける。本発明の第２の実施例では 、このフィルタはサンプリング期間の整数倍でない相対時間遅延を有するゴース ト信号を有効に消去するためにＩＩＲフィルタの少なくとも１つのタップに結合 されるサンプル値補間回路を含んでいる。

図面の簡単な説明 第１図は、前述したように、本発明が動作する環境を説明するのに自相な直接信 号に対する任意のゴースト信号の波形図である。

第２図は、本発明の一実施例を含んでいるテレビジョン受像機の信号処理部のブ ロック図である。

第３図および第４図は、第２図に示す回路の動作を説明するのに有用な信号を示 す振幅対時間の波形図である。

第５図は、第２図に示すマイクロプロセッサの動作を説明するのに有用なフロー チャートである。

第６図は、第２図に示す回路で使用するのに適したゴースト除去フィルタのブロ ック図である。

第７図は、第６図に示すゴースト除去フィルタに使用するのに適した複素乗算器 のブロック図である。

第８図は、本発明の他の実施例を示す第６図に示したゴースト除去フィルタの１ 部のブロック図である。

第９図は、第８図に示す本発明の他の実施例で使用するのに適した補間器のブロ ック図である。

第１０図は、第９図に示すＲＯＭのプログラミングを示す値のテーブル図である 。

先に引用した工ｒチ・セディック（Ｈ，ＴＩ＋ｅｄｉｃｋ）氏による論文で説明 されているように、テレビジョン信号に多重通路歪みを加える伝送チャネルは有 限インパルス応答（ＦＩＲ）フィルタとしてモデル化される。セディック氏の論 文で更に述べられているように、この伝送チャネルにより導入されるゴースト信 号は、伝送チャネルの伝達関数の逆関数である伝達関数を有する無限インパルス 応答（ＩＩＲ）フィルタにより効果的に消去される。

後述する本発明の実施例では、調整可能な遅延値および調整可能な係数値を有す る複素１１Ｒフイルタはゴースト消去フィルタとして使用される。時間遅延に関 する値および係数値はＮＴＳＣ方式のテレビジョン信号と共に伝送されるトレー ニング信号からマイクロプロセッサにより決定される。これらの値は如何なるゴ ースト消去動作よりも１１１にゴーストの混入した信号を解析することにより決 定される。それから遅延値および係数はＩＩＲフィルタに供給され、受信された ビデオ信号からゴースト信号を消去するようにＩＩＲフィルタを条件付ける。

次に、第２図に示すゴースト消去システムを簡単に説明する。その後ゴースト消 去フィルタに関する遅延値および係数値が決定される方法を詳細に説明し、それ からゴースト消去フィルタそれ自体について更に詳細に説明する。

各図において、幅広の矢印は多ビットの並列ディジタル信号を伝達するバスを表 し、また単線の矢印はアナログ信号もしくは単一ビットのディジタル信号を伝達 する結線を表す。各装置の処理速度に依り、補償用遅延が信号経路の成るものに おいて必要とされる。ディジタル信号処理回路の設計分野の当業者はこの種の遅 延が個々のシステムのどこで必要とされるかを知っている。

第２図を参照すると、テレビジョン受像機の信号処理部が示されている。無線周 波（ＲＦ）信号はアンテナ２０８によって受信され、チューナおよびＩＦ回路２ １０にｆｌｊ給される。回路２１０は、例えば、普通のテレビジョン・チューナ 、中間周波ＣＩＦ）フィルタおよび増幅器を含んでいる。この実施例では、ＩＦ フィルタの通過帯域は変調された音声信号を含んでいることが望ましい。

回路２１０により発生されるＩＦ倍信号ベースバンドの複合ビデオ信号Ｃ■を発 生する普通の包路線検波器２４２に供給される。普通の同期分離回路２４４は信 号Ｃ■に応答し、複合ビデオ信号から複合同期信号Ｃ８を取り除く。また同期分 離回路２４４はビデオ信号の各水平線から色同期バースト信号成分を抽出するの に使用されるパーストゲート信号ＢＧを発生する。

複合同期信号Ｃ８に応答する検出器２４６は垂直同期パルス期間に先行する最後 （６番目）の前置等化パルスを検出する。検出器２４６は複合ビデオ信号の各フ ィールドの６番目の前置等化パルスと実質的に一致する出力パルス信号ＶＳを発 生する。以下に説明するように、このパルスは直接信号に対してゴースト信号の 相対遅延、相対振幅および相対位相を決定するために使用されるトレーニング信 号を位置決めするために使用される。

チューナおよびＩＦ回路２１０により発生される信号は、第１の同期検波器２２ ０、画像搬送波抽出回路２２２および第２の同期検波器２３０に供給される。画 像搬送波抽出回路２２２は、直接のビデオＩＦ信号の画像搬送波と位相および周 波数が整合している第１の基準信号を発生する。この第１の基準信号は第１の同 期検波器２２０および９０°の位相シフト回路２２４に供給される。

位相シフト回路２２４は、第１の基準信号に対して直角位相である第２の基準信 号を発生する。この第２の基準信号は第２の同期検波器２３０に供給される。同 期検波器２２０および２３０はＩＦ倍信号それぞれ同相成分および直角位相成分 に復調する。同相信号は、システムのクロック信号ＣＫに応答してディジタル信 号ｒ１を発生するアナログ・ディンタル変換器（ＡＤＣ）２３２に供給される。

同様に、直角位相信号は、クロック信号ＣＫに応答してディジタル信号ｒＱを発 生するＡＤＣ２３４に供給される。例えば、ＮＴＳＣ方式の色副搬送波周波数ｆ 　の４倍に実質的に等しい周波数４ｆ　を有するりＣＣ ロック信号ＣＫは以下に説明する位相ロックループ（ＰＬＬ）２６０により発生 される。

信号ｒ　およびｒＱはゴースト除去フィルタ２８０お■ よびマイクロプロセッサ２８２に供給される。以下に説明するように、ゴースト 除去フィルタ２８０は複素サンプル中データＩＩＲフィルタを含んでいる。フィ ルタ２８０は、マイクロプロセッサ２８２の制御の下で、ゴーストが混入してい る信号「　およびｒＱを濾波し、任意のゴース）・信号が実質的に排除された直 接信号の同相成分を近似する信号ｒ　′を発生する。信号ｒ　′は、デＩ インタル信号ｒ　′を表わすアナログのベースバンド複合ビデオ信号を発生する ディジタル・アナログ変換器（ＤＡＣ）２８６に供給される。

アナログのヘースバンド複合ビデオ信号は、同期分離回路２４４から供給される パーストゲート信号ＢＧに応答し、複合ビデオ信号の各水平線から色同期バース ト成分を分離する普通のバースト分離器２８８に供給される。

分離されたバースト信号は、例えば、はぼ４ｆ　の共振周波数を有する共振クリ スタル２６１を含んでいる普通のＰ　Ｌ　Ｌ　２６０に供給される。ＰＬＬ２６ ０はバースト信号により制御され４ｆ　のクロック信号ＣＫを発生する。

ＤＡＣ２８６からの複合ビデオ信号は、普通のビデオ信号処理回路２９０とイン ターキャリヤ音声ＩＦ増幅器および検波回路２９２にも供給される。ビデオ信号 処理回路２９０は、例えば、複合ビデオ信号からルミナンスおよびクロミナンス 信号成分を分離し、これらの成分を処理して表示装置（図示せず）に供給される 赤、緑および青の原色信号（Ｒ，ＧおよびＢ）を発生する回路を含んでいる。イ ンターキャリヤ音声回路２９２は、複合ビデオ信号から４．５ＭＨｚの音声搬送 波を分離する共振同調回路、４．５ＭＨｚのＩＦ増幅器および音声信号を発生す るためのＦＭ復調器を含んでいる。音声信号はスピーカ（図示せず）に供給され る音声信号を発生する音声信号処理回路２９４に供給される。

マイクロプロセッサ２８２は直接記憶アクセス（ＤＭＡ）命令、標準算術命令お よび割り込み処理機能を有し現在市販されている多数のマイクロプロセッサの中 の任意の１ってよい。マイクロプロセッサ２８２はランダムアクセスメモリ（Ｒ ＡＭ）２８４および読出し専用メモリ（ＲＯＭ）２８５に結合される。またマイ クロプロセッサ２８２は、現在選択されているチャネルを示すチューナおよびＩ Ｆ回路２１０からの信号ＳＥＬを受は取り、６番目の等化パルス検出器２４６か ら供給される信号ＶＳを受は取り、クロック信号ＣＫを受は取るように結合され る。マイクロプロセッサ２８２は、以下に説明するようにバスＡＤおよびＤＡＴ Ａを介して種々の信号をゴースト除去フィルタ２８０に供給するように結合され る。

ゴースト除去動作は、信号ＳＥＬが新しいチャネルからの信号が選択されたこと を示すとき開始する。この時、パルス信号■Ｓに応答するマイクロプロセッサ２ ８２は、６番目の等化パルスに続く期間の間に発生する７６８個のｒ　およびｒ ＱのサンプルをＲＡＭ２８４に記憶する■ ためにＤＭＡ命令を実行する。これらの７６８個のサンプルは入来信号の１つの 水平ライン期間のほぼ８５％を構成する。この期間には、垂直同期パルスの前縁 に先行する少なくとも少数のサンプル、垂直同期パルスの前縁を表すサンプルお よび第１−の切り込みに先行する垂直同期パルスの部分を表すサンプルが含まれ ている。この信号はゴースト除去フィルタ２８０に供給される遅延値および係数 値を決定するためにマイクロプロセッサ２８２によりトレーニング信号として使 用される。

このトレーニング信号の同相部分の波形が第３図に示されている。６番目の等化 パルスと垂直同期の前縁間の信号の部分は水平ライン期間の０．４６倍（０，４ ６Ｈ）の継続時間およびＱ　　ＩＲＥ単位の公称振幅を有する。

垂直同期の前縁と垂直同期パルスの第１の切り込み間の信号の部分は０．４３Ｈ の継続時間および−４０ＩＲＥ単位の公称振幅を有する。雑音が無い場合、信号 のこの部分の間−４０ＩＲＥ単位の振幅値からの如何なる偏差も垂直同期の前縁 が遅延され、減衰され、またおそらく位相シフトされた変形であるゴースト信号 の結果であるものと仮定する。

この信号はほぼ一定のタイミングおよび振幅特性を有するよう連邦通信委員会（ ＦＣＣ）の規定により制約を受ける。この信号かＦＣＣの規定に近い許容値に保 持されるので、この信号のモデルは受像機の製造中ＲＯＭ２８５に記憶され、次 いで受信された信号と比較し、また直接信号に対するゴースト信号のタイミング 、振幅および位相を決定するためにマイクロプロセッサ２８２により使用される 。このモデルはビデオ信号の同相成分および直角成分の両方を含んでいる。

以下に説明するように、ＲＯＭ２８５に記憶されるトレーニング信号のサンプル 値は受信されたビデオ信号より更に高い実効サンプリング周波数を有することが ある。

第４図は垂直同期の前縁の同相成分Ｉおよび直角位相成分Ｑを示す波形図である 。第４図に示す各々の波形図を描く１４４個のサンプルはＲＯＭ２８５に保持さ れる。

これは６４ｆ　　の実効サンプリング周波数を与える。トレーニング信号は垂直 同期の前縁に続く領域において実質的に平坦であるので、トレーニング信号の残 りのサンプル、すなわち、垂直同期の前縁と第１の切り込み間の期間を描くサン プルは２つの波形図の最後のサンプルを複製することによって発生される。

前述したように、本発明の実施例において、マイクロプロセッサ２８２は、トレ ーニング期間の間に抽出されるサンプルを処理し、伝送チャネルの伝達関数を近 似するモデルの伝達関数を発生する。このモデルの伝達関数から得られる遅延値 および係数値を使用して、マイクロプロセッサ２８２は受信されたビデオ信号か らゴースト信号を消去するようにＩＩＲゴースト消去フィルタ２８０をプログラ ミングする。

以下に示すチャネル・モデルを発生するために使用されるアルゴリズムの説明に おいて、ベクトル表記法の拡大使用が行われる。一般に、信号は、例えば、ｓ　 （ｔ）のように小文字活字によって表され、信号の倍数サンプル値を含んでいる ベクトルは、例えば、Ｓのように下線を引いた小文字活字によって表され、サン プル値の行列は、例えば、Ｓのように大文字活字によって表される。

以下に説明するアルゴリズムは、ディジタル・エクイップメントψコーポレーシ ョン（口１ｇ１ｔａｌ　Ｅｑｕｉｐｍｅ＋＋ｔ　Ｃ。

＋ｐｏ＋ａｌｉｏｎ）によって作られたＶＡＸコンピュータで実行するためにＦ ＯＲＴＲＡＮ７７プログラミング言語で実行されてきた。これらのプログラムの コピーはこの明細書の説明部分の終わりに含まれている。これらのプログラムは 、プログラミング・リストに含まれていないサブルーチンＣ３ＶＤＳに対する参 照を含んでいる。このサブルーチンは複素要素を有する行列の特異値分解を実行 する。これはＬ　Ｉ　ＮＰＡＣＫライブラリーパッケージから一般大衆にも入手 可能であり、また応用工業数学協会（ＳＩＡＭ）から発行されているジェイ・ジ ェイ・トンガラ（１，Ｊ、　　Ｄｏｎｇａ＋ａ）氏にょるｒＬＩＮＰＡｃＫの利 用者用手引き」の　Ｃ１２２頁−０１２９頁に記載されている。

これらのプログラムは、第４図を参照して先に説明したように垂直同期の前縁の 同相成分および直角成分を表し、ＲＯＭ２８５に読み込まれる値のリストも含ん でいる。これらの値は後述する基準信号行列および基準信号ベクトルを発生する ために使用される。本発明の実施例において、付録に含まれているようなコンバ イリング・プログラムによって得られる目的コードは垂直同期の前縁を示すデー タと共にＲＯＭ２８５に記憶される。

伝達関数を発生するアルゴリズムにおける第１のステることである。先に述べた ように、マイクロプロセッサ２８２は、６番目の等化パルス検出器２４６から発 生される信号■Ｓに応答し、各ＡＤＣ２３２および２３４により供給される信号 ｒ１　（ｔ）およびｒ　Ｑ　（ｔ　）の各々の７６８個のサンプルを取り入れる 。信号ｒｘ（ｔ）およびｒ、（ｔ）のサンプルを含んでいる複素ベクトルは−Ｌ である。ＲＯＭ２８５に記憶される基準信号の１６番目毎のサンプルを抽出する ことによって得られる基準トレーニング信号のサンプルを含んでいる複素ベクト ルは王で表される。したがって、垂直同期の前縁は９個の複素サンプル値で表さ れる。

アルゴリズムにおける次のステップはベクトルｒおよびユを微分することである 。これはベクトル中の各成分について（ｉ＋１）番目の成分から１番目の成分を 引くか、あるいはベクトルＬおよび互の各々に（３）式で定められる行列Ａを掛 けることによって達成される。

１−１　　＋１．　　ＯＯ・・・０　０１１０−１．＋１０・・・０　０１ Ａ　＝　　　Ｉ　　ＯＯ−１＋１−−−０　０１１・・・・・・・・・・・・・ ・・・・・１（３）１０　０　０　０　−１＋１１ この結果得られる微分されたベクトルはそれぞれｒ′および１二で表される。こ の手順における次のステップはニー−および−シｊ−を相関させてベクトルｒ′ 　を発生す□　ｍ ることである。このベクトルの成分は（４）式に従ってここで、ｓ′　＊はＳ′ の共役複素数を示す。ｒ′□［ｎ］の絶対値の大きさは垂直同期の前縁のゴース ト画像がサンプル時間ｎ＋４に存在するかどうかを示す。

ｒ　’　ｍ　［ｎ　］の大きさがしきい値以上ならば、マイクロプロセッサは指 数ｎの値に隣接するＬ′□の値を調べ、しきい値を越える１群の値の中に中央値 ｑを検出する。

サンプル指数ｑ＋４は予備のゴースト遅延値として使用される。このテストで使 用されるしきい値は受信されたビデオ信号の信号対雑音比（ＳＮＲ）の関数であ る。しきい値は低レベルのゴースト信号でも検出できるように出来るだけ低いこ とが望ましいが、入力ビデオ信号中の雑音がゴースト信号として解釈される程低 くはない。本発明の実施例において、しきい値は差分雑音値の自乗平均の平方根 （ＲＭＳ）の２倍に設定される。ＲＭＳ雑音値は、例えば、幾つかのフィールド 期間に亘って垂直帰線消去期間の間ビデオ信号をモニターすることにより決定さ れる。

受信されたビデオ信号中に直接信号およびに一１個（但し、Ｋは整数）のゴース ト信号が存在していると仮定すると、前述のアルゴリズムによって与えられる推 定遅延値は（５）式で記述されるベクトルヱで表される。

ここで、？、は１番目の経路についての遅延推定値である。ゴーストのあるトレ ーニング期間はこれらの遅延値を使用してＲＯＭ２８５から得られる基準同期値 を重み付けすることにより合成される。合成されたトレーニング期間は（６）式 で表される。

システム雑音のため、この誤差は零ではあり得ない。入についての（１０）式の 最小２乗（ＬＳ）解は誤差ベクトルの最小ノルムを与える。この解は次式で表さ れる。

ここで、Ｉ−■は共役−転置演算子である。最小２乗誤差ベクトル且のノルム平 方として定義される最小２乗誤差εここで、ＩはＮｘＮの恒等行列である。

この最小平方誤差およびベクトルａ　　についての最ＬＳ 小平方解は推定遅延ベクトルエの関数である。前述のエツジ検出アルゴリズムは ゴースト信号の相対遅延のおおよその推定値を与えることができるだけなので、 この最小平方誤差は遅延推定値の精確さを示すために使用することが出来る。す なわち、誤差が小さければ小さいほどする基準信号行列は合成係数ベクトルの最 適の推定値を計算するために（１１）に代入される。検索手続きの間ｊの全体は サンプリング期間の整数倍であるものと制限されていないことに注意しなければ ならない。

ＲＯＭ２８５に記憶されるオーバサンプリングされた垂直同期信号は、先に計算 された２′の各々に加えられる端数の遅延時間を決定するために本発明の実施例 においては使用される。後述のアルゴリズムにおいて、最小た遅延値より実際の 遅延に近いかどうかを決定するために使用される。

発明者らは、最小平方誤差を定める（１２）式が行列ユニタリ行列、■はＫ　ｘ 　Ｋのユニタリ行列、Ａは（１４）式で表わされるＮｘＫの対角行列である。

１　λ　　０　０　　・・・　０１ Ａ−１０λ　　　Ｏ・・・　０１　　　　　（１４）１・・・　・・・　・・・ 　・・・　・・・１１０　００　　・・・　　λに１ １・・・　・・・　・・・　・・・　・・・１＋０００００１ ここで、λ　　λ　　・・・λえの値は特異値分解演算１　′　　　２′ により決定される。

ＵｌがＵの一番左のに列として定義されるならば、（１２）式は次式のようにな る。

行列の特異値分解は１９７９年ジョン　ウィリー・アンｌ’−サンズ（Ｉｏｈｎ 　Ｗｉｌｅｙ　＆　５ｏｎｓ）から発行された［コンピュータのためのコンパク ト数値方法−線形代数および関数最小化」という題目のジエイ・シー・ナツシュ （Ｊ、　　Ｃ，Ｎａ＋ｈ）による本の２．５章の第２１頁−第２２頁に記載され ている。

最小平方誤差を求めて？空間を検索するためのアルゴリズムは第５図のフローチ ャートに示される。

第５図のフローチャートにより記述されるアルゴリズムは一度に一回ゴースト遅 延値を調整する。各々の調整によって、この値の局部最小が検出されるまで最小 平方誤差は求められる。

ステップ５１２で、変数■は１の値に設定され、この変数は調整される遅延時間 の値を保持する。ステップ５１４で、ベクトルΔ−１のすべての値は１番目の成 分を除いて零に設定される。この成分はＲＯＭ２８５に記憶された基準サンプル ・ベクトルのサンプル時間Ｔ　／１６（すなわち、１．／（６４ｆ　　））に設 定される。

する基準データからのサンプルを使用することと同じである。関数ε（９）の値 が１番目のゴーストについてのゴースト遅延が増加するとき小さくなるならば、 ステップ５１８および５２０は関数ε（、、ｉ）についての最小値に達するまで このゴースト遅延を増大し続ける。

小値に達するまでステップ５２２．５２４および５２６は１番目のゴーストにつ いての遅延を減らす。１番目のゴースト信号について最適の遅延値が得られると 、ステップ５２８はもっと多くのゴースト信号が最適化されるべきかどうかを決 定する。ＩがＫより小さいと、Ｉはステップ５３０で増加され、次のゴースト遅 延値は最適化され、さもなければアルゴリズムはステップ５３２で終ｒする。

前述の処理手順を使用すると、合成遅延ベクトルおよび合成係数ベクトルの最適 推定値を得ることができる。

送チャネルについての伝達関数の最適推定値、すなわち、ｈｏ、ｔ　（ｔ）は（ １６）式で与えられる。

、および土。、ｔのそれぞれのｉ番目の成分である。

尤に述べたように、一旦、伝送チャネルの伝達関数が決まると、この伝達関数の 遅延値および係数値をＩＩＲフィルタに挿入することによりゴースト消去フィル タを設計することができる。前述のアルゴリズムにおいて、ゴースト遅延時間の ベクトルヱの開始時間は固定されていない。６番目の等化パルス検出器２４６に おける変動に因り、マイクロプロセッサ２８２により抽出されるサンプルのタイ ミングはフィールドがらフィールドで著しく変動する。この変動を補償するため に、本発明の実施例で使用されるゴースト消去システムは、ＩＩＲフィルタにお ける遅延値を最大の大きさを有する伝達関数における項とそれに続くすべての項 間の相対遅延値に設定する。最大の大きさを有する項は垂直同期の前縁に対応し 、先に述べたように、それに続くすべての項は垂直同期の前縁のゴーストに対応 するものと仮定する。垂直同期の前縁に対して相対的となるように伝達関数）１ 　　　　　＜ｔ）ｐｔ の遅延値を調整するのに加え、マイクロプロセッサ２８２は、垂直同期の前縁の 遅延時間以上がまたは等しい遅延時間を有する伝達関数の項の係数値を垂直同期 の前縁についての係数値の逆数により調整する。例えば、Ｌ番目の係数値が垂直 同期の前縁に対応すると、（１６）式％式％ 垂直同期の前縁値の時間遅延値より小さい時間遅延値フィルタを合成する際に無 視されるから、これらの項に対応する観測ベクトル玉の値も無視される。これら の値を除去する効果はＮの値を減少させ、先に述べたアルゴリズムについての計 算オーバヘッドを減少させる。サンプル数におけるこの減少は観測ベクトル玉に おいて垂直同期の前縁を位置決めし、例えば、１０個のサンプル期間より多く垂 直同期の前縁に先行するサンプルを除去することによって達成される。これは前 述の行列演算セットのどれよりも先に行われる。

リング期間の整数倍で発生する場合、ＩＩＲフィルタの応がある。

本発明の実施例に使用されるゴースト除去フィルタ２８０が第６図に示される。

このゴースト除去フィルタにおいて、受信されるビデオ信号の同相成分子１およ び直角位相成分子Ｑは複素乗算器６１０の信号入力ボートに供給される。複素係 数ａ、。９．の逆数の実数部および虚数部は、アドレスバスＡＤおよびデータバ スＤＡＴＡを介してで−ｒクロプロセッサ２８２により複素乗算器６１０の係数 入力ボートに供給される。本発明の実施例において、マイクロプロセッサ２８２ はあたかもＲＡＭ２８４中に値を記憶しているかのようにフィルタ係数値を複素 乗算器中に記憶する。

第７図は本発明の実施例で使用するのに適した複素乗算器のブロック図である。

第７図において、バスＤＡＴＡは８ビツトの並列人力、並列出力の２つのレジス タ７０４および７０６のそれぞれの入力ボートに結合される。

アドレスバスＡＤは復号回路７０２の入力ボートに結合される。回路７０２は、 バスＡＤを介して供給される１つの予め定められる値に応答し、レジスタ７０４ のための負荷入力信号をパルス化し、別の予め定められる値に応答し、レジスタ ７０６のための別のロード入力信号をパルス化する。マイクロプロセッサ２８２ がゴースト除去フィルタ２８０で使用される複素乗算器の１つに係数値を取り入 れるとき、マイクロプロセッサ２８２はバスＤＡＴＡを介して係数の実数部およ びバスＡＤを介してレジスタ７０４のためのロード信号をパルス化するアドレス 値を同時に供給する。次に、マイクロプロセッサはバスＤＡＴＡを介して係数値 の虚数部およびバスＡＤを介してレジスタ７０６のためのロード信号をパルス化 するアドレス値を供給する。

ビデオ信号Ｉ　およびＱ□の同相成分および直角成分には、乗算器７１０．７１ ２．７１６および７１８、減算器７１４および加算器７２０を含んでいる回路に よりて、同相および直角係数値【２およびＱ２のそれぞれが掛けられる。乗算器 ７１０は信号１１および係数値Ｉ２の債を形成し、その結果を減算器７１４に供 給する。減算器７１４は乗算器７１０によって発生される積から、乗算器７１２ によって発生される信号Ｑ１および係数Ｑ２の積を引き算し、同相の出力値Ｉ３ を発生する。乗算器７１６は信号Ｑ　および係数値Ｉ２の積を形成し、この積を 加算器７２０の１つの人力、ボートに供給する。乗算器７１８は信号Ｉ　に係数 値Ｑ２を掛は算し、加算器７２０への第２の入力信号を発生する。加算器７２０ から発生される出力信号は直角信号Ｑ３である。

乗算器６１０によって実行される乗算演算は（１−７）式の総和の各項の分母（ すなわち、１／ａＬＯＰＴ）に対応する。これは、この係数が垂直同期の前縁に 対応するので、ビデオ信号の直接成分の配分であると考えることができる 第６図を参照すると、乗算器６１０にから供給される同相信号および直角信号は それぞれ減算器６１８および６２０の各披減数入カボートに供給される。減算器 ６１８および６２０の減数人力ボートは加算器６６６および６６８のそれぞれか らゴースト補正信号を受は取るように結合される。減算器６１８および６２０か ら供給される出力信号は補正された同相信号ｒ　′および直角信号ｒＱ′である 。先に述べたように、第２図を参照すると、信号ｒ　′はゴースト除去フィルタ ２８０の出力信号で■ ある。

ゴースト消去システムの説明を簡単にするために、ゴースト除去フィルタ２８０ はこの最初の説明の目的のために３つだけのタップを有するように制限される。

後述するように、このフィルタは多数のタップを有することか望ましい３、この 種のフィルタは第６図に示すフィルタの直接拡張としてディジタル信号処理回路 の設計分野の当業者によって容易に設計される。

プログラム可能Ｊ能な３つのタップ付き遅延線６２２はＩＩＲのゴースト除去フ ィルタに対して３つの遅延された信号を供給する。遅延線６２２は直列接続され たＮ個の遅延要素の２つの群を含んでいる。これらの遅延要素の各々はサンプリ ング・クロック信号ＣＫに結合され、約７０ｎｓの時間遅延（１／　（４ｆ　　 ）　）を与える。最初の２つ、６２４と６２６、および最後のもの６２８により 示される遅延要素の第１の群はビデオ信号同相成分を遅延する。ビデオ信号の直 角成分は最初の２つ、６３０と６３２、および最後のもの６３４により示される 遅延要素の第２の群によって遅延される。

同相および直角遅延チェーンの対応する遅延要素の出力ポートはクロスバ−切り 換え行列における共通のスイッチ素子に接続される。例えば、遅延要素６２４お よび６３０の出力ポートはスイッチ素子６３６に結合され、切り換え素子６３６ を介してスイッチ素子６３８および６４０に結合される。同様に、遅延要素６２ ６および６３２の出力ポートはスイッチ素子６４２．６４４および６４６に結合 され、遅延要素６２８および６３４の出力ポートはスイッチ素子６４８．６５０ および６５２に結合される。これらの３つの組のスイッチ素子の各々はクロスバ −切り換え行列の列を定める。行列の各行のスイッチは互いに結合され、また、 それぞれ異なる複素係数乗算器に結合される。スイッチ６３６．６４２および６ ４８は乗算器６５６に結合される。スイッチ６３８および６・１４および６５０ は乗算器６５８に結合される。スイッチ６４０．６４６および６５２は乗算器６ ６０に結合される。複素乗算器６５６．６５８および６６０は第７図に関して前 述した複素乗算器６１０と同一である。

行列のスイッチ素子の各々は、スイッチ選択論理回路６５４によって供給される 行選択信号（Ｒ８Ｉ、Ｒ８２またはＲ３３）および列選択信号（Ｃ３Ｉ、Ｃ８２ またはＣ３３）に応答し、選択された遅延要素対によって供給される出力信号を 乗算器に結合する。本発明の実施例において、どの行でも１つのスイッチだけが 、またどの列でも１つのスイッチだけが所定の時間に付勢される。

スイッチ選択論理回路６５４はバスＡＤおよびＤＡＴを介してマイクロプロセッ サ２８２から供給される値によって制御される。バスＡＤから供給される値は、 ３つの起こり得る行／列選択値の中のどれがバスＤＡＴを介してマイクロプロセ ッサ２８２から供給されているかを示す。これらの値はスイッチ選択論理回路に よって内部的に記憶され、遅延された信号を各乗算器に供給する指示されたスイ ッチ素子を付勢するために使用される。この種のプログラム可能なタップ付き遅 延線は「ゴースト消去システムに関するクロスバ−スイッチ行列を含んでいるサ ンプル・データ・濾波システム」という名称の米国特許第４，７２７，４２４号 明細書に記載されている。

前述したように、本発明の実施例で、（１７）式の遅延値はサンプリング期間の 整数の項の中にあるものとする。従って、（１７）式の総和の中の第１項以外の 各項は同相および直角遅延線上の１つのタップおよび係数乗算器６５６．６５８ および６６０の中の１つに対応する。

従って、マイクロプロセッサ２８２は（１７）式の係数値のそれぞれ異なる成分 である同相（実数）成分および直角（虚数）成分をバスＡＤとＤＡＴＡを介して 乗算器６５６．６５８および６６０の各々に供給する。

乗算器６５８および６６０から供給される同相信号は加算器６６２で合計される 。この加算器から供給される合成信号は、乗算器６５６から供給される同相信号 と加算器６６６で合計される。前述したように、加算器６６６から供給される信 号は減算器６１８に供給されるゴースト補正信号の同相成分である。

乗算器６５８および６６０から供給される直角信号は加算器６６４によって合計 され、その結果生じる和は加算器６６８に供給される。加算器６６８は乗算器６ ５６によって発生される直角信号にこの値を加え、減算器６２０に供給されるゴ ースト消去信号の直角成分を発生する。セディック氏の文献に述べられているよ うに、第６図に示すようなＩＩＲフィルタは、受信されたビデオ信号の各々のゴ ースト信号成分に対して遅延線の１つのタップおよび１つの係数乗算器かあると 、ビデオ信号中の多重通路の歪みを効果的に消去する。

全体のゴースト消去システムの説明を簡単化するため、先に仮定したように、各 ゴースト信号はサンプリング期間の整数倍である時間量だけ直接信号に対して遅 延されている。これが当てはまらない場合、すなわち、ゴースト信号がサンプリ ング期間の整数倍でない時間量だけ遅延される場合、有効なゴースト信号消去を 達成するために前述のシステムの変更が望ましい。一般に、ＩＩＲフィルタは、 間に入る遅延された信号が利用可能な遅延信号から補間され、ＩＩＲのタップと して使用されるならば、タップ付き遅延線から得られる２つの連続する遅延時間 の間に入る遅延時間を有するゴースト信号を消去するように変更される。補間の ２つの方法については以下に説明する。第１の方法は、クロスバ−行列により多 くのスイッチ素子の行およびより多くの複素乗算器を加える第６図に示す構成の 直接拡張を含んでいる。また、マイクロプロセッサ２８２は、端数のサンプル遅 延を取り囲む夕・ツブに対して追加の係数値を計算するようにプログラミングさ れる。第２の方法は、可変遅延線の各出力ボートに補間回路を挿入することであ る。この補間回路は、マイクロプロセッサ２８２によって発生される信号に応答 し、ゴースト信号と事実上同じ遅延を有する同相信号および直角信号を発生する 。

次は、前述の第１の方法に対する追加の係数値を得るためのアルゴリズムを構成 する計算の説明である。すべてのゴースト遅延τ　を次式のようにする。

ｋ、＝ＩＮＴ（τ　／Ｔ　　）　　　　　　　（１８）１　　　　　　　　　　 　　　　　　１　　　　　　　Ｓここで、Ｔ　はサンプリング期間（１／４　ｆ 　ｏ）であり、ＩＮＴ（ｘ）はＸより大きくない最大の整数を与える。

さらに、ｋ　を含み、またｉ番目のゴースト信号遅延を取り囲むことがあり得る 遅延線タップに対応する遅延値の群の中の１つの遅延値をＰ９．が表わすものと する。

Ｊ 後述するアルゴリズムにおいて、ｉ番目のゴースト消去信号は遅延線の連続する Ｊ、のタップから補間される。

等価チャネル応答を得るためにアルゴリズムで使用された係数値からこのアルゴ リズムの係数値を差分するため、この係数値はす１．なる記号で示される。さら に、このＪ アルゴリズムで使用される複素行列式を簡単にするために、（１７）式の値しは １に等しく、また垂直同期の前縁はτ１＝０で発生すると仮定する。

前述した仮定を（１７）式に取り入れると、（１９）式が得られる。

この式で、係数す１．の最適値は既知でない。

Ｊ 前述したように、観測ベクトルエは（２０）式によってきっちりと近似される。

ここで、５ｏｐｔはアール。ｐｔである（８）式によって示される基準信号行列 である。

このアルゴリズムの場合、基準信号行列の最後の行、１（Ｎ）だけを考察する必 すなわち、ベクトルｉ。ｐｔ 要がある。この制限下で、（２０）式は次のようになる。

ここで、 （１９）式によって定められる伝達関数から、（２１）式と同様の（２３）式が 得られる。

ｙ［Ｎ］＝ｉ［Ｎ］与　　　　　　　　　　　　　　（２３）ここで、ｙ　［Ｎ ］はｒ　［Ｎ］の近似であり、ｓ　［Ｎコは（２４）式によって定められる基準 信号ベクトルである。

Ｉｓ　（（Ｎ−Ｐｌｌ）　Ｔ５）　１ ｓ　［Ｎ］　　＝　　ｌ　ｓ　（（Ｎ　Ｐ２１）　Ｔ５）　ｌ　　　　　　　　 　（２４）また、係数ベクトル互は（２５）の式によって定められる。

により係数値すを定めることを決定した。この解は（２６）式で表わされる。

−Ｔ　−１へＴ ｂｒ、ｙｕｓａ−（ｈ　（ｉ、＊ｓ　）　）　　　（Ｅ　（ｉ＊ｓ　　　）　） 　ａ　　　　（２６）−ｍ−−ｏｐｔ　　−ｏｐｔ ここでベクトルがランダムベクトルとして扱われると、＊は共役演算子を表し、 Ｔは転置演算子を表し、Ｅ（）は期待値演算子を表わす。時間指数Ｎは処理が定 常状態（ｓ　＊　ｓ　”　ｏ　ｐ　ｔ　）はｉ＊とｊ−”ｏｐｔ間の相互分散行 列と等価である。（２６）式の数値を求める計算において、ベクトルエおよび直 。２．は０平均ベクトルに変換され、ビデオ周波数範囲内で平坦なスペクトル密 度を有するものと仮定する。分散行列の解説を含んでいるランダム変数およびそ れらの特性の解説はジー・アール・クーパー（Ｇ、　　Ｒ，Ｃｏｏｐｅｒ）氏お よびシー・ディー・マクギレム（Ｃ，Ｄ、　ＭｃＧｉｌｌｅ＋ｎ）氏による「信 号およびシステム解析の方法」という題名の本（１９６７年ウィンストンのリネ ハルトのホルト社発行）の第９章−第１０章に見られる。

この方法によって決定される係数ベクトルＳＥは、遅延値が（２７）式で定めら れるベクトルＰによって決定されるＩＩＲフィルタに対する係数値を設定するた めに使用される。

ＩＰ　　　　＋ １．１ ＋ｐ２．１１ Ｐ＝ｌＰ　　　　　　ｌ　　　　　　　　　　　　　　　　　（２７）−２，２ 発明台らは、ゴースト遅延時間τ、かに一、　Ｔ　８に実質的に等しい場合はＪ 　が１の値に設定されることを定めた。

しかしながら、τ、とに、Ｔ　　間に著しい差がある場合、ｌ　　　　　　　Ｉ 　　　　Ｓ ４の値にＪ　を設定すると満足な結果が生じる。この方法を使用して、端数のゴ ースト遅延前後の２つのサンプルは端数のゴースト遅延を有する等価サンプルを 得るように補間される。

前述のアルゴリズムはＦＯＲＴＲＡＮ　　７７のコンピュータ言語で書かれたコ ンピュータ・プログラムで実行される。このプログラムは本出願の付録に含まれ る。

前述の捕間方法に代わるものは、第８図に示すように、プログラム可能な遅延線 ６２２の出力ポートと係数乗算器６５６．６５８および６６０の信号入力ポート 間にサンプル値補間回路を挿入することである。第８図に示す補間器８１０．８ １２および８１４の各々は、例えば、９図に示す型式のものである２つの補償線 形補間器を含んでいる。第９図に示す補償補間器は、補間されたサンプル値を発 生ずるように比例因数Ｆによって連続するサンプル値を平均化する線形補間器９ ２０を含んで０る。

サンプルを平均化することによって、補間器は低域通過フィルタの機能を実行す る。ビデオ・サンプルのこのフィルタリングは補間された信号中に望ましくない 位相および振幅誤差を発生する。これらの誤差を補償するために第９図に示す補 間器は補償フィルタ９５０を含んでいる。補間された信号に供給される補償量は 比例因数Ｆの値による。

第８図を参照すると、本発明の実施例では、比例因数はマイクロプロセッサ２８ ２によって補間器８１０．８１２および８１４に供給される。補間器の中の両方 の補間回路には同じ因数値Ｆか供給される。しかしながら、補間器８１０．８１ −２および８１４の各々に供給される値Ｆは、この値かｉ番目のゴースト信号（ すなわち、τｉ＝τ１ｏｐｔ　　　Ｌｏｐｔ）に関連する遅延値τ、の−τ　　 　　　　　　　　　　　　　　　　　　　　　ｌ端数部であるから異なる。値Ｆ は、バスＡＤを介して復号器９３０に供給される値が入力ポートに供給される値 をロードさせるレジスタ９３２にパルスを与えるように復号器を条件付ける一方 、バスＤＡＴＡを介して補間器のレジスタ９３２の入力ポートに供給される。レ ジスタ９３２の値は、値（１−Ｆ）を線形補間器９２０に供給し、値Ｃを乗算器 ９３６に供給するＲＯＭ９３４のアドレス入力ボートに供給される。Ｃの値は加 算器９６０により捕間信号に加えられる補償信号の大きさを決定する。

第１０図は、（１／８）Ｔ　　の粗さを有する補間回路のためのＲＯＭ９３４の プログラミングを示す図である。

第９図に示す補間器は「振幅および位相補償を有するディジタル遅延補間フィル タ」という名称の米国特許第１１．６９４，４１４号明細書に詳細に述べられて いる。

伝送チャネルについての計算された伝達関数からゴースト消去フィルタを発生す るための前述のアルゴリズムに関連して、この補間器は次のように使用される。

マイクロプロセッサ２８２が（１７）式からの遅延値をゴースト除去フィルタ２ ８０のプログラム可能な遅延線６２２にｆ４１．給するとき、遅延線６２２と補 間器８１０．８１２または８１４の中の選択されたものとの間の遅延値を配分す る。プログラム可能な遅延６２２によって実現される遅延値τ、の量は（（τ　 ／Ｔ　　）　−１）ｘＴ８な＋　　　　　　　　　　　　　　　　　　　１　　 　　　　　３る量の整数部に実質的に等しい。遅延値Ｔ　の残り十Ｔ、の分数部 は、比例因数Ｆとして値τ、の端数部を供給することによって選択された補間器 で実現される。遅延の余分のサンプル期間は前述の第１０図のテーブルの合計遅 延列に示すように、選択された補間器に固有のものである。

［１１１述したゴースト除去システムについてのシステム雑音の効果を補償する ために、伝送チャネルの幾つかの推定値（すなわち、（１７）式）は幾つかのビ デオフィールド期間に亘って形成され、これらの推定値からの係数値および遅延 値はゴースト除去フィルタ２８０による使用のため最終的な係数値および遅延値 を得るために平均化される。

以上説明したゴースト消去システムはビデオ信号から多重通路の歪みを除去する ディジタル・システムであるが、本発明はアナ０グ要素を使用してすることもで き、また、他の形式の信号から多重通路の歪みを除去するために使用することも 考えられる。

付　　　録 先に説明した本発明の詳細な説明に関連する例示的コンピュータープログラムの リストを以下に示す。先に述べたように、これらの例示的なプログラムはデジタ ル二りイプメントコーポレーション（ＤｉｇｉＮＩ　ＥｑｕｉｐｍｅｎｔＣｏ「 ｐｏ「ａｔｉｏｎ　）により製造されるパックス（■＾Ｘ）コンピュータで実行 するためにフォートラン（ＦＯＲＴＩＩＡＮ）　７７のプログラミング言語で書 かれている。本発明の原理の所定の応用例において無限インパルス応答フィルタ の係数−ラの要求を満たすようにこれらのプログラムに対して種々の変更が加え られることを理解されたい。

ｃ　ｄ　　ｆｏｒ（ｄｅ　　ｇｈｏｓｌｅ＋１ｃｏｍｍｏｎ／ＷＩＮＤＯＷ／Ｎ Ｘ、　ＮＹ、　ＮＴｃｈａ＋ａｃｌｅ＋ネ２０　　Ｉｎ ｉｎｊｅｇｅ＋＄２　ＩＩ　　Ｉ（９１０，１０５０１，ｒｘ　　１（９１０， １０１０５０）ｉｎｌｅ＋　ｎｌ　　ｖｓ、　　ｎｐｘ　　ｖｓ　　ｂｇｉｎｔ ｅｇｅ＋　１ｘｏ１１．　１ｙｏｌｌ、　　ｉｙｓｅｐｉｎｔｅｇｅｒ　ｎｐｘ 　　ｏｂ ｉｎｔｅｇｅ「：ｘｌｉｙ ｉｎｌｅｇｅ＋　ｉａｎｓ ｉｎｌｅｇｅ＋ｎｐｘ　　ｖｓｌ、　　ｎｐｘ　　ｖｓ２ｉｎｌｅｇｅｔ　ｎｒ Ｉ　　　ｖｓ ｃｏｍｐｌｅｘ　Ｈｖｓ（９１０） ｉｎｔｅｇｅＩｎｒｘｖｓｌ ｉｎｌｅｇｅｒｎｌ　　ａｖ、　　ｎｐｘ　　ａｖ　　ｂｇｃ　　　　ｃｏｍｐ ｌｅｘ＋ｘ　　ａｖ［ｌＯ）ｃｏｍｐｌｅｘ　ｓｌ（２０１ ｉｎｊｅｇｅ＋　ｎｓｆ、　　ｎ５ｆｌＣＯ呻ｆｅｗ　ｓｌｄ（２００） ｉｎｔｅｇｅ「ｎ５ｌｄ、　　ｎ５ｌｄｌ、　　ｎ５ｓｌｄｃ　ｄｖｌ　５ｔａ ｒｔ　（ｄｅｆｉｎｅ　ｓａｍｐｌｉｎｇ　＋ａｔｅ、　ｌｉｌｅｎａｍｅｉ） ｃａｌｌ　１ｎｉｌｌ　　（２４０） ｃａｌｌ　ｄｖｌｍａｐ（３） ｐａｉｎｔ　＊、” ｐａｉｎｔ　＄、’ｄｅｆｉｎｅ　１ｎｐｕｔ　ｆｉｌｅ　ｒｅａｌ　ｐａ「ｔ ’ｃａｌｌ　ｃＭｅｌ　　（１，４，１，０）川ｎｌ　＄、” ｐｒｉｎｔ　ｔ、’ｄｅｆｉｎｅ　１ｎｐｕｔ　ｌ山ｉｍａｇｉｎａ「ｙ　ｐｕ ｔ’ｃＢｌｌ　ｃｈｄｅｌ　　（２，４，Ｌ　Ｏ）ｐ目１１凱″ ｐ「ｉｎｔ　本、’ｄｅｆｉｎｅ　ｏｕｔｐｕ口ｉｌｅ　ｒｅａｌ　ｐａＩ＋’ ｃａｌｌ　ｃＭｅｌ　　（３，４，１，Ｇ）ｐａｉｎｔ　！、’ｅｎｆｅ＋　ｓ ｕｍｍａｒｙ　ｌ山ｎａｍｅ、　　Ｉｎ　？’ｒｅａｄ　（５，１）　　Ｉｎ ｌ　　　１ｏｆｍａｔ　　（ａ２０１ ｏｐｅｎ　　（１０，ｆｉｌｅ＝ｌｎ／／’、　ｈｕｍ’、　ｔｔａｌｕｓ＝’ 　ｕｎｋｎｏｗｎ’）ｏｐｅｎ　（ＩＩ、　ｆｉｌｅ＝ｆｎ／／’　、　ｄａｆ ’、　ｓ＋ａｌｕｓ＝’　ｕｎｋｎｏｖｉ’１ｃ　　「ｅａｄ　　ｉｎ　ｖｉｄ ｅｏ　ｄａｔａ　　ｆｉｌｅｐｒｉｎｔ　ｔ、’　−−−−−−−＋ｅａｄｉｎ ｇ　１ｎｐｕｌ　１ｉｌｅｉ　−一−−−−−’ｃａｌｌ　＋ｅａｄｉｌ　　（ １，４，０，ｏ　　＋）ｐ「ｉｎｔ　ｓ、Ｉ　「ｅａｌ　ｐａ口１ｎｐｕｔ　ｄ ｏｎｅ　’ｔｙｐｅ　＊、　ｃｂａ＋　（７） ｃａｌｌ　＋ｅａｄｉｌ　（２，４，０，ＴＸ　　１ｌｐｒｉｎｔ　本、’　ｉ ｍａｇｉｎａｒｙ　ｐａｒｔ　１ｎｐｕｔ　ｄｏｎｅ’ｔｙｐｅ　ｊ　ｃｈａ「 （７） ｌｒ９ｅ　ｔ、　ｃｈａ「（７］ ｃ　ｖｅｒｔｉｃａｌ　５７ｎｃ　ｌ１ｎｄｅ＋ｐａｉｎｔ　＄、’−−−−− −−ｖｅｒｔｉｃａｌ　５ｙｎｃ　１ｉｎｄｅ＋−−−−−−−’１００　ｐｒ ｉｎｔ　＊、’ｅｎｔｅｒ　１ｉｎｅ　ｎｕｍｂｅｒ、　ｂｅｇｉｎｉｎｇ　ｐ ｉｘｅｌ、　ｔｏ　ｂｅ　ｖｉｅｗｅｄ、’ｐｒｉｎｆ札’　　ｎｌ　　　　ｖ ｓ、　　ｎｐｘ　　　　ｖｓ　　　ｂｇ　　７’＋ｐａｄ　ｆ５．本）　ｎｌ　 　ｖｓ、　ｎｐｘ　　ｖｓ　　ｂｇｃａｌｌ　１ｎｉｌｌ　　（２４０） ｉｘｏｌｌ　＝５０ ｉｙｏＨ−１００ ｉｙｓｅｐ　＝３００ ｃ　ｎｏ、　　ｏｆ　ｐｉｘｅｌ＋　ｔｏ　ｂｅ　ｏｂｓｅｒｖｅｄｎｐｘ　　 ｏｂ　＝９１Ｇ Ｃａｌｌ　ｗａｖｅｆｏＩｍ　（ＩＸ　　１．ＩＩ　　ｉ、　ｎｌ　　Ｖｌ、　 ｎｐｘ　　ｖｔ　　ｂｇ、ｎｐｘ　ｏｂ。

＆　　　　　　　　１ｘｏｌｌ、　１ｙｏｌｌ、　１ｙｓｅｐ）ｃａｌｌ　ｍｏ ｖａｂｓ　（ｉｘｏｌ［、７００）ｃａｌｌ　ａｎｍｏｄｅ ｐ「ｉｎｔ　＊、’　「ｅａｄ　１Ｇ９０１　ｂｏｔｔｏｍ　ｗａｖｅｆ＋ｏｍ 、　Ｉ（ｔｏｐｌｌｏ（ｂｏｔｌ　？’ｒｅａｄ　　（５，＊）　　１ａｎｓ 百（ｉａｎｓ、　ｅｑ、　Ｉ）　ｔｈｅｎｃａｌｌ　５ｃａｎ　　ｒｅａｄ　（ ｉｘ、　　ｉｙ、　　１ｘｏｔｌ、　　１ｙｏｆｌ＋１ｙｓｅｐ）１ｓｅ ｃａｌｌ　＋ｃ＋ｎ　　ｒｅａｄ　（ｉｘ、　　ｉｙ、　　１ｘｏｆｌ、　　１ ｙｏｌｌ）ｅｎｄ：１ ｐｒｉｎｌ　　章、’ｏｂ＋ｅｎｅ　　ｓｉｇｎａｌ、　　Ｉｌｏ　　？’「ｅ ａｄ　　（５，？）　　１ａｎａ 百（ｉａｎｔ、ｎｅ、０）　ｇｏｌｏ　１００ｃ　ｄｅｌｉｎｅ　ｖｅ山ｃａｌ 　ｏｂｓｅｒｖａｔｉｏｎ　１ｎｔｅｒｖａｌ　ｉｎ　１ｉｎｅ　ｎｌ　　ｖｓ ２００　ｐｒｉｎｔ　転’ｅｎｌｅ＋　ｂｅｇｉｎｉｎｇ　ｏｆ　ｔｈｅ　ａｂ ｓｅｔｖａｌｉｏｎ　１ｎｔｅｒｖａｌ　ｎｐｘ　　ｙｓｌ@？’ ｃａｌｌ　＋ｃ＋ｎ　　ｒｅａｄ　（ｉｘ、　　ｉｙ、　　１ｘｏｌｌ、　　１ ｙｏｌｌ）ｎｐｘ　　ｖｓｌ　＝　ｉｔ　＋　ｎｐｘ　　ｖｓ　　ｂｇ　−ｔｐ ｒｉｎｔ　札’ｂＩｇｉｎｉｎｇ　ａｔ　ｖｓ　ａｂｓｅｔｖａｌｉｏｎ　１ｎ ｔｅｒｖａｌ　’、ｎｐｘ　　ｖｓ１ｐ＋ｉｎｌ　ｔ、’ｃｂａｎｇｅ、　　Ｉ ｌｏ　？’ｔｅａｄ　　（５，１１ａｎＳ 百（ｉａｎｔ、　ｎｅ、　０）　ｇｏｔｏ　２００３００　ｐ［ｉｎｔ　ｔ、’ ｅｎｔｅｒ　ｅｎｄ　ｏｆ　ｔｈｅ　ａｂ＋ｅｒｖａｆｉｕ　１ｎｔｅｒｖａｌ 　ｎｐｘ　　ｖｉ２　？’ｃａｌｌ　５ｃｔｎ　　ｒｅａｄ　（ｉｔ、　　ｉｙ 、　　１ｘｏｌｌ、　　１ｙａｌｌ）ｎｐｘ　　ｖｉ２　＝　１ｘ　＋　ｎｐｘ 　　ｖｓ　　ｂｇ　−１ｐａｉｎｔ　　車、’ｅｎｄ　　ｏｆ　　ｖｓ　　ｏｂ ｓｅｒｖａｔｉｏｎ　　１ｎｔｅ　「ｖａｌ　　’、ｎｐｘ　　　　ｏ２ｐ「ｉ ｎｔ傘、’ｃｈａｎｇｅ、　　Ｉｌｏ　？’「ｅａｄ　（５，掌１　１ａｎｓ 百（ｉａｎｓ、　ｎｅ、　０１　ｇｏｆｏ　３００ｃ　　＋Ｑｐｙ　　ＶＢ　　 ＩＸＯｉｎｍ　　ＴＫ　　　Ｉ　　　ＩＩ　　　　１ｎｒｘｖｓ＝ｎｐｘ　　ｖ ｓ２−ｎｐｘ　　ｖｓｌ＋１ｐｒｉｎｔ　ｔ、　’　ｎ＋ｘ　ｖｓ’、　ｎｒｘ 　　ｖｓｄｏｉ＝ｌ、＋＋＋ｘ　　ｖｓ ＩＩ　ｖｉ（ｉ）　＝ｃｍｐｌｘ　（ｆｌｏａｔ（＋ｘ　　＋（ｎｐｘ　　ｖｓ ｌ＋ｉ−１，ｎｌ　ｖｓ）ｌ。

＆　　　　　　　　　　　（ｆｌｏａｔ（＋ｘ　　ｉ　（ｎｐｘ　　ｖｓｌ＋ｉ −１，ｎｌ　　ｖｓ）））ｅｎｄｄ。

ｃ　ａｃｔｉｖｅ　ｖｉｄｅｏ　ｍｏｎｉｔｏ「ｃａｌｌ　１ｎｉｌｌ　　（２ ４０１ ｐａｉｎｔ　札’　−−−−−−−ａｃｔｉｖｅ　ｖｉｄｅｏ　ｍｏｎｉｔｏ＋ 　−−−−−−−’４００　　　ｐａｉｎｔ　　傘、’ｅｎｌｅ＋　　１ｉｎｅ 　　ｎｕｍｂｅ「　ｔｏ　　ｂｅ　　ｖｉｅｗｅｄ、　　ｎｌ　　　　ａｖ、　 @ｎｐｘ　　　　ａｙ　　　ｂｇ　　？’ｒｅａｄ　（５，＄１　ｎｌ　　ａｙ 、　　ｎｐｘ　　ａｖ　　ｂｇｃ　１ｘｏｌｉ＝５ｆｌ、　　１ｙｏｆｌ＝１０ ０．　１−ｙｓｅｐ＝３００．　　ｎｐｘ　　ｏｂ＝９１０ｃａｌｌ　１ｎｉｌ ｌ　　（２４０） ｃａｌｌ　ｗａｖｅｔｏｒｍ　（ｒｔ　　１．ＩＩ　　ｉ、　ｎｌ　　ａｖ、　 ｎｐｘ　　ａｙ　　ｂｇ、９］０．５０，１００，３００）ｃａｌｌ　ｍｏｖａ ｂｓ　　（５（１，７Ｈ）ｃａｌｌ　　ａｎｍｏｄｅ ｐｒｉｎｔ　ｔ、’　ｒｅａｄ　ｔｏｐ　ｏｆ　ｂｏｔｔｏｍ　ｗａｖｅｌ＋ｏ ｍ、　　Ｉ　（ｔｏｐｌｌｏ（ｂａｔ）　？’Ｉｅａｄ　　ｆ５ｊ）　　　１ａ ｎｓ 百（ｉａｎｔ、　ｅｑ、　１１　ｔｈｅｎｃａｌｌ　＋ｃ＋ｎ　　ｒｅａｄ　（ ｉｘ、　　ｉｙ、　　５Ｇ、　　４００１ｅｌｓｅ ｃａｌｌ　＋ｃ＋ｎ　　ｒｅａｄ　（ｉｔ、　　ｉ７．　５０．　１００）ｎｄ ｉｌ ｐａｉｎｔ　！、’ｏｂｓｅ＋ｖｅ　ａｎｏｔｈｅ＋　１ｉｎｃ　ｏｌ　ｖｉｄ ｅｏ　ｗａｙｅｌｏ＋ｍ、　Ｉｌｏ　？’＋ｅａｄ　　（５，傘）　　１ａｎｓ 百（ｉａｎｓ、　ｎｅ、　ｆｉｌ　ｇｏｌｏ　４００ｃ　　ｄｅｆｉｎｅ　　「 ｅｆｅｒｅｎｃｅ、　　ｔ　ｒａｎｓｆｏｒｍ、　　ａｎｄ　　１ｏｃａｌｅ　 　ｖｅｒｔｉｃａｌ　　５ｙｎｃ@　ｅｄｇｅｓ　　Ｉｏｕｇｈｌｙ ｃａｌｌ　１ｌｄｅｌｌ　　（ｓｌ、　　ｎｓｌ、　　ｎ５１１．２０．．２３ Ｇ、）ｃａｌｌ　ａｎ＋＋Ｉｅｌ　　（ａｍ、　　ｎａｍ、　　１１ｃａｌｌ　 ａｍｔｌｍ　（＋ｙ　　ｖｓ、　ｎｒｘ　　ｖｓ、　ａｍ、　ｎａｍ、　　ＩＸ ｐ、　ｎｒｘｐｌｃａｌｌ　ａｍｌｌｍ　（ｓｌ、　　ｎｓｌ、　　ａｍ、　　 ｎａａ　　ｓｌｐ、　　ｎ５ｌｐ）ｃａｌｌ　＋ｘｐ　ｍａｔｃｈ　　ｓｌｐ　 （「ｘｐｍ、　ｎ＋ｘｐｍ、　＋ｘｐ、　ｎ＋ｘｐ、山、ｎ山）ｉｘｏｌｌ　＝ 　５０ ｉｙｏｌｌ　＝１００ ｃａｌｌ　１ｎｉｌｌ　（２４０１ ｃａｌｌ　　ｖｔ　　　　ｐＨ−山　−ｃ　　（＋ｘｐｍ、ｎ＋ｘｐｍ、１ｘｏ ｌｌ、ｉｙｏｌｌ）Ｃａｌしく「ｎ　−ＩＭ　（ｌｈ、　１ｘｏ１１．１ｙｏｌ ｌ）ｃａｌｌ　ＩＭ　ａｂｓ　（＋ｘｐｍ、　ｎ＋ｘｐｍ、　ｌｈ、　ｌｔｘｐ ｍ、　ｎ１ｒｘｐ＋＋＋）ｃａｌｌ　ｐａｕｓｅ ｐｓｅｐ＝３ ｗｒｉｔｅ　（１０，３）　　ｌｈ、　　ｐＳ！ＩＩ３　　　ｆｏｒｍａｔ　（ ／、’　ｔｂ＋ｅｓｈｏｌｄ　＝　’、　ｇｌｌ、　４ｅ３．’　ｐ　　ｓｅｐ 　＝’、　１５１ｃ　１ｏｃａｔｅ　ｐｅａｋｓ　ｉｎ　ｒｘ　　ｖｓｃａｌｌ 　ｐｅａｋ　　５ｅａｒｃｈ　（ｐｋ、ｎｐｋ、ｐ　　ｓｅｐ、ｌｒｘｐｍ、ｎ ｌ＋ｘｐｍ、ｒｘｐｍ、ｎｒｘｐＢｎｓｌｌ）ｃ　５ｅａｒｃｈ　ｍｉｎ　ｏｆ 　１ｅａｓｔ　＋ｑｕａ＋ｅ　ｌｉｔ　ｉｎ　ｔｈｅ　ｖｉｃｉｎｉ１７　ｏｌ 　ｐｋＱｎｗｉｎｌ−１０ ｎｗｉｎ２　＝　１０ ｎａｌｓ＝ｎｐｋ Ｉｄｓｌｎ＋　＝９１０ ｃａｌｌ　５ｌｄｄｅｌｌ　　（ｓｌｄ、　　ｎ５ｌｄ、　　ｎ５ｆｄｌ、　　 ｎｔｓｌｄ、　　２０．、　２３０．）Ｃａｌｌ　ｐｋ　　ｌｅｄｇｅ　（ｌｅ ｄｇｅ、ｎｌｅｄｇ、ｎｓｌ畦ｎｒｘ　ｏｆ、ｐｋ、ｎｐｋ、ｎｖｉｎｌ、ｎｖ ｉｎ２）ｃａｌｌ　ｓｌ　　ｍａｔ　（ｓｌｍ、ｎ５１ｍ１．ｎ５１ｍ２、ｌｄ ｓｌｍ、　ｌｅｄｇｅ、ｎｌｅｄｇｅ、　ｓｆ、ｎｓｌ、ｎ５ｆｌ）ｃａｌｌ　 ｌｅｄｇｅ　　ｌａｕｇ　（ｔａｕｇ、　ｎｌａｕｇ、　ｎ５５ｇ、　　ｌｅｄ ｇｅ、　ｎｌｅｄｇｅ）ｃａｌｌ　　＋ｇｇ　　ｄｅｌ　　（ｓ師、ｎ５ｌｎ＋ ｌ、ｎ５１ｍ２．ｌｄｓｌｍ、　　ｎ５５ｇ、　　ｔａｎｇ、ｎｌａｕｇ。

＆　　　　　　　　　ｓｌｄ、　　ｎ５ｌｄ、　　ｎ５ｌｄｌ、　　ｎ５ｓｌｄ ｌｃａｌｌ　ｌｓｌ　　ｎｏ　　ｄｃ　（ａ　　Ｉｓ、ｎａ　　　Ｉｓ、　　百 ｍ、　ｌｄｓｌｍ、　ｎ５１ｍ１．　ｎｓｌｍ２゜＆＋ｘ　　ｖｓ、ｎｒｘ　　 ｖｓｌ、　　ｃｏｎｄ、　ｅｒｒｏｔ）Ｗ日１ｅ　　（６，４１ｎ　　　５ｅａ ｒｃｈ、　　ｅｒｒｏｔ、　　ｃｏｎｄｗｈｉｌｅ　（１Ｇ、４１　ｉ　５ｅａ ｒｃｈ、　ｅｒ「ｏｒ、　ｃｎｎｄ４　　１０１１１１１１　（／、’ｎ　　ｓ ｅａ＋ｃｈ＝’、ｉ５．’　ｃ＋＋ｏｒ＝’、ｇｌｌ、４ｅ３゜＆　　　　　　 　　ｃｎｎｄ　：’、　ｇｌｌ、　４ｅ３）ｗｒｉｔｅ　ｆ６，５）　（ｉ、ｐ ｋ（Ｄ、ａ　ｌｔ（ｉ）、ｉ＝１．ｎｐｋｌｗｒｉｔｅ　（１０，５１（ｉ、ｐ ｋ（ｉ）、　ａ　　ｌｔ（ｉ）、ｉ＝Ｉ、ｎｐｋ）５　　　ｆｏ「ｍａｌ　ｔ’ 　　ｉ　＝　’、　ｉ５．’　ｐｋ（ｉ）　＝　’、　ｉ５゜＆　　　　　’　 ａ　　１ｆｉｌ　・（’、ｇ１１．４ｅ３．’　、　’、ｇ１１．４ｅ３．’） ’）ｄｏ　ｉｐｋ　＝　Ｉ、　　ｎｐｋ ｐｋ　　１ｐ（ｉｐｋ）　：ｐｋ（ｉｐｋ）ｅｎｄｄ。

ｄｏ　ｉｐｋ　＝Ｉ、　　ｎｐｋ ｐｋ　　ｌｐ（ｉｐｋ）・ｐｋ　　ｔｐ（ｉｐｋ）　　＋　１ｎ　　＋ｅａ＋ｃ ｈ　＝ｎ　　５ｅａｔｃｈ　＋　１ｃａｌｌ　ｐｋ　　ｌｅｄｇｅ　（ｌｅｄｇ ｅ、　ｎｌｅｄｇ、　ｎｓｌ畦ｎｒｘ　ｏｌ、ｐｋ　　ｌｐ、ｎｐｋ、ｎｗｉｎ ｌ、ｎｗｉｎ２j ｃａｌｌ　ｓｌ　　ｍａｔ　（ｓｌｍ、ｎ＋１ｍｌ、ｎ５１ｍ２．９１ｆ１．　 　ｌｅｄｇｅ、ｎｌｅｄｇｅ、　　ｃｌ、ｎｓｌ、ｎ５ｌｌj ｃａｌｌ　ｌｅｄｇｅ　　ｌａｕｇ　（ｆａｕｇ、　　ｎｌｘｕｇ、　　ｎ５５ ｇ、　　ｌｅｄｇｅ、　　ｎｌｅｄｇｅ）ｃａｌｌ　ｓｇｇ　　ｄｅｌ　（ｓｌ ｍ、ｎ５１ｍ１．ｎ５１ｍ２．ｌｄ＋Ｉｍ、　　ｎ５５ｇ、　　ｔａｎｇ、ｎｔ ａＢ。

＆　　　　　　　　　　ｓｌ４　　ｎ５ｌｄ、　　ｎ５ｌｄ１．　　ｎ５ｓｌｄ ）ｃａｌｌ　ｌｓｌ　　ｎｏ　　ｄｃ　（ａ　　ｌｔ　　＋ｐ、ｎａ　　Ｉｓ、 　　ｓｌｍ、９１０．ｎｓｌ＋ｎｌ、ｎ５１ｍ２゜＆　　　　　　　　　　　　 　Ｉ！　　ｖｓ、ｎｒｘ　　ｖｃｌ、　　ｃｏｎｄ　　ｌｐ、　　ｅｒ「ｏＴｌ ｐ）ｗｒｉｔｅ　（６，４）　ｎ　　ｔｅａ「ｃｈ、　　ｍｅｒｌｐ、　　ｃｏ ｎｄ　　ｌｐＷ「山（１０，４１ｎ−５ｅａｒｃｈ、　ｅｒｒｏｒｌｐ、　ｃｏ ｎｄ　ｌｐ＝＋山（ら、５！　　（ｉ、　　ｐｋ　　　１ｐ（ｉ）、　　ａ　　 　ｌｔ（ｉ）、ｉ＝１．ｎｐｋ）ｗｒｉｔｅ　（１０，５）　（ｉ、ｐｋ　１ｐ （ｉ）、　ａ　ｌｔ（ｉ）、ｉ＝ｌ、ｎｐｋ）ｉｆ　（ｅｔｒｏｔ　　ｌｐ、　 　ｌｅ、ｅｕｕ）　ｔｈｅｎ５００　　　ｃａｌｌ　ｃｏｐｙｌ　（ａ　　Ｉｓ 　　ｔｐ、　ａ　　Ｉｓ、　ｎａ　　ｌｔ）ｐｋ（ｉｐｋ）・ｐｋ　　１ｐ（ｉ ｐｋｌｅｒ「ｏＩ−ｅＨｌｌＩ　　　Ｉｐ ｃｏｎｄ　＝　ｃｏｎｄ　　Ｉｐ ｐｉ　　ｌｐ（ｉｐｋ）・ｐｋ　　ｔｐ（ｉｐｋ）　　＋　１ｎ　　　　５ｅａ ｒｃｈ　　＝　　ｎ　　　５ｅａｒｃｈ　　＋１ｃａｌｌ　ｐｋ　　ｌｓｄｇｅ 　（ｌｅｄｇｅ、　ｎｌｅｄｇｅ、　ｎ５１ｍ１．　ｎｒｘ　　ｔｓｌ。

＆　　　　　　　　　　ｐｋ　　ｔｐ、ｎｐｋ、ｎｖ＋ｎｌ、ｎｖ＋ｎ２）ｃａ ｌｌ　ｓｌ　　ｍａｔ　（ｓｌｍ、ｎｓｆｍｌ、ｎ５ｌａ＋２．９１０．　ｌｅ ｄｇｅ、山ｄｇｅ、　ｓｌ、ｎｓｌ、ｎ５ｌｌ）ｃａｌｌ　ｌｅｄｇｅ　ｌａｕ ｇ　（ｌａｕｇ、　ｎｌａｕｇ、　ｎ５５ｇ、　ｌｅｄｇｅ、　ｎｌｅｄｇｅ） Ｃａｌｌ　ｓｇｇ　ｄｅｆ　（ｓｌｍ、ｎ５１ｍ１．ｎ５１ｍ２．Ｉｄｓｌｍ、 　ｎ５５ｇ、　＋ａｕｇ、出■。

＆　　　　　　　　ｓｌｄ、　ｎ５ｌｄ、　ｎ５ｌｄ！、　ｎ５ｓｌｄ）ｃａｌ ｌ　ｌｓｌ　ｎｏ　ｄｃ　（！　　Ｉｓ　　ｌｐ、ｎａ　　Ｉｓ、　ｓｉｍ、９ ］０．ｎｓｆｍｌ、ｎｓｆｍ２゜＆ｒｘ　　ｖｓ、ｎｒｘ　　ｖｓｌ、　ｃｏｎ ｄ　　ｌｐ、　　ｅｒｒｏｒ　１ｐ）Ｗ「由（６，４１ｎ　　５ｅａｒｃｈ、　 ｅｒｒｏｒ　　ｆｐ、　ｃｏｎｄ　　ｌｐｗｒｉｔｅ　（１０，４）　ｎ　５ｅ ａｒｃｈ、　ｅｒｒｏｒ　　ｌｐ、　ｃｏｎｄ　ｌｐｗｒｉｔｅ　（６，５）　 （ｉ、　ｌｌｋ　ｔｐ（ｉ）、　ａ　ｌｔ（ｉ）、ｉ＝Ｉ、ｎｐｋ）ｗｈｉｌｅ 　（１（１，５）　ｆｉ、ｐｋ　ｔｐ（ｉｌ、　ａ　Ｉｓ（ト）、　ｉ＝ｌ、　 ｎｐｋ）百（ｅｒｒｏｔ　　ｔｐ、　Ｉｅ、ｅｒｒｏｔ）　ｇｏｎｅ　５００ｐ ｋ　　ｌｐ（ｉｐｋ）　：ｐｋ（ｉｐｋ）１ｓｅ ｐｋ　　＋ｐｆｉｐｋ）　＝ｐｋ　　ｔｐ（ｉｐｋ）　　−１６００ｐｋ　　ｔ ｐ（ｉｐｋ）　＝ｐｋ　　ｌｐ（ｉｐｋ）　　−１ｎ　　＋ｅａｒｃｈ　＝　ｎ 　　５ｅａｒｃｈ　＋１ｃａｌｌ　ｐｋ　　ｌｅｄｇｅ　（ｌｅｄｇｅ、ｎｌｅ ｄｇｅ、ｎ５１ｍ１．　ｎｒｘ　　ｖｓｌ。

＆　　　　　　　　　　　　　ｐｋ、　ｎｐＬ　ｎｗｉｎｌ、　ｎｖｉｎ２）ｃ ａｌｌ　ｓｌ　　ｍａｔ　（＋Ｉｍ、ｎ５１ｍ１．ｎ５１ｍ２，９１０．　ｌｅ ｄｇ！、ｎｌｅｄｇｅ、　ｓｆ、＋＋ｓｌ、ｎｓｆｌ）ｃａｌｌ　ｌｃｌＩｇｅ 　　ｌａｕｇ　（ｌａｕｇ、　ｎｆａｕｇ、　ｎ５５ｇ、　ｌｅｄｇｅ、　ｎｌ ｅｄｇｅｌｃａｌｌ　　ｓｇｇ　　　ｄｅｌ　　（ｓｌｍ、ｎ５１ｍ１．ｎａ１ ｍ２．ｌｄｓｌｍ、　　ｎ５５ｇ、　　ｔａｕｇ、ｎｔａｕｇ。

＆　　　　　　　　　ｓｌｄ、　　ｎ１ｌｄ、　　ｎ＋Ｉｄ１．　　ｎｏｌｄ） ｃａｌｌ　ｌｓｆ　　ｎｏ　　ｄｃ　（ａ　　ｌｔ　　ｉｐ、ｎａ　　Ｉｓ、　 ＋Ｉｍ、９１０．ｎ＋１ｍｌ、ｎｓ［ｍ２゜＆ｔｘ　　ｖｃ、ｎｒｘ　　ｖｓｌ 、　ｃｏｎｄ　　ｌｐ、　　ｃａｒａｔ　　ｌｐ１ｗ口ｌｅ　　（６，４）　　 ｎ　　　ｓｃａ＋ｃｈ、　　ｅｒｒｏｒｉｐ、　　ｃｏｎｄ　　　ｔｐｗｒｉｔ ｅ　（１０，４）　ｎ　　＋ｅｕｃｈ、　ｅｕｏｒ　　ｊｐ、　ｃｏｎｄ　　ｌ ｐｗ目ｌｅ　　（６，５）　　（ｉ、　　ｐｋ　　ｔｐ（ｉ）、　　ａ　　１ｔ （ｉ）、ｉ−１，ｎｐｋ）！ｒ山（１０，５）　（ｉ、ｐｋ　ｔｐ（ｉ）、　ａ 　ｌｔ（ｉｌ、ｉ＝Ｉ、ｎｐｋ）百（ｅ「ｒｏｒｌｐ、ｌｅ、ｅｕｏｒ）　ｔｈ ｅｎｃａｌｌ　ｃｏｐｙｌ　（ａ　　Ｉｓ　　ｌｐ、　ａ　　ｌｔ、　ｎａ　　 Ｉｔ）ｐｋ（ｉｐｋｌ・ｐｋ　　ｔｐ（ｉｐｋ）ｅＴＩＯＩ　：　ｅ目ａ「１ｐ ｃｏｎ＋１＝ｃｏｎｄ　　　ｌｐ ｎｄｉｌ ｉｔ　　（ｅ「「ｏ「　　　ｌｐ、ｌｅ、ｅｒｒｏｉ　　ｇｏｌｏ　　６００ｐ ｋ　　１ｐ（ｉｐｋ）・ｐｋ（１ｐｋ）ｎｄｉｌ ｅｎｄ＋ｉ。

ｃ　５ｅａｒｃｈ　５ｕｂ−Ｉｔ　ｉｎ　ｌａｕｇ。

ｃａｌｌ　ｐｋヨｅｄｇｅ　（ｌｅｄｇｅ、山ｄｇ、　ｎ５１ｍ１．　ｎｒｘ　 ｖｔｌ、　ｐｋ、　ｎｐｋ、　ｎｖｉｎｌ、　ｎｗｉｎ２）ｃａｌｌ　ｌｅｄｇ ｅ　　ｌａｕｇ　（ｔａｎｇ、　　ｎｆａｕｇ、　　ｎ＋ｓｇ、　　ｌｅｄｇｅ 、　　ｎｌｅｄｇｅ）ｄｏ　ｉｌａｕｇ　＝　１．　　ｎｌａｕｇｄｌａｕ−１ ２５ ｃａｌｌ　ｃｏｐｙｌ　　ｔ　（ｔａｕｇ、　　ｌａｕｇ　　ｌｐ、　　ｎｌａ ｕｇ）ｄｏ　１ｄｌａｕ　：１．　４ ｃ　５ｅｕｃｈ　ｄｏｗｎ　ｔｏ　Ｉ／１６　ｏｆ　ｌ５ｄｌａｕ　＝　ｄｌａ ｕ　／　２゜ ｌａｕｇ　ｌｐ（ｉｔａｕｇｌ　＝　ｌａｕｇ（ｉｌａｕｇ）　＋ｄｔａｕｃａ ｌｌ　　ｓｇｇ　　ｄｅｌ　　（ｓｌｍ、ｎ５１ｍ１．ｎ５１ｍ２．ｌｄｓｆｍ 、　　ｎ５５ｇ、　　ｌａｕｇ　　ｌｐ、ｎｌａｕｇ。

＆　　　　　　　　　　　　ｉｆ４　　ｎ＋ｌｄ、　　ｎ５ｌｄ１．　　ｎｓ＋ １ｄ）ｃａｌｌ　　ｌ百−ｎｏ　　ｄｃ　　（ａ　　　Ｉｔ　　ｔｐ、ｎａ　　 　Ｉｓ、　　ｓｌｍ、９１０．ｎｓｆｍｌ、ｎ５１ｍ２゜ｌ　　　　　　　　　 　　　　　Ｈｖｓ、ｎｒｘ　　ｎｌ、　　ｃｏｎｄ　　ｊｐ、　　ｅｕｏｒ　　 １ｐ）ｎ　　５ｅａｒｃｈ　＝　ｎ　　５ｅａｒｃｈ　＋　１ｗｈｉｔｅ　（６ ，４）　ｎ　＋ｅａ＋ｃｈ、　ｅｕｏｒ　　Ｉｐ、　ｃｏｎｄ　ｊｐｗｈｉｌｅ 　（１０，４］　ｎ　ｓｅａ「ｃｈ、　ｅｒ「ｏｒｌｐ、　ｃｏｎｄ　ｌｐｗｔ ｉｌｅ　（６，２１）　　（ｉ、ｔａｕｇ　　ｊｐ（ｉｌ、　ａ　　Ｉｔ　　ｆ ｐ（ｉ）、ｉ＝Ｉ、ｎｌａｕｇ）ｗｈｉｌｅ　（１０，２１）　　（ｉ、ｌａｕ ｇ　１ｐ（ｉ）、　ａ　Ｉｓ　１ｐ（ｉ）、ｉ＝ｌ、ｎｌａｕｇ）２１　　　　 １ｏｏｎａｌ　（’　　ｉ　＝’、ｉ５．’　　ｌａｕｇ（ｉ）　　＝’、ｇ１ １．４ｅ３゜＆　　　　　　　　’　　　ａ　　ｌｔ（ｉ）　　・　（’、ｇ１ １．４ｅ３．’　　、　　’、ｇ！１．４ｅ３．’）’）ｉｆ　（ｅｕｏｒ　　 ｌｐ、ｌＬｅ＋＋ｏ＋）　ｔｈｅｎｔａｕｇ　（ｉｌｉｕｇ）　＝　ｌａｕｇ　 　ｔｐ　（ｉｌａｕｇ）ｅｔｒｏｔ＝ｅｎｏ＋　　　１ｐ ｃｏｎｄ　＝　ｃｏｎｄ　　１ｐ ｃａｌｌ　ｃｏｐｙｌ　（ａ　　Ｉｓ　　ｌｐ、　　ａ　　Ｉｓ、　　ｎａ　　 Ｉｓ）ｌｓｅ ｔａｕｇ　ｌｐ（ｉｌａｕｇｊ　＝　ｌａｕｇｆｉｆａｕｇ）　−ｄｌａｕｃａ ｌｌ　＋ｇｇ　　ｄｅｌ　（ｓｌｍ、ｎ５１ｍ１．ｎ５１ｍ２．ｌｄｓｌｍ、　 　ｎｇｓｇ。

＆　　　　　　　　　　　　Ｉａｕｇ　　ｌｐ、ｎｌａｕｇ、　　＋ｌｄ、　　 ｎ５ｌｄ、　ｎ５ｌｄｌ、　　ｎｓ＋Ｉｄ）ｃａｌｌ　ｌｃｌ　　ｎｏ　　ｄｃ 　（ａ　　Ｉｓ　　ｌｐ、ｎａ　　Ｉｓ、　　ｓｌｍ、９１０．ｎ５１ｍ１．ｎ ５１ｍ２゜ｌ　　　　　　　　　　　　　　ｒｘ　　ｖｓ、ｎｒｘ　　ｖｓｌ、 　　ｃｏｎｄ　−【ｐ、　　ｅｒｒｏｒ　　ｔｐ）ｎ　　Ｂｅａ＋ｃｈ　＝　ｎ 　　＋ｅａｒｃｈ　＋　１Ｗ「ｉｌｅ　（６，４）　　ｎ　　ｓｅａ「ｃｈ、　 　ｅｒｒｏｒｔｐ、　　ｃｏｎｄ　　ｊｐｗｈｉｌｅ　（１０，４１ｎ　　＋ｅ ａ＋ｃｈ、　　ｅｔｆｏｔ　　ｔｐ、　　ｃｏｎｄ　　ｔｐｗｒｉｔｅ　（６， ２１）　　（ｉ、ｔａｕｇ　　１ｐ（ｉ）、　　ａ　　ｌｔ　　ｔｐ（ｉ）、ｉ ＝Ｉ、ｎｌａｕｇ）ｗｈｉｌｅ　（１０，２１）　　住Ｌａｕｇ　　１ｐ（ｉ） 、　　ａ　　Ｉｓ　　１ｐ（ｉ）、　ｉ＝Ｉ、　ｎｔａｕｇ）ｉｆ　（ｅ「ｒｏ ｒ　　ｌｐ、Ｉｔ、ｍｏｒｌ　ｔｈｅｎｌａｕｇ　　（ｉｌａｕｇ）　　＝　ｌ ａｕｇ　　　ｌｐ　　（自ａｕｇ）ｃ＋＋ｏｒ＝ｃ＋＋ｏ＋　　　１ｐ ｃｏｎｄ　＝　ｃｏｎｄ　　　１ｐ ｃａｌｌ　ｃｏｐｙｌ　　（！　　Ｉｓ　　ｌｐ、　　ａ　　Ｉｓ、ｎａ　　Ｉ ｔ）ｎｄｉｌ ｃ＋＋＋ｌ１ｌ ｅｎｄｄ。

ｅｎｄｄ。

ｃａｌｌ　＋ｇｇ　　ｄｅｌ　（ｓｌｍ、ｎ５１ｍ１．ｎｓｔｍ２．Ｉｄｓｌｍ 、ｎ＋ｓｇ。

＆　　　　　　　　　　　ｌａｕｇ、　ｎｔａｕｇ、　ｓｌｄ、ｎ５ｌｄ、　　 ｎ＋ｌｄｌ、　ｎ５ｓｌｄ）ｃａｌｌ　ｄｃ　　ｌｓｌ　（ｄ、　ａ　　Ｉｓ、 　　ｓｌｍ、９１０．ｎ５１ｍ１．ｎ５１ｍ２．　　ＩＩ　　ｖｓ、ｎｒｘ　　 ｖｓｌ）ｗｒｉｔｅ　（６，６） ｖ「ｉｌｅ　（１０，６） ６　１ｏ＋ｍａｔ　（／／、’　−−−−−−−−−−−−−−−−−−−−一 −−−−−−−−−−−−−−−−−−−−−−−−−−−|’＋／。

＆　　　　　　　　′　傘傘傘Ｈｍｉｎｉｍｕｎ　　ｌｅｇｓト１ｑｕａｒｅ− ｓｃａ＋ｃｈ　　ｒｅｓｕｌｔ　　　　傘傘＊孝ネ１．／）ｗｈｉｌｅ　（６， ４）　ｎ　　＋ｅａｒｃｈ、　　ｅｒｒｏｒ、　　ｃｏｎｄｗｒｉｔｅ　（１０ ，４１ｎ　　５ｅａＩｃｈ、　　ｅｒｒｏｒ、　　ｃｏｎｄｗｒｉｔｅ　（６， ２２）　　（ｉ、ｐｋ（ｉ）、ｔａｕｇ（ｉ）、ａ　　ｌｔ（ｉ）、ｉ＝１．ｎ ｐｋ）ｗｒｉｔｅ　（１０，２２）　　（ｉ、ｐｋ（ｉ）、ｌａｕｇ（ｉ）、　 　ａ　　ｌｔ（ｉ）、ｉ＝ｌ、ｎｐｋ１２２　　ｆｏ「ｍａｌ　Ｃｉ　＝’、ｉ ５．’　　ｐｋ（ｉｌ　＝’、ｉ５．’　　Ｉａｕｇ（ｉ）　＝’、ｇ１１．４ ｅ３゜＆　　　　　’　ａ　　ｌｔ（ｉ）　・（’、ｇ１１．４ｅ３．’　、　 ’、ｇ１１．４ｅ３．’）’）ｃ　ｃａｌｃｕｌａｔｅ　ｆｉｌｔｅ「ｐａ＋ａ ｍｅｌｅｒｓｃａｌｌｌａｕｇ　　　ａ　　ｈｇ　　４（ｈｘ、ｋｘ、ｋｋｘ、 ｈｙ、ｋｙ、ｋｋｙｊａｕｇ、ａ　　Ｉｓ、ｎｐｋｌｗｈｉｌｅ　　（６，９） ｗｔｉｔｅ　（１０，９） ９　　ｆｏＩｍａｌ　（／／、”　−−−−ｆｔｕ　ｄｅｇｈｃｓｔｉｎｇ　ｐ 「ｏｃｅｓｓｏ「−−−−−’）ｗｒｉｔｅ　　（６，７）　ｄ ｗｒｉｔｅ　　（１０，７）　ｄ ？　　ｔｏ＋ｍａｔ　（’　ｄｃ　ｏｆｌｓｅｌ　　　　　ｄ　＝　（’、ｇ１ １．４ｅ３．’　、　’、ｇ１１．４ｅ３．’　）’）ｗｒｉｔｅ　　（６，８ ）　　ｈｘ（１）ｗｒｉｔｅ　（１０，８）　ｌｕ（１）１１　　ｆｏｒｍａｔ 　（’　ａｍｐ−ｐｈ　ａｉｕｓ＋　１（１）＝（’、ｇ１１．４ｅ３．’　、 　’、　ｇｌｌ、４ｅ３．’　ｌ’）ｎｉｌｅ　（６，Ｉｆ）　　（ｉ、　ｋｙ （ｉ）、　ｂｙ（ｉｌ、　ｉ＝１．　ｋｋ７　）ｗ「ｉｔｅ　（１０，ＩＩ）　 　（ｉ、ｋｙ（ｉ）、ｂｙ（ｉ）、ｉ＝Ｉ、ｋｋｙ）Ｉｔ　　　　ｆｏ　「ｍａ ｌ　　ぐ　　　ｉ　　＝　　’、　　ｉ５．’　　ｋｙ（ｉ）　　：　’、　　 ｉ５゜＆　　　　　’　　　ｈｙ（ｉ）　・（’、ｇ１１．４ｅ３．’　、　’ 、ｇ１１．４ｅ３．’　）’）ｃ　ｄｅｇｈｏｓｊｉｎｇ　Ｉ　４１ｉｒｌｄｓ 　！１１　ｖｉｄｅｏ　ｄａＩｘ）ｃ　ｎｏ　ｏｌ　ｏｙｅ「ＩＩｏｗ／ｕｎｄ ｅ＋Ｉｌｏｗ、　ｎａｌ　ｐａｄ　ｏｎ１７ｉｆ　　（ｍｏｄ（山ｎｅ、　　１ ０）、　ｅＱ、　０１　　ｐａｉｎｔ　　傘、’−−−　　ｐ＋ｏｃｅｓｓｉＢ 　　１ｉｎｅ　　’、　@１ｌｉｎｅ ｄｏ　１ｐｉｘｅｌ　＝１，９１０ ｘ＝ｃｍｐｌｘ（ｆｌｏａｔ（ｒｘ　＋（ｉｐｉｘｃｌ、１ｌｉｎｅ））、Ｉｌ ｏｇｊ（ｒｘ　　１（ｉｐｉｘｅｌ、１ｌｉｎｓ）））蟲　　　　　−ｄ ｃａｌｌｄｌ山ｅｔ　（ｘ、ｙ、　ｈｘ、ｋｘ、ｋｋｘ、　ｈｙ、に７．ｋｋ７ ．５ｂ）ＩＩ　　Ｔ　　　ｄｇ　　（ｉｐｉｘｅｌ、　山ｎｅ）　　＝　　１ｎ ｌ（ｔｅａｌ（Ｖ））ＩＩ　　　ｉ　　　　ｄｇ　　（ｉｐｉｘｅｌ、　　山ｎ ｅ’ｌ　　＝　　ｉｎｌ（ａｉｍａｇ（ｙ）１百（ｒｘ　ｒ　　ｄｇ　（ｉｐｉ ｘｅｌ、山ｎｅ１．　ｇｌ、　２５５）　１ｈｅｎｎ　　ｏｖｌｌ　＝　ｎ　　 ｕｌｌ　＋　１１Ｉ　　　Ｉ　　　ｄｇ　　（ｉｐｉｘｅｌ、　己１ｎｅ）　　 ＝　２５５ｅｌｓｅｉｆ　（ｒｘ　ｒ　　ｄｇ　ｆｉｐｉｘｅｌ、山ｎｅ）、　 １１．　Ｑｌ　ｔｈｅｎｎ　　ｕｄｌｌ−ｎ　　ｕｄｌｌ　＋　１１Ｉ　ｌ　　 ｄｇ　（ｉｐｉｘｅｌ、１ｌｉｎｅｌ　二〇ｎｄｉｌ ｅｎｄｄ。

ｅｎｄｄ。

ｃ　ｏｕｔｐｕｔ　＋ｃｓｕｌｔ　ｓｕｍｍａｒｙｖｔｉｌｅ　（６，１２）　 ｎ　ｏｙｌｌ、　ｎ　　ｕｄｆｌｎｉｌｅ　（１０，１２）　ｎ　　ＯＦ目、＋ ＋ｕｄ月１２　　ｆｏｒ＋ｎａｌ　（／、’　−−−＃　ｏｆ　ｏｙｅ＋Ｉｌｏ ｗ　（２５５）／ｕｎｄｅｒｌｌｏｖ（０１ｉｎ　ｒｅａｌ　…レー戟B ＆　　　　　／、’　　ｎ　　ｏｖｌｌ＝’、ｉ＆、’　　ｎ　　ｕｄｌｌ＝’ 、１８）ｃｌｏｓｅ（１０） ｃ　ｗ＋ｉＨｎｇ　ｄｅｇｈｏｓｆｅｄ　ｒｅｓｕｌｔｓｐｒｉｎｔ　＊、’− −−−−−−　ｗ「ｉｔｉｎｇ　ｄｅｇｈｏｓｔｅｄ　＋ｅｓｕｌｌｓ　−−− −−−−’ｃａｌｌ　＋ｕｉｔ！ｉｌ　（３，４，０，ｒｘ　ｒ　　ｄｇ）ｄｏ ｉ＝１．５ ｔ７ｐｅ　　ｊ　ｃｈｉｒ　（７） ｅｎｄｄ。

ｃ　ｓｈｏｗ　ｖｕｅｌｒｏｍｓ　ｏｆｙｅ山ｃｘｌ　５７ｎｃ（ｎｌ　ｖｓ） 　ａｎｄ　ａｃｔｉｖｅ　ｗｉｄｅｎ　（ｎｌ　ｉｔ）　５■撃■モ撃■■ ｃ　ｂｅｆｏｒｅ　ａｎｄ　ｇａｉｅ「ｄｅｇｈｏｓｊｉｎｇ、　　５ｔｏｒｅ 　ｃｏｍｐａｒｉｓｏｎ　ｉｎ　ｔｉｌｅ　１１ｖｔｉｌｅ　（Ｉｆ、１３）　 ｎｌ　　ｖｓｌｇ　　　　ｊｏｖｉａｌ　　（’　　ネ傘を傘傘参　　　ｖｅｒ ｔｉｃａｌ　　Ｂｎｔ　　Ｈ車掌ネ本ネ　　ｆｉｎ　　’、ｉ５．／。

＆　　　　ｉｐｘ　　　　＋ｅｉｌ　ｉｎ−−−−ｉｍＢ　ｉｎ　　　　　　ｒ ｅａｌ　ｏｕｔ−−−ｉｍｘｇ　ｏｕｔ’）ｄｏ　ｉ　＝　Ｉ、　９１０ ｗｈｉｌｅ　（ＩＩ、１４）　ｉ、ｒｘ　＋（ｉ、ｎｌ　ｖｓ）、【ｘｉ（ｉ、 ｎｌ　ｖｓ）。

＆　　　　　　　　　ｒｘ　　ｒ　　ｄｇ（ｉ、ｎｌ　　ｖＩ）、ｒｘ　　ｉ　 　ｄｇ（ｉ、ｎｌ　　ｗｓ）ｅｎｄｄ。

１４　　ｊｏｖｉａｌ　　（ｌｘ、　ｉ５．５ｘ、　ｉｌｌ、　３ｘ、　ｉｌｌ 、　７ｘ、　ｉ８．３Ｌ　ｉｌｌ）ｗｈｉｌｅ　（１１，１５） １５　　　１＋ｕ＋ｕｌ　　Ｃｌ／、’　傘傘傘傘　ａｃｔｉｖｅ　　ｖｉｄｅ ｏ　　本市＃Ｉネ　　　ｎｌ　　　ｘｗ＝’。

ｌ　　　　　　　ｉ５．’ｎｐｘ　　ｍＶ　　ｈｇ＝’、ｉ５．／。

＆’　　　ｉｐｘ　　　　ｔｅａｌ　ｉｎ−−−−ｉｍｘｇ　ｉｎ　　　　　　 　ｔｅｌｌ　ｏｕト−−−ｉｎｌＢ　ｏｕｔ’）ｄｏ　ｉ　：１．９１０ ｉｐＸ　＝　ｉ　＋　ｎｐｌ　　ｕ　　ｂｇ　−１ｗｒｉｔｅ　（１１，１４） 　　ｉｐｘ、　　ｔｘ　　＋ｌｐｘ、ｎｌ　　ａｖ）、ｒｘ　　１（ｉｐｘ、ｎ ｌ　　ｕ）。

＆　　　　　　　　ｔｘ　　＋　　ｄｇ（ｉｐｘ、ｎｌ　　ａｖ）、ｒｘ　　＋ 　　ｄｇ（ｉｐｘ、ｎｌ　　ａｖ）ｅｎｄｄ。

ｃｌｏｓｅ（ＩＩ） ｃａｌｌ　ｉｎｌ口（２４０１ ｃａｌｌ　ｗａｖｅｌｏ＋ｍ　（ｒｘ　　＋、「１　　ｉ、ｎｌ　　ｖｓ、　　 ］、　９１０．　５０．４５０．　１５０）ｃａｌｌ　ｗａｖｅｆｏｒｍ　（Ｉ Ｘ　　Ｔ　　ｄｇ、　ＩＸ　　ｉ　　ｄｇ、　ｎｌ　　ｖｓ、　］、　９１０． ５０．１００．１５０）Ｃａｌｌ　ｐａｕｓｅ ｃａｌｌ　１ｎｉｌｌ　（２４０） ｃａｌｌ　ｗａｖｅｌｏ＋ｍ　（４ｘ　　Ｌ［ｉ、ｎｌ　ａｖ、ｎｐｘ　　ａｙ 　ｂｇ、９１０．５Ｇ、ｌ［ｌＯ，３００）ｃａｌｌ　ｐａｕ＋ｅ ｃａｌｌ　１ｎｉｌｌ　　（２４０） ｃａｌｌ　ｗａｖｅｆｏ「ｍ（＋ｘ−ｒｄｇ、　ＩＸ　ｉ　　ｄｇ、　ｎｌ　ａ ｖ、ｎｐｘ　ａマーｂｇ、　９１０．５０．１００．３００j ｃａｌｌ　ｐａｕｓｅ ｓｌ（Ｉｌｌ ｎｄ Ｃ＊零ネ零零傘零零＊参孝＊＄＄＄参＊傘ＮＮ＄＊＊Ｎ傘孝傘＊傘傘傘傘傘傘孝 ネ孝傘＊傘傘＊傘＊傘傘ネ＊傘ネ傘傘市＊＊＊＊＊傘傘零傘趨{＄参市参傘ネ＄ サブルーチンｌｉｏｇ　　ａ　　ｔｕＹ４　（ｈｘ、　ｋｘ、　ｋｋｘ、　ｈ７ ．　ｋｙ、口１．　ｌ＊Ｂ、　ｓ　　Ｉｓ、　ｎｆｓｕＯＣ＃傘＃零本ネ＊ネ＊ 傘＊ネ＄参本零本本章傘ネ零＊ネ＊本本孝本本ネネ＊ネ＊本零零ネ傘傘ネネ＊ネ ＊零零孝電傘ネ牟ＩＩネ本＄＄参ネ＊l本孝ネ参孝傘拳ネネ傘＄ ｃ　ｇｅｎｅｒａｔｅ　ｃｏｍｐ！ｎ５ａｊｉｏｎ　ｌ１ｌｌｅ＋　ｃｏｅｆｆ ｉｃｉｅｎｔｓ　ａｎｄ　ｄｅｌｉ７ｃ　　Ｉ＋ｏｌＩｌｉｄｅｎｔｉｆｉｅｄ 　ｃｈａｎｎｅｌ　ｃｔ＋ａｒａｃｊｅ＋ｉｓ＋ｉｃｃ　　ｆｏｒ　２　ｐｘｔ ｈ＠ｔｒｉａｌ　＋ｏｕｌｉｎｅｃ　ｃｌ：　ｌｐｄ　ｆｏｒ　ｎｏｔａｔｉｏ ｎｃ　　４１ａｐｓ　ｆｏｒ　ｒｅｌａｔｉｖｅ　ｄａＩｘ７　ｗｈｉｃｈ　ｉ ｓ　ｎｏｔ　ｉｎｆｅｇｅ＋　ｔｉｍｅｓ　ｏｊｃ　　　ｓａｍｐｌｉｎｇ　ｉ ｎｌｅｎａｌｃｏｍｐｌｅｘｌｕ（１１，ｈｙ（１）、　　ａ　　ｌ５（１）ｔ ｅａｌ　ｌａｕｇ（１） ｉｎｌｅｇｅ＋　ｋｘ（１）、　　ｋｋｘ、　ｋｙ（Ｉｌ、　　ｋｋｙｃｏｍｐ ｌｅｘ　ｂ（４） 「ｅａｔ　ｅｕ　　ｌｐｄ、　　ｄｌａｕ２ｅｘｔｅＩｎａｌ　Ｔｏ　　ｆｌａ ｔ ｉｔ　（ｎｌａｕｇ、ｇｌ。２）　　ｔｈｅｎｐ「ｉｎｔ　傘、’＄１ｔｔｔ　 １００　ｍａｎｙ　ｐａｌｈｓ　ｆａｔ　ｃｏｒｒｅｎｔ　ｉｍｐｌｅｍｅｎｌ ｉｌｉｏｎ…本′ｌｏｐ ｎｄｉｌ ｆｕ（１）・１．　ａ　　ｌｓ（１） 百（ｎｌａｕｇｏｇｅ、　２）　ｔｈｅｎｋｙ　　ｔｐ　＝　１ｎｌ（（ｌａｕ ｇ（２）−１ａｕｇ（１））　／Ｉｓ　）ｄｌａｕ２　＝ｌａｕｇ（２１−１ａ ｕｇ（１１−１＋　＄　ｋｙ　　ｌｐｄ（ｄｔａｕ２．　Ｉｔ、　１０．　ｅ− ３）　１ｈｅｎｃ　ｓｍａｌｌｅｓｔ　５ｔｅｐ　ｉｓ　Ｏ，０１５６２５ｋｙ （１）・ｋｙ　　ｔｐ ｈｙｍ　・ａ　Ｉｔ（２）　／　ａ　ｌｓ（１）ｋｋｙ　＝　１ １ｓｅ ｄｌａｕ２　＝　ｄｌａｕ２　＋　１ｓｃａｌｌ　ｌｐｄ　（ｂ、　４．　ｅｔ ｔ　　ｌｐｄ、　ｄｔａｕ２．　ｌｓ、　Ｔｏ　　ｆｌａｔ、　！、　１５）ｋ ｙ　（１）・ｋｙｌｐ−１ ｂｙ（ＩＩ　＝　ａ　　１ｔ（２）　柿（１）　／　ａ　　１Ｓ（１）ｋＶ（２ ＋・ｋ７　　ｔｐ ｈｙ（２１＝ａ　　１Ｓ（２１ｔｂ（２）／　ａ　　ｌ＋ｍｋｙ（３）・ｋｙｔ ｐ＋１ ｂｙ（３）　＝　ａ　　１ｔ（２）傘ｂ（３）　／　ａ　　ｌｓ（１）ｋｙ（４ ）　＝ｋｙ　　ｌｐ　＋　２ ｈｙ（４）　　□　　ａ　　　　ｌｓ（２）　　章ｂ（４）　　／　　ａ　　　 　ｌｓ（１）ｈｈｙ　＝　４ ｎｄｉｌ ｎｄｉｌ 「ｅｔｕｒｎ ｎｄ ｃ　Ｉｄ、ｔｏ＋　（ｌｉｔｔｅｒｄｅｓｉｇｎ）ｃ　ｄｅｓｉｇｎ　ｄｅｇｈ ｏＳｌｉｎｇ　ｉｍｅ「ｃ　−−−−−−一−−−−−−−−−−ｄａｔａ　ｄ ｅｌｉｎｉｌｉｏｎ＋　　−−−−−−−一−−−−−−−−−ｃ　Ｉｒｅｆｅ 「ｅｎｃｅ　ｖｅｃｔｏ「ａｎｄ　ｉｔｓ　「ｅｌａｔｅｄ　ｄａｔａｃ　　ｓ ｌ　（ｓ　　＋ｅｌｅ＋ｅｎｃｅ）、　ｎｓｌ　（ｎ　　ｓ　　＋ｅｌｅ＋ｅｎ ｃｅ）ｃ　　＋Ｉｐ　（３ｔｅｌ　　ｐａｉｎｅｄ、　　ｎ５ｌｐ　（ｎ　　ｌ 　　ｔｅｌ　　ｐ＋ｉｍｅｌｃ　　＋ｓｌｐ　（「ｏ　　ｓ　　ｒｅｆ　　ｐ「 ｉｍｅ）ｃ　　ｃｏｓｌｐ（ｃｏｙａ＋　　ｓ　　ｒｅｆ　　ｐｒｉｍｅ）　　 ｎｃｏｓｌｐ（ｎ　　ｃｏｖａ＋　　ｓ　　ｒｅｆ　　ｐｒｉｍｅ）ｃ　　　　 （ｃｏｌｕｍｅ　ｓｃａｎｎｉｎｇ　ｍａｔ＋１ｘｌｃ　２．　　ｔ＋ａｎｉｌ ｏ＋ｍａｌｉｏｎ　ｍａｔ口ｘｃ　　ａｍ　（ｉ　　ｍａｔｒｉｘ）ｖ、　　ｎ ａｍ　（ｎ　　ａ　　ｍａｔ「１ｘ）ｃ　　　　（ｕＳｅ　ｏｎｌＶｎｏｎｅ　 ｘｅ＋ｏ　ｅｎｔｒｙ　ｉｎ　「ｏｗ　ｏｆ　ｔｈｅ　ｗｈｏｌｅ　ａｍ）ｃ　 ３．　　ｏｂ＋ｅ「マａｆｉｏｎ　ｄａｔａｃ　　ｆｘ　（ｒｅｃｅｉｖｅｄ　 　ｖｅｃｔｏｒ）、　　ｎ＋ｘ　（ｎ　　ｌｅｅ　　ｖｅｃｔｏｒ）ｃ　　＋ｘ ｐ　（＋ｅｃｅｉｖｅｄ＋　　ｖｅｃｔｏｒｐ「ｉｍｅ）、　　ｎＴｘｐｃ　　 ４．　　ｍａｔｃｈ　ｆｉｌｌｅ＋　ｌｈ＋ｅ＋ｈｏｌｄｉｎｇｃ　　　「ｘｐ ｍ　（ｌｅｅ　　ｖｅｃｔｏｒ　　ｐｒｉｍｅ　　ｍａｔｃｈｅｄ）、ｎ＋ｘｐ ｍ（ｎ　　ｌｅｅ　　ｒｅｃｔｏｒ　　ｐｒ奄高■@　ｍａｔｃｈｅｄ） ｃ　　　ｌｈｌ　（ｌｈ＋ｅｓ！＋ｎｌｄ　　ｌ）ｃ　　　ｄ＋ｘｐｍ（ｄｅｔ ｅｃｔｅｄ　　ｔｅｃ　　ｐｒｉｍｅ　　ｍａｔｃｈｅｄ）。

ｎｄ＋ｘｐｍ（ｎ　　ｄｅｔｅｃｔｅｄ−ｒｅｃ　　ｐｒｉｍｅ　　ｍａｔｃｈ ｅｄ）ｃ　　　ｂｋｒ　（ｂｌｏｃｋ　　＋ａｎｇｅｌ、　ｎｂｋ＋　（ｎ　　 ｂｌｏｃｋ　−ｒａｎｇｅ）ｃ　　５．　１ｅａｓｌ　５ｑｕａｒｅ　ｌｉｔ　 １ｃ　　ｂｌｓｌ　（ｂ　Ｉｓ　１１．　ｎｂｌｓｌ　（ｎ　ｂ　　Ｉｓ　Ｉ） ｃ　　　Ｉｈ１ｓｌ　（ｌｔ＋＋ｅｓｈｏｌｄ　　Ｉｓ　　Ｉ）、　ｄｌｓｌ　 （ｄｅｔｅｃｔｅｄ　　Ｉｓ　　Ｉ）ｃ　　　ｔｐｌｓ　（ｌｐ　　Ｉｓ、　　 ｎ１ｐｌｓ　（ｎ　　ｌｐ　　ｌｓ）（ｕｓｅ　ｂｋｒ、　　ｔｈｅｎ　ｇｅｎ ｅｒａｔｅ　ｎｅｗ　ｂｋｒ　Ｉｔｏｍ　ｌｈ＋ｅｓｈｏｌｄｉｎｇ　ｂｌｓｌ ）ｃ　　５．　１ｅａｓｔ　＋ｑｕａｒｅ　ｌｉｔ　２ｃ　　　ｂｌｓ２　（ｂ 　　Ｉｓ　　２）、　ｎｂｌｓ２　（ｎ　　ｂ　　Ｉｓ　　２）ｃ　　　１ｈｌ ｉ２　（ｔｈｒｅｓｈｏｌｄ　　１ｌＩ）、　ｄｌ＋２　（ｄｅｔｅｃｔｅｄ　 　ｌ＋　　２）Ｃ（ｕｓｅ　ｂｋｒ） Ｃ＊＊＊傘傘＊本＊＊零ｔネ零本ネネネ傘傘傘＊＊本＊＊本拳京本＊ネネＵネ傘 ＊零＊＊＊傘孝本＊零孝零ネ孝＊本本本本ネ＊零ネ＊サブルーチン＋１ｄｅｌ　 （ｓｌ、　ｎｓｌ、　ｎｕｌｌ）Ｃ＃本＊ネ本ネＵ本Ｉ＊孝孝零零零＊＊孝零＃ ＃＊零零傘＊傘傘本＊＊本孝本傘傘＊本零車零ネ傘零＊＊零零本＊傘傘ネ＊＊＊ 本ネネｃ　　５ｌｄｅｌ　　（ｓ　　　ｒｅｆ　　　　ｄｅｆｉｎｅｄ）：　　 ｄｅｆｉｎｅ　　「ｅｆｅｒｅｎｃｅ　　ｖｅｃｔｏｒｃ　＋Ｉ　−ｓ　　ｔｅ ｌｅｔｅｎｃｅ　ｖｅｃｔｏｒｃ　ｎｓｌ　−ｎｏ、　　ｏｌ　’ｎｏｎｅ　ｔ ｅｔｏ’　　ｅｎｆ＋ｉｅ＋　ｉｎ　ｓｌｃｏｍｐｌｅｘ　ｓｌｍ ｉｎｔｅｇｅｒ　ｎｓｌ、　　ｎ５ｌｌｃ　ｓｏｍｅ　１ｎｌｅ＋ｍ１ｄｉａｌ ｅ　ｓｉｇｎａｌ　＋ｅｌｅ＋ｕｄｃ　（ｎｏｔ　Ｙｃｌ　ｉｍｐｌｅｍｅｎｔ ｅｄ）ｓ１ｍ＝ｃｍｐｌｘ（−１，８６４９５１７，−３，６０１２８６１）ｓ Ｈ２）ｚｃｆｆｌｐｌｘ（−１，２８６１７３６，−５，６５９１６４０）ｓｌ （３１＝　ｃｍｐｌｘｆ−０，７７１７０４１８，−１１，８９７１０６）ｔｌ （４）　＝ｃｍｐｌｘ（−６，４９５１７６８，−２０，４８２３１５）ｓｌ（ ５１：ｃｍｐｌｘ（−１９，０９９６７９，−２５，２４１１５８）＋Ｉ（６１ ・ｃｍｐｌｘ（−３２，４１１５７５，−２０，７３９５４９１ｓ＋（７）　□ 　ｃｍｐｌｘ（−３９，１６３９８７，−Ｉｌ、　１８９７１１）ｓｌ（８）　 ＝　ｃｍｐｌｘ（−３９，７４２７６５，−５，１１２５４０１）ｓｌ（９）　 ＝　ｃｍｐｌｘ（−３８，９０６７５３，−３，０５４６６２４）「ｅｔｕｒｎ ｎｄ Ｃネ本＊＊零零本＃零傘傘本零傘零ネ参傘ネ本ネネ拳零本孝ネ本本本ネ孝章ネ本 本＊ネ本本ネ牟本＊＊ネ＊＊＊牟＊ネ参ネ傘＊＄＊ネ＊サブルーチンａｍｄｅｌ 　（ａｍ、　ｎａｍ、　　ｉａｍ）ｃ　　ｒｔｔｔ＄ｔＨｔ＄ｔｔｔ孝零＃Ｉ孝 零傘傘傘孝孝傘孝零孝孝傘孝孝孝孝零零孝傘零を零季孝零孝零ｎｎｍｎｎ傘孝零 ｃ　　ａａ＋　　（Ｉｉｒ）　　ｄｅｆｉｎｉｔｉｏｎＣＩＩ　（ａ　　ｍｉｌ ＋ｉｘ）　−ｔｈｅ　’ｎｏｎｅ　ｔｃｔｏ’　ｐｕｔ　ｏｌ　ｓ　ｖｅｃｔｏ ｒ　Ｏｆ　１　　ｍ５ｔｒｉｘｃ　　ｎｚｍ　　（ｎ　　　ｓ　　　　ｍａｔｒ ｉｘ）　　−ｎｏ、　　ｏｌ　　’ｎｏｎｅ　　ｘｅｔｏ’　　ａｍｃ　ｉａｍ 　（ｉ　　ａ　　ｍａｌ＋ｉｘｌ　−５ｅｌｅｃｔｉｏｎ　ｏｆ　ｄｉｌｌｅ＋ ｅｎｔ　Ａｍｃｏｍｐｌｅｘ　　ａｍ（１） ｉｎｔｅｇｅ「ｎａｍ、　　目ｍ ｉｌ　　（ｉａｍ、Ｂ、］）　　ｔｈｅｎｅｌｓｅｉｆ　　ｌｘａ、ｅｑ、２］ 　　ｔｈｅｎ請１）　　＝　　−０，５ １ｓｅ ｐａｉｎｔ　ｔ、’　ｅｎｌｅ＋　１ｌａｌｌｌ　？’「ｅａｄ　（５４）　ｎ ｘｍ ｐｒｉｎｔ　零、’ｅｎｔｅｒ　ｕｎ（ｎａｍｌ　？’ｒｅａｄ　（５，＄）　 （ａｍ（ｉ）、　　ｉ＝ｌ、　ｎａｍｌｎｄｉ１ ｎｄ Ｃ本市傘零参傘＃傘本字本＊＊零零零＊零零零＄零零零零孝零零孝孝零ネ零零孝 孝孝傘ネ＊ｔｕｕｎｕ傘傘傘を中傘傘季季ネ孝サブルーチンａｍｌｌ＋ｎ　（ｘ 、　ｎｘ、　　ａｍ、　ｎａｍ、　　ｘｐ、ｎｘｐＩＣ零＊傘傘本＊＊＊ネネ＊ 孝＊孝傘傘孝傘＊傘傘＊＊傘章傘ネ傘傘傘傘本零＊＊電傘傘零ネネネ＊傘零傘傘 傘孝零本零零零傘傘傘零本ｃ　ａｍｌｌｍ　（ａ　ｍａｔｒｉｘ　ｌ＋ａｎｓｌ ｏ＋ｍ）　ｔｏ　Ｌ　ａｎｄ　ｇｅｎｅｒａｔｅ　ｘｐｃ　　ｘ　　−１ｎｐｕ ｔ　　ｖｅｃｔｏｒＣＩＩＩ　　−ｄｉｍｅｎｓｉｏｎ　　０１　　Ｋｃ　　ａ ｍ　　−ａ　　　ｍａｔｒｉｘ　　ｖｅｃｔｏ＋ｃｎａｍ−ｎ　　ａ　　ｉ＋ａ ｆｒｉｘｎｏ、　ａｌｎｏｎｅｚｅｒｏａ　　ｍｊｌｒ：ｘｖｅｃｔｏｒｃｏｍ ｐｌｅｘ　ｘ（１）、　　ａｍ（１）、　　ｘｐ（１）ｉｎｔｅｇｅｒ　ｎｘ、 　　ｎｉｍ、　　ｎｘｐｎｘｐ　＝　ｎｘ　−ｎａＬ１１＋　１ｄｏ　ｉ　＝　 Ｉ、　　ｎｘｐ ｘｐ（ｉ）・　０゜ ｄｏ　ｊ　＝　ｌ、　ｎｘｍ ｎ（ｉ）　　・　ｘｐ（ｉ）　　＋　　ｘｍ（ｉＤｘ（ｉ＋ｉ−１）ｅｎｄｄ。

ｅｎｄｄ。

ｅｔｕｒｎ ｎｄ Ｃ＊傘零＊傘ネ＊＊ネ傘ネネ零拳傘＊＊＊零ネ傘＊ネ＊＊零零傘ネ＊ネ傘ネ傘零 孝孝＃傘＊ネ＊傘傘孝傘ネ＊＊傘零＊傘孝ネ傘傘孝零零すブルーチンｌｈｃ　　 ｎｏｒｍ　（ｘｌｎｘ、　　ｔｈ、　　ＩＩ、　ＩＩＩＫ）Ｃ＃本本本ネ本章零 零Ｉ傘ｔネ零傘傘傘＊零＄＄零零零章傘Ｉ＊本＊ネ＊本零＊幸ネ＊零零本傘本＊ ネ＊孝ネ＊ネ＊零傘孝傘零孝ネ＊ネｃ　Ｉｂｒｅｓｈｏｌｄｉｎｇｌｂｅ　ｎｏ ｔｍ　ｏｆ　ｘ、　　ｐｕｔ　ｄｅｔｅｃｔｅｄ　ＩＯｃ！口ｏｎ　ｉｎ　ｌｘ Ｃ百（ｘ（ｉ）ｔｃｏｎｊｇ（ｘ（ｉ）ｌ　＞　ｔｈ、　Ｉｔ（ｋ）　＝　ｉＣ Ｘ　−１ｎｐｕｔ　ｖｅｃｔｏ＋ ｃ　ｎｘ　−ｄｉｍｅｎｓｉｏｎ　０１　！ｃ　ｔｈ　−ｔｈ「ｅｓｈｏｌｄ ｃ　ｌｘ　−ｄｅｔｅｃｔｅｄ　Ｋ　１ｏｃａｌｉｏｎ＋ｃ　ｎｌｘ　−１１０ ０１１ｏｃａｌｉｏｎｓ　ｄｅｔｅｃｔｅｄｃｏｍｐｌｅｘ　Ｉｍ ｉｎｔｅｇｅｒ　ＩＩＸ、　　１ｘ（１１，ｎｌｘ百（ｃａｂｓ　（１（ｉ）） 、　ｇｆ、　ｔｈｌ　ｔｈｅｎｎｌｘ　＝　ｎｌｘ　＋　１ １ｘ（ｎｌｘ）　　＝　ｉ ｎｄｉｌ ｅｎｄｄ。

ｅｔｕｒｎ ｅｎ＋１ ｉｌ　（ｎｌｘ、ｇｅ、２）　ｔｈｅｎＣ＃＊＊＊零＊＊本零零零傘＊＃Ｉ＃零 本本零本傘ネ傘幸＊＊車本傘傘＊零傘傘傘＊＊本本零傘傘＊＊＊傘市＊＊零零零 零本本孝＊＊＊サブルーチンｂｋ＋ｌｄ　（ｂｋ＋、　ｎｂｋ＋、　　ＩＩ、　 ｎｌｘ、　ｎ５ｌｐ）Ｃ傘傘傘零＊＊＊零車掌零傘零傘傘傘傘章＊＊＊傘傘ネ傘 中傘＊＊零零零ネ零傘＊傘＊＊ネネ傘傘ネ＊参傘零参拳本本零章零零傘本ネ零ｃ ｂｋｒｌ＋Ｉ　（ｂｌｏｃｋ　　ｒａｎｇｅ　　１ｉｎｄｅ＋）ｃ　ｆｉｎｄ　 ｂｌｏｃｋｓ　ｆ「ｏｍ　ｄｅｔｅｃｔｅｄ　ｐｏｓｉｔｉｏｎｃ　ｉｆ　ｂ（ ｉ）−ｌｘ（ｊ）　＜　ｎａｍ、　　ｅｖｅ［ｙｔｈｉｎｇ　ｉｎ　ｂｅｔｗｅ ｅｎ　１ｘ（ｉ）　ａｎｄ　１ｘ（ｊ）（ｂｅｌｏｎｇ　　ｔｏ　　ｔｈｅ　　 ５ｕｎｅ　　ｂｌｏｃｋｃ　ｎｏｔｅ　　目ｔｅａ＋ｌ−＋ｑｕａ＋ｅ−１ｉｔ 　ｄｏｅｓ　ｎｏｔ　ｃｏｎ＋ｉｄｅ＋　＋ｘｐｍ　ｔｈａｔ　ｎｏｔ　ｉｎ　 ｌｘｃ　　　　　ｉｔ　５ｈｏｕｌｄ　ｕｓｅ　＋ｘｐｍ　ａｎｄ　ＩＩ、　　 ｄｉ「ｅｃｔｌｙ。

ｃ　ｂｋ＋　（ｂｌｏｃｋ−「ａｎｇｅ）　−ｉｎｔｅｇｅｒ　ａｒｒａｙ　ｃ ｏｎｌａｉｎ＋　ｂｌｏｃｋ　ｂｏｕｎｄａ「ｉｅ＠ｃ　　　　　　　　　　　 　　　　　　　　　　　　ｉｎ　　ｔｗｏ　　ｃｏｎｓｅｃｕｔｉｖｅ　　ｅｌ ｅｍｅｎｔｓｃ　ｎｂｋ＋　（ｎ　　ｂｌｏｃｋ　　＋ａｎｇｅｌ　−ｎｏ、　 　ｏｆ　ｂｌｏｃｋｓＣＩＩ　（ｌｏｃａｔｉｏｎ　　ｘ）　−ｄｅｔｅｃｔｅ ｄ　１ｏｃａｔｉｏｎｓｃ　ｎｌｘ　（ｎ　　１ｏｃａｔｉｏｎ　　Ｘ）　−ｎ ｏ　ｏｆ　１ｏｃａｊｉｏｎ＋　ｄｅｔｅｃｔｅｄｃ　ｎ１ｌｐ　Ｉｎ　　！　 　＋ｅｌ　　ｐｒｉｍｅ）　−ｍｉｎｉｍｕｍ　５ｅｐａｒａｔｉｏｎ　＋ａｎ ｇｅ　ｔｏ　ｂｅ　ｉｓｏｌａ狽■■ ｉｎｔｅｇｅ＋　ｂｋ＋（１）、　　ｎｂｋ＋、　　１ｘ（１１，ｎｌｘ、　　 ｎ５ｌｐｉ１ｐ−１１（１１ ｄｏ　ｉ　＝　２．　　ＩＩＩ！ ｃｌｓｌｌ　（ｌｅａｓｅ　　５ｑｕａｒｅ　　ｌｉｔ　　１１ｎｂｌｓ　＝　 ｎｂｌｓ　＋　１ １ｂｌｔ（ｎｂｌｓｌ　　＝　ｂｋ＋ｆｉ傘２ｊｂｌ＋（ｎｂｌｓ）　＝　＋ｘ ｐｍ（ｂｋ＋（目２））＃５ｌｐ（１）１Ｉｅ ｄｏ　！ｌ　：１．　　ｎｂｋ ｄｏ　Ｉ２　：Ｉ、　ｎｂｋ ｉｆ　（ｉａｂｉｌｌ−Ｉ２）、ｇｅ、ｎｃｌｐ）　ｔｈｅｎｃｏｖｌｐ（ｉｌ ＋（Ｉ２−１）本ｎｂｋ）　　＝　０゜ｅｌｓｅｉｌ　（ｉｌ、ｇｅ、Ｉ２）　 ｔｈｅｎｃｏｖｌｐ（ｊｌ＋（Ｉ２−１）ネｎｂｋ）　＝　＋５ｌｐ（ｉｆ−ｉ ２＋Ｉ）１ｓｅ ｃｏｖｌｐｆｉｌ＋１２−１）掌ｎｂｋｌ　＝ｃｏｎｊｇ（＋５ｌｐ（Ｉ２−ｊ ｌ＋ｌ））ｎｄｉｌ ｅｎｄｄ。

ｅｎｄｄ。

ｅ　　５ｈｏｕｌｄ　　ｂｅ　　ｒｅｐｌａｃｅｄ　　ｂ７　　＋ｏｕｔｉｎｅ ｓ　　ｔｈ！＋　　ｕｓｅ　　ｃｏｎｄ　口ｉｎｎ　　ｎｏA　ｃ　「１ｔｅｒ ｉｏｎ ｃａｌｌ　ｍ１ｖｌ　　（ｃｏｖｌｐ、　　ｎｂｋ、　　ｃｏｖｔｐ、　　ｄｉ ｐ）ｄｏ　ｉｌ　”　１．　ｎｂｋ ｂｌｓ（ｎｎｌｓ＋ｉｌ）　；０゜ ｌｂｌ＋（ｎｂｌ＋＋ｉｌｌ　　＝　ｂｋ＋（ｉ傘２−１）　　＋　　ｉｆ　　 −１ｄｏ　Ｉ２　；ｌ、　ｎｂｋ ｂｌｓ（ｎｂｌ山１１　；ｂｌｓ（ｎｂｌｓ＋ｉｌ）＆　　　　　＋　ｃｏｖｔ ｐ（ｉｌ＋（Ｉ２−１）傘ｎｂｋ）ネ＋ｘｐｍ　（ｂｋ＋　ｆｉ＄２−１１　＋ １２−１）ｅｎｄｄ。

ｅｎｄｄ。

ｎｂｌｓ　＝　ｎｂｌｓ　＋　ｎｂ＆ ｎｄｉｌ ｅｎｄｄ。

Ｔｅ１ｌｌｌｎ ｎｄ Ｃ＃ネ＊本＊傘傘ネ＊＊傘孝ネ＊ｓｔ＊ｕｕ傘傘傘＊＊傘傘孝傘孝ネ＊ネネ＊ネ ネ本ネ＊＊ネネ傘参ネ孝孝ネ本傘傘ネ＊ネ＊＊零本サブルーチン１ｈｒｈｄｌ　 （１，ｌｒ、　ｎｘ、　　ｔｈ、　ｄｌｘ、　　ｎｄｌｘ）Ｃ傘＊＊ネ傘＊＊傘 ＊＊零孝＊章傘傘傘孝＊孝孝＊＊章傘＊ネ傘ネネ傘ネ傘孝＊ＩＩ＃ネ＊＃傘傘掌 ＊ネ傘傘傘傘＊孝ネネ傘孝ネ孝ネ＊孝ｃ　ｌｈ＋ｅｓｈｏｌｄｉｎｇ　Ｌ　　ｐ ｕｔ　ｄｅｔｅｃｔｅｄ　１ｏｃａｔｉｏｎ　ｉｎ　ｌｘＣｉｌ　　ｃｏｎｉｇ （ｘ（ｉ））傘（ｘ（ｉ））　　＞　　ｌｈ、　　ｄｌｘ（ｋ）　　＝　１ｘ（ ｉｌＣＩ　　−１ｎｐｕｔ　　ｖｅｃｔｏ＋ＣＩＩ　（ｌｏｃｉｌｉｏｎ　　Ｉ ） ｃ　ｎｘ　−ｄｉｍＰｎｓｉｎｎ　０１　Ｌ　　Ｉｔｃ　　ｌｈ　　−ｔｈｒｅ ｓｈｏｌｄ ｃ　ｄｌｘ　ｆｄｅｌＣｃｌ！ｄ　　１ｏｃｘｌｉｏｎ　　ｘ）　−ｄｅｔｅｃ ｔｅｄ　！　Ｉｏｃｘｌｉｏｎｓｃ　ｎｌｘ　−ｎｏ　ｏｌ　１ｏｃａｔｉｏｎ ｓ　ｄｅｔｅｃｔｅｄｃｏｍｐｌｅｘ　ｘ（１） ｉｎｔｅｇｅｒ　１ｘ（１）、　ｎｘ、　ｄｌｘ（１）、　ｎｄｌｘ＋ｃｉｌ　 　ｔｈ ｎｄｌｘ　＝　Ｑ ｄｏ　ｉ　＝　ｌ、　　ｎｘ ｉｆ　（＋ｅｘｌ（ｃｏｎｊｇ（ｘ（ｉ））孝ｘ（ｉ））、　ｇｌ、　ｔｈｌ　 ｔｈｅｎｎｄｌｘ　＝　ｎｄｌｘ　＋　１ ｄｌｘ（ｎｄＬｒ）　＝　１ｘ（ｉ） ｎｄｉｌ ｅｎｄ＋ｉ。

ｅｔｕｒｎ ｎｄ ｃ　Ｉ＊傘傘＊傘ネ傘本市本市＊＊ネ零＊＊ネ本章零章市ネ＊＄傘傘傘＊傘零章 零傘傘市ネ零孝ネ傘傘傘＊傘傘傘傘傘傘市＄ネ傘ネ傘孝＊サブルーチンｆｃｈｄ ｅｌ（Ｉｃｈ、　　１ｃｈｌＣ＄＠＄＊ネ孝傘傘＃傘本傘本本本零本＄零本本本 ネ孝孝＊本本本傘零本零傘＃章本本本＊Ｉ＊ネ本本傘ネネ＊零ネ市ネネ傘＊孝ネ 孝本ｃ　Ｉｃｈｄｅｌ　（ｉｅｑ　ｃｈａｎｎｅｌ　　ｄｅｌｉｎ山ｏ＋＋）ｃ 　　　　（ｎｏ＋ｍａｌｉｚｅｄ　ｖ、　ｔ、　１．　ｃｏｉｏｒ　５ｕｂｃａ ＋＋ｉｅ＋）ｃ　　ｌｃｈ　　（１＋ｃｑ　　　ｃｈａｎｎｅｌ）ｃ　　ｉｃｈ 　　（ｉ　　　ｃｈａｎｎｅｌ）　　−ｃｈａｎｎｅｌ　　ｎ。

ｉｎｔｅｇｅｒ　ｉｃｈ 百（ｉｃｈ、　ｅｑ、　Ｉ）　ｔｈｅｎＩｃｈ　＝　０゜ １ｓｅ Ｉｃｈ　・（４３，２５＋　ｉｎ６）／３．５７９５４５ｎｄｉｌ ｅｔｕｒｎ ｎｄ Ｃネ牟＊傘＃＊＊＊掌Ｉ＊＊孝ネネ傘ネネ傘零傘傘ネネネ傘傘孝傘零ネ孝孝零参 孝傘傘＊＊ネ傘ネネネ傘傘参傘傘傘ネ零零零零傘零＊ネネ傘l本孝参本拳 サブルーチンｍ　　ｍｕｌｃｈ　　ｓａｐ　（ｒｘｐＯＩＩｎ＋ｘｐｍ、　　ｕ ｐ、　ｎｒｘｐ、　ｓｌｐ、　ｎ５ｌｐ）Ｃ＊傘＊零零傘＊孝＃＊傘傘零傘ネ＊ 零＊＊ネ零傘孝傘傘傘傘＊ネネ傘＊傘ネ傘ネ＄零孝＊孝＊＊ネ傘傘傘＊＊ネ零傘 零零傘零＊ネネ＊＄孝P傘ネ傘ネ傘 ｃ　ｔｘｐ　　ｍａｔｃｈ−山ｔｏ　ｇｅｎｅｒａｔｅ　＋ｘｐｍ　（ｒｅｃｅ ｉｖｅｄ　Ｘ　　ｐｒｉｍｅ　　ａｖｔｃｈｅｄ）ｃ　＋ｘｐｍ　（ｒｅｃｅｉ ｖｅｄ　　ｘ　　ｐｒｉｍ！ｍａｔｃｈｅｄｌｃｎ＋ｘｐｍ　（ｎ　ｒｅｃｅｉ ｖｅｄ　ｘ　　ｐｒｉｍｅ　　ｍａｔｃｈｅｄ）ｃ　ｌｔｐ　（＋ｅｃｅｉｖｅ ｄ　　Ｉ　　ｐｒｉｍｅ）ｃｎ＋ｘｐ　（ｎ　　＋ｅｃｅｉｖｅｄ　　Ｉ　　ｐ ｒｉｍｅ）ｃ　ｌｔｐ　（ｓ　　＋ｅｌ　　ｐｒＩｍｅ）ｃ　ｎ５ｌｐ　（ｎ　 　＋ｅｌ　　ｐ「ｉｍｅ）ｃｏｍｐｌｅｘ　＋ｘｐｍ（１）、　　＋ｘｐｍ、　 　１ｌｐ（１）ｉｎｔｅｇｅＩｎ＋ｘｐｍ、　　ｎｒｘｐ、　　ｎ５ｌｐｎｌｔ ｐｍ　＝　ｎｒｘｐ　−ｎ５ｌｐ　＋　１ｄｏ　ｉ　＝　１．　　ｎ＋ｘｐｍ ＋ｘｐｍｆｉ）　：Ｏ ｄｏ　１＝　Ｉ、　　ｎ５ｌｐ ＋ｘｐｍ（ｉ）　　＝　　＋ｘｐｍ（ｉ）　　＋　　ＩＵ（山−１）本５ｌｐ（ ｉｌｅｎｄｄ。

ｅｎｄｄ。

「ｅｔｕｒｎ ｎｄ Ｃ＃傘零本傘本＊傘＊傘中本本ネ＊京＊零＊Ｉ＊本ｔ＃本＊＊ネ＊Ｉ零章傘＊＊ ＊を章＊＊孝＊傘ネネ本孝＊本ネ＊本章＊＊孝傘傘本本サブルーチン＋ｘｄｅｌ 　（＋Ｌ　ｎｔｘ、　　ｌｎｌＣ零＊＊零＊掌＊牢＊＊零を傘ｔＩ＊傘＊本＊＊ 零章零零傘本零零零傘傘本＊＊＊傘傘傘傘＊＊＊零ネ本＊本＊ネネ本＊本傘本本 本傘＊ｃ　　ｕｄｅｌ　　（「ｅｃｅｉｖｅｄ　　　ｖｅｃｔｏｒ　　ｄｅｌｉ ｎ自１ｏｎ）ｃ　ｒｅａｄ　ｉｎ　ＩＩ　ｆｒｏｍ　ｆｉｌｅ　Ｉｎｃ　）ｉｌ ｅ　ｌｏｒｍａｆ　ａｔ　ｔｘｄｅｔ、ｄａｔ（ｌｓ＋　ｄａｔａ ｃ　２ｎｄ　ｄａｔａ ｃ　＋ｘ　（＋ｅｃｉｅｖｅｄ　　ｖｅｃｔｏｒｌｃ　ｎｔｘ　（ｎ　　＋ｅｃ ｉｅｖｅｄ　　ｖｅｃｔｏｒ）ｃｈａ＋ａｃｌｅｒ＊２ｔｌ　Ｉｎ ｃｏｍｐｌｅｘ　＋ｘ（１） Ｉｎｔｅｇｅｒ　ｎｔｘ ｏｐｅｎ　　（４，ｌ１ｌｔ＝Ｉｎ、５ｔａｔｕｓ＝’　ｏｌｄ’）ｒｅａｄ　 （４，杓ｎｔｘ ｄｏ　ｉ　＝　Ｉ、　　ｌｌ１１ 「ｅａｄ　（４，１ｘｒ、　　ｘｉ ＋ｘ（ｉ）　＝　ｃｍｐｌｘ（ｘｒ、　ｘｉｌｅｎｄｄ。

ｃｌｏｓｅ［４） ｅｔｕｒｎ ｎｄ ｃｌ零章＊＊零ネ傘章＊＊零章市零＊傘零本章＊＊＊＊零零零零傘零＊＊す零掌 ネ＊車キ孝零零傘孝掌零孝孝５ｕｎｕｐ傘傘零サブルーチンｐｌｏｌ　　ｖｅｃ ｔｏｒ　（ｐｘ、　ｐｙ、　ｎｐｌＣネネ傘＊＊＊孝傘傘孝牢傘＊＊零本＊牢ネ 零＊市孝傘傘＊＊孝＊本傘キネ傘＊傘市傘傘零孝ネ零零傘傘傘傘孝零本本本本零 零傘傘傘本ｃ　ｐｌｏｔ　（ｐｘ、　ｐ７）　ｉｎｌｅｇｅ＋　ｎｕｍｂｅ＋　 ｐａｉｎｔｃｐ裏ｆｐｌｏｔ　　Ｘ）　ａ…マ ＣｐＴ　（ｐｌｏｔ　　ｘｉ　ａｒｒａｙｉｎｔｅｇｅｒ　ｐｘ（１）、　　ｐ ｙ（１）目＋ｔｅｇｅ＋　　ｎｐ ｃａｌｌ　ｍｏｖａｉ＋５（ｐｉ（１）、　ｐｙ（１））ｄｏｉ＝２．ｎｐ ｃａｌｌ　ｄｒｗａｂｓ（ｐｘ（ｉ）、　ａｙ（ｉｌ）ｅｎｄｄ。

ｅｔｕｒｎ ＮＤ Ｃ＊零本零＊＊＃キ＊＊零牢ネ＊ネ零＊本ネ＊本本本本＊本＊＊ｎ＊零零章ネ傘 本本ネ本ネ本傘＊傘本本＊傘本＊本本＊中本＊＊本ネ＊ネ＊{ すブルーチンｖｌ　　ｐｉｔ　　ａｂｓ　　ｃ　（ｖｔ、　ｎｖｌ、　　ｔｘｏ ｌｌ、　　１７ｏｆｆ）Ｃ＊ネ＊＊拳零を本傘傘傘＊＊傘傘傘本章＊＊＊傘零本 零＊傘牢ネ＊孝傘零ネ零傘＊市＊傘市ネ本傘＊＊孝零零＊ネネ＊ネ零零零零傘零 ネ零P＊ ｃ　ｐｌｏｔ　ａｂｓ　ｖａｌｕｅ　ｏｆ　ｃｏｍｐｌｅｘ　ｖｅｃｔｏｒ　ｒ ｔ　ｗｉｔｈ　（ｉｘｏｌｌ、　１ｙｏｌｌ）　ｏｌｌｓｅ■ ｃ　ｂｙ　ｕｓｉｎｇ　ｐｌｏｔｌＯ「ｏｕｌｉｎｅｓｃ　ｎｖｊ　−ｄｉｍｅ ｎｓｉｏｎ　ｏｆ　ｖｅｃｔｏｒ　ｔｏ　ｂｅ　ｐｌｏｔｔｅｄｃｏｍｐｌｕ　 ｙｌ　ｆｌ） ｉｎｔｅｇｅｒ　ｎｖｌ、　　１ｘｏｌｌ、　　ｉ７ｏ１１ｉｎｔｅｇｅ＋　　 ｉｘ、　　ｉ７ １ｘ　−１ｘｏｌｌ　＋　１ ｉｙ　　−１ｙｏｌｌ　　＋　１ｎｔ（ｃａｂｉ（ｖｔ（１）））ｃａｌｌ　ｍ ｏｖａｂｓ　　（ｉｘ、　１７）ｃａｌｌ　ｐｎｌａｂｓ　（ｉｒ、　ｉｙ）百 （ｎｖｌ、　ｇｅ、　２）　ｔｈｅｎｄｏ　ｉ　＝　２．　　ｎｖｌ ｉｘ　＝　１ｘｏｌｌ　＋　ｉ ｉｙ　−１７ｏ１１　＋　１ｎｌ（ｃａｂｉ（ｖｆ（ｉ）））ｃａｌｌ　ｄｒｗ ａｂｓ　　（ｉｘ、　１ｙｌｅｎｄｄ。

ｎｄｉｔ 「ｅｔｕｒｎ ｎｄ Ｃ傘傘ｔｔｏｍ零ネＩ零ネ零＊京＊傘零ネＩ零本傘零章章傘＊傘傘本＊傘ネ孝傘 孝ネネ傘章零＊＊＊本市＊零ネ零傘＊＊ネネサブルーチンｖｌ　　ｐＨｃ　（ｖ ｌ、　ｎｖｌ、　　ｉｘｏ［１，１ｙｏｌｔｌｃ　＊＊章本季＊＊零傘本本零章 零本本＊市零傘ｔ＊零零零＊ネネ＃傘＊零ネ本傘本傘ネ車＊本＊本章＊本零傘零 零宰＊傘零本本零＊ｃ　ｐｌｏｔ　ｃｏｍｐｌｅｘ　ｖｅｃｔｏｒ　ｖｆ　ｗｉ ｔｈ　（ｉｘｏｆｌ、　１ｙｏｌｌ）　ｏｌｌ＋ｅｌｃ　ｂｙ　ｕｓｉｎｇ　ｐ ｌｏｆｌＯｒｏｕｔｉｎｅＳＣｖｌ　　−ｖｅｃｔｏ［ ｃ　ｎｖｌ　−ｄｉｍｅｎｓｉｏｎ　ｏｆ　ｖｅｃｌｏ＋　ｔｏ　ｂｅｐｌｏｔ ｔｅｄｃｏｍｐｌｅｘ　ｖｊ（１） ｉｎｔｅｇｅ「　ｎｖｌ、　　　１ｘｏｆｌ、　　　１ｙｏｌ［ｉｎｔｅｇｅ「 ｉｔ、　　１ｙ ｉｘ　＝　１ｘｏｌｆ　＋　１ ｉｙ　　＝　　１ｙｏｌｌ　　＋　　ｉｎｔ（＋ｅａｌ（ｖｌｍｌ）ｐ＋ｉｎｔ ？、’　　ｉ、ｉｘ、１ｙ ｃａｌｌ　ｍｏｖａｂｓ　（ｉｘ、　１ｙ）ｃａｌｌ　ｐｎｊａｂａ　（ｉｔ、 　１ｙ）ｉｆ　　（ｎｖＬ、ｇｅ、２）　　ｔｈｅｎｄｏｉ＝２．ｎマ（ ｉｘ　＝　１ｘｏｉｌ　＋　１ ｉｙ＝　１ｙａｌｌ　＋　１ｎｌ（「ｅａｌ（ｖｌ（ｉ）））ｃａｌｌ　ｄ＋ｗ ａｂ＋　（ｉｘ、　　１ｙ）ｃ＋＋＋Ｉｄ。

ｅｎ＋１ｉｌ ｉｘ　＝　１ｘｏｔ［＋　１ ｉｌ　＝　　１ｙｏｌｌ　　＋　　ｉｎｔ　（ａｉｍａｇ（ｖｆ　（１）））ｃ ａｌｌ　ｍｏｗａｂｓ　（ｉｘ、　１７１ｃａｌｌ　ｐｎｌａｂｓ　（ｉｘ、　 １ｙ）ｉｆ　　（ｎｖｆ、ｇｅ、２１　　ｔｈｅｎｄｏ　ｉ　＝　２．　　ｎｖ ｌ ｉｘ　＝　　１ｘｏｌｌ　＋　ｉ ｉ７　＝　１ｙｏＨ＋ｉｎｌ（ａｉｍａｇ（ｖｌ（ｉ）））ｃａｌｌ　ｄｒｗａ ｂｓ　（ｉｘ、　　１ｙ）ｅｎｄｄ。

ｎｄｉｌ ｅｔｕｒｎ ｎｄ Ｃ幸＊傘市書オ傘＊掌本＊章＊幸＊孝本＊＊＊幸＊零零＊孝零＊＊孝＊本本零傘 ＊ネ傘＊孝傘傘零傘傘傘＊本傘零ネ傘傘孝傘＊傘ネサブルーチン＋ｃ＋ｎ　　ｒ ｅａｄ　（ｉｔ、ｉｙ、　　１ｘｏｌｌ、　　１ＹａｌｌＣ本＃＃零ｔｔ＄ｔＨ ｔ＊象Ｕ傘零零ネネ傘孝＊本＊ネ零零を京章傘ネネ零傘零零車傘ネ本零零ネ傘零 宰＊本傘孝零＊京傘傘零ｃ　ｒｅａｄ　５ｃｒｅｅｎ　ｃｏｏｒｄｉｎａｔｅ　 ｆ「ｏｍ　ｐｌｏｔ　ｏｎ　　ｔｈｅ　５ｃｒｅｅｎ　ｂ７　ｕｓｉｎｇ　ｐｌ ｏｌ撃n ＋ｏｕｔｉｎｅｓ （ｖｂｅｒｅ　（ｉｘｏｌｌ、　１ｙｏｌｌ　ｉｓ　５ｃｒｅｅｎ　ｐｌｏｔ　 Ｏ山ｅ（ｃ　ｉｘ、　　ｉｙ　−ｃｏｏ「ｄｉｎａｔｅ　＋ｅｌｕｔｎｅｄｉｎ ｔｅｇｅｒ　ｉｘ、　　ｉ７ ｉｎｔｅｇｅｒｉｘｏｌｌ、　　１ｙｏｌｔ２００　　ｃａｌｌ　ｓｃｕ＋ｓ＋ 　（ｉｃｈａ＋、　　ｉｘ、　　１Ｙ）ｃａｌｌ　ｍｏｖａｂｓ　（ｉｘｏｌｌ 、　７００）ｃａｌｌ　　ａｎｍｏｄｅ ｉｘ　＝　ｉｔ　−１ｘｏｌｌ ｉｙ　＝　ｉｙ　−１ｙｏｌ＋ Ｗｒ口ｅ　（６，＄）　　ｉｘ、　　１ｙｐｒｉｎｔ　ｔ、’　ｔｅａｄ　ａｎ ｏｌｈｅ＋　ｃｏｏｒｄｉｎａｔｅ、　　Ｉｌｏ　？’ｒｅａｄ　　（５，ネ） 　　　１ａｎｓｉ［（ｉａｎ＋、ｎｅ、０）　　ｇｏｌｏ　２００＋ｅｌｕ＋ｎ ｎｄ ｃ　Ｉ＃零零零傘掌を章車零＊ネ＃＊＊Ｉ零傘ｔ１１本＊零傘車＊中零零傘車ネ 傘＊＊零傘ネ傘本＊ｔｌ傘＊零零本寥零傘＊傘サブルーチン＋ｃ＋ｎ　　ｌｈｄ 　（ｔｈ、　　１ｘｏｌ［、１ｙｏｆｌ）Ｃ傘＊Ｉ零零＃掌＊を車＄孝中＊傘＊ ネ零京傘傘傘＊＊本章＊＊＊本ネ本本ネ本零宰ネ傘＊本零零傘本＊本本拳零本傘 本本傘本本本ｃ　ｆｉｎｄ　ｔｈｒｅｓｈｏｌｄ　ｌｏｏｍ　ｐｌｏｔ　ｏｎ　 ｔｈｅ　５ｃｔｅｅｎ　ｂｙ　ｕｓｉｎｇ　ｐｌｏｌｌＯ＋ｏｕｌｉｎｅ■ ｃ　ｗｈｅｒｅ　（ｉｘｏｌｌ、　１ｙｏｌｌ）　ｉｓ　＋ｃ＋ｃｅｎ　ｐｌｏ ｔ　ｏｌｌ＋ｅｌｃ　ｔｈ　−１ｈ＋ｅｓｈｏｌｄ ｉｎｔｅｇｅ「１ｘｏｆｌ、　　１ｙｏｌｌｉｎ＋ｅｇｅｒ　　ｉｘ、　　１ｊ ２００　　ｃａｌｌ　＋ｃｕ＋ｓ＋　（ｉｃｈａ＋、　　ｉｔ、　　１ｙ）ｃａ ｌｌ　　ｍｏｖａｂｓ（ｉｘｏｌｌ、　　）００）ｃａｌｌ　　ａｎｍｏｄｅ ｗｒｉｔｅ　（６，＄）　　１ｘ−ｉｘｏｌｌ、　　１ｙ−ｉｙｏｌｌｐｕｎｔ 　　章、’ｃｈａｎｇｅ　　ｌｉｔｅｉｈｏｌｄ、　　Ｉｌｏ　　？’ｔ　ｅ　 ａ　ｄ　　（５，章）　　１ａｎｓ百（ｉａｎａ、　ｎｅ、　０）　ｇｏｔｏ　 ２００ｔｈ　”　ｆｌｏａｔ（ｉｙ−ｉｙｏｌｆ）＋ｅｌｕ＋ｎ ＋ｎｄ ｃ　　＊＊＊＊本＊ネ零車零＊＊＊中＊＊零＊＊＃零零傘傘＊＊本零零＊＊＊＊ 掌本＊＊＊＊零本傘本＊傘零ネ本＊＊ネ＊＊＊市＊ネ本ネ＊Pネ零孝傘＊＊＊ サブルーチンｓｌ　　ｍａｌｌ　（＋ｆｍ、ｎ５１ｍ１．ｎ５１ｍ２．ｌｅｄｇ ｅ、ｎｌｅｄｇｅ、ｓｌ、ｎ５Ｌｎｓ目）Ｃ零＊＊傘傘＊＃本ネ＊＊＊＊Ｉ＊本 ＊傘零市章車本傘本本＊ネｔネ＊＊ネ本＊傘＊傘＊＊＊＊零ネ傘＊零＊傘ネ傘＊ ネ本＊零零＊孝掌零傘{本傘ネネ掌 ｃ　ｇｅｎｅｒａｔｅ　＋Ｉ　　ｍａｔｒｉｘ　ｌｏｏｍ　ｓｌ　ａｎｄ　ｅｄ ｇｅ　１ｏｃａｔｉｏｎｓｃ　ｎｓ［ｍｌ、　　ｎ５１ｍ２　（＋Ｉｉｍｅｎｓ ｉｏｎ　ｏｌ　ｓｌｍ）ｃ　　　ｎ５１ｍ１−　ｌｉｔ　ｄｉｍｅｎｓｉｏｎ　 ｏｆ　＋Ｉｍ、　　ｌｅｎｇｔｈ　ｏｆ　ｅａｃｈ　ｅｄｇｅ　ｉｎｔ。

ｃ　　　ｎ＋１ｍ２−２ｎｄ　ｄｉｍｅｎｓｉｏｎ　ｏｆ　ｓｌｍ、　ｎｏ、　 　ｏｆ　ｅｄｇｅｓｃ　ｌｅｄｇｅＱ　　（ｅｄｇｅ　１ｏｃａｔｉｏｎｓ）ｃ 　ｎｌｅｄｇｅ　（ｎ　　ｅｄｇｅｓ）ｃ　ｎｃｌしｎ　ｓ　　＋ｅｔ　（ｅｄ ｇｅ　１ｏｃａｔｉｏｎ　ｉｎ　ｓ［）ｃｏｍｐｌｅｘ　ｓｌｍ（１）、　　ａ ｌｌ）ｉｎｔｅｇｅ「ｎ５１ｍ１．　ｎ５１ｍ２．　ｌｅａｇｅ（１）、　ｎｌ ｅｄｇｅ、　ｎ＋１ｎｓ１ｍ２−ｎｌｅｄｇｅ ｄｏ　ｉ　＝　Ｉ、　ｎｌｅｄｇｅ ｎｆａｕ　＝　ｌｅｄｇｅ（１） 百（（ｎｌａｕ、　ｌｅ、　ｎｃ印ａｎｄ、　（ｎｓｌｍｌ、　ｌｅ、　（ｎｓ ｌ−ｎｓｌｌ＋ｎ１ａｕ）））　ｔｈｅｎｄｏ　ｉ　：１．　　ｎ５１ｍ１ ｓ　１ｍ　（ｊ＋　（ｉ−１）傘ｎ＋１ｍ１）　　＝　ｉｌｌ＋ｎ５ｌｌ−ｎｔ ａｕ）ｅｎｄｄ。

山ｅｉｌ　（（ｎｌａｕ、　ｌｅ、　ｎ１ｌｌ）、　ａｎｄ、　（ｎｉｌｍｌ、 　ｇｌ、　（ｎｓｌ−ｎｓｌｌ＋山ｕ））ｌ　ｔｈｅｎｄｏ　ｉ−１，（ｎｓｌ −ｎｉｌｌ＋ｎ＋ａｕｌ＋１ｍ（ｉ＋（ｉ−１）車ｎ＋１ｍ１）　＝ｉｆ（ｊ＋ ｎ５ｌｌ−ｎｔａｕｌｅｎｄｄ。

ｄｏ　Ｊ＝　（ｎｓｌ−ｎ＋ＩＩ＋ｎｔａｕ＋ｌ）、　ｎ＋１ｍ１ｓ　Ｉｎ　（ ｉ　＋　（ｉ−１）傘ｎ５１ｍ１）　　＝　　５ｌ（ｎｓｌ）ｅｎｄｄ。

ｅｌｓｅｉｌ　（（ｎｌａｕ、　ｇｌ、　ｎ５ｌｌ）、　ａｎｄ、　（ｎｓｌｍ ｌ、　ｌｅ、　（ｎｓｌ−ｎ＋ｌＩ＋ｎ１ａｕ）））　ｔｈ■■ ｄｏ　ｉ　＝　１．　（ｎｌａｕ−ｎｓｌｌ）ｓｌｍ（ｊ＋（ｉ−１）零ｎ５１ ｍ１）　　＝　　＋１）ｅｎｄｄ。

’ｄｏ　１−（ｎｌａｕ−ｎｓｌｌ＋ｌ）、　ｎ＋１ｍ１Ｓ師（ｉ＋（ｉ−１） ＄ｎ＋１ｍ１ｌ　：５ｌ（ｉ−ｎｌａｕ＋ｎ５ｌｌ）ｅｎｄｄ。

山ｅｉｌ　（（ｎｌａｕ、　ｇＬ　ｎ５ｆｌ）、　ａｎｄ、　（ｎｓｌｍｌ、　 ｇｔ、　（ｎ＋１−ｎｓｌｌ＋ｎ１ａｕ）））　ｔｈｅｎｄｏ　ｉ　＝ｌ、　　 （ｎｔａｕ−ｎｓｌｌ）ｓｌｍ（ｉ＋（ｉ−１）ｔｎｓｌｍｌ）　□　５ｏｌ） ｅｎ＋Ｉｄ。

ｄｏ　Ｊ＝　（ｎｔａｕ−ｎｃｌ＋Ｉ）、　（ｎｓｌ＋ｎｔａｕ−ｎｓｌｌ　） １１ｍ（ｉ＋（ｊ−１）ｔｎｓｌｍｌ）　　・５ｌ（ｉ−ｎｌａｕ＋ｎ百１）ｅ ｎｄｄ。

ｄｏ　ｊ＝　（ｎ＋Ｉ＋ｎ１ａｕ−ｎｓｌｌ＋Ｉ）、　　ｎｓｌｍｌｓｌｍ（ｉ Ｎｉ−１）ｔｎｓｌｍｌ）　＝ｓｌ（ｎｓｌ）ｅｎｄｄ。

ｎｄｉｌ ｅｎｄｄ。

「ｅｔｕｒｎ ｎｄ Ｃネ＊＃零＊車章電市本＊本＊本＊零ｔｏｎ零＊＊＊本＊市＊本零市本本＊本＊ ＊傘本ネ＊＊＊本＊零京本傘本本＊本ネ参零本本本＊傘＊＊■{本＊傘傘傘＊傘 零 サブルーチンｓｆ　　ｍａｔ　　（ｓｌｍ、　ｎ５１ｍ１．　ｎｃｔｍ２．　ｌ ｄｓｆｍ、　ｌｅｄｇｅ、　ｎｌｌｅ、ｓｌ。

ｃ　　　ｎｓｌ、　ｎ５ｌｌ） Ｃ＊………ネ零…………………傘傘……＊本……＊……本傘傘＊傘傘本本＃零＊ １本本零本Ｉ零ｃ　ｇｅｎｅｒａｔｅ　ｓｌ　　ｍａｔｒｉｘ　ｉｏｍｓｌ　ａ ｎｄ　ｅｄｇｅ　１ｏｃａｔｉｏｎｓｃ　＋１ｍ　（ｓ−「ｅｌ　　ｍａｔ）ｃ 　ｎ５１ｍ１．　ｎ１７ｍ２　（ｄｉｍｅｕｉｏｎ　ａｔ　ｓｔｍ））ｃ　　　 ｎｓｆｍＩ　−１ｓｌ　ｄｉｍｅｎｓＩｏｎ　ｏｆ　ｓｌｍ、　　ＩｅＢｈｔ　 ｏｆ　ｅａｃｈ　ｅｄｇｅ　ｉｎｔ。

ｃ　　　ｎｓｌ＋ｎ２−２ｎｄ　ｄｉｍｅｎｓｉｏｎ　ｏｆ　ｓｌｍ、　　ｎｏ 、　　ｏｆ　ｅｄｇｅｓｃ　ｌｄｔｌｍ　−ｌｅａｄｉｎｇ　ｄｉｍｅｎｓｉｏ ｎ　ｏｆｓｌｍ　ｍａｔ「ｉｘ　ｓｔｏＩａｇｅｃ　ｌｅｄｇｅＯ（ｅｄｇｅ　 １ｏｃａｔｉｏｎｓ）ｃ　ｎｌｅｄｇｅ　（−ｅｄｇｅｓ） ｃ　ｎ５ｌｌ　−ｎ　　ｓ　　ｔｅｌ　（ｅｄｇｅ　１ｏｃａｔｉｏｎ　ｉｎ　 ｓｌｌｃｏｍｐｌｅｘ　＋１ｍ（ｌｄａｌｍ、　ＩＣ＋１ｍｉｎｔｅｇｅｒｎｓ １ｍｌ、　ｎ５１ｍ２．　ｌｅｄｇｅ（１）　、　ｎｌｅｄｇｅ、　ｎ１ｌｎ＋ ＋ｍ２　＝　ｎｌｅｄｇｅ ｄｏ　ｉ　＝　Ｉ、ｎｌｅｄｇｅ ｎｌａｕ　＝　ｌｅｄｇｅ（ｉ） ｉｆ　（（ｎｌａａ、　Ｉｅ、　ｎ５ｌ１１．　ａｎｄ、　（ｎ＋ｆｍ１．　ｌ ｅ、　（ｎ百−ｎｓｌトｎ１ａｕＪ）ｌ　ｔｈｅｎｄｏ　ｉ　＝　ｌ、　　ｎｓ ｌｍｌ ｓｌｍ（ｉ、　ｉｌ　＝　５ｆ（ｉｆｎｇｌｌ−ｎｌａｕ）ｅｎｄｄ。

ｅｌｓｅｉｌ　（（ｎｌａｕ、ｌｅ、ｎｓＩ）、　ａｎｄ、　（ｎ＋１ｍｌ、　 ｇＬ　（ｎｓｌ−ｎｓｌｌ＋ｎｊａｕ）））　ｔｈｅｎｄｏ　ｊ　＝　Ｉ、　　 （ｎｓＩ−ｎｓｌｌ＋ｎｔａｕ）ｓｌｍ（ｉ、　ｉｌ　＝　ｓｌｌ＋ｎ５ｌｌ− ｎｔａｕ）ｅｎｄｄ。

ｄｏ　ｉ　−（ｎｓｌ−ｎｓｌｌ＋ｎ１ａｕ月）、　　ｎｓｌｍｌｓｌｍｌ、　 ｉｌ　　＝　ｓｌ　（ｎｓｌ）ｅｎｄｄ。

ｅｌｓｅｉｆ　　（（ｎｌａｕ、ｇｔ、ｎ５ｌｌ）、ａｎｄ、（ｎｉｌ畦　ｌｅ 、（ｎｉト１ｓｌｌ＋ｎ１ａｕ）））　　１ｈｅｎｄｏ　ｉ−１，（ｎｌａｕ− ｎ＋Ｉｌ）＋Ｉｍｆｉ、　ｉ）　＝　５ｏｌ ｅｎｄｄ。

ｄｏ　ｊ＝　（ｎｌａｕ−ｎｓｌＨｌ、　　ｎ５１ｍ［ｓｌｍ（ｊ、　ｉ）　＝ 　＋＋（ｊ−ｎｔａｕ＋ｎ５ｌｌ）ｅｎｄｄ。

ｅｌｓｅｉｆ　（（ｎｌａｕ、　ｇｔ、　ｎ１ｆ１１．　ａｎｄ、　（ｎｓｌ畦 ｇｔ、　（ｎｓｌ−ｎｓｌｌ＋ｎ１ｔｕｌ））　ｔｈｅｎｄｏ　ｉ　＝　１．　 　（ｎｔａｕ−ｎｓｌｌｌｉｌｍ（ｊ、　ｉ）　＝　＋＋（１） ｅｎｄｄ。

ｄｏ　ｉ　＝　（ｎｔａｕ−ｎ＋ＩＩ＋Ｉ）、　　（ｎｓｆ＋ｎｊａｕ−ｎｓｌ ｌ）ｓｆｍ（ｉ、　ｉｌ　＝　５ｆ（ｉ−ｎｌａｕ＋ｎ５ｌｌ）ｅｎｄｄ。

ｄａ　ｉ　＝　（ｎｓｌ−ｎｌａａ−ｎｓＬｌ＋１）、　　ｎ＋１ｍ１ｇｆｍＱ 、　ｉ）　−５ｌ（ｎｉｌ） ｅｎｄｄ。

ｎｄｉｌ ｅｎｄｄ。

＋ｅｌ旧１ ｎｄ ｃ　ｔ…………を京…章ネネ………………＊……傘…………傘サブルーチンｎｏ 　　ｄｃ　（ｘ、　ｌｄｘ、　ｎｘｌ、　ＩＩ！２）Ｃ…傘傘章……………傘… …ネ………傘…孝…零……ネ零…本ネｃ　ｅｌｉｍｉｎａｔｅ　ｄｏ　ｏｌｉｅ ｌ　ｉｎ　ｅａｃｈ　ｃｏｌｕｍｎ　ｏｆ　！ｃ　　ｘＱ　　−１ｎｐｕｔ　　 （ｎｒｌ、ｎｘ２１　　ｍａｔｒｉｘ　　會ｉ１ｔ＋　　ｌｅａｄｉｎｇ　　ｓ ｔｏｒａｇｅ　　ｄｉｍｅ獅唐奄盾氏@　Ｉｄｘ ｃ　　Ｉｄｒ　　−１ｅａｄｉＢ　　ｓｌｒａｇｃ　　ｄｉｍｅｎｓｉｏｎ　　 Ｏ＋　　１ｒ　　ｎｘｌ、　　ｎｘ２　−　　づ１ｍｔｎｓＩｏｎ　　ｏｌ　　 ｄａｔａ　　ｉｎ　　ｘｃｏｍｐｌｅｘ　ｘ（ｌｄｘ、　Ｉ） ｉｎｔｅｇｅＩｎｘｌ、　　ｎｘ２ ｃｏｍｐｌｅｘ　ｄｃ　　１ｐ ｄｃ　　　ｌｐ　　：　ｄｃ　　　　＋ｐ＋ｘ（ｊ、１）ｅｎｄｄ。

ｄａ　　　ｌｐ　　＝　　ｄｃ　　　　ｌｐ／ｆｌｏａｔ　（ｎｉｌ）ｄｏ　ｉ 　：１．　　ｎｘｌ ｘ（ｊ、　ｉ）　＝　ｘ（ｉ、　ｉ）　−ｄｃ　　ｌｐ　　　”ｅｎｄｄ。

ｅｎｄｄ。

＋ｅｔｕ＋ｎ ｎｄ ｃ　＊本章傘を本章＊＊孝＊零＃傘＊零ｔｌ零章零零＊＊ネ零傘零＊零孝＊＊＊ 傘本零＊＊＊零傘零孝孝傘孝ネ＊傘章零零傘傘＊本本＊＊零P本本章傘零ネ傘本 零＊傘 サブルーチンｖｌ　　ｐｌｊ　　ａｂｓ　　ｃｌ　（ｖｌ　ｎｖｌ、　　ｍ、１ ｘｏｌｌ、　　１ＹｏｌｌｌＣ＃傘車ネ＊＊零零零零零零零零章零＊零傘零傘章 Ｉ傘零本零零本零零＊＊零＊零零＊傘＊＊零零ネ零傘傘ネ＊＊本市零ネ＊零＊零 ネ＊＊零■Pネ零零零零零本零零零 ｃ　ｐｌｏｔ　ａｂ＋　ｖａｌｕｅ　ｏｌ　ｃｏｍｐｌｅｘ　ｖｅｃｔｏ＋　ｖ ｌ　ｗｉｔｈ　（ｉｘｏｌｌ、　１７ｏｆｆ）　ｏｌｌｓｅ■ ｃ　ｂｙ　ｕｓｉｎｇ　ｐｌｏｌｌＯｒｏｕｔｉｎｅｓｃ　ｎｖｌ　−ｄｉｍｅ ｎｓｉｏｎ　Ｑｌ　ｖｅｃｔｏ［ｔｏ　ｂｅ　ｐｌｏｔｔｅｄｃ　１ｖｔＱ　− １ｏｃａｌｉｏｎ　ｏｆ　ｖｌＱ　ｃｏｍｐｏｎｅｎｔｃｏｍｐｌｅｘ　ｖｌｃ Ｉ） ｉｎｔｅｇｅｒ　ｎｖｌ、　　１ｘｏＨ，１ｙｏｌｌ、　　ｌｖｔ（１）ｉｎｔ ｅｇｅｒ　　ｉｘ、　　ｉ７ ｉｔ−ｍ（ｉ！　　＋　１ｘａｌｌ ｉ７　＝　１Ｙａｌｌ ｃａｌｌ　ｍｏｖａｂｓ　（ｉｘ、　１７）ｃａｌｌ　ｐｎｌａｂｓ　（ｉｘ、 　ｉりｉｘ　＝　１ｖｌ（ｉｌ　＋　１ｘｏｌ＋ｉ７　＝　１７ｏｆｆ　＋　１ ｎｌ（ｙｌ（ｉｌｌｃｏｎｉｇ（ｙｌｆｉ）））Ｃ！ＩＩ　ｄ＋ｖａｂ＋　　（ ｉｘ、　ｉりｅｎｄｄ。

「ｅｔｕｒｎ Ｃ１章１０傘傘傘傘傘傘Ｉ傘傘傘傘傘を傘傘傘傘傘章傘傘傘ネ市ネ傘傘＊＊傘参 傘本傘＊零市孝孝零＊本零傘ネ本＄零ネネネ孝＊＊＊市零ネl傘零孝零傘傘零傘 零傘 サブルーチンｐｅａｋ　　ｓｅａ「ｃｈ　（ｐｋ、ｎｐｋ、ｐ　　ｓｅｐ、ｌｒ ｘｐｍ、ｎｌｒｌｐｍ、「！ｐｍ、＋ｏｘｐｍ、ｎ５ｌｌ）Ｃ＊孝零本本本＃零 掌電傘傘京傘傘傘零本章＃傘孝傘傘＊＊傘市孝＊ネ本傘書零ネ傘＊＄ネ＊傘傘傘 傘＊本傘ネ本ネ傘零掌＊本ネ＊零拳本ネl本零傘＄ネ本本ネ＊零孝 ｃ　ｓｅａ＋ｘｈ　ｐｅａｋ　ｉｎ　ａｂｓ（ｒｘｐｍＱ）　　ｆｏｒ　１ｏｃ ａｔｉｏｎｓ　１ｏｃａｔｅｄ　ｂ７　ＩｒｘｐｍＱｃ　ｖｈｅｎ　５ｅｐａ「 ａｔｉｏｎ　（ｌｒｘｐｍ（ｉｌ−１ｘｐｍ（ｉ−１）　＞＝（ｐ　　５ｅｐ） 。

ｃ　　　　５ｃｐｕａｌｅ　ｐｅｉｋ　５ｈｏｕｌｄ　ｂｅ　ｃｏｎｓｉｄｅ＋ ｃｄＣｐｋｏ　−ｐｅａ目ｏｃａｌｉｏｎ　１ｏｃａｔｅｄｃ　ｎｐｘ　−ｎｕ ｍｂｅ「ｏｆ　ｐｅａｋｓｃ　ｐ　　ｓｅｐ　−ｍｉｎ、　５ｅｐａ＋ａｌｉｏ ｎ　ｂｅｔｗｅｅｎ山山ｏ１　ｐｅａｋ　ｃｏｎｓｉｄｅｒａｔｉｏｎｃ　ｍｐ ｍＱ　−１ｏｃａｔｉｏｎ　ｒｘ　ｐｒｉｍｅ　　ｍｘ＋ｃｈｅｄ　ｗｈｅｒｅ 　１ｂｓ（＋ｘｐａ＋０）　＞　ｔｈｒｅｓｈｏｌ■ ｃ　ｎｌ＋ｘｐｍ　−ｎｕｍｂｅｒ　ｏｌ　１ｏｃａｔｉｏｎｓ　ｉｎ　ｌ＋ｘ ｐｍＯｃ　ｒｘｐｍＱ　−ｔ　　ｖａｅｃｌｏ＋　　ｐｒｉｍｅ　　ｍａｔｃｈ ｅｄｅ　ｎｒｘｐｍ　−ｄａｔａ　ｄｉｍｅｎｓｉｏｎ　ｏｆ　＋ｘｐｍｉｎｌ ｅｇｅ＋　ｐｋ（１）、　ｎｐｋ、　ｐ　　ｓｅｐ、　　ｌｒｘｐｍ（１）、　 ｎｌ＋ｘｐｍ、　ｎ＋ｘｐｍｃｎｍｐｌｅｘ　＋ｘｐｍｆｌ） ｉｎｔｅｇｅｒ　ｐｋ　　１ｐ ｐｋ　　ｊｐ　＝　ｍｐＩｌ（ｉ） ｄｏ　ｉ　＝２．　　ｎｌ＋ｘｐｍ ｉ１　（（ｉｘｐｍ（ｉ）山ｘｐｍ（ｉ−１））、ｇｅ、ｐ　５ｅｐｌ　ｔｈｅ ｎＩＩｐｋ　＝　ｎｐｋ　＋　１ ｐｋ（ｎｐｋｌ　＝　ｐｋ　　ｔｐ ｐｋ　　ｊｐ　＝　ｌｒｘｐｍ（ｉ） 山Ｃ目（ｃａｂｓ（＋ｘｐｍ（ｌｒｘｐｍ（ｉ）））、ｇｔ、ｃｈ（ｒｘｐＨ１ （ｐｋ　１ｐ）））　ｔｈｅｎｐｋ　　ｌｐ　：ｌｒｘｐｍ（ｉ） ｎｄｉｆ ｅｎｄ＋ｉ。

ｎｐｋ　＝　ｎｐｋ　＋　１ ｐｉ（ｎｐｋ）・ｐｋ　　ｌｐ ｍｎｓｍｅ　ｐｅｅｋ　ｌｏｃｇｌｉｏｎｓ　ｔｏ　ｔｈｅ　１ｏｃａｔｉｏｎ ｓ　ｉｎ　＋１０ｄｏ　ｉ　＝　Ｉ、　　ｎｐｋ ｐｋ（ｉ）　＝　ＰＫ（ｉｌ＋ｎ５ｌｌ　−Ｉｅｎｄｄ。

＋ｅ１口ｒｎ ｎｄ Ｃ零傘…零…傘＊傘掌傘傘＊…傘…傘…………………傘傘ネネ傘車ネ……傘ネ… ネ＄ネ…掌サブルーチンｌｓｌ　　ｎｏ　　ｄｃ　ｌａ　　ＩＩ、　ｎａ　　Ｉ ｓ、　　＋ｆａ　　ｈｓｌａ　ｎ５１ｍ１．　ｎ５ｌｎ２゜＆　　　　　　　　 　　　　　　　　　　　　　　　　　Ｉｌ、　　ｎｒｘｌ、　　　ｃｏｎｄ、　 　　ｅｒｒｏｒ）Ｃ……孝傘傘零…ネネ幸…傘…………傘傘…傘……零……本… 零＊零章零………零ｃ　　ｆｉｎｄ　　１ｅａｓｔ　　ｓｑ■ｅ　　５ｏｌｕｔ ｉｏｎ　　ａ　　　Ｉｓ　　０１　　ｔｘ　　＝　　ｓｌｍ　　ｔ　　ａｃ　ａ 　　Ｉｓ　　−１ｅａｓｔ　５ｑｕｏｅ　５ｏｌｕｔｉｏｎｃ　ｎｍ　　Ｉｓ　 −ｄｉｍｅｎｓｉｏｎ　ｏｆ　５ｏｌｕｔｉｏｎ　ｉｎ　ａ　　Ｉｓ　ｗｅｃｌ ｏｒｃ　ｓｌｍ　　　−ｒｅｆｅｒｅｎｃｅ　ｓｉｇｎａｌ　ｍｇＨｉｘｃ　ｌ ｄｇｌａ＋　　−ｌｅｒｄｉｎｇ　ｄｉｍｅｎｓｉｏｎ　ｏｆ　ｓｔｏ「ａｇｅ ｃ　　ｎｓｌｍＩ　　　　ｎ５１ｍ２　−　１ｓｌ　　ｇｎｄ　　２ｎｄ　　ｄ ｉｍｅｎｓｉｏｎ　　ｏｌ　　ｄｔｌｉ　　ｉｎ　　ｓｌｍｃ　ｒｘ　　　−ｏ ｂ＠ｅｒｖｅｄ　ｄａｌｉｃ　ｎｒｘｌ　−ｓｌａｎｔｉｎｇ　ｐｏｓｉｔｉｏ ｎ　ｏｆ　ｄａｌｘ　ｉｎ　ｒｘ　Ｉｏ＋　ｔｈｅ　ｌｅｇｓｌ　１ＩＩｏｉｒ ｅ　ｆ奄■ ｅ　ｃｏｎｄ　　−ｃｏｎｄＨｉｏｎ　ｎｕｍｂｅｒ　ｌｏｏｍ　ｃｓｖｄｃ　 ｒｏｕｌｉｎｅ。

ｃ　　　　　　ｉｌ　ｃｏｎｄ　＝　０．　　（ｉｎｆｏ　＝／　０）、　　ｉ ｌｌ　ｃｏｎｄｉｔｉｏｎｅｄ。

ｃ　ｍｏｒ　−ｎｏｒｅ＋　５ｑｕａｒｅ　ｏｌ　ｔｈｅ　ｅｕｏｒ　ｙｅｃｌ ｏｒ　ｏｆ　１ｅａｓｔ　５ｑｏｓｒｅ　１ｆｔｃ　Ｉ　　ｅｌｉｍｉｎａｔｅ 　ｄｃ　ｉｎ　ｓｌｍ　ａｎｄ　＋ｘｃ２ｓｌａ＋＝ｕ＊ｓｖ＊ｖ’ ｃ３　　　ａ　　　ｌ５＝ｖ＊５ｙ（−１）　　零ｕ’＄＋ｘｌｐｃ　　４　　 　　ｅｒｒｏｒ　　＝　　ｎｏｏｎ（（Ｉ　　−ＵｌネＤＩ’）　　＊　　　ｔ ｘ　　　ｊｐ）ｃｏｍｐｌｅｘａ　　ｌ５（１）、　ｓｌｍ（ｌｄ＋Ｉｍ、Ｉ） 、　　ｒｘ（１）ｉｎｌｅｇｃｒ　ｎａ　　Ｉｓ、　　ｌｄｓｌｍ、　　ｎ５１ ｍ１．ｎ５１ｍ２．　　ｎｎｌ「ｅａｌ　ｃｏｎｄ、　　ｅｒｒｏｔ ｃ　ｎｏｌｅ：　ｎｓｆｍ２　＜　５０．　　ｎ５１ｍ１　＜　１００ｃｏｎ＋ 山１　ｙ　　１ｐ（５０，５１１）、　ｗｏ「ｋ（９１０１，５ｖ（１００）　 、ｅ（］θ０）、　ｒｘ　　ｔｐ　（９１０，Ｉ）ｉｎｔｅｇｅｒ　ｌｄｖ　　 ｌｐ、　　ｊｏｂ、　　ｉｎｔ。

ｃｏｍｐｌｃｘ　ｃｆｐ ｌｄｖ　　ｌｐ　＝５０ ｄｏ　ｉ　＝　１．　ｕｆｍｌ ＩＩ　　１ｐ（ｉ、Ｉ）　＝＋ｘ（ｉ＋ｎ＋ｘｌ−ｌ）ｃｎｄｄ。

ｃａｌｌ　ｎｏ　　ｄｃ　（ｕ　　Ｉｐ、１０（１，＋＋ｓｆｍ１．ｌ１ｃａｌ ｌ　ｃｓｙｄｃ　（ｓｌｍ、　Ｉｄｓｌｍ、　ｎ＋１ｍｌ、　ｎ５１ｍ２、ｓｖ 、　ｅ、　＋Ｉｍ、ｌｄｉ１ｍ。

＆　　　　　　　　　　　　ｖ　　　　ｌｐ、　　Ｉｄｖ　　　　ｌｐ、　　ｗ ｏ「に、　ｊｏｂ、　　１ｎｆｏｌ百（ｉｎｌｏ、　ｍｅ、　Ｏ）　ｔｈｅｎｐ ｒｉｎｔ傘、’１ｌｌｃｏｎｄ口１ｏｎｅｄｓｉｎ’ｃｏｎｄ　＝　Ｏ １ｓｅ ｃｏｎｄ　＝　ｃａｂｓ　（ｓｖ　（Ｉｌｌ／ｃａｂｓ　（ＫＶ　（ｎｓ１ｍ２ １１ｎｄｉｌ ｃ　ｎｏｔｅ：　ｗｈｅｎ　１ｎｔｏ、　ｎｅ、　０．　　ｔｈｅ　ｍａｉｎ　 ｐ「ｏｇｒａｍ　Ｉｈｏｕｌｄ　ｂｅ　１ｎｆｏ「ｍｅｄ。

ｄｏ　！　：１．　ｎ＋ｌ＋ｎ２ ｖｏｒｋｌ）　＝　０゜ ｄｏｋ＝１．ｎ百ｍ１ ｗｏ＋ｋ（ｉ）　：ｗｏ＋ｋ（ｉ）　＋　ｃｏｎｉｇ（ｓｌｍ（ｋ、　ｉ））＄ ＋ｘ　　１ｐ（ｋ、　１）ｅｎｄｄ。

ｅｎｄｄ。

ｄｏ　ｉ　・ｌ、　　ｎ＋１ｍ２ ａ　　ｌ５（ｉ）＝ａ　　ｌ５（１＋ｖ　　ｔｐ（ｉ、ｊｌ＊ｗｏ＋ｋ（ｉ）／ ５ｙ（ｉ）ｅｎｄｄ。

ｅｎｄｄ。

ｃ　ｃａｌｃｕｌａｔｅ　ｎｏ「ｍ　＋ｑｕａ＋ｅ　ｏｆ　ｅｔ＋ｏｒｄｏ　ｉ 　＝　１．　　ｎｓ１ｍ２ ｗｏ＋ｋ（ｉ）　＝　Ｏ ｄｏ　ｉ　＝　Ｉ、　　ｎｓ１ｍ１ ｗｏ＋ｋｉｉ）　＝　ｗｏ＋ｋｉｉ）　＋　ｃｏｎｉｇ（ｓｌｍ（ｉ、　り）＄ ＋ｘ　　１ｐ（ｉ、　１）ｅｎｄｄ。

ｅｎｄｄ。

ｄｏ　ｉ　；１．　　ｎｓｆｍｌ ｃｐｌ　＝　Ｑ ｄｏ　ｉ　＝１．　’ｎ５１ｍ２ ｃｌｐ　＝　ｃｔｐ　＋　＋ｆｍ（ｉ、　ｉ）傘ｗａｔｋｍｅｎｄｄ。

ｃｌｐ　＝　ｒｘ　　１ｐ（ｉ÷ｌ）　−ｃｌｐｅ＋ｔｏｒ＝　ｅ＋＋ｏ＋　＋ 　ｃａｂｓ（ｃｆｐ孝ｃｏｎｉｇ（ｃｔｐｌ）ｅｎｄｄ。

ｒｅｔｕ「ｎ ｎｄ ｃ　　ｔｔｔｔ吹電孝す傘孝孝孝キ零傘傘ネネネ車車車拳傘ネ事ネネ傘ネ車車零 京ｔ１１零寥参掌＊孝傘零傘零零傘牟傘孝＊＊零本零零本本■■■鮪P＊車ネ サブルーチンｖｌ　　ｐＨ２（ｖｌ、　ｖ２．　ｎｖ、　　ｉｘｌ、　　ｉＹｌ 、　　ｉｔ２．　１ｄｙ）ｃ　　＄Ｈ本＃本本零市事掌本本本本専零本本傘本本 本本卑キ＊本＊本本＊キ本孝＊本＊を京市＊＊零零零零零孝零＊零ネネ傘章幸零 傘ネ拳F零零零傘孝傘傘孝 ｃ　ｐｌｏｔ　２　ｖｅｃｌｏｔｓ　ｕｓｉｎｇ　ｐｌｏｌｌｆｌ　ｒｏｕｔｉ ｎｅｓｃ　ｖｌＯ−「ｅａｌ　ｖｅｃｔｏｒ　１ｃ　ｖ２Ｑ　−ｒｅａｌ　ｖｅ ｃｌｏｒ　２ｃ　ｎｖ　−ｎｕｍｂｅｒｏｆ　ｅｌｅｍｅｎｔｓ　ｔｏ　ｂｅ　 ｐｉＯ口ｅｄ　ｉｎ　ｅａｃｈ　ｖｅｃｉｏｔｃ　ｉｘｌ　−ｘ−ａｘｉｓ　ｏ ｒｉｇｉｎｃ　ｉｙｌ　−ｙ−ｕｉｓ　ｏｒｉｇｉｎ　ｌｏｔ　ｙｅｃｌｏｒ　 ｙｌ　Ｏｃ　ｉｔ２−　ｙ−ａｘｉｓ　ｏｒｉｇｉｎ　ｌｏｔ　ｖｅｃｔｏｒ　 ｖ２０ｃ　ｉｄｙ　−ｍａｔ　ａｍｐ　ｍａｐｐｉｎｇ　ｏｎ　ｙ　ａｘｉｓ　 ｆｒｏｍ　ｅｉｌｈｅ＋　ｖｅｃｉｏｔｃ ｒｅａｌ　ｙｌｆｌ）、　　ｖ２ｍ ｉｎｔｅｇｅｒ　ｎｖ、　　ｉｘｌ、　　ｉｙｌ、　　ｉｔ２．　１ｄｙｄｏ　 ｉ　＝　２．　９１０ 百（ｖｌ（ｉ）、ｇｌ、ａｍｘ　ｔ）　ｔｈｅｎａｍｘ　　ｒ　＝　ｖｌ　（ｉ ｌ ｅｌＳｅｉｌ　（ｖｌｆｉ）、１１．ａｍｎ　　ｉ　ｔｈｅｎａｍｎ　　ｔ　＝ 　ｖｌ　（ｉ） ｎｄｉｌ ｉｆ　（ｖ２（ｉ）、ｇｌ、ａｍｘ　　ｉ）　ｔｈｅｎａｍｘ　　　ｉ　＝　ｖ ２（ｉｌ ｅｌｓｅｉｌ　（ｖ２（ｉｌ、Ｉｌ、ａｍｎ　　ｉ）　ｔｈｅｎａｍｎ　　ｉ　 ＝　ｖＨｉ） ｎｄｉｌ ｅｎｄｄ。

ａ６百−１＝　　ａｍＸ　　　　Ｉ−ａｍｎ　　　　Ｉａｄｉｔ　　ｉ　＝　ａ ｍｘ　　ｉ−ａｍｎ　　１ａｄｉｔ　＝　ａｍａｘｌ　（ａｄｉｔ　　ｔ、　ａ ｄｉｔ　　１）ｉｔ　＝　ｉｘｌ ｉｙ　　＝　　ｉｙｌ　　＋　　１ｎｌ（ｉｄｙ傘（ｖｌｌ）−ａｍｎ　　　　 ＋）／ａｄｉｔ）Ｃ！ＩＩ　ｍｏｖａｂｓ（ｉｘ、　ｉりｄｏ　ｉ　＝２．　９ １０ １ｘ　＝　ｉ　−１＋　１ｘｌ ｉ７　　＝　　ｉ７１　　＋　　１ｎｌ（ｉｄｙｔ（７１（ｉ）−ａｖ＋　　　 ＋）／ａｄｉｌ）ｃａｌｌ　ｄ＋ｖａｂｓ（ｉｔ、　１７）ｅｎｄｄ。

ｉｔ　＝　ｌＩ］ １７＝ｉ７２＋１ｎｌ（ｉｄｙ傘（ｖ２（Ｉ）−ａｍｎ　　　　＋）／ｘｄ百） ｃａｌｌ　ｍｏｖａｂｓ　（ｉｔ、　１７）ｄｏ　ｉ　＝２．　９１０ ｉｔ＝ｉ−１＋ｉ夏１ ｉｙ＝ｉｙ２＋ｉｎｔ（ｉｄｙｌ（ｖ２（ｉ）−ａｍｎ　　　＋）／ａｄｉｔ） ｃａｌｌ　ｄ＋ｗｘｂｓ（ｉｒ、　１７）ｅｎｄｄ。

「ｅｔｕ「ｎ ｎｄ Ｃ＃傘ネＩ＊Ｉ零市市傘傘傘傘傘傘傘ネ傘傘傘傘傘傘＄＃参零零傘零零傘傘ネ傘 ＄傘傘傘孝ネ傘孝＊ネ市零孝＄孝ネ傘傘傘傘零ネネ傘ネ傘傘P傘ネネネ＊零傘 すブルーチンｖｌ　　ｐＨｃａｂｓ　（ｖｌ、　ｎｖ、　　ｉｘｌ、　　ｉ７１ ．　１ｄｒｌＣ＊傘＃を章傘ネ零傘傘キ＊＊本傘ネ＊ネ傘＃零ネ零傘＊＊傘＊ネ 傘零傘傘＊零零京章ネ傘傘ネ＊傘傘本本車ネ本傘ネ市ネ傘零毒ネ＊傘＊ネ■Q傘 車傘本ネ傘 ｃ　　ｐｌｏｔ　　ｍＢｎＨｕｄｅ　　ｏｌ　　ａ　　ｃｏｍｐｌｅｘ　　ｖｅ ｃｔｏｒ　　ｕｓｉｎｇ　　ｐｌｏｌｌＯ＋ｏｏｆｉｎｅｓｃ　　ｖｌ　Ｑ　　 −ｃｏｍｐｌｅｘ　　ｖｅｃｔｏ「　１ｃ　　ｎｖ　　−ｎｕｍｂｅｒ　　ｏｌ 　　ｅｌｃｉ＋ｅｎｌｓ　　ｔｏ　　ｐｌｏｔｔｅｄ　　ｉｎ　　ｅａｃｈ　　 ｖｅｃｔｏｒｃ　　ｉｘｌ　　−ｘ−ａｘｉｓ　　０ｒｉｇｉｎｃ　　ｉ７１　 −　７−ａｘｉｓ　　ＯＩｉｇｉｎ　　ｆｏ「　ｖｅｃｔｏｒ　　ｖｌ。

ｃ　１ｄｙ−ｍａｘａｍｐ　ｍａｐｐｉｎｇ　ｏｎ　ｙ　ａｘｉｓｃｏｍｐｌｅ ｘ　　ｖｌ　（１） ｉｎｔｅｇｅｒ　　ｎｖ、　　　ｉｘｌ、　　　ｉ７１．　　　ｉｄｙａｍｘ　 　　　ｔ　　＝　　ｃａｂｓ　（ｙｌ　（１））ａｍｎ　　ｒ　＝　ｃａｂｓ　 （ｖｌ　（Ｉｔ）ｄｌｌ　　ｉ　　−２，９１Ｑ ■（ｃａｂｓ（ｖｌ（ｉ））、ｇｌ、ａｍｘ　Ｉ）　ｔｈｅｎ１＋１１１　１　 ＝　ｃａｂｓ　（ｙｌ　（ｉ））ｅｌｓｅｉｌ　（ｃａｂｓ（ｗｌｍ）、ｌＬａ ｍｎ−「）ｔｈｅ＋＋ａｍｎ　　　　＋＝ｃｘｂｓ（ｖｌ（ｉｌ）ｎｄｉｌ ｅｎｄｄ。

ａｄｉｔ　＝　ａｍｘ　　＋−ｘｍｎ　　＋ｉｘ　＝　１ｘｌ ｉ７　＝　ｉＹｌ　＋　１ｎｔ（ｉｄ７（＋ｃＩｂｓ（ｖｌ（１））−ａｍｎ　 　＋）／ｘｄｉりＣ１１ｌ　ｍｏｙｘｂｓ（ｉｘ、　１７）ｄｏ　ｉ　＝　２． 　９１０ ｉｘ　＝　ｉ　＋　ｉｘｌ　−１ ｉ７　＝　ｉ７１　＋　１ｎｌ（ｉｄｙｔｃａｂｓ（ｙｌ（ｉｌ）−ａｍｎ　　 ＋）／ｘｄｉｌｌｃｓｌｌ　　ｄ＋ｗａｂｓ（ｉｔ、１７）ｅｎｄｄ。

＋ｅｌｕ＋ｎ ｎｄ Ｃ＃ネ車ネ傘零Ｉネ傘＊傘傘傘傘ネ傘傘＊ネネネネネネネ零零零本＊章ネ＊傘＃ ＃傘傘傘ネネネ傘ネ孝傘孝＊参＄ネネ傘＊ネ傘傘ネ傘牟傘ネl零零ネネ零傘傘 すブル−チンｖｔ　　ｐＨ−ｃａｂａｌ　（ＴＩ、　ｎｖ、　　ｉｘｌ、　　ｉ ｄｘ、　　ｉ７１．　１ｄｙ）Ｃ寥ネ傘傘ネ傘＊ネ傘＃孝傘傘ネ零零Ｉｔ＊孝ネ 傘＊ネ本傘＊零傘＊孝＊零傘ネ傘＃本本零傘零章傘＊ネ零ネ傘零＄傘＊傘＄ネネ 零本零零傘P掌ネ＊ネ本本ネ ｃ　ｐｌｏｌ　ｍａｇｎｉｔｕｄｅ　ｏｆ　ａ　ｃｏｍｐｌｅｘ　ｖｅｃｔｏｒ 　ｕｓｉｎｇ　ｐｌｏｌｌＱ　ｒｏｕｔｉｎｅｓｃ　ｖｌＱ　−ｃｏｍｐｌｅｘ 　ｖｅｃｔｏｒ　１ｃ　ｎｖ　−ｎｕｍｂｅｒ　ｏｆ　ｅｌｅｍｅｎｌ＋　ｔｏ 　ｂｃ　ｐｌｏｔｔｅｄ　ｉｎ　ｅａｃｈ　ｖｅｃｔｏｒｃ　ｉｘｌ　−Ｉ　− ａｔｉｓ　ｏ「１ｇ１ｎｃ　ｉｄｘ　−５ｔｅｐ　ｏｎ　ｘ−ｈｉｓｃ　ｉＹｌ 　−Ｆ　−ａｘｉｓ　ｏｒｉｇｉｎ　ｌｏｔ　ｖｅｃｔｏｒｖｌＯＣｉｄ７−１ １１１１　ｘｍｐ　ｍａｐｐｉｎｇ　ｏｎ　７　ａｘｉｓｃｏｍｐｌｅｘマ１（ １） ｉｎｔｅｇｅｒ　ａｙ、　　ｉｘｌ、　　ｉ７１．　　ｉｄ７ａｍｘ　　ｒ　＝ 　ｃａｂｓ　（ｖｌ　（１））ｉｍｎ　　ｔ　＝　ｃａｂｓ　（ｖｌ　（１）１ ｄｏ　ｉ　＝２．　９１１１ ｉｆ　（ｃａｂｓ（ｖｌ（ｉ））、ｇｌ、ａｍｘ　　＋）　ｔｈｅｎａｍｘ　　 ｔ　＝ｃａｂｓ　（ｙｌ　（ｉ））ｅｌｓｅ目（ｃｘｂｓ（ｖｌ（ｉｌ）、Ｈ， ａｍ　　ｒ）ｔｈｅｎａｍｎ　　ｒ　：ｃａｂｓ　（ｖｌ　（ｉ））ｎｄｉｌ ｅｎｄｄ。

ｉｙ　　＝　　ｉ７１　　＋　　１ｎｌ（ｉｄｙ？ｃａｂｓｆｖ団１）−ａｍｎ 　　　＋）／ａｄｉｔ）ｃａｌｌ　ｍｏｖａｂｓ（ｉｘ、　１ｙ）ｄｏ　ｉ　＝ ２．　９１０ ｉｘ　＝ｉｘｌ　＋　（ｉ−１）＄１ｄｘｉ７　＝　ｉｙｌ　＋　ｉｎｌ（ｉｄ ｙｔｃａｂｓ（ｖｌ（ｉ））−ａｍｎ　　＋）／ａｄｉｔ）ｃａｌｌ　ｄｔｗａ ｂ＋　（ｉｘ、　１ｙ）ｅｎｄｄ。

「ｅｔｕ「ｎ ｎｄ ｃＨネネ＊零市ネ＊傘＊＊＃市章＊傘傘傘本＊ネ傘＊ネ零傘傘ネ孝傘孝＊零傘市 傘傘＊本＊傘傘傘＊ネ零零零零本本本本本傘ネ章零零零本拳■l零ネ零零零 サすルーチン＋ｘｐ　　ｃｏａｌ　　ｓｌｐ　（＋ｘｐｍ、　ｎｒｘｐｍ、　　 ＋ｘｐ、　ｎ＋ｘｐ、　　＋Ｉｐ、　ｎ５ｌｐ）Ｃ傘傘傘傘傘傘＊傘傘傘傘傘零 零傘傘＊本傘傘傘傘掌傘傘傘＊＃＊電を傘ネ＊＊傘傘傘傘宇傘掌零ネ傘＊ネ＊傘 零傘傘傘傘＊ネ孝零本零零零■棊■■Q本本本 ｃ　ｔｘｐ　　ｃｏａｌ　　ｓｌｐ　ｔｏ　ｇｅｎｅ「ａｔｅ　＋ｘｐｍ　（ｒ ｅｃｅｉｖｅｄ　　Ｉ　　ｐｒｉｍｅ　　ｃｏｒｒｅｌａｆ■р■ ｃ　＋ｘｐｍ　（「ｅｃｅｉｖｅｄ　　Ｘ　　ｐｒｉｍｅ　　ｍａｔｃｈｅｄ） ｃ　ｎｒｘｐｍ　（ｎ　　ｒｅｃｅｉｖｅｄ　　Ｘ　　ｐ「ｉｍｅ　　ｍａｔｃ ｈｅｄ）ｃ　ｔｉｐ　（ｒｅｃｅｉｖｅｄ　　Ｉ　　ｐｒｉｒＩｌｅ）ｃｎ＋ｘ ｐ　（ｎ　　ｒｅｃｅｉｖｅｄ　　ｘ　　ｐｒｉｍｅ）ｃ　ｓｌｐ　（ｓ　＋ｅ ｌ　　ｐ＋ｉｍｅｌ　　　（ｔｏ　ｂｅ　ｃｏｎｊｕｇａｔｅｄ　ｗｈｅｎ　ｃ ｏｕｅｌａｔｉｎｇ）ｃ　ｎ１ｌｐ　（ｎ　　＋ｅｌ　　ｐｒｉｍｅ）ｃｏｍｐ ｌｅｘ　ｎｐｍ（１）、　　ｔｉｐ（１）、　　１ｌｐ（１）ｉｎｔｅｇｅ「ｎ ｒｘｐｍ、　　ｎ＋ｘｐ、　　ｎ＋ｌｐｎ＋ｘｐｍ　＝　ｎ＋ｘｐ　−ｎ５ｌｐ 　　＋　１ｄｏ　ｉ　＝　１．　　ｎｏｐｍ Ｔｘｐｍ（ｉ）・０゜ ｄｏ　ｊ＝　Ｉ、　　ｎ５ｌｐ ＋ｘｐｍ（ｉ）　＝　ｎｐｍ（ｉ）　＋　ｔｉｐ（ｉ＋ｉ−１）ｔｃｏｎｉｇ（ ｓｌｐｌ））ｅｎｄｄ。

ｅｎｄｄ。

ｅｔｕｒｎ ｎｄ ｃ　　　　ｆｏ「’　　　　　　　　　　４−２８−８６ｃｔ傘零本零傘＊傘＄ ＊＊＊零零孝本ネ孝傘傘傘本ネ本Ｉ傘傘傘＊傘本傘本本本傘＊本ネ＊掌＊＊零本 傘傘掌＊ネ零傘本本ネ＊傘傘傘傘サブルーチンｕｐｄｂ＋（ｘ、　ｓｂ、　ｋｍ ｘ）ＣＩ零零市零中傘傘＊＊＊＊＊傘＊＊傘拳を傘傘傘ネ＊零傘＊零傘章傘本ネ 本零零傘＊本傘傘零傘本本本傘零本零零傘傘傘＊傘零零＊＊ｃｏｍｐｌｅｘ　Ｉ ｕ（１）、　　ｂｙ（１）ｉｎｔｅｇｅｒ口（］）、　ｋｋｘ、　ｋｙ（１）、 　ｋｋｙｃｏｍｐｌｅｘ　ｔｐ （ｐ：ｘ 百（ｋｋｙ、　ｇｅ、　Ｉ）　ｔｈｅｎｄＯｊ・Ｉ、　　ｋｋｙ ｉｐ　＝　ｌｐ　−ｂｙ（ｉ）＊５ｂｆｋｙ（ｉ））ｅｎｄｄ。

ｅ口ｄｉｆ 百　（ｋｘ　ｆｌｌ、　ｅｑ、　０）　　ｔｈｅｎｙ　　：　ｈｘ（１）　　市 　（ｐ １ｓｅ ｙ　＝ｈｘ（１）　電＋ｂ（ｋｇ（Ｉｌｌｎｄｉｌ 百ｆｋｋｔ　ｇｌ、　ｌ）　ｔｈｅｎ ｄｏ　ｉ　＝　２．　　ｋｋｘ ７　＝　Ｆ　＋　ｈｘ（ｉ）＋５ｂｆｋｘ（ｉ））ｅｎｄｄ。

ｅｎｄｄ ｃａｌｌ　ｕｐｄｂｌ（Ｉｐ、　　ｓｂ、　　ｍａｘ（ｋｘｆｋｋｘ　）、　　 ｋｙ（ｋｔｒ））１ｅｔｕｒｎ ｎｄ ｃ　＃＊本＃傘＃ネ傘傘傘中＃＊＃＄零傘傘＊＄傘零＊零傘傘＊孝＊＊市傘傘＊ ＊傘傘傘零傘傘＊ネ傘＊零＊＊零傘＊孝＄傘零零傘孝零傘零P傘＊孝零零＄ サブルーチンｐｋ　　ａ　−ｈｘｙ　（ｔｕ　ｋｘ。ｋｋｘ、　ｈ７．に７．ｋ ｋ７．　ｐｋ、　ｌ　　Ｉｓ、ｎｐｋ）ｃＨ孝ネ孝ネ傘傘＄＄Ｈ＄傘傘＃＃Ｉ＊ 零傘＄孝傘本＊＊ネ孝孝ネ傘ネ＊ネ孝＊傘傘＊＊＊傘傘ネ孝零拳＊零傘ネ孝ネ＄ 本本＊＊＊孝参傘本l＊傘ネ ｃ　ｃｘｌｃｏｌａ＋ｅ　ｄｉｒｅｃｌ　１ｎｔｅｎｓｅ　ｄｉｇｉｌｘｌ　ｔ ｉｌｌｅｒ　ｈｘＱ、　　ｈ７０ｃ　　ｌｏｏｍ　ｐｋＱ　ａｎｄ　ａ　　Ｉ＠ Ｏｄｉｒｅｃｔｌｙｃ　ｐｋＯ−ｐｅａｋ　１ｏｃａｔｉｏｎｓ　ｉｎ　ｔｅｒ ｍｓ　ｏｆ　ｐｏｓｉｌｏｎｓ　ｉｎ　ＩＩ　　ｙｓＱｃ　　　　　　（１＋ａ ｎｓｌ＋ｏｍｅｄ　ｌｏｏｍ　ａｂｓ（＋ｘｐｍＯ）　ｐｅｘｋｓ　ｂａｃｋ　 ｔｏ　ｒｘ　　ｗｓＯ）ｃ　ａ　　ｌｓＱ　−１ｅａｓｔ−ｓｑｕａｒｅ−１ｉ ｔ　５ｏｌｏ口ｏｎｓ　ｕｓｉｎｇ　ｖｉｎｄｏｖｅｄ　ＩＩ　　ｙｓＱｃ　　 　　　　ａｎｄ　ｘｓｓｕｍｉｒｌｇｅｄｇｅ　１ｏｃａｔｉｏｎｓ　ｐｋＱｃ 　ｎｐｋ　−ｎｏ、　ｏｌ　ｐｋＱ ｃ　　−−−ｏｎ　　ｒｅｔｕｒｎ　　−−−−ｃ　ｈｘＱ　−ｎｕｍｅｒａｔ ｏｒｓ　ｃｏｅｌｌｉｃｉｅｎｌｓｃ　ｋｘＱ　−ｄｅｌａ７　ｏｆ　ｈｘＱｃ ｋローｎｏ、　ｏｆ　ｃｏｅｌｌｉｃｉｅｎｌ＋　ｉｎ　ｈｘＱｃ　ｈ７Ｑ　− ｄｅｎｏｍｅｎａｌｏ＋　ｃｏｅｆｆｉｃｉｅｎｔｓｃ　ｋ７Ｑ　−ｄｅｌＢ　 ｏｌ　ｈ７Ｑｃ　ｋｋ７−　ｎｏ、　　ｏｌ　ｃｏｅｌｌｉｃｉｅｎｊｓ　ｉｎ 　ｈｙＯｃｏｍｐｌｅｘ　ｈｘ（Ｉ）、　ｈｙ（１）、　ａ　　Ｉｓ（１）ｉｎ ｔｅｇｅｒ　　ｋｘｍ、ｋｋｘ、　　ｋ７（１）、　　ｋｋｙ、　　ｐｋ（１１ ，ｎｐｋｈｘ（１１□　ｌ／ａ　　ｌ５（１） ロー＝Ｏ ｉｌ　　（ｎｐｋ、ｇｌ、Ｉ）　　ｔｈｅｎｋｋ７　＝　ｎｐｋ　　−１ ｄｏ　ｉ　＝　’ｌ、　　ｎｐｋ ｋｙ（ｉ−１１・ｐｋ（ｉ）　−ｐｋ（１）ｈｙ（ｉ−ｌ）　・ａ　　ｌ５（ｉ ）／ａ　　ｉｌ（１）ｅｎｄ＋ｉ。

ｎｄｉｌ ｒｅｔｕｒｎ ｎｄ Ｃ本ＩＩ＊零傘掌傘＊ネ＊本零零ネ＊参零＊傘傘傘ネ傘孝零傘傘ネ＊＊＃零零＃ 市本＊ネ＊傘傘＊傘＊孝孝＊＊＊孝＊傘本＄ネ零傘ネ＄本＊l＊ネ＄傘傘ネ傘零 ＊ネ サブルーチンｗａｖｅｌｏｒ＋ａ　（ｉｙ！　　＋、ｉｖｆ　　ｉ、　ｎｌ　　 ｙｌ、ｎｐｘ’　ｗｌ　　ｂｇ、ｎｐｘ　　ｐｌｆ。

＆１ｘｏｆｆ、　　１７ｏ１ｆ、　　１７ｓｃｐ）Ｃ＃傘零傘ネネ＊零傘傘ネ牟 ＊傘牟傘＊＊掌章市ネ孝＊＊＊＊傘零幸ネ傘＊＊市ネ傘＊＊傘ネ孝傘傘ネ傘本零 零＊孝傘＄＄＄零傘中本傘傘ネlネ傘ネ傘＊ネ＊＊＊ ｅ　ｐｌｏｔ　ｖｉｄｅｏ　ｖａｗｅ＋ｏｎｎ　ｏｌ　１ｉｎｅ　ｎｌ　　ｖｔ 　ｏｆ　ｖｌＱ　ｔｉｎｔｅｄ　ｔｒａＩｌｎｐｘ　　ｖｌ@　ｂｇ ｃ　　　ｏｌｌｓｅｔ　ａｎｄ　ｎｐｘ　　ｏｂ　ｌｏｎｇ　ｏｎ　５ｃｔｅｅ ｎ　ｗｉｔｈ　（ｉｘｏｌｆ、　１７ｏ１１）　ｏｆｆｓｅ煤@ｊｏｒ Ｃｊｖｌ　　Ｉ　　Ｏ，（ｉｘｏ目、　１Ｙａｌｌ＋１７ｓｅｐ）　　ｏｌｌｓ ｅｌ　ｌｏｒ　ｉｖｌ−１０ｃ　　　ｂｙ　ｕｉｉｎｇ　ｐｌｏｌｌＯｒｏｕｔ ｉｎｅｓｃ　ｖｌ　　＋Ｑ　−「ｅａｌ　ｐａｒｔ　ｏｌ　ｖｉｄｅｏ　ｄａｔ ａｃ　ｖｌ　　ｉＱ　−ｉａｍｇ　ｐａｉｌ　ｏｌ　ｖｉｄｅｏ　ｄａｌｇｃ　 ｎｌ　　ｒｌ　−１ｉｎｅ　ｌｏ　ｂｅ　ｐｌｏｖｅｄｃｎｐｘ　　ｖｌ　　ｂ ｇ−ｂｅｇｉｎｏｌ　ｐｉｘｅｌ　ｉｎ　ｌ１ｎｅｎｌ　　ｖｌ　ｆｏｂｅｐｌ ｏｌｌｅｄｃ　ｎｐｘ　　ｐＨ−ｎｏ、　　ｏｆ　ｐｉｘｅｌｓ　ｔｏ　ｂｃ　 ｐｌｏｌｌｃｄｃ　１７ｓｅｐ　−５ａｐｕａｌｉｏｎ　ｂｅｔｗｅｅｎ　ｔｗ ｏ　ｐｌｏｔｓｉｎｌｅｇｅ＋ｔ２　ｉｖ［＋　（９１０，１１，ｉｖｌ　　ｉ 　（９１（１，Ｉ）ｉｎｔｅｇｅｒ　ｎｌ　　ｖｌ、　ｎｐｘ　　ｖｌ　　ｂｇ 、　ｎｐｘ　　ｐｌｔｉｎｔｅｇｅｒ　１ｘｏｌｌ、　　１７ｏ１１．　　ｉｙ ｓｅｐｉｎｔｅｇｅｒｉｘ、　　１ｙ ｉＸ　：１ｘｏｌｌ　＋　１ ｉｙ＝ｉｙｏｌｌ＋１７ｃｅｐ＋ｊｖｌ　　　＋（ｎｐｘ　　　ｖｌ　　　ｂｇ 、ｎｌ　　　　ｖｌ）ｃａｌｌ　ｍｏｖａｂｓ　（ｉｘ、　１ｙｌｃａｌｌ　ｐ ｎｔａｈｓ　（ｉｔ、　１Ｙ）ｉｆ　（ｎｐｘ　　ｐｌｆｇｅ、２）　ｔｈｅ＋ ＋ｄｏ　ｉ　：２．　　ｎｐｘ　　ｐｌｔｉｘ　＝　１ｘｏｆｌ　＋　　ｉ ｉｙ　＝　１Ｙａｌｌ　＋　１ｙｉｅｐ　＋　ｉｖｔ　　＋（ｎｐｘ　　ｖｌ　 　ｂｇ＋ｉ−１，ｎｌ　　ｖｌ）ｃａｌｌ　ｄ＋ｖａｂｓ　（ｉｘ、　　１ｙ） ｅｎ＋Ｉｄ。

ｎｄｉｌ ｉｘ　＝　１ｘｏｌｌ　＋　１ ｉｙ　＝　１ｙｏｌｌ　＋　ｉｖｌ　　ｉ　（ｎｐｘ　　ｖｌ　　ｂｇ、　ｎｌ 　　ｖｌ）ｃａｌｌ　　ｍ０ｖ２、ｔ＋ｔ　　ｆｉｘ、１ｙ）ｃａｌｌ　ｐｎｌ ａｂｓ　　（ｉｔ　１ｙ）ｉｌ　（ｎｐｘ　　ｐｌｘ４ｅ、２）　　ｔｈｅｎｄ ｏ　ｉ　＝２．　　ｎｐｘ　　ｐｌｔｉｘ　＝　　１ｘｏｌｌ　＋　　ｉ ｉｙ　＝　１ｙｏｌｌ　＋　ｊｖｌ　　ｉ　（ｎｐｘ　　ｖｌ　　ｂｇ＋ｉ−１ ，ｎｌ　　ｖｌ）ｃａｌｌ　ｄｎａｂ＋　　（ｉｘ、　　１ｙ）ｅｎｄｄ。

ｎｄＮ ＋ｅｌｕ＋ｎ ｎｄ ＣＩ＃零本傘本零零！＃零本零Ｉ傘ネ＊＊本＊＊本Ｉ傘零＊本＊＊章ネ零京＊本 ＊＊本＃零零傘傘＊＊章零ネ＊本ネ零傘市＊傘本本本本サすルーチンｐ＆　　ｌ ｅｄｇｅ　（ｌｅｄｇｅ、　ｎｌｅｄｇｅ、　　ｎ＋ｒｍｌ、　　ｎｒｒ　　ｖ ｇｌ。

＆　　　　　　　　　　　　　　ｐｋ、　　ｎｐｋ、　　ｎｗｉｎｌ、　　ｎｗ ｉｎ２）Ｃ＊孝零傘＊傘＊零傘ネ零ネ傘傘傘＊＊＊ネ電傘傘傘＊＊零零ネ傘＊＊ 零傘ネネ孝ネ傘零零孝本＊傘傘零傘零＊ネ＊傘ネネ＊＊ネ＊＊本ｃ　ｃａｌｃｕ ｌａｔｅ　ｅｄｇｅ　１ｏｃａｔｉｏｎｓ　ａｎｄ＋ｅｌａｔｄ　ｐａ＋ａｍｅ ｊｅ＋ｓ　ｆｒｏｍ　ｐａｅｋ　１ｎｔｏ。

ｃ　ｐｋＱ　−ｐｅａｋ　１ｏｃａｔｉｏｎ＋　ｉｎ　ＩＸ　　ｖｘ□ｃ　ｎｐ ｋ　−ｎｏ、ｏｆ　ｐｅａｋｓｃ　ｏｉｎｌ　−ｎｏ、　　ｏｆ　ｐｉｘｅｌｓ 　ｔｏ　ｔｈｅ　ｆｅｌｌ　ｏｆ　Ｉｉ…ｐｅａｋ　（ｉｎｃｌｕｄｅｄ　）ｃ 　ｎｗｉｎ２−　ｎｏ、　　ｏｆ　ｐｉｘｅｌｓ　ｔｏ　ｔｈｅ　「ｉｇｈｔ　 ｏｆ　１ａｓｔ　ｐｅａｋ　（ｉｎｃｌｕｄｅｄ　）ｃ　　−−−−ｏｎ　　ｒ ｅｔｕｒｎ　　−−−−ｃ　ｌｅｄｇｅＱ　−１ｏｃａｔｉｏｎ　ｏｆ　ｅｄｇ ｅｉ　ｉｎ　ｏｂｓｅｒｖａｔｉｏｎ　ｖｅｃｔｏ！（＋ｘ　　ｖｓ　ｏｂＱ） ｃ　ｎｌｅｄｇｅ　−ｎｏ、　　ｏｆ　ｅｄｇｅｓｃ　ｎ＋１ｍｌ　−ｎｏ、　 　ｏｆ　ｐｉｘｅｌ　ｉｎ　ｔｈｅ　ｏｂｓｅｒｖａｔｉｏｎ　ｗｉｎｄｏｗｃ 　ｎｔｘ　　ｖｉｌ　−ｔｈｅ　ｌｉ＋ｓｔ　ｐｉｘｅｌ　１ｏｃａｔｉｏｎ　 ｏｆ　ｔｈｅ　ｏｂｓｅｒｙａｌｉｏｎ　ｗｉｎｄｏｗ　奄氏@ＩＩ　ｖｓＱ。

ｉｎｌｅｇｅｔ　Ｉｅｄｇｅｆｌｌ、　ｎｌｅｄｇｅ、　ｎｓｔｍｌ、　ｎｔｘ 　　ｖｓｌｉｎｌｃｇｃ＋　ｐｋ（１）、　ｎｐｋ、ｎｗｉｎｌ、　ｎｗｉｎ２ ｎｌｅ＋Ｉｇｅ　＝ｎｐｈ ｄｏ　ｉ　＝　１．　　ｎｌｅｄｇｅ ｌｅｄｇｅ（ｉ＞　＝　ｎｗｉｎｌ　＋　ｐｋ（ｉ）　−ｐｋ　（１）ｅｎ＋Ｉ ｄ。

ｎｒｒ　　ｖｓｌ　＝　ｐｋ（１）　−ｎｖｉｎｌ÷ｌｎ５１ｍ１　＝　ｎｗｉ ｎｌ　＋　ｐｋ（ｎｐｋ）　−ｐｋ（ＩＩ　＋　ｎｗｉｎ２−１ｎｄ Ｃ傘傘Ｉ傘章傘ｔ＊Ｈ４＄幸傘傘傘市傘ネ＊零珍重本零零零零市零キ＊＊ネネ零 零ネ傘零＊＊零零拳ネ傘ネ零孝＊ネネ零零ネ＊零零零Ｃ零傘零章零章章章零傘＊ 傘本本＃傘＊＄傘傘傘宰Ｉ章＊＊傘市本市傘＊本ネ＊傘本ネ孝＊＊本傘零市ネ＊ 孝傘零＊電＊傘ネ零掌零零零ｃ　ｌｈ＋ｅｓｈｏｌｄｉｎｇ　ｔｈｅ　ａｂｓ　 ｏｆ　ｘＱ　、　　ｐｕｔ　ｄｅｌｅｃｌｅｄ　１ｏｃａｔｉｏｎ　ｉｎ　１１ ｃ　ｉｔ　ａｂｓ（ｘ（ｉ））　）　ｌｈ、　１ｘ（ｋ）　＝　ｉＣＩ　−１ｎ ｐｕｔ　ｖｅｃｌｏ＋ ＣＩＩＸ　−ｄｉｍｅｎｓｉｏｎ　ｏｆｌｃ　　Ｉｂ　−ｔｈｒｅｓｈｏｌｄ ｃ　ｌｘ　−ｄｅｔｅｃｔｅｄ　Ｉ　１ｏｃａｔｉｏｎｓｃ　ｎｌｘ　−ｎｏ　 ｏｆ　１ｏｃａｔｉｏｎ　ｄｅｆｅｃｌｅｄｃｏｍｐｌｅｘ　ｘ（１） ｉｎｔｅｇｅｒｎｘ、　　ＩＩ（１）、　　＋１１１百（ｃａｂｓ（ｘ（ｉ）ｌ 、　ｇｅ、　ｊｈ）　ｔｈｅｎｎｌｘ　＝　ｎｌｘ　＋　１ １ｘ（ｎｌｘ）　　コ１ ｎｄ１ｊ ｅｎｄｄ。

＋ｅｔｕ＋ｎ ｎｄ ｃ　　＄０本＊傘＃＃傘！車零季ネを本本零本本傘傘傘＊＊＊傘本傘＊孝傘ネ＊ 傘市傘＊ネ零傘孝零傘零ネ＊＊傘零＊孝孝孝＊＊＊＊傘零サブルーチンｐａｕｓ ｅ Ｃ章傘傘＊零傘零掌＊零＊ｔｎｕｍ零傘傘ネ傘傘傘ネ零傘市本傘キ京＊ネ市＊傘 を市孝傘ネ＊零参ロ傘零市傘傘ネネ傘ネ零零ｃ　ｕｓｅ　ｐｌｏｌｌｏ　ｃａｐ ｔｏｒｑａｉ＋７　ｒｏｕｔｉｎｅ　ｔｏ　ｈｏｌｄ　ｌｈｃ　ｅｘｅｃｕｔｉ ｏｎ　ｏｌ　ｐｒｏｇｒ≠■ ｃ　　ｓｃ「ｅｅｎ　ｄｉｓｐｌａ７ ｉｎｌｅｇｃ＋　ｉｘ、　　ｉ！ ｉｎｔｅｇｅ「１ｃｈａ＋ ｃａｌｌ　ｓｃｕ＋ｓ＋（ｉｃｈａ＋、　ｉｘ、　１７）Ｎｔｕｎ＋ ｎｄ Ｃ孝本傘＊零傘零本傘＊傘市＊＊傘本ネ傘ネ傘本＊傘＊ネ市傘＊傘本＊章ネ傘＊ 本零孝本本零＊ネ傘車ネ零零傘傘ネ本＊ネ電零ネ孝傘零＄本{本本本 サブルーチンｄｅ　　ｌｔＩ　（ｄ、ａ　　ｌｔ、　ｓｌｍ、ｌｄｔｆｍ、ｎ５ １ｍ１．ｎ５１ｍ２．　　＋ｘ、ｎ＋ｘｌ）Ｃネ孝傘ネネ傘ネ本＊傘市市零傘傘 Ｉ零参傘傘＃章＊ネ傘傘ネ拳傘傘ネ孝本＊傘電ネ傘傘ネネ傘傘ネ傘傘本本本零零 零ネ本傘ネネネネ＊零傘l零孝ネ ｃ　　ｆｉｎｄ　　ｄｃ　　ｏｌｌｓｅｌｚｌＱ　　＝＋ｘＱ−ｔｆｍ　　孝　 ａ　　　ｌｓＱ　　　　　　ｃｌ　°　ＤＳＲＣｎｏｔｅ　　Ｏｐａｇｅ　　６ ｇ−７５ｃ　　　　　　Ｔ ｃｄｌＯ傘　ｄＯ／　ｎ５１ｍ１ ｃ　ａ　　ＩｓＱ　−１ｅａｓｔ　５ｑｕａｒｅ　５ｏｌｕｌｉｏｎｃ　ｎａ　 　Ｉｓ　−ｄｉｍｅｎｓｉｏｎ　ｏｆ　５ｏｌｕｔｉｏｎ　ｉｎ　ａ　　Ｉｓ　 ｖｅｃｔ＋ｕｃ　＋ＩｍＱ　−ｒｅｆｅｒｅｎｃｅ　Ｓｉｇｎａｌ　ｍａｔｒｉ ｘｃ　１ｄｓｌＩＩｌ−ｌｅａｄｉｎｇ　ｄｉｍｅｎｓｉｏｎ　ｏｌ　ｓｌｍ　 ｓｔｏｒａｇｅｃ　ｎｓｆｍｌ、　　ｎｔ１ｍ２−１ｓｌ　ａｎｄ　２ｎｄ　ｄ ｉｍｅｎｓｉｏｎ　ｏｆ　ｄａｔａ　ｉｎ　ｓｌｍｃ　＋ｘＱ　−ｏｂｓｅｒｖ ｅｄ　ｄａｔａｃ　ｎ＋ｘｌ　−ｓｌａｎｔｉｎｇ　ｐｏｓｉｔｉｏｎ　ｏｌ　 ｄａｔａ　ｉｎ　ＩＩ　ｆｏｒ　ｔｈｅ　１ｅａｓｔ　ｓｑｕｇｒｅ　ｌｉ■ ｃｏｍｐｌｅｘ　ｄ ｃｏｍｐｌｅｘ　ａ　　ｌｔ（１）、　　ｓｌｍ（ｌｄｓｌｍ、ｌ）、　　ｒ［ Ｉ）ｉｎｔｅｇｅｒ　ｎａ　　Ｉｓ、Ｉｄｓｌｍ、　ｎｓｆｍｌ、　ｎ５１ｍ２ ．　ｎ＋ｘｌｄｏ　ｊ＝　１．　ｎ５１ｍ１ ｄ　＝　ｄ　＋　ｒｘ（ｉ＋ｎ＋ｘｌ−１）ｄｏ　ｋ　＝　Ｉ、　　ｎ５１ｍ２ ｄ＝ｄ−ｓ師（ｉ、ｋ）　ｓ　ａ　　ｌｔ（ｋｌｅｎｄｄ。

ｅｎｄ＋Ｉｎ ｄ　＝　ｄ　／　ｎ５ｂｎｌ ＩｅｌｌＨＩｌ ｎｄ Ｃ＊＊＊＊＊傘傘傘傘傘ｎｍ傘孝傘中零傘＊傘中傘傘傘傘傘傘ネ零孝傘傘零ネ孝 ネ孝傘傘零孝傘傘孝傘傘傘傘ネ孝零傘傘傘牟傘零ネ本零傘傘■ サブルーチンｓ＋ｄｅｆｌ　（ｓｌ、　ｎｓｆ、　ｎ５ｌｌ、　ｄ２．　ｄ３） ｃ　＊＃孝章傘傘＃＃＃Ｉ傘章零傘ネ傘章傘＊孝ネ孝孝傘電孝＊ｔネ京傘傘＊宰 零＊零傘ネ＊ネ本零孝車傘零傘傘章傘＊ネ＄傘本ネ＊ネネ本■麻l＊ネ ｃ　　＋１ｄｅｌ　　（ｓ　　　＋ｃｌ　　　　ｄｔｌｉｎｅｄ）：　　ｄｅｆ ｉｎｅ　　＋ｅｌｅｒｅｎｃｅ　　ｖｅｃｔｏｒｃ　　ＩＩ　　−ｓ　　ｒｅｆ ｅ「ｅｎｃｅ　　ｖｅｃｔｏｒｃ　　ｎｓｌ　　−ｎｏ、　　ｏｆ　　’ｎｏｎ ｅ　　ｘｅｔｏ’　　ｅｎｌ＋ｉｅｓ　　ｉｎ　　ｓｌｃ　　ｎｓｌ　　−ｃｅ ｎｔｕ　　ｏｌ　　ｅｄｇｅ　　ｉｎ　　＋ＩＱｃ　ｄ２．　ｄ３−　ｒａｎｇ ｅ　ｏｆ　ｃｏｍｐｏｓｉｔｅ　ｖｉｄｅｏ　ｔｏ　ｂｅ　ｍａｐｐｅｄ　ｏｎ ｔ。

ｃ　　　　　　ｔｅｌｅｒ　　ｔｏ　ｎｏｔｅ　Ｏｐａｇｅ　６８−７５　ｆｏ ｒｎｏｔａｔｉｏｎ　ａｎｄ　ｄｅｒｉｙａｆｉｏｎｃｏｍｐｌｅｘ　　＋１ｍ ｉｎｔｅｇｅｒ　　ｎｓｌ、　　　ｎ５ｌｌ「ｅａｌ　　ｄ２．　　ｄ３ ｒｅａｌ　ｄ６．　ｄ７．　ｄ８．　ｄＯ，ｇｃ　ｓｏｍｅ　１ｎｌｅ＋ｍ１ｄ ｉａｌｅ　ｓｉｇｎａｌ　ｒｅＩｅｒｒｅｄｃ　（ｎｏｔ　７ｅｌ　ｉｍｐｌｅ ｍｃｎｌｅｄｌｓｌｍ　＝　ｃｍｐｌｘ　（−１，８６４９５１７，−３，６０ １２８６り５ｌｆ２）　＝ｃｍｐｌｘ　（刊、２８６１７３６．　−５．６５９ １６４０）ｓｌ（３）　＝　ｃｍｐｌｘ　（−０，７７１７０４１８，−Ｉｆ、 　８９７１０６）ＩＩ（４）　＝Ｃｌ１ｌｌｌ１１　（−６，４９５１７６８， −２０，４８２３１５１ｓ＋（５）　−ｃｍｐｌｘ　（−１９，０９９６７９， −２５，２４１１５８）ｓｌ（６）　：ｃｍｐｌｘ　（−３２，４１１５７５， −２０，７３９５４９）＋１（７）　＝ｃｍｐｌｘ　（−３９，１６３９８７， −Ｉｌ、　１８９７１１）ｓｌ（８）　＝ｃｍｐｌｘ　（−３９，７４２７６５ ，−５，１１２５４０１）ｓｆ（９）　＝　ｃｍｐｌｘ　（−３８，９０６７５ ３，−３，０５４６６２４）ｄ６　　＝　　（４０，零ｄ３＋１００．　　傘ｄ ２）／＋　４０゜ｄ？　＝　ｒｅａｌｌ（ＩＩ） ｉ！　（ｒｅａｌ　（ｘｌ（ｉｌ）、　ｇｌ、　ｄ７）　ｄ７　□　ｒｅａｌ　 （ｓｌ（ｉ））ｉｆ　（ｒｅａｌ　（ｓｌ（ｉ））、　Ｉｔ、　ｄ８）　ｄ８　 ＝　「ｅａｌ　（ｓｔ（ｉ））ｅｎｄｄ。

ｄ９・（＋１２＊ｄ７−　ｄ６ｔｄ８）／（ｄ７−ｄ８）ｇ・１゜ ｉｆ　　（ｄ？、ｎｅ、０．）　　ｔｈｅｎｇ・（ｄ６−ｄ９１／ｄ７ ｅｌｓｅｉｌ　（ｄ８．ｎｅ、０．）　　ｔｈｅｎｇ・（ｔ１２−ｄ９）／ｄ８ ｎｄｉｔ ｓｌ（ｉ）　＝　ｇ＄５ｌ（ｉ）　＋　ｄ９ｔｃｍｐｌ［、、１，）ｅｎ＋Ｉｄ 。

Ｃ１ｔｏｎ ｅｎ＋１ Ｃ本＃零ネＩ零＃傘本本本本本本零ｍ本Ｉ＊＊零零ｔ１本本＊零零傘章零傘本零 零零傘掌章＊＊＊零本＊＊零本本零＊＊＊本本＊＊本孝零零Fネ零零本本本ネ零 サブルーチンｓｇ　　ｄｅｌ　（＋ｇ、　　ｎｈｇ、　　Ｉａｕｇ、　ｎ５５ｇ 、　　Ｉｆｄ、　ｎ５ｌｄ、　ｎ５ｌｄ１．　ｎ５ｓｌｄ）ｃ　＊章章傘＊零零 ＊ｍ傘＊傘＊＊零ネ零＊中ｅ＜車重ｕｍ＊ｓｔ＊＊ｎ＊＊＜＊ｍネネネ孝ネ零拳 ＊ｔｍｕｍ＊ｎｕｔｕｕ＊ｎｃ　ｇｅｎｅｒａｔｅ　ａ　ｇｈｏｉｌｉｎｇ　ｖ ｅｒｔｉｃａｌ　５ｙｎｃ　ｒｅｆｅｒｅｎｃｅ　ｌｏｏｍ　５ｔｄＯｃ　　ｗ ｉｔｈ　ｅｄｇｅ　１ｏｃａｔｅｄ　ａｔ　ｌａｕｇｃ　＋ｇＱ　−ｇｈｏｓｔ 　ｖｅｃｔｏ「Ｃｎ１ｇ　−ｎ　　　Ｉｇ ｃ　ｌａｕｇ　−ｅｄｇｅ　１ｏｃａｔｉｏｎ　ｏ［ｓｇＱ　ｉｎ　ｕｎｉｔ　 ｏｌ　Ｉ／Ｉｃｃ　ｎ５５ｇ　−ｓａｍｐｌｉｎｇ　ｒａｔｅ　ｉｎ　ｕｎｉｔ 　ｏｆ　Ｉｃｃ　５ｌｄＱ　−＋＋　　ｄｅｌａｉｌＱｃ　ｎ５ｌｄ　−ｎ　　 ５ｌｄ ｃ　ｎ５ｌｄｌ　−ｅｄｇｅ　１ｏｃａｔｉｏｎ　ｉｎ　Ｉｆｄ　ｉｎ　ｕｎｉ ｔ　ｏｆ　ｓａｍｐｌｅｃ　ｎ５ｉｌｄ−ｎ　　＋ａｍｐｌｅ　　ｔｆｄ　ｉｎ 　ｕｎｉｔ　ｏｆ　ｆｃｃｏｍｐｌｅｘ　ｓｇ（１）、　　５ｌｄ（１）「ｅａ ｌ　ｔａｕｇ ｉｎｔｅｇｅｒｎａｇ、　　ｎ５５ｇ、　　ｎ１ｌｄ、　　ｎ５ｌｄｌ、　　ｎ ５ｓｌｄｎ　　＋＋　＝　ｎ５ｌｄｌ　−ｎ１ｎｌ　　（ｌａｕｇ＄１ｌｏａｌ 　（ｎｓｓ）ｄ））ｊ　　＝　　ｎ　　　＋＋　　＋　　（ｉ−１）　　本　ｎ ５ｉｆｄ　／　ｎ５１ｇ百（ｉ、　Ｉｔ、　］）　ｔｈｅｎ ５ｇ（ｉ）　−ｇｌｄ（１） ｅｌｓｅｉｌ　（ｉ、ｇｌ、ｎ５ｌｄ）　ｔｈｅｎｓｇ（ｉｌ−Ｉｆｄ（ｎ＋Ｉ ｄｌ ｌｓｅ ！ｇ（ｉ）　　＝　Ｉｆｄ（）） ｎｄｉｌ ｎｄｄＯ Ｔｅｌｕ＋ｎ ｎｄ ｃｔ市＊零零傘＊掌傘を零傘傘傘本傘孝本本傘＊零零零傘零章傘傘＊＊ネ市＊傘 傘傘傘本＊＊零零零傘傘傘＊傘＊本零零傘零零零本本孝＊傘l傘本孝＊本ネ傘本 本孝零 サブルーチンｇｌｄｄｅ（（Ｉｆｄ、　ｎ５ｌｄ、　ｎ５ｆｄｌ、　ｎ５ｓｌｄ ｌＣ＃零零ＨｔＨｔＨｔ＄＊ＨＨ＄Ｈｔ孝ネネｍ零傘を孝＊零傘零京傘＊参＊＊ 京ｎａｎｏネ零本零零零零零零零ネ孝傘傘＊ネ＊零参市京零本ｃ　５ｆｄｄｅｌ 　（ｓ　　ｔｅｆｄｅｔａｉｌ　　ｄｅＨｎｅｄ）：　ｄｅｆｉｎｅ　ｒｅｆｅ ｒｅｎｃｅ　ｒｅｃｔｏｒｃ　ｓｌｄ　　　−ｓ　　「ｅｆｅｒｅｎｃｅ　ｖｅ ｃｔｏ「ｃ　ｎ５ｌｄ　−ｎ　　Ｉｆｄ ｃ　ｎ＋ｄｌｌ　−ｅｄｇｅ　１ｏｃａｔｉｏｎ　ｉｎ　ａｌｄ。

ｃ　ｎｏｌｄ　−Ｓａｍｐｌｉｎｇ　＋ａｔｅ　ｉｎ　ｕｎｉｔ　ｏｆ　ｔｃ＋ ｏｍｐｌｅｘ　ｉｌｄｆｌ） ｉｎｔｅｇｅ「ｎ５ｌｄ、　　ｎ５ｌｄｌ、　　ｎ５ｓｌｄｎ ｃｏｍｐｌｅｘ　ｖｓ（２５６） ｎｓｓｌｄ　＝　６４ ｖｓ（６４）・ｃｍｐｌｒ　（−］、　４７９１．　　−３．１８３３　）ｖｓ 　（６５）　・ｃｍｐｌｘ　（−１，５４３４，−３，２４７６）ｖｓ　（６６ ）　・ｃｍｐｌｘ　（−１，６７２０，−３，２７９７）ｖｓ（６７）　＝　ｃ ｍｐｌｘ　　（〜１．６７２０．　　−３．３７６２　）ｖｉ　（６８）　□　 ｃｍｐｌｘ　（−１，７３６３，−３，４０８４１ｖｓ　（６９）　□　ｃｍｐ ｌｘ　（−１，７３６３，−３，４４０５１ｖｓ　（７０）　　＝　ｃｍｐｌｘ 　　（−１，８００６，−３，５０４８）ｖｉ　（７１１−ｃｍｐｌｘ　（−１ ，８００６，−３，５３７０）ｖｓ（７２）　＝　ｃｍｐｌｘ　（−１，１１６ ５０，−３，６０＋３　）ｖｉ　（７３）　　：ｃｍｐｌｘ　　（−１，８６５ ０，−３，６３３４）ｖｓ（７４）　＝　ｃｍｐｌｘ　　（−１，８６５［１， −３，６９７７）ｖｓ　（７５）　−ｃｍｐｌｘ　（−１，８６５０，−３，７ ２９９）ｖｓ　（７６１：ｃｍｐｌｘ　（−１，８６５（１，−３，８２６４１ ｖｓ　（７７）　＝　ｃｍｐｌｘ　（−１，８６５０，−４，０１９３）ｃ　　 　ｓｌｍ　・ｃｍｐｌｘ（−１，８６４９５１７，−３，６０１２８６１）ｖｓ 　（７８）　＝ｃｍｐｌｘ　（−１，８６５０，−４，１４７９）ｖｓ　（７９ ）　＝ｃｍｐｌｘ　（−１，８００６，−４，２１２２）ｖｓ　（８０）　＝ｃ ｍｐｌｘ　（−１，８００６，−４，３０８７１ｖｓ　（８１）　・ｃｍｐｌｘ 　（−１，８００６，−４，３７３０）ｖｉ　（８２）　・ｃｍｐｌｘ　（−１ ，８００６，−４，５０１６）νｈ　（８３）　：ｃｍｐｌｘ　（−１，７３６ ３，−４，５９８］　）ｖｌ（８４）　＝　ｃｍｐｌｘ　　（−１゜６０７７、 　　−４．８２３２　）ｖｓ（８５）・ｃｍｐｌｘ　（−１，４７９１，−４， ９５１８）ｖｓ（８６）□ｃｍｐｌｘ（−１，４１４８，−５，１４４７）ｖｓ 　（８７）　・ｃｍｐｌｘ　（−１，４１４８，−５，４３４１）ｖｓ　（８８ ）　・ｃｍｐｌｘ　（−１，２８６２，−５，６５９２１ｖｓ　（８９）　：ｃ ｍｐｌｘ　（−１，２８６２，−５，９４８６）ｖｉ　（９０）　・ｃｍｐｌｘ 　（−１，１５７６、−６，１４１５）ｖｓ　（９１）　：ｃｍｐｌｘ　（−１ ，０２８９，−６，５２７３）νＫ　（９２）　−ｃｍｐｌｘ　（−０，９００ ３，−６，７５２４）ｖｓ　（９３１＝　ｃｍｐｌｒ　　（−（１，８３６０， −６，９７７５１ｖｓ　（９４）　＝ＣＩＩＩＩＩ１１　Ｆ　　−ｔｌ、　６４ ３１．　　−７．３３１２　）ｖｈ　（９５１＝ｃｍｐｌｘ　（−０，６４３１ ，−７，６５２７）ｖｓ（９６）　・ｃｍｐｌｘ　（−０，５７８８，−８，０ ３８６）ｖｓ　［９７１□　ｃｍｐｌｘ　（−０，４５０２，−８，５５３１） ｖｓ　（９８）　＝ｃｍｐｌｘ　（−０，４５０２，−８，９７１１）ｖｓ（９ ９］　＝　ｃｍｐｌｘ　（−０，４５０２，−９，３８９１）ｖｓ　（１００） 　・ｃｍｐｌｘ　（−０，４５０２−９，９０３５）ｖｓ　（１０１）　；ｃｍ ｐｌｘ　（−０，５１４５，−１０，２２５１）ｖｓ（１０２）：ｃｍｐｌｘ（ −０，５７８８，−１０，６４３１）ｖｓ（１Ｇ３）：ｃｍｐｌｘ（−０，６４ ３１，−１１，３８２６）ｖｓ（１０４）＝ｃｍｐｌｘ（−０，７７１７，−１ １，８９７１）ｖｓ（１０５’ｌ＝ｃｍｐｌｘ、［−０，９００３，−１２Ｊ７ ９４１ｖ＋　（１０６）　：ｃｍｐｌｘ　（−１，０２８９，−１２，７９７４ ）ｖｈ　（１０７）　＝　ｃｍｐｌｘ　（−１，０９３２，−１３，２１５４） ｖｉ　（１０８１・ｃｍｐｌｘ　（−１，２２１９，−１３，７２９９１ｖｓ　 （１０９）　：ｃｍｐｌｘ　（−１，３５０５，−１４，５０１６）ｖｓ　（１ １０）　＝ｃｍｐｌｘ　（−１，４７９１，−１５，０４８２）ｖｔｆｌｌｌ） □ｃｍｐｌｘ（−１，８６５０，−１５，７８７８）ｖｓ（１１２）・ｃｍｐｌ ｘ（−２，１８６５，−１６，１７３６）ｖｓ　（１１３）　＝ｃｍｐｌｘ　（ −２，６３６７、−１６，６２３８）ｖｓ（１１４）・ｃｍｐｌｘ（−３，０８ ６８，−１７，２９９Ｑ）ｖｓ（１１５］＝ｃｍｐｌｘ（−３，６［１１３，− １７，６５２７）ｖｈ（１１６）　＝ｃｍｐｌｘ　（−３，９８７１，−１８， ２３１５）ｖｓ（１１７）＝ｃｍｐｌｘ（−４，６９４５，−１９，［１９９７ ）ｖｓ（Ｉ１８１＝ｃｍｐｌｘ（−５，０８０４，−１９，５１７７）ｖｘｌ１ ９）□ｃｍｐｌｘ（−５，８５２１，−２０，００００）ｖｓ　（１２０１・ｃ ｍｐｌｘ　（−６，４９５２，−２０，４８２３）ｖｓ（１２１）　□　ｃｍｐ ｌｘ　（−６，９４５３，−２０，９６４６）ｖｓ　（１２２）　＝　ｃｍｐｌ ｘ　（−７，３９５５，−２１，５１１３）ｖｓ（１２３）・ｃｍｐｌｘ　（− ８，５５３１，−２２，０５７９）ｖｓ　（１２４）　＝ｃｍｐｌｘ　（−９， ２６０５，−２２，４７５９）ｖｓ　（１２５）　＝ｃｍｐｌｘ　（−９，９６ ７８，−２２，７９７４１ｖｓ（１２６）　＝ｃｍｐｌｘ　（−１０，７３９５ ，−２３，２７９７）ｖ＠（１２７）　：ｃＩＩ＋ｐｌｘ　（−１１，３１８３ ，−２３，６０１３）ｖｓ（１２ｇ）　：ｃｍｐｌｘ　（−１２，２１８６，− ２３，９８７１）ｖｓ（１２９）　＝ｃｍｐｌｚ　（−１２，９２６０，−２４ ，２７６５）ｖｓ（１３０１・Ｃｌ１１９１！　（−１３，８２６４，−２４， ５［１１６）ｖｈ（１３１）　＝ｃｍｐｌｘ　（−１４，６６２４，−２４，７ ５８８）ｖｓ（１３２１□　ｃｍｐｌｘ　（−１５，３６９８，−２４，９１９ ６）ｖｉ（１８２）　＝ｃｍｐｌｘ　（−３９，８７１４−５，５６２７）ｏｆ １８３）：ｃｍｐｌｘ（−３９，７４２８−５，２７３３）ｖｉ（１８４）・ｃ ＋ｎｐｌｘ（−３９，７４２８−５，１１２５）ｖｉ（１８５）・ｃｍｐｌｘ　 （−３９，６７８５−４，８５５３）ｖｉ　（１８６１＝　ｃｍｐｌｘ　（−３ ９，６７８５，−４，５９８１）Ｗｓ（＋８７１　・ｃｍｐｌｘ　（−３９，５ ４９８，−４，４０５１）ｖｉ（１８８）　＝ｃｍｐｌｘ　（−３９，４２１２ ，−４，３０８７）ｖｔ（１８９）・ｃｍｐｌｘ（−３９，２９２６，−４，１ １５８）ｖｓ（１９０）□ｃｍｐｌｘ（−３９，２９２６，−３，９５５０）ｖ ｓｆ１９１）□ｃｍｐｌｘ（−３９，２２８３，−３，７９４２）ｖｓ（１９２ Ｌｃｍｐｌｘ（−３９，ｌ６４Ｑ、　　　−３，６６５６）９Ｋ　（１９３）　 ・ｃｍｐｌｘ　（−３９，０３５４，−３，５３７０）ｖｉ　（１９４）　＝ｃ ｍｐｌｘ　（−３９，０３５４，−３，４７２７）ｖｓ　（１９５）　：ｃｍｐ ｌｘ　（−３９，０３５４，−３，４０８４）ｖｓ（１９６）　＝　ｃｍｐｌｘ 　　（−３９，０３５４，−３，３４４１）ｖｉ（１９了１　　・　ｃｍｐｌｘ 　　（−３９，０３５４，−３，３１１９）ｖｉ（１９８）　＝ｃｍｐｌｘ　　 （−３８，９７１１，−３，２１５４）ｖｔ（１９９１；ｃｍｐｌｘ　　（−３ ８，９７１１，−３，１５１１）ｖＳ（２００）・ｃｍｐｌｘ（−３８，９１１ ６８，−３，０５４７）ｖ（ｆ２１）Ｉ）　　＝　Ｃｍｐｌｘ　　（−３１１， ８４２□１．　　−３．０５１７　）ｖｓ　（２０２）　＝ｃｍｐｌｘ　（−３ ８，８４２４，−２，９９０４）ｖｓ（２０３）　　・　ｃｍｐｌｘ（−３８， ７７８１，−２，９２６０）Ｖａ　（２０４＋　・ｃｍｐｌｘ　（−３８，７７ ８１，−２，８６１７）ｖｓ　（２０５）　＝ｃｍｐｌｘ　（−３８，７７８１ ，−２，８２９６）ｖｓ（２０６１＝　ｃｍｐｌｘ　（−３８，７７８１，−２ ，７３３１）ｖｉ（２０７）＝ｃｍｐｌｘ（−３８，８４２４，−２，７０１０ ）ｖｉ　（２０８）　＝ｃｍｐｌｘ　（−３８，８４２４，−２，６０４５）ｄ ｏ　ｉ　＝　ｌ、　　ｎ＋ｌｄ ＋ｆｄ（ｉ）　・ｖｓ（ｉ＋６３１ ｃｎｄｄ。

「ｅｔｕｒｎ ｎｄ Ｃ掌ネ零傘ネ傘傘傘本＊＊＊＊市本＊＊＊傘＊章本傘傘孝＊＊ｍ傘本本本零傘＊ 零傘傘ネ傘＊零章章ネ傘ネ零本傘傘＊掌傘零章傘市＊ネネ＊サブルーチンｌｅｄ ｇｅ　　ｌａｕｇ　（ｔａｕｇ、　ｎｌａｕｇ、ｎ５５ｇ、　ｌｅｄｇｅ、　ｎ ｌｅｄｇｅ）ｃ　　ｔ＄＄＄を章＊＊電Ｈ？Ｈ４本＊市掌零市本零＊本本零市電 １＊零傘傘零傘＊市傘零傘＊＊零零ネ章＊＊零傘＊本＊零＊ネ零零掌零章P ｃ　ｆｉｎｄ　ＩａｕｇＱ　ｌｏｏｍ　ｌｅｄｇｅＱ　ｗｉｔｈ　ｓａｍｐｌｉ ｎｇ　ｒａｔｅ　ｎ５５ｇ　ｉｎ　ｕｎｉｔ　ｏｆ　ｌ／ｌ■ 「ｅａｌ　ｌａｕｇ（１１ ｉｎｔｅｇｅｒ　ｎｔａｕｇ、　ｎ５５ｇ、　ｌｅｄｇｅ（１）、　ｎｌｅｄｇ ｅｎｔａｕｇ　＝　ｎｌｅｄｇｅ ｄｏ　ｉ　＝　１．　　ｎｌａｕｇ ｌａｕｇ（ｉ）　＝　ｆｌｏａｔ（ｌｅｄｇｅ（ｉ）−１）／ｆｌｏａｔ（ｎｓ ｓｇ）ｅｎｄｄ。

ｅｔｕｒｎ ｎｄ Ｃ車零零傘＃＊零傘ネ傘零ネ＊＊＊＊本零Ｉｔ＊ネ零ｔｌｌ傘傘＊零ネネネ＊傘 ネ零車章章零＊ネ零＊零零零傘掌ネ＊＊市零孝＊零掌零零本サブルーチン＋ｇｇ 　　ｄｅｌ　（ｓｇｇ、ｎ５ｇｇ１．ｎ５ｇｇ２．ｌｄｉｇｇ、ｎｓ＋ｇ、　　 ｌａｕｇ、　ｎｌａｕｇ。

＆ｓａｄ、　　ｎ５ｌｄ、　　ｎ５ｌｄ１．　　ｎ５ｓｌｄ）Ｃ傘傘傘＊章傘傘 掌傘Ｉ傘＊零車掌傘＊零章章市傘ネ傘牢ネ傘零傘零車傘ネ傘本ネ本零零ネ零車傘 ＊孝傘零零零零傘傘孝零本市車零零零傘市■■ ｃ　ｇｅｎｅｒａｔｅ　ａ　ｇｈｏｓｔ　ｒｅｆｅｒｅｎｃｅ　ｍａｔｒｉｘ　 ｆ「ｏｍ　＋１ｄＱｃ　　ｗｉｔｈ　ｅｄｇｅ　１ｏｃａｔｅｄ　ａｔ　ｊａｕ ｇＱｃ　ｓｇｇＱ　−ｇｈｏｓｔ　ｒｅｆｅＩｅｎｃｅ　ｍａＨｉｘｃ　ｎ５ｇ ｇ１　　　［０Ｗｄｉｍ、　　０１　ｓｇｇ（１（Ｏ［＃　ｏｆ　＋ａｍｐｌｅ ＋　ｉｎ　ｅａｃｈ　ｃｏｌｕｍｎ）ｃ　ｎｓｓｇ２−　ｃｏｌｕｍｎ　ｄｉｍ 、　ｏｆ　ｓｇｇｏ　（ｏ「＃　ｏｆ　ｇｈｏｓｔｓ）ｃ　ｌｄｉｇｇ　−ｌｅ ａｄｉｎｇ　ｄｉｍｅｎｓｉｏｎ　ｏｆ　ｓｇｇＱ　ｓｌｏ＋ａｇｅｃ　ｎ５５ ｇ　−８ａｍｐｌｉｎｇ　ｒａｔｅ　ｉｎ　ｕｎｉｔ　ｏｆ　ｆｃｃ　ｌａｕｇ Ｏ−ｅｄｇｅ　１ｏｃａｔｉｏｎ　ｏｆ　ｅａｃｈ　ｃｏｒｒｅｓｐｏｎｄｉｎ ｇ　ｓｇＱ　　ｉｎ　ｓｇｇＱ　　ｉｎ　ｕｎ奄煤@ｏｌ　Ｉ／Ｉｃ ｃ　ｎｔａｕｇ　−＃　ｏｌ　ｇｈｏｓｔ＋ｃ　＋ｌｄＱ　−ｓｌ　ｄｅｌａｉ ｌＱｃ　ｎ５ｌｄ　−ｎ　　５ｌｄ ｃ　ｎ５ｌｄｌ　−ｅｄｇｅ　１ｏｃａｔｉｏｎ　ｉｎ　ｓｌｄ　ｉｎ　ｕｎｉ ｔ　ｏｆ　ｓａｍｐｌｅｃ　ｎ＋ｓｆｄ　−ｎ　　ｓａｍｐｌｅ　　＋Ｉｄ　ｉ ｎ　ｕｎｉｔ　ｏｆ　ｌｃｃｏｍｐｌｅｘ　＋ｇｇ（ｌｄｓｇｇ、　ｌ）、山（ １）ｒｅａｌ　ｌａｕｇ（１） ｉｎｔｅｇｅｒ　ｎ５ｇｇ１．　ｎｓｓｇ２．　ｌｄｉｇｇ、　ｎ５５ｇ、山ｕ ｇ、　ｎｓ＋ｄ、　ｎ５ｌｄｌ、　ｎｓｓｌｄｎｓｇｇ２−　ｎｌａｕｇ ｄｏ　ｉｇ２　＝　１．　　ｎ１ｇｇ２ｄｏ　１ｇ１−１．　　ｎ５ｇｇ１ ｊ＝　ｎ　　＋ｌ　＋　（ｉｇｌ−１）傘ｎ５ｓｆｄ　／　ｎ５５ｇ百〇、　ｌ ｔ、　ｌ）　ｔｈｅｎ ｓｇｇ（ｉｇｌ、　１ｇ２）　＝　ｓｆｄ［１）ｅｌ＋ｅｉｉ　（ｊ、ｇｌ、ｎ ＋Ｉｄ）　ｔｈｅｎｓｇｇ（ｉｇｌ、　１ｇ２）　＝山（ｎｓｌｄ）ｌｓｅ ｓｇｇ（ｉｇｌ、　１ｇ２１　＝　５ｌｄ（ｉ）ｎｄｉｌ ｅｎｄｄ。

ｅｎｄｄ。

＋ｅｌｕ＋ｎ ｎｄ Ｃ傘零章傘電傘傘傘ネネ傘傘傘を傘ｔｔ＊ネ＊＊＊傘Ｉ傘を零零掌京傘＊本傘零 傘傘傘傘傘＊傘＊＊零傘傘傘孝ネ傘傘孝電傘傘傘傘傘＊ネ孝磨■ サブルーチン５ｌｄｄｅｌｌ　　（ｓｌｄ、　ｎ５ｆｄ、　　ｎ５ｔｄｌ、　ｎ ｓｓ［ｄ、　ｄ２．　　ｄ３）ＣネＵ車章車＃＃章オ重ｎ＊＊＊＊傘＊零零零零 章拳章零ｔｌ傘ネ章掌孝ネ＊傘零零章ネ傘孝本零零ネ孝傘ネ傘孝＊零零電本ネ本 零零ネネｃ　５ｌｄｄｅｌ　（ｓ　　＋ｅｌ　　ｄｅｔａｉｌ　ｄｅｌｉｎｅｄ ｌ：　ｄｅｉｉｎｅ　＋ｅｌｅ＋ｅｎｃｅ　ｖｅｃｌｏ＋ｃ　　５ｌｄＯ−ｓ　 　＋ｅｌｅ＋ｅｎｃｅ　　ｖｅｃｌｏ＋ｃ　　ｎ＋ｌｄ　　−ｎ　　　５ｌｄ ｃ　ｎ＋ｄｌｌ　−ｅｄｇｅ　１ｏｃａｔｉｏｎ　ｉｎ　５ｌｄＱｃ　　ｎ５ｈ ｌｄ　　−＋ａｍｐｌｉＢ　　「ａｔｅ　　ｉｎ　　ｕｎｉｔ　　ｏｆ　　Ｉｃ ｃ　ｄ２．　ｄ３−　「ａｎｇｅ　ｌｏ　ｂｅ　ｍａｐｐｅｄ　ｏｎｔｏ　ｌｏ ｔ　ｔｈｅ　Ｉｅａｌ　ｐａｒｔ　ｉｎ　ｃｏｍｐｏｓｉｔ■@ｖｉｄｅ。

Ｃ「山［ｔｏ　ｎｏｔｅ　Ｑ　ｐａｇｅ　６８−７５　ｔｏｔ　ｎｏｔａｔｉｏ ｎ　ａｎｄ　ｄｅ＋ｖａｌｉｏｎｃｏｍｐｌｅｘ　ｓｌｄ（１） ｉｎｌｅｇｅ＋　ｎ５ｌｄ、　ｎ５ｌｄ１．　ｎ５ｓｌｄ「ｅａｌ　ｄ２．　　 ｄ３ ｃｏｍｐｌｅｘ　ｖｓ（２５６） ｒｅａｌ　ｄ６．　　ｄ７．　　ｄ８．　　ｄ９．　　ｇｎ＋ｉｌｄ　＝６４ ｖｓ（６４）□ｃｍｐｌｘ（−１，４７９１，−３，１８３３）ｖｓ　（６５） 　：ｃｍｐｌｘ　（−１，５４３４，−３，２４７６）ｖｓ　Ｉ　６６）　＝ｃ ＋ｎｐｌｘ　（−１，６７２０，−３，２７９７）ｖｓ（６７）　＝　ｃｍｐｌ ｘ　（−１，６７２０，−３，３７６２）ｖｓ　（６８）　・ｃｍｐｌｘ　（− １，７３６３，−３，４０８４）Ｗ！　（６９１・ｃｍｐｌｘ　（−１，７３６ ３，−３，４４０５）ｖｉ　（７０１＝　ｃｍｐｌｘ　（−１，８００６，−３ ，５０４８）ｖｓ（７１）＝ｃｍｐｌｘ（−１，８００６，−３，５３７０）ｖ ｓ　（１２）　＝ｃｍｐｌｘ　（−１，８６５０，−３，６０１３１ｖｓ（７３ ）　・ｃｍｐｌｘ　（−ｌ、８６５Ｇ、　　　−３，６３３４）ｖａ　（７４１ □　ｃｍｐｌｘ　（−１，８６５０，−３，６９７７）ｖｓ　（７５）　＝ｃｍ ｐｌｘ　（−１，８６５０，−３，７２９９）ｖｓ　（７６）　＝　ｃｍｐｌｘ 　（−１，８６５０，−３，８２６４）ｖｓ　（７７１：ｃｌｉｐｌｘ　（−１ ，８６５０，−４，０１９３）ｃ　　　　５ｌｃｌ）□ｃｍｐｌｘ（−１，８６ ４９５１７，−３，６０１２８６１６１）ｖｘ（７Ｂ）＝ｃｍｐｌｘ（−１，８ ６５０，−４，１４２９］ｖｓ　（７９）　＝ｃｍｐｌｘ　（−１，８００６， −４，２１２２）ｖｓ　（８０）　・ｃｍｐｌｘ　（−１，８００６，−４，３ ０８７１ｖ＋　（８１１・ｃｍｐｌｘ　（−１，８００６，−４，３７３０）ｖ ｓ　（８２）　＝　ｃｍｐｌｘ　（−！、　８００６．　　−４．５０１６　） ｖｓ　（８３１＝ｃｍｐｌｘ　（−１，７３６３，−４，５９８１）ｖｓ（８４ ）・ｃｍｐｌｘ　（−１，６０７７、−４，８２３２）７！　（８５）　・ｃｍ ｐｌｘ　（−１，４７９１，−４，９５１８１ｖｓ　（８６）　＝　ｃｍｐｌｘ 　（−１，４１４８，−５，１４４７）ｖａ　（８７１＝ｃｍｐｌｘ　（−１， ４１４８，−５，４３４１）ｖｔ（８８）・ｃｍｐｌｘ　（−１，２８６２，− ５，６５９２）マｓ　（８９）　：ｃｍｐｌｘ　（−１，２１１６２，−５，９ ４８６）ｖｓ（９ｆｌｌ　；ｃｍｐｌｘ　（刊１５７６、　−６．１４＋５　） ｖｓ　（９１）　＝ｃｍｐｌｘ　　（−１，０２８９，−６，５２７３）ｗｓ　 （９２）　＝ｃｍｐｌｘ　（−０，９００３，−６，７５２４）ｖｓ　（９３１ ＝ｃｍｐｌｘ　　（−０，８３６０，−６，９７７５）ｖｓ　（９４）　＝ｃｍ ｐｌｘ　（−０，６４３１，−７，３３１２）ｖｓ　（９５）　：ｃｍｐｌｘ　 （−０，６４３１，−７，５５２７１ｖ＋　ｆ　Ｑ６１　＝　ｃｍｐｌｘ　Ｉ　 　−１１，５７１１８，−８，０３８６）ｖｉ　（９７）　・ｃｍｐＤ　（−０ ，４５０２，−８，５５３１）ｖｓ　Ｉ　９８１　：ｃｍｐｌｘ　（−０，４５ ０２，−１１，９７１１）ｖｓ　（９９）　・ｃｍｐｌｘ　（−０，４５０２， −９，３８９１）ｖａ（１００１・ｃｍｐｌｘ（−０，４５０２−９，Ｈ２Ｓ） ｖｉ　（１０１１・ｃｍｐｌｘ　（−０，５１４５，−１０，２２５１）ｖｓ（ １０２）＝ｃｍｐｌｘ（−０，５７８８，−１０，６４３１）ｖｉ（１０３）　 ＝ｃ町１に（−０，６４３１，−１１，３８２６）ｖｓ　（１０４）　＝ｃｍｐ ｌｘ　（−０，７７１７，−Ｉｌ、　８９７１　）ｖｓ　（１０５）　　□　　 ｃｍｐｌｘ　　（−０，９００３，−１２，３７９４１ｖ＋　（１０６）　・ｃ ｍｐｌｘ　（−１，０２８９，−１２，７９７４）ｖｓ　（１０７）　＝ｃｍｐ ｌｘ　（−１，０９３２，−１３，２１５４１ｖｓ　（１０ｇ）　・ｃｍｐｌｘ 　（−１，２２１９，−１３，７２９９）ｖｉ　（１０９）　□　ｃｍｐｌｘ　 （−１，３５０５，−１４，５０１６）ｖｓ（１１０）＝ｃｍｐｌｘ（−１，４ ７９１，−１５，０４８２）ｖｓ（ＩＩＩ）　・ｃｍｐｌｘ　（−１，８６５０ ，−１５，７８７８）ｖｓ（１１２１：ｃｍｐｌｘ　（−２，１８６５，−１６ ，１７３６）ｖｓ　（１１３）　　＝　ｃ＋ｎｐｌｘ　　（−２，６３６７、− １６，６２３８）ｖｓ　（１１４）　＝　ｃｍｐｌｘ　（−３，０８６８，−１ ７，２９９０）ｖｓ（１１５）・ｃｍｐｌｘ（−３，６０１３，−１７，６５２ ７）ｖｓ（１１６）：ｃｍｐｌｘ（−３，９８７１，−１８，２３１５）ｖｉ　 （１１７１＝ｅｍｐｔｘ（−４，６９４５，−１９，０９９７）ｖｓ　（１１８ ）　＝ｃｍｐｌｘ　（−５，０８０４，−１９，５１７７）ｖｓ（１１９）・ｃ ｍｐｌｘ（−５，８５２］、　　　−２０，００００）ｖｓ　（１２０）　＝ｃ ｍｐｌｘ　（−６，４９５２，−２０，４８２３）ｖｓ　（１２１）　・ｃｍｐ ｌｘ　（−６，９４５３，−２０，９６４６）ｖｉ（１２２１＝ｃｍｐｌｘ（− ７，３９５５，−２１゜５１１３　）ｖｓ　（１２３）　・ｃｍｐｌｘ　（−８ ，５５３１，−２２，０５７９）ｖｓ　（１２４１−ｃｍｐｌｘ　（−９，２ｆ ｉｌ１５．　　−２２．４７５９　）ｖｓ　（１２５１＝　ｃｍｐｌｘ　（−９ ，９６７８，−２２，７９７４）ｖｓ（１２６）　＝ｃｍｐｌｘ　（−１（１， ７３９５，−２３，２７９７１ｙ＋（１２７）　・ｃｍｐｌｘ　（−１１Ｊ１８ ３．　　−２３．６０１３　）ｖｓ（１２８）・ｃｍｐｌｘ　（−１２，２１８ ６，−２３，９８７１）ｖｔ（１２９）　＝　ｃｍｐｌｘ　　（−１２，９２６ ０，−２４，２７６５）ｖｓ（１３０）　＝　ｃｍｐｌｘ　（ｉ３．８２６４． 　　−２４．５０１６　）ｖｔ（１３１）　：ｃｍｐｌｘ　（−１４，６６２４ ，−２４，７５８８）ｖｓ（１３２）　：ｃｍｐｌｘ　（−１５，３６９８，− ２４，９１９６）ｖｓ　（１３３）　□　ｃｍｐｌｘ　（−１６，０７７２−２ ５，０８０４１ｖｓ（１３４）　・ｃｍｐｌｘ　（−１６，９１３２，−２５， １７６８）ｏ（１３５）　・ｃｍｐｌｘ　（−１８，０７０７，−２５，２０９ ０）ｃ　　　５ｌ（５）　・ｃｍｐｌｘ（−１９，Ｈ９６７９，−２５，２４１ １５８）ｖｓ（１３６）　＝ｃｍｐｌｘ　（−１９，０９９７，−２５，２４１ ２）ｖｓ（１３７）　＝　ｃｍｐｌｘ　　（−１９，８７１４、−２５，２４１ ２）ｖｔ（１３８）　＝　ｃｍｐｌｘ　（−２０，７０７４，−２５，１７６８ ）ｖｓ（１３９）　・ｃｍｐｌｘ　（−２１，８６５０，−２５，１７６８）ｖ ｓ（１４０）　＝ｃｍｐｌｘ　（−２３，２７９７，−２５，０４８２）ｖｓ（ １４１）　：ｃｍｐｌｘ　（−２４，１８０１，−２４，９１９６）ｖｓ（１４ ２）　・ｃｍｐｌｘ　　（−２４，７５８８，−２４，７２６７１ｖｓ（１４３ ）　・ｃｍｐｌｘ　（−２５，４０１９，−２４，５０１６）ｖｓ（１４４’ｌ 　：ｃｍｐｌｘ　（−２６，２３７９，−２４，２４４４）ｖｓ（１４５）　： ｃｍｐｌｘ　（−２７，０７４０，−２３，９２２１１）ｖＳ（１４６）　＝ｃ ｍｐｌｘ　（−２７，９７４３，−２３，５３７０１ｖｔ（１４７）　；ｃｍｐ ｌｘ　（−２８，８７４６、−２３，２４７６）ｖｓ（１４８）　・ｃｍｐｌｒ 　（−２９，４５３４，−２２，７０１０）ｖｓ（１４９）　□　ｃｍｐｌｘ　 （−２９，９０３５，−２２，３４７３）ｖｓ（１５０）　＝　ｃｍｐｌｒ　（ −３０，５４６５，−２１，９６１４１ｖｓ（１５１）　＝　ｃｍｐｌｘ　（− ３１，４４６９，−２１，５４３４）ｖｓ（１５２）　・ｃｍｐｌｙ　（−３２ ，４１１６，−２０，７３９５１ｖｓ（１５３）　−ｃｍｐｌｘ　（−３３，１ １９０，−２０，１２８６）ｖｓ（１５４）　＝ｃｍｐｌｘ　（−３３，６９７ ８，−１９，５１１２０１ｖｓ（１５５）　・ｃｍｐｌｘ　（−３４Ｊ４０８． 　−１９．１６４０）ｖｓｆ１５６１　＝ｃｍｐｌｘ　（−３４，７９１０，− １８，６８１７）ｖｓ（１５７）　□　ｃｍｐｌｘ　（−３５，２４１２，−１ ７，８４５７）ｖｓ（１５８）＝　ｃｍｐｌｘ　（−３５，７５５６，−１７， ２６６９）ｖｓ（［５９）　・ｃｍｐｌｘ　（−３６，２７０１，−１６，４６ ３０）ｖｓ（１６０）　・ｃｍｐｌｘ　（−３６，７８４６，−１５，９］６４ 　）ｖｓ（１６１）　＝ｃｍｐｌｘ　（−３７，ｌ７Ｑ４．　−１５．４６６２ 　）ｖｓ（１６２１＝　ｃｍｐｌｘ　（−３７，１７０４，−１４，６６２４） ｖｓ（１６３）　＝ｃｍｐｌｘ　（−３７，９４２１，−１４，１１５８）ｖｓ （１６４）　＝　ｃｍｐｌｘ　（−３８，１９９４，−１３，６９７７）ｖｓ（ １６５）　＝　ｃｍｐｌｘ　（−３８，５２０９，−１３，１１９０）ｖｓ（１ ６６１＝ｃｍｐｌｘ　（−３８，７７８１，−１２，２８３０）ｖｓ（１６７１ −ｃｍ山（−３９，０３５４，−Ｉ＋、　７３６３　）ｖｘ（１６８）　；ｃｍ ｐｌｘ　（−３９，１６１０，−１１，１８９７）ｖｓ（１６９）　□　ｃｍｐ ｌｘ　（−３９，４２１２，−１０，６７５２）ｖｓ（１７０）　＝　ｃｍｐｌ ｘ　（−３９，４２１２，−１０，１９２９）ｖｓ（１７１）−ｃｍｐｌｘ（− ３９，６７８５，−９，７１０６）ｖｓ　（１７２）　・ｃｍｐｌｘ　（−３９ ，８０７１，−９，１６４０）ｖｓ（１７３）　＝　ｃｍｐｌｘ　（−３９，９ ３５７，−８，５２０９）ｖｓ　（１７４１＝　ｃｍｐｌｘ　（−３９，８７１ ４，−８，［１７０７）ｖｓ（１７５）　・ｃｍ山（−３９，９３５７，−７， ７８１４）ｖｓ（１７６１＝　ｃｍｐｌｘ　　（−４０，００Ｑ口、　　　　− ７，４２７７）ｖｓ（１７７）　＝　ｃｍ山（−４０，００００，−７，１０６ １）Ｉｅｌｕｌｌ ｅｎｄ Ｃ傘Ｉ零＊傘中＄１１１章＊傘＄Ｈｔ＄＄零章市市傘傘傘傘＊ネ＊孝章本傘孝＊ ＊＊傘零＊傘ネ傘＊＊傘本＊傘章傘＊傘ネ孝零本＊零サブルーチンｃｏｐｙｌ　 　＋　（ｘ、ｙ、ｎｘ）Ｃ孝章傘零本本＃零＃零章傘零Ｕネｎｕｎ傘傘ネ＊孝＊ 零零零章本傘孝ネ本章を傘零ネ＊零章ネ零傘本＊零ネ零車牢零ネネネネｃ　ｃｏ ｐ７１−ｄｉｍ　ｒｅａｌ　ｖｅｃｔｏ＋　１０　　ｔｏ　ｙＱ「ｅａｌ　！（ １）、　　ｙ（１） ｉｎｔｅｇｅｒｎｘ ｙ（ｉ）　＝　ｘ（ｉ） ｅｎｄｄ。

Ｉｅｌｕｌｌ ｎｄ Ｃ傘車＊Ｉ零零傘零＊＊＊＊傘零＊掌傘ネ傘傘＊中零＊零零ネ＊＊ネ掌零零＊本 零傘ネ京孝ネ傘傘ネ傘孝本孝傘傘＊電傘傘傘零＊本ネ＊サブルーチンｌｐｄ　（ ｂ、　ｎｂ、　　ｅｒ「、　　ｔａｕ、　　Ｉｓ、　　ｔｏ　　ｘ、　　Ｉｂ） ｃｔｔ幸Ｉ零＊零傘零Ｉ零孝傘ｎ章傘章＊市を零ネネ＊傘＊＊零＊零ｔ１孝＊＊ 零零傘本傘本本車零傘車傘本本本零本本孝孝本本本ｃ　１ｉｎｅａ＋　ｐ＋ｅｄ ｉｌｉｏｎ　ｃｏｅｌｌｉｃｉｅｎｌｓ　ａｎｄ　ｅｕｏ＋　ｃａｌｃｕｌａｔ ｉｏｎｃ　　ｓ　　　　１ｐｄ（ｎｕｓ−１ａｕ）　　＝　Ｓ　　ｂ（ｉｌ　　 零　ｌ（ｎｏｔｅ−ｉ＋１）ｃ　ｃｌ：　ＤＳＲＣｎｏｔｅ　Ｒ２ｆｏｒ　ｄｅ ｒｉｖａｔｉｏｎ　ａｎｄ　ｎｏｔａｔｉｏｎｓｃ　ｔａｕ　−ｌｉｍｅ　ｄｅ ｌａ７　ｆ「ｏｍ　ｃｕｕｅｎｌ　ｓａｍｐｌｅｃ　Ｉｓ　−ｓａｍｐｌｉｎｇ 　１ｎｔｅｒｖａｌｃ　ｎｂ　−ｎ　ｂ　（ｎｏ、　ｏｆ　ｃｏｅｔｌｉｃｉｅ ｎｌｓ）、　ｎｂ　＝＜　１０ｃ　ｒｏ　　Ｉ　−ｅｘｔｅＩｎａｌ　ａｕｔｏ ｃｏｒ＋ｅｌａｔｉｏｎ　Ｉｕｎｃｌｉｏｎｃ　Ｉｂ　−ｂａｎｄ　ｗｉｄｔｈ ｃ　−−−−ｏｎ　　ｒｅｔｕｒｎ　−−−−−ｃ　ｂＱ　−１ｉｎｅａ＋　ｐ ＋ｅｄｉｃａｉｌｏｎ　ｃｏｅｆｆｉｃｉｅｎｔｓｃ　ｅｕ　−ｐｒｅｄｉｃｔ ｉｏｎ　ｎｏｔｅ　−−−−１ｐ　−−−−− ｃ　ｃｏｖ　　ｘ　　ｔｐＱ　−ｓｌｏｒａｇｃ　ｆｏｒ　ｃｏｖａ＋１ａｎｃ ｅ　ｍａｔ「ｉｘｃ　ｒｏ　　ｘ　　ｌｐＱ　−ｃｏｎｅｌａｌｉｏｎ　ｖｅｃ ｌｏ＋ｃ　ｃ　　ｌｐ　−ｃｏｍｐｌｅｘ　！ｔｏ。

ｃ　　ｌ　−ｎｂ ｃｏｍｐｌｅｘ　ｂ（１）、　　ｒｏ　　Ｉｒｅａｌ　　ｔａｕ、　　Ｉｓ、　 　ｌｂ、　　ｍｉｎｔｅｇｅｒ　ｎｂ ｃｏｍｐｌｅｘｃｏｖ　　Ｉ　　ｔｐ（Ｉｏｎ）、　　ｔｏ　　１　　ｔｐ（１ ０）、　　Ｃ１ｐｉｎ＋ｅｇｅ＋　１．　　ｌ　　Ｉｐ（１０）、　ｍ　　１ｐ （Ｉ［ｌ）Ｉ：ｎｂ ｃｏｖ　　　　Ｉ　　　　１ｐ（ｉ＋（ｉ−１）零ＩＩ　　＝　ｒｏ　　　ｘ（ ｆｌｏａｔ（ｉ−ｉ）ネＩｓ、　Ｉｂ）ｅｎｄｄ。

（ｏ　　Ｘ　　１ｐ（ｉ）　＝　＋ｏ−ｘ（ｆｌｏａｔ（ｉ−１）零ｔｓ−１ａ ｕ、　Ｉｂ）ｅｎｄｄ。

ｃａｌｌｍｉｎｙｃ　（ｃｏｗ　　Ｘ　　ｔｐ、　　１．　ｃ　　ｌｐ、　Ｉ　 　ｌｐ、　ｍ　　ｌｐ）百（（ｃａｂｓ　（ｃ　　ｌｐ）桂）、　ｅＱ、　１． ）　ｐｒｉｎ口、’　Ｎｌ　ｃｏｎｄｉｔｉｏｎｅｄ　ｍａｔｒｉｘ’ｂ（ｉ） 　　＝ｂ（ｉ）　　＋　ｃｏｙ　　　Ｉ　　　１ｐ（ｉ＋（ｉ−１）　傘ｌ）　 傘　ｒｅ　　ｘ　　　１ｐ（ｉ）ｅｎｄｄ。

ｅｎｄｄ。

ｃ　　ｔｐ　＝　ｃ　　ｌｐ　−ｅｏｎｉｇ（ｒｏ　　ｘ　　ｔｐ（ｉ））零ｂ 　（ｉ）ｎｄｄＯ ｅｒ「＝　ｃａｂｓ（ｃ　　ｌｐｌ ＋ｅｌａ＋ｎ ｎｄ Ｃ＃傘Ｈ＄＄＊孝孝Ｉ市章ネネ＊ネ零ネ零＊ネネ＊＊ネネネ孝＊＊＊掌市傘傘章 ＊本零零本牟本本＊零ネネ傘孝傘＊＊本零孝ネネ章市ネ傘傘ｃｏｍｐｌｅｘ　ｆ ｕｎｃｔｉｏｎ　ｔｏ　　ｃｏｔ　（ｔａｕ、　　Ｉｂ）Ｃ＊＊本＊掌＊零本傘 ＊傘＊＊ネネネネネ＊＊零傘Ｉ車車ネ傘本ネ＊零京＊孝傘ネネネネ傘孝＊孝車零 ＊傘ネ＊孝零本孝＊零ネネ零本本本零■ ｃ　ａｕｔｏｃｏｒｒｅｌａｌｉｏｎ　ｆｕｎｃｔｉｏｎ　Ｉｎ　ａ　ｕｎｉｔ 　ｐｏｗｅ「ｓｉｇｎａｌ　ｗｉｔｈｃ　　＋ａ＋ｉｅｄ　ｃｏｓｉｎｅｐｏｗ ｅ「ｓｐｅｃｔｒｕｍ　ｄｅｎｓｉｔｙ　１ｕｎｃｌｉｏｎ　ｉｎ　（０，Ｉｂ ）ｃ　ｃｌ　ｐａｇｅ　１２３　ｏｆ　ＤＳＲＣｎｏｔｅ　Ｏｃ　ｔｏ　　ｃｏ ｓ　−ｏｕｔｐｕｔ　Ｉｕｎｃｌｉｏｎ　ｖａｌｕｅｃ　ｔａｕ　−ｔｉｍｅ （１１）　−１＋ｑｏｅｎｃ７ ｔｅａｌ　　ｔａｕ、　　Ｉｂ ｃｏｍｐｌｅｘ　「ｏ　　ｆｐ ｐｉ　＝　ａｃｏ＋（−１，１ ｃ　ｄｌ　＝　ｌｈ　　（ｈｏ「１ｚｏｎｔａｌ　＋ｃａｎ　ｆｒｅｑｕｅｎｃ ｙ　ｉｎ　ｕｎｉｔ　ｏｆ　Ｉｃ）ｄｌ　＝　４．／９１０゜ ｎｌ　＝　ｎ１ｎｌ　（Ｉｂ／ｄｌ） １ｉ　＝　ｆｌｏａｔ（ｉ）　　章ｄ１ｒｏ　　ｌｐ　＝　ｔｏ　　ｔｐ　＋　 （１，＋　（［ａｔｉｏ−１，）傘（１，−ｃｏｓ　（ｐｉｉｔｉ））／２．１ ｅｎｄｄ。

ｔｏ　　ｃｏｔ　＝　Ｑ。

１ｉ　＝　ｆｌｏａｔ（ｉｔ　　掌ｄ＋ｔｏ　　ｃｏｓ　　＝　　Ｔｏ　　ｃｏ 　Ｓ　＋　　（１，＋　　１ａｌｉｏ−１，）　　ネ　（１，−ｃｏｓ　（ｐｉ ｔｌｉ））／２．　@） ＆　　　　　　　　　　　＄　　ｃｅｘｐ（ｃｍｐｌｘ（０゜２．零ｐｉ＄Ｉｉ ネｔａｕ））ｅｎｄｄ。

１４１１１１ｎ ｎｄ ｃ　　ｔｔｔ＄ネ！幸本傘本＃＃傘＊＊傘傘＊傘＊ネ零章＊章傘傘傘孝傘＊傘車 本＊ネ本＊傘零傘傘ネ＊傘＊傘＊＊傘零＊傘＊本＊零ネ傘零■■■P ｃｏｍｐｌｅｘ　ｆｕｎｃｔｉｏｎ　ｔｏ　　ｃｏｓ　−「ａｔ　　（ｔａｕ、 　　Ｉｂ、　　ｒａｔｉｏ）Ｃ本傘零＊零傘零傘傘傘本零ネ＊ネ＊傘孝＊＊＊＊ ＊傘零本零傘零＊＊傘京傘傘＊＊＊傘傘＊孝＊零零零傘傘＊孝孝傘零零零＊傘本 本＊＊傘■■ ｃ　ａｕｔｏｃｏｒｒｅｌａｌｉｏｎ　ｆｕｎｃｔｉｏｎ　ｔｏ　ａ　ｕｎｉｔ 　ｐｏｗｅ「Ｉｉｇｎａｌ　ｗｉｔｈｃ　　＋ａｓｉｅｄ　ｃｏｓｉｎｅ　ｐｏ ｗｅｒ　＋ｐｅｃｌ＋ｕｍ　ｄｅｎｓｉｔｙ　ｆｕｎｃｔｉｏｎ　ｉｎ　（０， Ｉｂ）ｃ　ｃｌ：ｐａｇｅ　１２３　ｏｆ　ＤＳＲＣｎｏｔｅ　Ｏｃ　ｔｏ　　 ｃｏｓ　　ｒａｔ　−ｏｕｔｐｕｔ　ｆｕｎｃｔｉｏｎ　ｖａｌｕｅｃ　　ｔａ ｕ　　−ｔｉｍｅ ｃ　Ｉｂ　−１＋ｑｕｅｎｃｙ ｃ　「ａｔｉｏ　−ｐｅａｋ　ｔｏ　ｖａｌｌｅ７　ｒａｔｉｏ　ｉｎ　ｔｈｅ 　ｐｏｗｅ「５ｐｅｃｌ＋ｕ＋ｎ　ａｓｓｕｍｅｄ「ｅａｌ　ｔａｕ、　　Ｉｂ 、＋ａｌｉｏｃｒｅａｌ　ｐｉ、　　Ｉｉ ｃｏｍｐｌｅｘ　「０１ｐ ｐｉ　＝　ａｃｏｓ（−１，） ｃ　ｄｌ　＝　Ｉｈ　（ｈｏｒｉｚｏｎｔａｌ　５ｃａｎ　ｆｒｅｑｕｅｎｃｙ 　ｉｎ　ｕｎｉｔ　ｏｌ　Ｉｃ）ｄ（・４．／９１０ ｎｌ　＝　ｎ１ｎｌ（Ｉｂ／ｄｉ） ｄｏｉ＝Ｇ、ｎｌ ＋ｉ＝ｆｌｏｇｔ（ｉｌ傘ｄ１ ［ｅ　　　Ｉｐ　　＝　　ｔｏ　　　　ｌｐ　　＋　　（１，＋　　（ｒａｔｉ ｏ−１，）　　ネ　（Ｌ　−ｃｏｓ　（ｐｉ　掌１ｉ））／Q゜ ｅｎ＋Ｉｄ。

１ｉ　＝　１ｌｏａｌ（ｉ）　＄　ｄｉｔａ　　ｃｏｓ　　　ｒａｔ　＝　ｔｏ 　　ｃｏｔ　　　ｒａｔ　＋　（１，＋　（ｒａｔｉｏ刊、）傘（１，−ｃｏｓ 　（ｐｉｔｌｉ））^２、 ＆　　　　　　　＊　ｃｅｘｐ　（ｃｍｐｌｘ　（０，、２，傘ｐｉｔｌｉｔｔ ａｕ））ｅｎｄｄ。

ｔｏ　　ｃｏｉ　　ｒａｌ＝＋ａ　　ｃｏｓ−ｒａｔ／ｒｅ　　１ｐＩｅｔｕ＋ ｎ ｎｄ Ｃ零零＊零ネ＊＊傘ネ＊傘傘傘＊本＊ネ＊＊＊傘零零零傘本零本章＊零零傘傘零 本＃Ｉ＊本零孝ネ本零零本傘ネネ車ネ零孝本零車＊車ネ＊本ｃｏｍｐｌｅｘ　ｆ ｕｎｃｔｉｏｎ　ｔｏ　　ｆｌａｔ　　（ｔａｕ、　　１ｂ）Ｃ傘傘傘孝＃孝＊ 傘傘＊章零零孝＊ネ本章傘傘車ネネ＊＊本零零本傘＊傘掌本ネネ＊零零零零孝零 ネネ＃零零零掌零零本本参傘零零零零孝零ｃ　ａｕｔｏｃｏｒｒｅｌａｌｉｏｎ 　ｆｕｎｃｔｉｏｎ　ｔｏ　ａ　ｕｎ日ｐｏｗｅｒ　ｓｉｇｎａｌ　ｗｉｔｈｃ 　　ｆｌａｔ　ｐｏｗｅｒ　ｓｐｅｃｔｒｕｍ　ｄｅｎｓｉｔｙ　ｆｕｎｃｔｉ ｏｎ　ｉｎ　　（０，Ｉｂ）ｃ　ｒｏ　　ｆｌａｔ　−ｏｕｔｐｕｔ　ｆｕｎｃ ｔｉｏｎ　ｖａｌｕｅｃ　　ｔａｕ　　−ｔｉｍｅ Ｃ篩−１ｒｑｕｅｎｃｙ ｔｅａｌ　　ｔａｕ、　　　Ｉｂ １ａ−ａ〔ｎ５ｆ−１，）＄ｌａｕ＄ｌｂ百（ａｂｓ　（Ｉａ）、　ｌ　１．１ ０．　ｅ−６１１ｈｅｎ＋ｏ　　ｆｌａｔ　＝ｌ。

１ｉｅ １０−山ｔ　　＝　　ｃｅｘｐ（ｃｍｐｌｘ（０，、Ｉａ））幸ｓｉｎ　　（ｆ ａ）／Ｉｓｎｄｉｆ ｅｔｕｒｎ ｎｄ Ｃ傘傘＊ネ＊Ｉ＊＊零零ネネ本ネｔ＃ネ＊車傘ネ章ネを置傘ネ傘本本ネ零市傘中 ＄本＊孝ネ傘傘幸零零車孝傘傘＄ネ＊零参傘傘傘ネ傘傘傘牟l傘ネ傘拳ネ零孝傘 ネ サブルーチンｌｐｄ　　ｒａｔ　（ｂ、　ｎｂ、　　ｅ【「、　　ｔａｕ、　　 Ｉｓ、　　ｔｏ　　ｃｏｓ　　＋ａｌ、　　Ｉｂ、　　＋ｘ狽奄潤j Ｃ＊＃＊零本＊＊零章＊ネ＊傘本傘Ｉ＊傘傘宰本傘傘零零車ネ傘零傘本本本零ネ 章市孝傘章＊ネ市ネ章掌傘傘市＊本＊零掌零孝＊本傘本＊＊{本電零市零傘本本 傘 ｃ　１ｉｎｅａ＋　ｐ＋ｅｄ山ｏｎ　ｃｏｅｌｌｉｃｉｅｎｔ＋　ａｎｄ　ｅｕ ｏｒ　ｃａｌｃｕｌａｔｉｏｎｃ　　ｓ　　　　１ｐｄ（ｎｅｔｓ−１ａｕ）　 　−Ｓ　　ｂ（ｉｌ　　本　５（ｎｔ　　１＋−ｉ＋ｌ）ｃ　　ｃｌ：　　ＤＳ ＲＣｎｏｔｅ　　Ｒ２ｌｏ【　ｄｅｒｉｖａｔｉｏｎ　　ａｎｄ　　ｎｏｌａｔ ｉｏｎ＋Ｃ−−−−−Ｈｅｎｔ「ｙ　−−−−−ｃ　ｔａｕ　−ｔｉｍｅ　ｄｅ ｌａｙ　ｌｏｏｍ　ｃｕｕｅｎｌ　＋ａｍｐｌｅｃ　Ｉｓ　−ｓａｍｐｌｉｎｇ 　１ｎｔｅｒｖａｌｃ　ｎｂ　−ｎ　ｂ　＋ｎｏ、　ｏｆ　ｃｏｅｌｌｉｃｉｅ ｎｌ＋）、　ｎｂ　＝＜　ＩＱｃ　「ｅ　　ｘ　−ｅｘｔｅｒｎａｌ　ａｕｌｏ ｃｏ＋＋ｅｌａｌｉｏｎ　ｆｕｎｃｔｉｏｎｃ　ｆｂ　−ｂａｎｄ　ｗｉｄｔｈ Ｃ−−−−Ｏｎ　　ｒｅｌｌｌｌｌｌ　　−−−−−ｃ　ｂＱ　−１ｉｎｅａ＋ 　ｐ＋ｅｄｉｃａｉｌｏｎ　ｃｏｅｆｌｉｃｉｅｎｔ＋ｃ　ｅｔｒ　−ｐｒｅｄ ｉｃｔｉｏｎ　ｅｒｒｏｒｃ　ｃｏｖ　　Ｘ　　ｔｐＱ　−ｓｔｏ＋Ｒｇｅ　ｌ ｏｔ　ｃｏｖａ＋１ａｎｃｅ　ｍａｔｒｉｘｃ　ｔｏ　　Ｋ　　ｌｐＱ　−ｃｏ ＋＋ｅｌｅｌｉｏｎ　ｖｅｃｌｏ＋ｃ　ｃ　　ｌｐ　−ｃｏｍｐｌｅｘ　ｎｏ。

ｃ　　ｌ　　−ｎｂ ｃｏｍｐｌｅｘ　ｂ（１）、　ｔａ　　ｃｏｓ　　ｒａｔ「ｅａｌ　　ｔａｕ、 　　Ｉｓ、Ｉｂ、　　＋ａｌ　　ｅ＋＋ｉｎｔｅｇｅ「ｎｂ ｃｏｍｐｌｅｘｃｏｖ　　Ｉ　　１ｐ（１００）、　　ＩＱ　　Ｘ　　ＩＩＩ（ １０１，Ｃ１ｐｉｎｌｅ＋ｇｅ＋　ｌ、　　Ｉ　　１ｐ（１０）、　ｍ　　ｔｐ （１０）Ｉ＝ｎｂ ｃｏｗ　　Ｉ　　ｔｐ（ｉ＋（ｉ−ｌ）＋１）＝＋ｏ　ｃｏｓ　　ｒａｔ（ｆｌ ｏａｔ（ｉ−ｉ）＄ｌｓ、Ｉｂ、ｒａｌｉｏｌｅｎｄｄ。

「ｏ　　！　　１ｐ（ｉｊ　＝＋ａ　　ｃｏｓ　　ｒａｔ（ｆｌｏａｔ（ｉ−１ ）傘１ａ−ｔａｕ、　ｌｂ、　ｒａｔｉｏ）ｅｎｄｄ。

ｃａｌｌｍｉｎｙｃ　（ｃｏｖ　　ｘ　　ｌｐ、　　１．　ｃ　　ｌｐ、　ｌ　 　ｌｐ、　ｍ　　１ｐ）ｔｌ　（（ｃａｂ＋（ｃ　　ｌｐＱ珪）、　ｅｑ、　１ ．１　ｐｒｉｎｔ　ｔ、’　ｉｌｌ　ｃｏｎｄｉｔｉｏｎｅｄ　ｍａｆ＋ｉｘ’ ｂ（ｉ）　　＝ｂｆｉｌ　　＋　　ＣＯＶ　　Ｉ　　　１ｐ（ｉ＋（ｉ−１）　 ネ１）　本　ｔｏ　　ｘ　　　１ｐ（ｉ）ｎｄｄｎ ｅｎｄｄ。

ｃ　　　　Ｉｐ　　＝　　ｃ　　’　　ｊｐ　　−ｃｏｎｊｇ（「ｏ　　　ｒ　 　　１ｐ（ｉｌ）　　孝　ｂ（１）ｅｎｄｄ。

ｅ＋＋　＝　ｃａｂｓ（ｃ　　１ｐ） Ｉｅｌｕ＋ｎ ｎｄ ｃ　　ｔｕｆｔ車孝＃＃本ネ＊零ネ＃ネＩＩ零ｔ１傘ネ＊本ネ零＊傘本ネ本＊ネ 孝傘＊＊＊零零ネ零傘＊零ネ零本＊京＊零章孝＊ネネネ牟孝帥l零ネネ零ネ零零 零 サブルすチ：／　ｈｉｌｂｅ＋Ｉ　（ｈｈ、　ｎｈｈｌＣ＊零零本＊傘傘傘ネ傘 本＊ネ傘零零ネ章ネネ電傘傘章傘＊本零本市孝傘＊車本＊零零零本傘＊＊ネネ零 掌傘車ネ零孝ネ零ネ孝孝ネ傘ネ＊孝lネ傘零零傘本ネネ傘 ｃ　ｃａｌｃｕｌａｔｅ　ｔｒｕｎｃａｔｅｄ　ｉｍｐｕｌｓｅ　ｒｅｓｐｏｎ ｓｅ　ｏｆ　ｔｈｅ　ｄｉｇｉｔａｌ　Ｈｉｌｂｅｒｔ　ｔ窒≠氏翌■盾窒■ ｃ　ｈｈＱ　−ｉｍｐｕｌｓｅ　＋ｅｐｏｎｓｅｃ　ｎｎｎ　−ｐｏｓｉｌｉｖ ｅｅ　ｔｉｍｅ　ｎｏ、　ｏｆ　ｃｏｅｆｆｉｃｉｅｎｔｓｒｅａｌ　ｈｈ（１ ） ｄｏ　ｉ　＝　Ｉ、　ｎｈｈ ｈｈ（ｉ）　＝　Ｏ。

ｅｎｄｄ。

ｄｏ　ｉ　＝　Ｉ、　　ｎｈｈ、　　２ｈｈ（ｉ）　＝　２　　章　（ｓｉｎ（ ｐｉｉｌｌｏａｔ（ｉ）　／２．）章峠）／（ｐｉ傘ｆｌｏａｔ（ｉ））ｅｎｄ ｄ。

「ｅｔｕｒｎ ｎｄ Ｃ５ＵＢ−ＲＯＩ；ＴＩＮＥ　　ＭＩＮＶｃＣＰＵＲＰＯ５Ｅ ＣＩＮＶＥＲＴ　Ａ　ｃｏｍｐｌｅｘ　ＭＡＴＲＩＸＣｌｌ５ＡＧＥ ＣＣＡＬＬ　ＭＩＮＶｃ　（＾、　ＩＩ、　Ｄ、　Ｌ、　Ｍ＋ＣＤＥＳＣＲＩＰ ＴＩＯＮ　ＯＦ　ＰＡＲＡＩ、ｔＥＴＥＲ３ＣＡ　　−ＩＮＰＩＩＴ　　ＭＡＴ ＲＩＸ、　　　ＤＥＳＴＲＯＹＥＤ　　ＩＮ　　ＣＯＭＰｕＴＡＴＩＯＮ　　Ａ ＮＤ　　ＲＥＰＬＡＣＥc　　ＢＹ ＣＲＥＳＬ’ＬＴＡＮＴ　　ＩＮＶＥＲ３ＥＣＮ　−０ＲＤＥＲＯＦ　ＭＡＴＲ ＩＸ　ＡＣＤ　−ＲＥＳＩＩＬＴＡＮＴ　ＤＥＴＥＲｌ、１ｌＮＡＮＴＣＬ　− ＷＯＲＫ　ＶＥＣＴＯＲＯＦ　ＬＥＮＧＴＨＮＣＭ　−ＷＯＲＫ　ＶＥＣＴＯＲ ＯＦ　ＬＥＮＧＴＨＮＣ ＣＲＥＭＡＲＫＳ ＣＭＡＴＲＩＸ　Ａ　ＭｔｌＳＴ　ＢＥ　Ａ　ＧＥＩＩＥＲＡＬ　ＭＡＴＲＩＸ Ｃ５ＵＢ−ＲＯＵＴＩＮＥＳ　ＡＮＤ　ＦＩＩＮＣＴＩＯＮ　ＳＵＢＰＲＯＧＲ ＡＭＳ　ＲＥＱＵＩＲＥＤＣＮ０ＮＥ ＣＭＥＴＩＩＯＤ ＣＴＨＥ　５ＴＡＮＤＡＲＤ　ＧＡＩＩＳＳ−ｊＯＲＤＡＮ　ＭＥＴＩＩＯＤ　 Ｉｓ　ｔｌｓＥＤ、　ＴＩＩＥ　ＤＥＴＥＲＭＩＮＡＮＴＣＩｓ　ＡＬＳＯＣＡ ＬＣＵＬＡＴＥＤ、　Ａ　ＤＥＴＥＲＭＩＮＡＮＴ　ＯＦ　ｚＥＲｏ　ＩＮＤＩ ＣＡＴＥＳ　ＴＨＡＴＣＴＨＥ　ＭＡＴＲＩＸ　Ｉｓ　５ＩＮＧＵＬＡＲＣ、、 、、、、、、、、、，０，、、、、、、、、、、、、、、−、、、、、、、、、 、、、、、、、、、、、、、、、、、、、、、、、、A、。

５ｔｌＢＲＯＵＴＩＮＥ　ＭＩＮＶｃ（＾、　Ｎ、　Ｄ、　Ｌ、　Ｍ）Ｄ１λＩ ＥＮｓＩＯＮ＾ｍ、　Ｌ　ｉｌ）、　Ｍ　（１）Ｃ、、、、、、、、、、、、、 、、、、、、、、、、、、、、、、、、、、、、、、，０，１，、、、、、、、 、、、、、、、、、、、、、A、、、、、、。

ＣＩＦ　Ａ　ＤＯＵＢＬＥ　ＰＲＥＣＩＳＩＯＮ　ＶＥＲ５ＩＯＮ　ＯＦ　ＴＨ ＩＳ　ＲＯＵＴＩＮＥ　Ｉｓ　ＤＥＳＩＲＥＤ、　　ＴＨＥＣＣＩＮ　Ｃ０ＬＵ ｌｌｌＮ　Ｉ　５ＨＯＵＬＤ　ＢＥ　ＲＥＭＯＶＥＤ　ＦＲＯＭ　ＴＨＥ　ＤＯ ＩＩＢＬＥ　ＰＲＥＣＩＳＩＯＮＣＳＴＡＴＥＭＥＮＴ　Ｗｌ−１１ＣＨＦＯＬ ＬＯＷＳ。

ｃｏｍｐｌｅｘ＾、Ｄ、ＢＩＧ＾、　ｌｌ０ＬＤＣＴＨＥ　　ＣＬＩ［：ＳＴ　 　ＡＬＳＯＢＥ　　ＲＥｌｉｔＯ〜Ｅｆｔ　　ＦＲＯＭ　　ＤＯＵＩＩＬＥ　　 ＰＲＥＣＩＳＩＯＮ　　ＳＴ`ＴＥＭＥＮＴＳ ＣＡＰＰＥＡＲＩＮＧ　ＩＮ　０Ｔ）ＩＥＲＲＯＵＴＩＮＥＳ　ＵＳＥＤ　Ｉｌ Ｉ　Ｃ０ＮＩＵＮＣＴＩＯＮ　ＷＩＴＨＴ）ＩｔｓＣＲＯｌｉＴＩＮＥ ＣＴＩＩＥ　１１０１：ＩＩＬＥ　ＰＲＥＣＩＳＩＯＮ　ＶＥＲ５ＩＯＮ　ＯＦ 　Ｔｌｌｌ５５ＩＩＢ−ＲＯＵＴＩＮＥ　ＭＩＩＳＴ　ＡＬrＯ ＣＣ０ＮＴ＾ＩＮ　ＤＯＵＢＬＥ　ＰＲＥＣＩＳＩＯＮ　ＦＯＲＴＲＡＮ　ＦＩ ＩＮＫＴＩＯＮＳ、　　＾ＢＳ　ＩＮ　ＳＴＡＴＥＭＥＮＴＣ１０ＭＵＳＴ　Ｂ Ｅ　ＣＨＡＮＧＥＤ　Ｔｏ　ＤＡＢＳ。

Ｃ、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、 、、、、、、、、、、、、、、、、、、、、、、、、、、、A、、、、、、、、 、、。

Ｃ５ＥＡＲＣＨＦＯＲＬＡＲＧＦ、ＳＴ　ＥＬＥＭＥＮＴＤ＝１．０ ＮＫ＝−Ｎ Ｄｏ　８０　Ｋ・１．Ｎ ＮＫ＝ＮＫ＋Ｎ Ｌ　（Ｋ）・Ｋ Ｍ　（Ｋ）・Ｋ ＫＫ＝ＮＫ１．Ｋ ＢＩＧ人二＾（ＫＫ） ｎｏ　２０１＝に、　Ｎ ＋２＝＋＋＊（１−１） ＤＯ２０１＝に、　Ｎ ＩＩ　　＝１２＋１ １５　　ＩＦ（ｃＡＢＳ（［１ｌＧＡ）−ｃＡＢｓｆ＾（団））　１５．２０． ２０１８　８ＩＧＡ＝Ａｆ団 Ｌ　（Ｋ）　＝　１ Ｍ　（Ｋ）　＝１ ２０　　Ｃ０ＮＴＩＮＵＥ ＣＩＮＴＥＲｃＩＩＡＮＧＥ　ＲＯＷＳＪ＝Ｌ　（ＫＩ ＩＦＯ−Ｋ）　　３５．３５．２５ ）１０ＬＤ＝−Ａ　（Ｋ　１１ １１＝ＫＩ−に＋１ Ａ　（Ｋ　ｌ）　−Ａ　（Ｊ　Ｉ） ３０　　＾（月）　　＝ｌＩＯＬＤ ＩＮＴＥＲｃＨＡＮＧＥ　ＣＯＬＵＭＮＳ３５１・Ｍ　（ＫＩ １Ｆ・（１−Ｋ）　　４５．４５．３８３８　１Ｐ＝Ｎ零（１−１） ）１０ＬＤ＝−＾（ＩＫＩ Ａ　ｆＪＫ）　＝＾（Ｉｌｌ ４０　　Ａ（Ｊ＋）　＝ＨＯＬＤ ＣＤＩＶＩＤＥ　Ｃ０Ｌｔｌｌｌｌ　ＢＹ　ＭＩＮｌｉＳ　ＰＩＶＯＴ　（ＶＡ ＬＵＥ　ＯＦ　ＰＩＶＯＴ　ＥＬＥＭＥＮＴ　ＩｓＣＣ０ＮＴＡＩＮＥＤ　ＩＮ 　ＢＩＧＡ）４５百（ｂｉｇａ、　ｎｅ、　ｃｍｐｌｘ　（０，０，１１ｇｏｌ ｅ　４８４６　　Ｄ・０．Ｏ ＥＴＵＲＮ ４８００５５１＝ｌ、Ｎ １Ｆ（１−Ｋ）　　５０．５５．５０ ５０１に＝ＮＫ＋１ ＾（ＩＫ）＝Ａ（ＩＫ）／（−ＢＩＧＡ）５５　　　Ｃ０ＮＴＩＮじＥ ＣＲＥＤＵＣＥ　ＭＡＴＲＩＸ ＤＯ６５１ゴ１．１１ １に：Ｎに＋１ ）１０１．Ｄ二＾（ＩＫｌ １１＝ｌ−Ｎ Ｄｏ　６５１＝１．　Ｎ １１＝ｌＩ＋Ｎ １Ｆ（１・Ｋ）　　６０．６５．６０ ６０　１Ｆ（１−Ｋｌ　　６２．６５．６２６２　　ＫＩ＝１１−１十Ｋ Ａ（団＝ｌＩＯＬＤ孝＾（Ｋｌ）　＋Ａ　（ｌ　Ｉ）６５　　Ｃ０ＮＴＩＮｌｉ Ｅ ＣＤＩ〜ＩＤＥ　ＲＯＷ　ＢＹ　ＰＩＶＯＴＫＩ＝に−Ｎ ＤＯ７５１＝ｌ、　Ｎ ＫＩ＝ＫＩ＋Ｎ １Ｆ（１−１）　７Ｑ、？５，１Ｑ ？ＯＡ（Ｋｌ）・＾（Ｋｌｌ／ＢＩＧ＾７５　　Ｃ０ＮＴＩＮＵＥ ＣＰＲＯＤＩＩＣＴ　ＯＦ　ＰＩＶＯＴＳＤ＝Ｄ傘ＢＩＧＡ ＣＲＥＰＬＡＣＥ　ＰＩＶＯＴ　ＢＹ　ＲＥＣＩＰＲＯＣＡＬ＾（ＫＫ）　＝１ ．　Ｑ／ＢＩＧＡ ８０　　Ｃ０ＮＴＩＮｔｌＥ ＣＦＩＮＡＬ　ＲＯＷ　ＡＮＤ　ＣＯＬＵＭＮ　ＩＮＴＥＲｃＩＩ＾ＮＧＥＫ＝ Ｎ １００Ｋ・（Ｋ−１） ＩＦ（Ｋ）　　１５０．１５０．１０５特表千３−５０３３４７　（４４） と 国際調査報告 国際調査報告 ＵＳ　８９００４１０

Claims (1)

1. 【特許請求の範囲】 １．トレーニング信号成分を有する直接信号、および望ましくない多重通路歪み 成分を形成する遅延信号を有する信号を含んでいる入力信号の源と、出力ポート 、前記入力信号の源に結合される入力ポート、およびプログラム可能なフィルタ 係数値を有する無限インパルス応答濾波手段とを含み、 実質的に多重通路歪みのない前記トレーニング信号を表わす基準信号の源（２８ ５）と、 前記入力信号の源（２２０）および前記基準信号の源（２８５）に結合され、前 記基準信号に応答して前記入力信号にほぼ等しい信号を発化する信号濾波システ ムの数学的モデルを作成し、且つ前記遅延信号を実質的に除去した前記直接信号 を出力信号として前記出力ポートに発生するように前記無限インパルス応答濾波 手段を条件づけるために前記数学的モデルで決まる係数値で前記無限インパルス 応答濾波手段（２８０）の係数値をプログラミングするための制御手段（２８２ ）とを含んでいることを特徴とする多重通路歪みを補正するシステム。 ２．前記無限インパルス応答手段がプログラム可能なタップ付き遅延要素を有し 、さらに前記数学的モデルで決まる遅延値で前記無限インパルス応答濾波手段の タップ付き遅延要素をプログラミングするための手段（６５４）を含むことを特 徴とする請求項１に記載のシステム。 ３．サンプリング用クロック信号源（２２２）と、前記入力信号源（２２０）に 結合され、前記サンプリング用クロック信号で決まる時点において前記入力信号 を表わすディジタル・サンプルを発生するアナログ・ディジタル変換手段（２３ ２）であって、前記無限インパルス応答濾波手段（２８０）および前記制御手段 （２８２）に前記ディジタル・サンプルを供給するように結合されている前記ア ナログ・ディジタル変換手段とを含み、前記基準信号源が前記基準を表わすサン プル値でプログラミングされる読出し専用メモリ手段（２８５）を含んでおり、 前記制御手段が、 読出し・書込みメモリ手段（２８４）と、前記読出し専用メモリ手段および前記 読出し・書込みメモリ手段に結合され、プログラムにより制御されて前記入力信 号のトレーニング信号成分を表わす複数個の前記ディジタル・サンプルを貯え、 前記信号濾波システムの前記数学的モデルを発生し、前記無限インパルス応答濾 波手段についての前記係数値および前記タップ付き遅延要素の値を発生するデー タ処理手段（２８２）を含むことを特徴とする請求項２に記載のシステム。 ４．前記無限インパルス応答濾波手段（２８０）が、前記入力信号を表わすディ ジタル・サンプルを供給するための入力ポート（Ｙ１）と、 前記入力ポートに結合され、前記入力信号を表わすディジタル・サンプルと補正 信号を表わすディジタル・サンプルを合成し、前記出力信号を発生する第１の信 号合成手段（６１０）と、 前記第１の合成手段に結合され、それから供給される信号を遅延させるプログラ ム可能な信号遅延手段（６２２）であって、複数個の出力ポートを有し、且つ前 記合成手段により供給される信号について第１のプログラミング制御信号により 決まる遅延時間だけ遅延させた信号を前記出力ポートの各々に供給するための回 路を有する前記プログラム可能な信号遅延手段と、 各々が前記プログラム可能な信号遅延手段の出力ポートのそれぞれ異なる１つに 結合される複数個のプログラム可能な係数乗算手段（６５６，６５８，６６０） であって、該係数乗算手段の各々に供給される第２のプログラミング制御信号に より決まる前記係数値の各々を前記プログラム可能な信号遅延手段から供給され る信号に掛ける前記複数個のプログラム可能な係数乗算手段と、前記複数個のプ ログラム可能な係数乗算手段の各々に結合され、それから供給される各信号を合 成して前記補正信号を発生する第２の信号合成手段（６０６，６６２）とを含み 、 前記データ処理手段が前記プログラムにより制御され、前記第１のプログラミン グ制御信号と前記第２のプログラミング制御信号を発生することを特徴とする請 求項３に記載のシステム。 ５．前記プログラム可能な信号遅延手段が、前記サンプリング・クロック信号源 に結合され、前記第１の合成手段（６１０）の出力信号を受け取るように結合さ れる入力ポートを有し、前記第２のプログラミング制御信号に応答し、前記第１ の合成手段の出力信号について、これとは前記サンプリング・クロック信号の周 期のそれぞれ異なる整数倍だけ前記第１の合成手段の出力信号に対して遅延させ た複数個の選択された遅延信号を各出力ポートに発生するサンプル・データ信号 遅延手段（６２２）と、 前記サンプル・データ信号遅延手段の出力ポートの中の少なくとも１つに結合さ れ、前記第２の制御信号に応答し、前記サンプル・データ信号遅延手段の１つの 出力ポートに供給される信号を前記サンプリング・クロック信号の周期のほぼＮ ／Ｍ（但し、Ｍは１より大きい整数であり、Ｎは前記第２の制御信号により決ま る値をとる正の整数である。）倍に等しい時間量だけ事実上遅延させる信号補間 手段（９２０）とを含むことを特徴とする請求項４に記載のシステム。 ６．トレーニング信号成分を有し搬送波信号を変調する直接信号、および望まし くない多重通路歪み成分を形成する遅延信号を含んでいるビデオ信号源（２１０ ）と、前記ビデオ信号源に結合され、それぞれ同相であり前記搬送波と直角位相 関係にあるベースバンド信号を表わす第１および第２の信号成分に前記ビデオ信 号を復調する復調手段（２２０，２３０）と、 前記第１および第２の信号をそれぞれ受け取るように結合される第１および第２ の入力ポートを有し、プログラム可能な複素フィルタ係数値を有する複素無限イ ンパルス応答濾波手段（２８０）とを含み、多重通路歪みを実質的に含んでいな い前記第１および第２の信号のトレーニング信号成分をそれぞれ表わす第１およ び第２の基準信号源（２８５）と、前記復調手段と前記第１および第２の基準信 号源（２８５）に結合され、前記第１および第２の基準信号に応答して前記第１ および第２の信号のトレーニング信号成分にそれぞれほぼ等しい第１および第２ の合成信号を発生する信号濾波システムの数学的モデルを形成し、且つ前記遅延 信号を実質的に除去した前記直接信号の第１の信号成分を出力信号として前記出 力ポートに発生するように前記無限インパルス応答濾波手段を条件づけるために 前記数学的モデルで決まる複素係数値で前記無限インパルス応答濾波手段の複素 係数値をプログラミングするための制御手段（２８２）とを含んでいることを特 徴とするビデオ信号中の多重通路歪みを補正するシステム。 ７．前記無限インパルス応答濾波手段がプログラム可能なタップ付き遅延要素を 有し、 前記制御手段が前記数学的モデルで決まる遅延値を使って前記無限インパルス応 答濾波手段のタップ付き遅延要素をプログラミングするための手段（６５４）を 含むことを特徴とする請求項６に記載のシステム。 ８．サンプリング用クロック信号源（２２２）と、前記復調手段（２２０，２３ ０）に結合され、前記サンプリング用クロック信号で決まる時点において前記第 １および第２の信号を表わす第１および第２のディジタル・サンプルのシーケン スをそれぞれ発生する第１および第２のアナログ・ディジタル変換手段（２３２ ，２３４）であって、前記無限インパルス応答濾波手段（２８０）および前記制 御手段（２８２）に前記第１および第２のディジタル・サンプルのシーケンスを 供給するように結合されている前記第１および第２のアナログ・ディジタル変換 手段とを含み、前記第１および第２の基準信号源が前記第１および第２の基準信 号を表わすサンプル値を使ってプログラミングされる読出し専用メモリ手段（２ ８５）を含んでおり、前記制御手段が、 読出し・書込みメモリ手段（２８４）と、前記読出し専用メモリ手段および前記 読出し・書込みメモリ手段に結合され、プログラムにより制御されて前記ビデオ 信号のトレーニング信号成分を表わす前記第１および第２のディジタル・サンプ ルのシーケンスの各々から複数個のディジタル・サンプルを貯え、前記信号濾波 システムの前記数学的モデルを発生し、前記無限インパルス応答濾波手段（２８ ０）について前記複素係数値および前記タップ付き遅延要素の値を発生するデー タ処理手段（２８２）を含むことを特徴とする請求項７に記載のシステム。 ９．前記無限インパルス応答濾波手段が、前記第１および第２のディジタル・サ ンプルのシーケンスを供給するための第１および第２の入力ポートと、前記第１ および第２の入力ポートにそれぞれ結合され、前記第１および第２のディジタル ・サンプルのシーケンスとそれぞれ第１および第２の補正信号を表わす別個の第 １および第２のディジタル・サンプルのシーケンスとを合成し、補正サンプルの 第１のシーケンスが前記無限インパルス応答濾波手段の出力信号である第１およ び第２の補正サンプルのシーケンスを発生する第１（６１０）および第２（６２ ０）の信号合成手段と、前記第１および第２の合成手段に結合され、それらから 供給される第１および第２の補正サンプルのシーケンスをそれぞれ遅延させるプ ログラム可能な信号遅延手段（６２２）であって、複数個の出力ポートを有し、 且つ前記第１および第２の補正サンプルのシーケンスについて第１のプログラミ ング制御信号により決まる遅延時間量だけ遅延させたものを前記出力ポートの各 々に供給するための回路を有する前記プログラム可能な信号遅延手段と、各々が 前記プログラム可能な信号遅延手段の出力ポートのそれぞれ異なる１つに結合さ れる複数個のプログラム可能な複素係数乗算手段（６５６，６５８，６６０）で あって、該複素係数乗算手段の各々に供給される第２のプログラミング制御信号 により決まる前記複素係数値の各々を前記プログラム可能な信号遅延手段から供 給される第１および第２の補正サンプルのシーケンスの遅延されたものに掛ける 前記複数個のプログラム可能な複素係数乗算手段と、 前記複素係数乗算手段の各々に結合され、それらから供給されるスケール化され たサンプルの第１および第２のシーケンスを合成し、前記第１および第２の補正 サンプルのシーケンスを発生する第３および第４のサンプル合成手段（６６２− ６６８）とを含み、前記データ処理手段が前記プログラムにより制御され、前記 第１のプログラミング制御信号と前記第２のプログラミング制御信号を発生する ことを特徴とする請求項８に記載のシステム。 １０．前記プログラム可能な信号遅延手段が、前記サンプリング用クロック信号 源に結合され、補正サンプルから成る第１および第２のシーケンスをそれぞれ受 け取るように結合される第１と第２の入力ポートを有し、前記第２のプログラミ ング制御信号に応答し、補正サンプルから成る前記第１および第２のシーケンス に対して前記サンプリング用クロック信号の周期のそれぞれ異なる整数倍だけ遅 延させた補正サンプルから成る前記第１および第２シーケンスについての複数個 の選択された遅延シーケンスを各出力ポートに供給するサンプル・データ信号遅 延手段（６２２）と、 前記サンプル・データ信号遅延手段の出力ポートの中の少なくとも１つに結合さ れ、前記第２の制御信号に応答し、該出力ポートから供給され補正サンプルから 成る前記第１および第２のシーケンスについての選択された遅延シーケンスを前 記サンプリング用クロック信号の周期のほぼＮ／Ｍ（但し、Ｍは１より大きい整 数であり、Ｎは前記第２の制御信号により決まる値をとる正の整数である。）倍 に等しい時間量だけ事実上遅延させるサンプル値補間手段（９２０）とを含むこ とを特徴とする請求項９に記載のシステム。