−
,?。'・夢晶君ふゆ漬牢。&勾山■声歓今−し空の
藤蓋護
●
。 9
?
&
L
3 息i
サー‐=。。▽
;斧遠く1,
僻鰄裁概 聴 二、rミ噌弓.n や 一 一 凸 ℃ 合 つ . ,
鱸ミ雲…………灘 1()S2
金 沢 大 学 広 報
計算機センター
Vol.2,No.3,1973
目 次
− 随 想 一
今 だ 計 算 機 を 使 わ ざ る の 記 ・ … ・ … … … . . … ・ … ・ … 河 田 修 二 医 療 技 術 と コ ン ピ ュ ー タ ー … … … … ・ … . . … … … 小 腸 一 彦 電 子 計 算 機 に つ い て 思 う こ と ・ … … … … ・ … … . . … 小 堀 為 雄 一 セ ン タ ー か ら −
速報再録……..…・………・…..…..…..………..……….….
− 会 議 報 告 一
連絡委員・プログラム相談員合同会議・……・……....………..
運営委員会会議..…..…..………..….……….….…………
− 研 究 一
ラインプリンターによるグラフ表示(4)
.………・…・………物理地学数値実験グループ B O S n を 使 っ て み て … ・ ・ … … ・ … … … ・ … … … . 村 田 重 男
X2‑Minimizationの方法とその応用例
. . … … ・ … ・ … … … 岩 尾 秀 嶺 ・ 車 古 正 樹
‑ 1 / O チ ャ ネ ル ー
計算機室を去るにあたって.…..…・……・……・…中村理恵子 地 球 の 中 の 熱 対 流 と 数 値 実 験 一 … ・ … . . … … ・ … ・ ・ 河 野 芳 繩 原稿募集要項・編集後記・・・……・…・………・・・……..…・…・……・・・.……・…
12
3
5
566皿
17
013222
D A T A P R O C E S S I N G C E N T E R
K A N A Z A W A U N I V E R S I T Y
− 随 想 一
今だ計算機を使わざるの記
理 学 部 河 田 修 二 いつだったか生協が模様緋えのさいちゅうに女子峨貝が卓上電子計算機を使って伝票の整理 をしているのを目撃?したことがある。右手の伝票をめくる速さもさることながら,左手のナ ンバーキーをたたく指のよどみを知らぬ滑かさに彼女の顔の美しさをすっかり忘れて半ばうっ とりながめていたことを思い出す。それ以来私の部屋の私の机の上にある電子卓上計算機のキ ーの̲上を私の左手の指が彼女にはおよばないまでもかなりの滑かさですべっている。一日にキ
ーを押す回数はせいぜい多くて200回を越えたことはない。私の計算がそれ以上多くの操作を
必要としないということはないのだが,それだけから作り出される一つ一つの曲線は私の頭の 中で今度は複雑に曲り,交錯しはじめる。ある日卒業研究をやっている学生が「先生,水溶液 から良質の単結晶を成長させるのにコンピューターはつかえませんか」という問を発した。な るほど結晶の相転移に関する実験的研究にとって良質の単結晶を得ることは,その過程の50%
以上を,いや見方によっては非常に微妙な測定可能限界に近い情報をうるには80%以上の重み をもっと考えられるほどである。そこで私は結晶作りの職人的,手工業的現状を話し,どのよ うにコンピューターを導入していったらよいかを考えてくれ,とついいそがしさにかまけて話 題を中断してしまった。そのことについてもそれ以後思い出さないこともないが少しも真剣に 考えようとしないのは,おそらく現在の経験的手法で得られる結晶を使用しての他とのかかわ りあいの中でかなり十分な成果を信じているからであろう。学生にはそれほどまでして(?)結晶 を作るよりも200回程度のキー操作で良いほどのデーターから我々が求めている推論を証拠だ てる法則を見つけだすことに熱中する方が私の性分に合う(?)そう私が思っているといった方が 良いだろう。まして我々の求めるものがぼう大(?)な計算をやらねば見つからないとは思えない と話したら何んとなく納得した顔をしてさがっていった。一つにはデーターを解析するにして も大型のコンピューターにかけるほどの数が出てこないということもある。測定の自動化には ほど遠いある極限的測定手段を用いなければ目的を達せられない測定においては,測定準備 段階からしてむしろ人間的コンピューターを総動員しなくてはどうにもならない。しかしたぶ んコンピューターを毛嫌いしているということもなく,将来とも使用しないと断言するほどの こともなく,むしろいつかそちらの方でフル操業をしなくてはならないこともあるだろうと考 えもするが,いまはその方向ではない,というのが本音であろう。私が使用するときはおそらく 大きな?実験装詮の一つとして使うことになるだろうと思う。その点コンピューターは道具で あると思っている。ESRというような設備と同じように計算機を使ってある測定的実験を行 うことになる場合だと思っている。いわゆる計算機実験とも小しちがいそうである。計算機を あまり使用しない人達が皆私のように考えているとは思わないが,中にはその通りだと思う人
もいるのではなかろうか。
あまり比較にはならないが,コンピューターシステムを出来る限り駆使した天気予報がはずれ ても(別な要素もあるのだが)私が小さな紙片に書いた前日の天気図から(この報憎の源に ついても別であるが)考えた予報の方がなんとはずれの少いことかというようなことも面白い ことだと思う,学生の言う結晶作りではないが直結したコンピューターにこまかいローカル的 1IY報を次々とうちこんで時々刻々の変化を追う方が日本のように複雑な地形での天気予報は糖 度が上り人々に喜ばれるのではないだろうか。もっともらしい長期予報など発表しないとさも コケンにかかわるとでもいうように発表するのはあまりも涙〈・ましいというのは少しいいすぎ であろうか。私のあずかっている学生の中になん人かコンピューター関係に就職を希望し,望 みを達しそうな学生がいる。就職してからはコンピューターとその取り巻きにふり廻されない ようにといっているのだが,ともあれいつか出合うコンピューターとの出合いを楽しみにその
− 1 一
時はどう使おうかと撫備はおこたりないが,さて今からしばらくは棚上げの状態である。コン ピューターを使って研究をしている人はコンピューターの夢を見るそうである。私は今コンピ ュ ー タ ー の 夢 は 見 な い け れ ど , 私 の 腐 心 し て い る 物 性 対 称 と そ の 装 置 の 夢 は 同 じ よ う に 見 つ づ けている。
医 療 技 術 と コ ン ピ ュ ー タ ー
金 沢 大 学 医 療 技 術 純 I U I 大 学 部 小 島 一 彦 内 外 を と わ ず コ ン ピ ュ ー タ ー の 進 歩 は め ざ ま し く , 各 方 面 で 利 用 さ れ 日 常 生 活 の な か で も か な り の 恩 恵 を 受 け , 身 近 か な も の と な り つ つ あ る が , 医 療 の 面 で の コ ン ピ ュ ー タ ー の 利 用 の 方 は 現 在 そ の 緒 に つ い た と こ ろ と い え る 。 一 般 に コ ン ピ ュ ー タ ー と い っ て も そ の 規 模 の 大 小 は も と よ り , 性 能 の ち が い は 各 種 ま ち ま ち で あ る 。 利 用 者 の 目 的 に よ っ て , よ り よ い 効 率 で の 稼 動 が 期 待 で き る も の が 選 択 さ れ な け れ ば な ら な い 。 ど の 分 野 で も 同 じ か と 思 う が , 医 療 面 で の コ
ン ピ ュ ー タ ー は 専 用 の も の が よ い の か 汎 用 の も の が よ い の か , 現 在 な お は っ き り と し た 決 定 要 素 が 見 当 ら な い 。 こ の 原 因 の 一 つ に は 利 用 目 的 が 医 療 機 器 の デ ー タ 収 集 の 制 御 お よ び 処 理 の シ ス テ ム 化 と デ ー タ の フ ァ イ リ ン グ お よ び レ ポ ー ト の 作 成 な ど と 非 常 に 広 範 で あ る こ と も あ げ ら れ る 。 し か も 即 時 処 理 で 待 時 間 を 般 小 に す る こ と が 望 ま れ , 現 状 で は 完 全 な も の を 望 む こ と は 経 済 的 に も む ず か し い 。
コ ン ピ ュ ー タ ー 利 用 の 一 目 的 で あ る 医 療 機 器 の シ ス テ ム 化 は , 現 在 利 用 さ れ て い る X 線 撮 影 装 澄 を は じ め ラ ジ オ ア イ ソ ト ー プ ° イ メ ー ジ 装 證 や ベ ー タ ト ロ ン , ラ イ ナ ッ ク な ど と い ず れ も 大 規 模 で 複 雑 か つ 高 性 能 な も の が 多 く , こ れ ら を 充 分 に 操 作 し 滴 用 す る に は 糖 密 な 調 耀 と 制 御 が 要 求 さ れ る た め , 早 急 に 実 現 さ れ な け れ ば な ら な い と 思 わ れ る 。 こ れ ら の な か に は 操 作 の 一 部 を ハ ー ド 的 に 制 御 す る た め の コ ン ピ ュ ー タ ー 回 路 を 組 み 込 ん で い る も の も あ る 。 こ の よ う に 小 規 模 な が ら 局 部 的 に 各 診 療 機 器 専 用 の コ ン ピ ュ ー タ ー が 開 発 さ れ 導 入 さ れ つ つ あ る 。 し か し ,
こ れ ら は 専 用 コ ン ピ ュ ー タ ー で あ る た め , 相 互 間 の 融 通 性 は 少 な く , 全 体 的 な シ ス テ ム 化 を 期 待 で き な い 。 一 方 , 全 体 的 な シ ス テ ム 化 の た め の 大 型 コ ン ピ ュ ー タ ー の 導 入 も 考 え ら れ な い わ け で な く , 現 在 , 一 部 の 大 都 会 の 病 院 や メ ー カ ー 直 属 の 病 院 な ど で は 何 十 億 円 と い う 気 の 遠 く なる規模の投資をして,コンピューターによるシステム化をl)M始している。われわれの国立大学 で も , ま ず 東 京 大 学 で 一 年 前 か ら 検 討 が 加 え ら れ , も う そ ろ そ ろ 実 用 に 移 さ れ る も の と 考 え ら れ る 。 し か し 一 般 に は ま だ 少 な く , 端 末 を 利 用 し た り オ フ ラ イ ン で 一 部 分 の 計 算 処 理 を 行 な っ て い る に す ぎ な い 。 本 学 で も , お く れ ば せ な が ら 将 来 の 堆 備 を か ね て , 二 三 の 装 識 か ら の デ ー タ の 処 理 に 利 用 し て い る 。
ま た , 医 療 分 野 で は フ ァ イ リ ン グ と レ ポ ー ト 作 成 も 重 要 な 問 題 で あ る 。 技 術 的 に は コ ン ピ ュ ー タ ー に と っ て こ の 仕 事 は 得 意 な 部 分 で あ り , こ れ に 利 用 す る こ と は 非 常 に 有 効 で あ る と 思 え る 。 た だ , コ ン ピ ュ ー タ ー 処 理 を す る と き 必 要 な コ ー ド 化 が 現 在 各 診 療 部 門 で 検 討 さ れ つ つ あ る が , 伝 統 が 古 け れ ば 古 い ほ ど , 種 類 や 方 式 が 多 く 複 雑 で , 新 し い コ ー ド 形 式 を き め て 統 一 す る に は か な り の 時 間 が 必 要 で あ る 。 ま た , さ ら に コ ン ピ ュ ー タ ー 利 用 を お そ く し て い る の は , 画 像 を 取 り 扱 わ な け れ ば な ら な い 点 と い え る 。 診 療 の 大 部 分 で は 画 像 ( た と え ば X 線 写 真 , R I
イ メ ー ジ そ の 他 心 遜 図 や 筋 電 図 な ど ) の デ ー タ を 重 視 し , そ の 利 用 度 は 非 常 に 商 い 。 し た が っ て , そ の 画 像 の フ ァ イ リ ン グ は も と よ り , 画 質 の 改 善 な ど の 処 理 が で き る コ ン ピ ュ ー タ ー が 必 要 と な る 。 こ れ ら は 工 学 の 分 野 で も コ ン ピ ュ ー タ ー に よ る 画 像 工 学 と く に パ タ ー ン 認 識 と し て 非 常 に 難 解 な 領 分 で あ り , ハ ー ド 的 に も ソ フ ト 的 に も 今 後 の 課 題 と 思 わ れ る 。 こ の よ う に 医 療 へ の コ ン ピ ュ ー タ ー の 導 入 に は , 医 療 技 術 と コ ン ピ ュ ー タ ー 技 術 の 相 互 の 協 力 で 解 決 し な け れ ば な ら な い 点 も 多 い が , し か し , こ れ ら の 特 殊 性 を 少 し で も 多 く 加 味 し た コ ン ピ ュ ー タ ー が 開
発 さ れ 導 入 さ れ る 日 も 遠 く な い と 思 わ れ る 。 現 状 で は , 実 現 で き る 範 囲 か ら シ ス テ ム 化 を 進 め , 将 来 の 全 体 的 な シ ス テ ム 化 へ の 基 礎 を か た め る こ と が 重 要 と 思 わ れ る 。
電 子 計 算 機 に つ い て 思 う こ と
工 学 部 小 堀 為 雄 1 . 遮 子 計 算 機 と 私
昭 和 3 6 年 頃 , 京 都 大 学 に K D C ‑ I な る 電 子 計 算 機 が あ る と い う の で , 私 も そ の 機 械 を 使 わ せ て い た だ い た 。 当 時 は 自 動 プ ロ ク ー ラ ミ ン グ 用 の 言 語 は 使 え ず , 機 械 語 を ア プ ソ リ ュ ー ト ・ コ ー ド で 審 〈 の が 本 態 で あ っ た 。 シ ン ボ リ ・ ソ ク ・ コ ー ド で 書 く と し て も , 固 定 小 数 点 数 の 加 算 は [ADD/30),浮動小数点数の減算は(FSB/20),答を何番のメモリーにストアせよ[S T O / 1 0 0 ] と い っ た 具 合 で , 通 子 計 算 機 の 機 構 が 判 ら な い と プ ロ グ ラ ム が 組 め な か っ た 。 さ ら に , K D C ‑ I の 主 記 憶 装 世 は 中 速 の ド ラ ム で , 2 0 0 語 だ け あ る ク イ ッ ク ・ ア ク セ ス ・ バ ン ド を フ ル に 利 用 し て , 計 算 の ス ピ ー ド を あ げ た も の で あ る 。 穿 孔 機 も 少 な く , 紙 テ ー プ の 孔 を 目 で 読み,孔が多ければ′寺ンチくずで埋め込み,少なければ手動であけた。国電の中で,あの長い テ ー プ を 読 ん で い た ら , 皆 に 「 点 字 で も な い の に , 何 を 見 て い る の か 」 と 注 目 さ れ て 赤 面 し た 。
その後,38年に金沢大学にNEAC2230が入り,自動う°ログラムが組め計算も早いというの で , 京 都 大 学 そ の 他 の 大 学 で 評 判 に な っ た 。 し か し , マ シ ン コ ー ド で 教 育 さ れ た わ れ わ れ に は 仲 々 な じ め な く , ま た , 講 習 会 の 識 師 も , マ シ ン コ ー ド を 教 え , 自 動 プ ロ グ ラ ム も 出 来 る よ ,
と い う 程 度 。 理 学 部 の 堀 教 授 や 若 狭 助 教 授 , 工 学 部 で は 私 や 吉 田 助 教 授 、 森 田 さ ん な ど は マ シ ンコードで組んでいた。ただ迩欠の武部教授だけが自動プロク.ラムNARC語で組まれ,われ われは,あれは計算スピードもおそいと言うので,賛成ではなかった様に思う。その頃は金沢 大 学 で も 使 用 者 が 少 な く , 日 本 遜 気 か ら 一 人 若 い 技 師 が 常 駐 し て い た が , 一 日 に 1 件 も な い 日 が あ り , 「 日 本 電 気 で は 高 い 機 械 を 売 り 付 け た も の だ と 恐 縮 さ れ て い た 」 と 聞 く 。 電 話 が あ っ て , 今 週 は ど う も 使 用 件 数 が 少 な い か ら 使 い に 来 て く れ , と 言 う の で , で は 行 っ て 見 る か と 理 学 部 へ 出 か け , 計 算 機 の コ ン ソ ー ル か ら フ ・ ロ グ ラ ム を 修 正 し た り し た も の で あ る 。 そ の 頃 は オ ーフ・ン形式で本人が機械を操作した。その後ハイスピードノぐンチが利用出来るようになり,また,
42年に車古氏が計算機室専属となった頃にはついに力つき,いつの間にか自動う°ログラムに変 更した。また他の大学でも,「金沢大学にでも電子計算機なるものがあるのだからうちへも入 れ て 欲 し い 」 と い う 話 を よ く 耳 に し た 。 思 い 出 す と 切 り が な い が , 日 本 電 気 の 常 駐 員 の 長 沢 君 は 私 の 家 に 下 宿 し て い た こ と も あ っ た 。
そ の 頃 は の ん び り し た よ い 時 代 だ っ た 。 現 在 の 電 子 計 算 機 セ ン タ ー に は 専 任 の 職 員 も お り , 設 備 も よ く な っ た が , ど う も 計 算 戦 争 の 様 相 が あ る よ う で あ る , ( 、 ソ ク グ ラ ウ ン ド ミ ュ ー ジ ッ ク
で も か け た ら ど う か 。
2 . 計 算 機 を 使 う と 自 信 喪 失 す る
う°ロク.ラムを作っている読者にはよくあることだが,これで充分と思っても必ずエラーが出 る 。 何 回 も 何 回 も や っ て い る と 腹 が 立 つ 。 ま た , エ ラ ー の コ メ ン ト が ま た 気 に い ら な い 。 と き に は 計 算 機 が 間 違 っ て い る の で な い か と い う 学 生 も い る し , 私 も そ う 思 っ た 。 「 で は 加 算 を 反 対 か ら や ら せ た ら ど う か 」 と い う の で l 順 序 を 変 え て や っ て 見 た ら や っ ぱ り , 同 じ 答 が 出 た 。 や は り 計 算 機 と い う も の は 確 か な も の だ と 改 め て 感 心 し た 。 そ の た め か , 世 間 の 人 は 計 算 機 で や っ た と い う と 信 用 す る 。 し か し , デ ー タ の 入 れ 間 違 い , プ ロ グ ラ ム の 間 違 い で も 計 算 機 は バ カ の 一 つ 覚 え で 計 算 す る の だ か ら , 妓 近 は 直 ち に は 信 用 し な い こ と に し て い る 。 こ ん な と き は 過 去 の 経 験 が も の を い う 。 計 算 ば か り に 頼 ら な い で , 見 聞 を 広 め よ と い う こ と で あ る 。
3 . 電 子 計 算 機 は 遅 い と い う こ と
− 3 一
私は最近,構造物の地震応答解析をやっている。地震などというものは10secから長くて30 s e c で あ る 。 そ の 応 答 を 計 算 す る の に , 速 い 計 算 機 で 2 〜 3 時 間 を 要 す る 。 こ う な る と 前 述 の
自 信 喪 失 か ら 電 子 計 算 機 な ど 大 し た こ と は な い も の だ と 次 の 自 信 が 出 て 来 る 。 4 . 計 算 機 教 育 ( 情 報 教 育 ) に つ い て
こ こ で い う の は 計 算 機 や テ レ ビ を 用 い て 人 間 を 教 育 す る と い う の で は な く , 早 く 言 え ば プ ロ グラミングの教育である。先日,東北大の大型センターの大泉先生の話をお聞きしながら考えた のだが,大学でこの教課をすると大変なことになる。金沢大学でも1学年約1,500名位の学生が いる。50名1クラスとして30クラス,3人の教官ですると1週1人10回となり毎日同じ講義を
2 回 や ら ね ば な ら な い 。 プ ロ ク ・ ラ ミ ン グ と い う の は 実 際 に 自 分 で や ら な い と も の に な ら な い 。 そこで,私が留学していた,コロンビヤ大学の例を述べると,計算機プログラムというコー ス が あ っ て ( 一 般 学 生 が 教 課 を う ま く 選 択 し て と る ) , こ こ で は プ ロ グ ラ ミ ン グ は も ち ろ ん , 計算機の機構,計算機からでて来るMAPなど(われわれは,エラーメ、ソセージと答だけしか 判 ら な い ) の 読 み 方 , プ ロ グ ラ ム の 指 導 の 仕 方 ま で 教 え て 単 位 を 出 す 。 学 生 が そ の 単 位 を も っ て い る こ と が 次 の 大 学 院 進 学 や 奨 学 金 を も ら う 時 の 有 力 な 手 段 と な る の で あ る 。 つ ま り 免 許 状 であり,それも権威あるものである。他の一般学生は彼等から必要なプログラミングの知識を 得 れ ば よ い の で あ る 。
今年の土木学会の電子計算機のシンポジュームでも問題になった話題の1つに,計算機のため の 教 育 が あ っ た 。
(1)これまでのような設計法でなく,計算機のための計算法や設計法を教育すべきであると いうこと。
(2)会社へ入ると,各種設計のためのプログラムが開発されていて,若い技術者はその中へ デ ー タ の み を 打 込 め ば 答 が 出 て 来 る の で , 内 容 を 知 ら ず , 入 力 デ ー タ を 間 違 え て , 変 な 設 計がなされても,経験がないので,ミスをおかす危険があるのでないかというのである。
また実例として,ある若い技術者に「この部分の鋼板の厚さを1""''変えてはどうか」と打 合せ会で話が出たら,「では魎子計算機に入れて明日答を持って来ます」と,返事をしたと
か。
(3)この事について私は次のような提案を学会へ送った。
a ) 若 い 技 術 者 の た め に , 計 算 機 で は 最 終 値 の み 出 さ な い で , こ れ ま で の 設 計 計 算 書 に 従 っ て 設 計 計 算 式 , 条 件 な ど 途 中 計 算 値 を 印 刷 し , 読 め る 計 算 書 を 作 り , 少 々 の 設 計 変 更 は 卓 上 計 算 機 で 出 来 る よ う に す る 。
b ) 第 2 段 階 と し て , a ) に 平 行 し て , 新 ら し い コ ン ピ ュ ー タ ー 用 の 設 計 計 算 書 の 様 式 の 規 格 化 を 行 な う 。
この場合でも計算に使用した設計荷重を○○示方識によるとしないで,丁寧に印字 させ,Inputデータのエラーがわかるようにする。
計 算 方 法 ・ 過 程 が わ か る よ う に し , 特 に グ ラ フ ィ ッ ク ・ デ ィ ス プ レ ー な ど を 用 い て , 一 般 の 技 術 者 が 理 解 で き る よ う に す る 。
c ) 大 学 や 教 育 機 関 に お い て は ,
1 ) 現 段 階 で は , ま ず , 従 来 の 設 計 計 算 法 を 理 解 さ せ , 櫛 造 物 の 部 材 の 寸 法 な ど , そ の オ ー ダ ー を 教 え る 。
2 ) 計 算 機 の 効 用 を 教 え , 利 点 ・ 欠 点 の 使 い わ け を 行 な う 。 計 算 機 の カ ー ド を も っ て センター通いをしていると,それだけで勉強しているような錯覚を感じさせる昨今 で あ る ( 電 子 計 算 機 に 追 わ れ 勝 ち だ と い う こ と ) 。
3 ) 計 算 機 用 の 計 算 法 や 設 計 方 法 を 開 発 す る こ と 。
4)(3)の(b)で開発きれた,電子計算機用の設計書の読み方や内容,使用法を解説する。
こ れ は ノ モ グ ラ フ が 多 く 利 用 さ れ た と 同 様 , こ れ か ら 我 々 と し て 考 え ね ば な ら な
いことと思う。
思うことを一筆書いて見た。私の記憶違いなどあるかもわかりませんし,失礼なことを書い た か も わ か り ま せ ん が , お 許 し 下 さ い 。 ど う も 古 い 話 を 書 き た く な っ た の も 年 の せ い か と 思 う 。
(11月17日午前4時)
− セ ン タ ー か ら −
速 報 再 録
1 消 耗 品 に つ い て
消 耗 品 の 一 部 の 値 が 次 の よ う に 変 わ り ま し た の で , お 知 ら せ 致 し ま す 。 消 耗 品 名 価 格
シ ー ト ( プ ロ グ ラ ム ・ デ ー タ ) 1 3 0 円 M . T . ( 6 0 0 フ ィ ー ト ) 3 , 0 0 0 円
( 1 , 2 0 0 フ ィ ー ト ) 4 , 0 0 0 円 と 以 上 の よ う に か わ り ま し た 。
湊
2 時 間 外 受 付 に つ い て , 1 1 月 2 日 よ り 2 階 の 計 算 機 室 に 受 付 を 設 け 午 後 5 時 よ り 7 時 ま で B O S に 限 っ て 受 付 と 返 却 を 行 う こ と に な り ま し た の で 御 利 用 下 さ い 。 ( * B O S ‑ I の み )
(48年3月までの予定)
◎ 電 子 計 算 機 に 関 す る 講 演 と 映 画 会 の 報 告 に つ い て
日 時 : 1 1 月 1 0 日 ( 金 ) 午 後 3 時 か ら 5 時 ま で 場 所 : 金 沢 大 学 工 学 部 1 1 番 教 室
講 師 : 東 北 大 学 教 授 大 泉 充 郎 氏 ( 工 学 博 士 )
織減内容としては,「東北大学大型計算機のTSSについて」と映画DIPS計画(データ 通 信 の 発 展 ) を 行 い ま し た 。 参 加 者 は 約 8 0 名 で し た 。
− 会 譲 報 告 一
連 絡 委 員 ・ プ ロ グ ラ ム 相 談 員 合 同 会 議
1 セ ン タ ー 長 よ り 運 営 委 員 会 の 報 告 が 下 記 の と お り あ っ た 。
( 1 ) 使 用 状 況 に つ い て の 報 告
(2)IBM穿孔機が11月中旬に搬入予定
( 3 ) 理 学 部 分 室 に エ ア ー コ ン を 取 付 け る こ と に 決 定
(4)夜間アルバイトを10月中旬より雇用決定
( 5 ) 広 報 の 予 算 追 加 決 定
2 セ ン タ ー 長 よ り 使 用 状 況 に つ い て 説 明 が あ っ た 。 3 1 B M 穿 孔 機 の 使 用 方 法 を 次 の 様 に 決 定 。
期 日 は セ ン タ ー が 適 当 と 認 め た 時 期 か ら 実 施 す る こ と 。 1 階 穿 孔 機 名 使 用 時 間
A 6 0 分 以 内 B 3 0 分 以 内
C 1 0 分 以 内 ( 教 職 員 優 先 )
− 5 一
(昭和47年10月27日)
D カ ー ド 1 0 枚 以 内
2 階 E 1 2 0 分 以 内 ( セ ン タ ー 優 先 ) 時間外受付について下記のとおり決定する。
11月2日より2階受付にて17時から19時までBOS‑Iのみ受付,返却を行う《
した。
計算制限と優先度について昨年と同様に適当な時期をみて実施することに決定。
武部委員より講演会実施の報告があった。
理学部分室の計算機について今後の見通しを運営委員会に計る様要望があった。
4
返 却 を 行 う こ と に 決 定
567
運 営 委 員 = =今 診 へ 議
昭和47年7月28日
1.センター経費補足について報告があった。
2.使用状況(4〜6月分)についての報告があった。
3 . 人 事 の 件 に つ い て 検 討
4.東北大学の大泉先生を招いて講演会を開くことについて検討
昭和47年9月8日
分室にエアー・コンを入れ替えることに決定。
大泉先生の諭演会について,日時を決定。
来 年 度 の 分 室 の 運 営 に つ い て 検 討
■●●123
昭和47年10月28日 1 . 人 事 の 件 に つ い て
(中村理恵子さんが化工へ,後任者は教養部から宇野昌子さん)
2.使用状況(4〜9月分)と計算料金については次回運営委貝会にて検討 3.分室の運営についての案見を提出。
− 研 究 一
ラインプリンターによるグラフ表示(4)
HIST:1関数のヒストグラム的表示
理 学 部 地 学 教 室 ・ 物 理 地 学 数 値 実 験 グ ル ー プ
河 野 芳 輝 , 中 井 重 幸 , 山 本 昭 夫 ,
刈 野 芳 輝 , 中 井 重 幸 , 山 本 昭 夫 , 都 築 輝 昭 1.目的:関数y=f(x)のグラフをヒストグラム的に表示すること。
.(補足)y=0からy=f(x)の間に記号(蝋)を入れて棒グラフ的に表わす。
2.計算:○yの変域,ymi 〜y,"。z
○ラインプリンター(LP)上の変域,1〜LINMX と す る と き , ま ず
DY=(ym・勇一y"i")/FLOAT(LmMX‑1)
と し て 変 域 間 の 対 応 を と り , 次 式 に よ っ て 関 数 値 v を L P 卜 の 位 證 I Y に 恋 換 として変域間の対応をとり,次式によって関数値yをLP上の位澄IYに変換す る。ただし,y=Y(K),X=X(K),K=1〜NXは,あらかじめ与えられてい るものとする。
IY=(Y(K)‑Ymin)/DY+1.5
一方,y:==0に対応するLP上の位置IYZを IYZ=‑Ymin/DY+1.5
より求め,配列PLOにおいて,IYとIYZの間に記号(瀬)を代入する。IYZの 位置には基線(I)を入れる。こうしたPLOを1〜LINMXまでAタイプで出力 する。
使用方法:y=Y(K),x=X(K)を定義したあとで,グラフをえがかせたいところで CALLHIST(X,NX,Y,YMIN,YMAX,NMOD)
の型でCALLする。ただし
OYMIN,YMAX,Y,X等の名称,単位は出力しない。
○ 改 ペ ー ジ し な い 。 ONX行打出す。
○サブルーチンは,X,Yに関して整合寸法にしてある。
入力パラメター:サブルーチンの引数(R:実数型,I:整数型)
3
4
5 . 出 力 パ ラ メ タ ー : L . P . 上 に 出 力 さ れ る も の
制限事項:LINMXはLP上の最大値130をとれないことに注意(XおよびYのプリントの た め の 余 裕 が 必 要 ) 。
機能の拡張方法:普通のヒストグラムを打出すにはYmin==0とするか,全てのYminをと り さ れ ば よ い 。
こ の プ ロ グ ラ ム で 使 用 し て い る ル ー チ ン : な し 。 エ ラ ー メ ッ セ ー ジ : 用 意 な し 。
6
7
89
− 7 −
ノ ぐ ラ メ タ ー タ イ プ 説 明 範 囲 例
X R 独 立 変 数 の 配 列 名 − X,A
N X I
独 立 変 数 の 個 数 。 と き の K の 最 大 値 エk
= X ( K ) と 書 い た M A I N P R の D IMENSION文 で宣言した数まで
51
Y R 関 数 名 。 Y = Y ( K ) の 型。 − Y,P
Y M I N R 関数の変域(股小値) な し 0.0
Y M A X R 関数の変域(般大値) な し 1.0
ー
N M O D I ヨコ軸上(L.P.の紙の流れ方向)にXの
値 を プ リ ン ト す る と き の 間 隔 N X 以 下 5
' ぐ ラ メ タ ー タ イ プ
−
F O R M A T 説 明 範 囲 例
Y M I N R G12.3 関数の変域(最小値) な し 0.0
Y M A X R G 1 2 . 3 関 数 の 変 域 ( 最 大 値 ) な し 1.0
X ( K ) R G 1 2 . 3 独 立 変 数 の 値 な し 5.0
一
PLO(1) A 1 0 1 A 1
関 数 値 を 変 換 し , グ ラ フ の 記 号 ( こ こ で は 窯 ) 入 れ た も の
F O R T R A N 文 法 で 許 さ 記 れ た 記 号
豪
Y ( K ) R G 1 2 . 3 関 数 の 値 な し 0.9
10.参考文献:特になし。
1 1 . 使 用 例 : 図 4 − 1 ( 例 題 , 主 プ ロ グ ラ ム の リ ス ト ) 。 図 4 − 2 サ ブ ル ー チ ン の リ ス ト 。
図4‑3y=x2‑20xのときの使用例。
12.計算時間:出力するXの個数NXによっても異なる。
N X = 5 1 の と き 4 秒 。 1 3 . プ ロ グ ラ ム ス テ ッ プ 数 : 5 1
1 4 . そ の 他 : サ ブ ル ー チ ン W C L O C K に つ い て
図4−1に現われるSUBR.WCLOCK(ICPTZ)は,計算時間測定用に作 製 し た も の で あ る 。 リ ス ト を 図 4 − 4 に 示 し た 。 A と い う 個 所 か ら B と い う 個 所 ま で の 計 算 時 間 を 測 定 し た い と き ,
Aの個所にCALLCLOCK(ICPTZ)(SUBR.CLOCKは基本 SUBR.)
Bの個所にCALLWCLOCK(ICPTZ) と す れ ば , A B 間 の 所 要 時 間 が 秒 単 位 で 打 出 さ れ る 。
た だ し , W C L O C K を 使 用 す る プ ロ グ ラ ム に は , あ ら か じ め D O U B L E I N T E G E R I C P T Z
の宣言が必要である。なお,BOUBLEINTEGER宣言文はFACOM230‑60 FORTRANにはないことに注意。
サ ブ ル ー チ ン R A N G E に つ い て
図4−1に現われるSUBR・RANGE(Y,NX,YMIN,YMAX)は,関数Yの妓 大 値 と 最 小 値 を 評 価 し , そ れ ら の 値 を 出 力 す る た め の サ ブ ル ー チ ン で あ る 。 図4−5にそのリストを示す。説明.を要しないだろう。今の場合,サブルーチン
H I S T の 変 域 と し て , こ こ で 求 め た Y M I N , Y M A X を つ か っ て 描 か せ て い る 。
720120 PAGEユ FACOH230‑う弓八うFORTiAN‑72n308‑OO19‑02
e骨BsoURcFi・張Tge。
DXF●十qXE+瀞
D+■XC
+XxB2各各十●谷虹ごA︒◆
Xl
︐まoYFt
u叩9Pみ■
RD
WこしHNみⅢ銃打xE
Nの一?
一弘IT
○0
U夕︒メ1RR︾一フF
MU寺Qこ︾〃●
●卜Cス洲
●
●一丁0●
O7 ︐X
H111J弘マ0
制n壷P●
lN.︐一F
0065︑色
H◆1RP:H
身Y63A12︐
幸Q−FX︲●N1Fo20Cn0E01TnF63F刊12もりCOEくTD00■NVFPもこ1F00仁・仮0﹄F・HR1一F伽I0沖R2クc09RQ■9Fnn.RO1AAX10FAnH一うMt酉f偶︒・1−秒9AX0Ej0193RBTnlO1oTGN0NOF1HnN屯︑やnA仰I1−A9.1−1FRmI0.f・的・f−FpqN−F弓︾T︒f︾ToFNOLfAFA■T丁︒F卿月nH−Tl側FASHHUARIRHTElOOEoRO2STDCDRFWF01
骨01号0︐骨l1
cEc
N1234う678901234う6789012345678511111111112222?227?I
C
Nx再51
,0101■1.Nx X《11毎F1.nAT《1−1》−1,.O XX■Xfn
Y(1)■FFfXX》
■ ■ − − ●
Y1《い■F1(xX1
ー
10CONTINuF C
CALlpANGF《V・NX・YHINOYHAX》
CALLpANGE(Y1,NX・Y1HINQY1HAx》
wR1TFr6、1021 1 FORMATf1H107H骨eeY骨丹佇》
C
CALLrlnCK《1rpT
CALI侭RムPH1rXoNx0Y0YHINoVHAio 仁AUw『iOCK《IrPT
X=X(1)
y=Y(1)のセョ,卜.YはFUNCTION で定襲.YIは今関係ない.
SUBPROGRAMFF(X)(略)
11 Yの殴大値,餓小値の欄索
S U B R − R A N G E 図 4 − 5 参 照
Yのグラフ(広報VOL、2,N0.2.19−23.1972参照)
sUBR、WCLOCKは図4−4及び説明の14項参照
49 bO うユ ラ2 う3 94 5う う6 97 98
C
NMOn・§ ‐、
CALLrlnCK(IrpTか
IYMIM.YMAXはSUBR・RANGEで定義した。
EALLHIETrXoNXQVOYH1NoY制AX・NHOf
■『i・ K制をPテ
ー ・ ・ 。 。
rInrK《1rpT
● 争 e 早 守 一
wrIOrKf1fPT CALL
CALl 仁 A u
STOp END 仁
図迩−1例阻(MAINPROGRAM)
定決卜 癖リ のス
0|と
の﹄N骨G
1︒骨砥
値即位T
・K岳G
ee︑eGJ
入S
Y骨骨4lるK
−rOG谷1丁▲
殿c・〃代I
偶●骨凸n
AO丹eル︒ルの入のⅣPO●G卜愉一−0ロ線↑雛号ゆゆン︒▲骨凸︒骨骨ィ大ヶpLHt尚骨.夕股スゼP記紀NYチ
●︒eeO9
1円〃︒G
−nTeCl111Jllljllll︲IIlllJ︑IIJL・1︒︒︒●?加地し●nグ勺・骨●jクロ岬︑プー
ら骨■8●J
Q骨各9OL
勾匡骨らサ勺I●骨缶︑″0
.︒e側型
−0②骨01
碁岳ら⑤色
骨缶eL9
P︐骨各骨︑〃〃L・一9
︒②︒″グ9〃L
●骨各〃グ幻缶
︒骨︐分りノリO
図一T骨n分3Jに皿SeOそくノXt2olGHeYノ0H骨N吾偏01−ゞ●骨●eF岳・◆︒︑.︒︑
可︒骨X■︒丹H23
1.骨Ae岳1000M旬間骨19011
OAeY各1319.10己.恥叱恥︑誘惑j応息ロ9811HE2F3
OG1分:T1.T︐olTGMenH偶1.16!?IqRGVGL↑ノ0:01分.●P1oX9ROR12HGVGOHRXH0W1口6X7谷・岳・11ノXhA8◆ううA9A一RGX仔XOMUNもH011111HVO各N骨NHN5V311皿︑迅咽0N卜無恥必w胴皿叩岳即丸爪弓沙︑Q0.F.︑NA︒F谷︒fe0●a︾FQ11−1.0一︑唇F−9.凶11Mm・フ渉託加知州・ロN岳Tql9HノらHG91TIeSGxo11.1HYoX◆口T骨I骨肉︒︒一NqX?Yn.1NY.$tD1n雪フ︑骨u・HeflIX1.1119.1−1.︐.1x︒︑1.1.1駒屯酌︑嘔叩州・1●1F骨O岳eXHHMM000610fZN1fHZS10骨H骨F旬11NY110001Vo0YYYYYiYlFNNn01H骨則骨NJJ11−1H1H1HNI12届一・・︑ffYG・・OHOH1−15TゞNⅡ月1RnやnV.︑1斗x・−1010−11雫X・口・晋F一F・1−T︾x一八叩廿一層一F︾Fo1−E1︾r﹄1︾F00口可qFs骨︒T各11喝1..Afih.t6.f・岡1.K1.写Ⅱ︒侭倫I71ZIM・・・Ⅱ7.t.f・!.fU・も・6︐了N轡R・FAA甑岬耐圷恥・昨地汗叩炉郁︑︑.小恥・伽・温乖・小↑m率中華・恥非那小・恥岻輌︾岬輌一脚加掘●函恥 叩・叩即・走苧州坤噸pF・xM・I︾T・f︾TdfTV﹄F
一FAI各H各HTTNI毎IR1RIR・ZON・fl212NONofRtRN11TD犯虻了R各U骨IAAlLYRORORoZYOOLoSFYYoYYOOLOLFOFOORREN2UsP骨S骨DDDLFDWFWF旨FY1︑DPEYIII611EDPEPIFIFC冒冒RE
PO各001皿う・69舵︑伊S各1︐0−1.1
︐骨11111
〆﹂eA骨C仁ECccccEC.c↑r外
N1234う6789012309679901234う678901234967890123分5670901511111111112222222222↑933﹂3333・33340.4ゞ4△44644991
eceSU8R・H1ST骨ら骨
6◆1︐.111・lllolllllllll・IIIIIIIIII11111111III11.1111111111零齢nUO骨●︽叩0骨●■︾●骨CO骨●0骨●◆岳骨●●骨骨●0骨什●0
◆骨骨◆
骨号00骨骨①OS骨骨●●︒什骨●
︑●分骨︒●●●日■も
骨丹各0●
●●骨骨︒
●●︒谷各①◆eらp骨令
らe分骨D●缶G骨骨●●
0︒●骨●
●ら暑骨90缶ee骨谷D■骨各各骨骨D●谷骨丹骨谷06丹骨骨e骨c■必ひら分各■︒
◆骨■吾骨骨◆
骨岳旬分吾香Qe谷各各仔骨骨●●骨各骨骨骨骨︒0分骨岳G骨骨●●告分骨G骨骨CD●各各e岳骨丹●D丹骨岳骨骨骨骨号︑岳骨骨骨骨骨骨PDG骨Q各凸什骨●●◆骨︒谷仔骨ら骨◆●●骨ee骨各骨DDG●●骨俳缶骨骨●︒●e凸缶ら各缶骨申●●●︒e■岳凸骨谷●●扮仔q骨BG各丹●0G各e●e缶骨旬骨G●●●︒︒︒●骨︒骨CO●骨e●ee岳骨︒●
丹●●e丹︒岳丹谷︒●◆eee骨●●丹岳︒◆︒●②●日G缶●︒骨6Ce︒︒e谷谷④分︒e90e︒●Ge谷︒分骨骨●○岳骨︒岳●分骨●丹各0申●ee岳倍分各骨︒岳■09骨g凸︒︒仔骨●骨骨︒暑●口各岳仔岳●e各骨各号岳号■0谷︒谷Ge缶●G谷●●骨0︐倍骨e丹各岳谷骨各岳骨什●◆e丹︒︒●谷骨岳骨昼各骨骨骨◆●分骨什凸●凸缶各各骨骨各骨骨●0骨骨骨骨各各s骨骨各凸針谷骨自6谷骨岳谷●eeeそ骨ぞ各骨分●◆骨骨骨骨岳④︒伊丹骨●件谷合骨骨◆●筈骨丹骨骨●e缶各倍骨各骨骨骨骨●C号■号G凸号e●毎各︒e各各骨骨DC骨缶与谷●●●●●砂号●●骨抄仔色●骨骨分る岳︒e谷骨︒骨骨各各e●骨骨早●骨分骨分●●●︒︒●●骨●丹岳吾骨e早◇骨各骨骨eC骨︒︒︒●︒︒●ら各骨骨◇●分令谷︒︒岳●谷︒○分︒缶●分仔■骨◆●らee︒●e●︒■︒●Ce●凸C■骨骨旬︒0︒缶凸︒谷谷仔岳●Gee●骨●●●︒ee00分缶︒各岳骨谷●ら︒●ee●︒︒●e谷谷D■骨らい︒︒●谷骨︒骨●e●●︒●●Ce○ら丹BG骨召︒︒骨●谷口︒︒岳●●⑤●らGB骨ら骨︒●U谷日各︒ee骨ら●︒●︒●●●●︒︒ee骨︒6G分各分り●︒骨︒分りge分ら●●︒︒︒●e骨侵eDge谷︒谷口ら●骨eら分︒Gee岳︒●︒︒骨ら骨骨D今谷骨骨︒e丹■側丹り骨日●Gee巳仔︒e丹谷缶骨◆0骨谷骨骨e●骨岳仔吾谷︒骨骨岳e骨○昼ee各丹谷口分■6各各骨骨骨各●︒骨らら骨各丹丹ee■骨分骨谷ら骨G骨●●骨e丹岳骨缶︒岳各各岳各丹■丹●各骨ら岳丹骨谷︒●岳●●各仔丹伺骨骨●毎分何各仔骨丹骨丹谷eeeeeee各岳丹骨.︑●骨骨骨仔各骨岳分骨分骨抄缶伺岳分骨各巳各ee毎■骨谷谷骨6●骨骨丹骨骨骨●骨◆日各骨骨吾各各ら丹仔ら分任︒e各各丹骨■Ce谷●●骨︒仔谷eも各●●●各各うり丹各仔各昼◆缶各G各各らoe0丹骨骨毎︒e骨骨︒谷目昼仔骨谷畳仔丹骨丹守各GB吾岳仔骨谷各●
■■■■一日8■■gt0T8●■81■■■g8H8今日■︷■8口■OBT8■■Ut8TJ18D■UTB■■巳●■B■■8■■●■■■●■■●■8−口BBB●■0■■口廿Ⅱ●■8日8T■14竹8■■●0■■0日6■●︽■0二日89818口■JT且TU■■◆岳毎骨骨骨分与各各骨骨骨骨各凸仔各骨岳戯●仔骨缶各骨骨骨ら各各吾骨骨e骨各各各骨︐凸岳谷岳守谷骨骨号召丹各丹●●eeG︒白◆谷谷eeG骨呂骨岳骨骨●e◆骨岳︒00●●●●砂e●谷各eeD●●ら●●●G各●●句骨e骨岳缶ee●︒Gd●骨②口丹骨骨呂凸昏Gee谷0●谷骨e岳骨骨骨e●ら︒0●何GG句旬9台●e0●什⑧骨各丹︒e●0◆ololDlD0oI■0︒000日■oll●l0golDIDlDIoIeeeeeeGee●GB日骨各骨丹凸目eeeeeC丹Gee骨ee骨◆
○00︑
一戸﹄﹄
00000000.0000.0o0O︲0000.000︑0.00︽UnUn画︽U︽U︽U︿Un︾︽U00●00000●●0●●●●0麺いふ恥訟幻かふふい︑浬齢岨︑泥↑識泌郡沁粟恥弘犯和ロ毎一幸︽叩︾ 00000oOOOOOOOOOOOOOO000000000000000000...0.....・・・︲014.969.90000︲︑00.00︲︒0900900.00.0︒.︒00.︒・096壷q41.︐14.q6569410nP6ク09沙・694.1.︐迄q・A1・▲9−4﹄169︐一q︐§1琴△9今4.1A一Q01.4.9.6−?$R・︐︒A・n.△R一うう一りう・フ84︑3今?毒211.1064今?01−396789.991.999月・769310?・4691.117︐↑333.4495絹も今790ムロ亨一?宇一亨一冒一白口邑ロロ一宮−0
E O O
E O O
−100・
eeeCPT・△・OOSFC骨告与
HnO
lX14‑3例題y=x2‑20xについての結果例
FAC"230‑24(9F⑥同T6AN‑720308SOO羽‑O2
9 b q e ●
eeGsOuRCEo順Te骨缶
7 2 . 1 フ ・ n l P A G F 1
ISN STATFNENT
① 1 ■ 。 = 1 口 ■ 4 =
C 谷骨骨SURROlIT1NFoWRITFELOrK ..・・WrlO亡K(ICPTZ)轡●・・ 。●1972.6.10;。。Y・KONO cHEAsI:!熊白ELAテ10FT1脚FTnl『PTZ・
SUBR⑥OIT1NFwrLOrK《にpTハ
ー b □ ‑ ‐ U o −
OOUBLF↑NTEGFR1rPTZoにpT c..... .......、
EALLrInrK〔IrPT1 C
cPTdIFpテーIcPTZ
wRITF".100ifPテ,、
lOOFORHAftiHn。RHeeeCPT・・GB.3、RHSEr・・・》
C
RETl順脳 END
12349678901231111
図 4 − 4 サ ブ ル ー チ ン W C L O C K の リ ス ト
FA H230凸24戸5F、旬T月AN‑72mo8‑OO1、‑02 BG骨sOuRcFi.。'鷺T骨丹骨
7 2 . . ⑥ 1 P A 偶 E 1
ISN
叩nN
︑9 K■
●X
YA
QH
OY
●H
■氏ク
nMt
・1x
■凸守埜司グ●丘晶︾畠で
○4
2072911G
■9
0■
0N
■二HB
aH
骨Ⅳ侵碁Mu骨 YY
暑H骨
IX巳F
X︐1側N1&偶
AXA
HADR
YHNo小vA国F
N9N
INY1JIHI11・汀YH⑪N.f・fIQYuwwX恥XQHNX1N・xAHbNN1AHuY91HHYSfYNYY0.F・fNe・届画F﹄F︑1.1知1GNG⑥3NXHBANXIAYpHRANNHH0.R犯n.fxYY︒$国司EIY99N︒︒09NET4︑4QEE00丁1NAN◆竺舎1LGlH−側︒TImN岬︑︾F画F・甲︒ogFb1F↑UpT︾11J11o9p−U︑6.tH・nUMq︒.︒1叩1帖・fPTF時⑥RN.■・■○・f・f−1言FAT円R今FFNX◇1YYTT−HAUBTH1AくtNIRT5UEIHHoFFORosS︑︑YYDI1仁WF
骨骨00
骨号︑1︑
骨各1
12349678901234561111111 ccC
昌 骨 骨 骨 骨 骨 骨 骨 骨
−
1G12.31 RETURN END
図 4 − 5 サ ブ ル ー チ ン R A N G E の リ ス ト
− 1 1 −
BCSⅡをイ更って升て
理 嘩 探 荊 田 重 男
匁爪6asⅡ①講習会に出鳶(・自分でィ更,てみようと尾、 てから.すて.に数.月 になろうと(てllb.最初はF5RTRAN.>パイIしの利点を、丸のう.ロノ7"ラムに応用
1tぅと(張.広張lbe2,脆禦の解挽をF羨んでまず.目lこうくのほ、ENTR,rX,INP LICIT丈,pEBUG(TRACE),&UFF5RMAT丈にま,ける丈牟欄誕迩今('.…0)、位罵
‑tE遮る‑なピでぁ〉た.そ帆らをノ使用(辰例を示す.(桶リ4)
"111.86SnF66RTRANう・ロワ願ラム〃』とその出力(.L)
1IMPLICITHEAL骨8(A9XOF)9REAL58(T)91NTEGFR骨4《N)QCOHpLEX骨16《、)
2 D l N E N S l O N A X ( 8 )
35OOFORHAT D15o6oA69I5)
4 6 0 0 F O R H A T ( 1 1 0 )
5602FORMAT(oOSEISAKU−−oA6)
6100READ(505000ERR=700)AAoA80D,T・NBAI 7AX(1)aF(AAQABoD・N8AI)
8 , 0 ユ 1 口 3 、 7 . 2 9 N ■ I
1 O C A L L C L O C K ( N N N ) 1 1 W R I T E ( 6 9 6 0 0 ) N N N 1 2 X 軍 A A 骨 D F L O A T ( N − 1 ) 1 3 X Y = A B e D F L O A T ( N ‑ 1 ) ユ 4 A X ( 1 ) m F E ( X ) ユ 5 1 A X 《 I ◆ 1 ) ■ F G ( X Y ) ユ 6 W R I T E o 6 0 2 ) T 1 7 7 0 0 S T O p
18DFBUGINIT(X,xY・Ax)
ユ 9 A T 1 0 0 2 0 E N D
1COHPLEXFUNCTIONF号16(AX9AVqD9N)
2INPLICITREAL骨β《A0F)0INTEGER骨4(N)0COMpl.EX骨ユ6(p)
3 n X = D C H P L X ( A X ・ A Y 》 4 G O T O 1 O う E N T R Y F E ( A X )
6DXDDX+DCHPLX(AXoO・ODO)
7 G O T O ユ 0 8 E N T R Y F 6 ( A Y 》
9 D X m p X D C H P L X ( O ・ O D O c A Y 》 10ユOFaCOFXP(DX+DFLOAT(N》各D)
1 1 R E T U R N 1 2 D E B U G I N I T ( D X ) 1 3 A T 1 0
ユ 4 E N D
更に理解を深めゐため、B露ⅡF6RTRAN丈塞編を謹んだ上ころ、その内息や昭う
{てこんかやり方状あるのか?と,(謂用椎)につllて多くり疑問が)主c."!Kらの廉訳 上.蔑む途中て・侭l'‑'!!1*,乃リの復い方につllT矢。ろにめ.値の文華縮た説んだ.
利用素から見たB5言江の柚威は図土て.、圦愉 、うが水BうSで毛用(てきたのは、
下線群(図ユ)ぐう11て・あり.8露Ⅱ退知フ促最判り頃t同梼て・ろう辰. 蒋礁の機能 を赤(碇のが図2て、あゐ.こ小上同挽の結成はB5 Sにもある氷、オリ用老の立場から すうじ、双鳳椎に負け、罪通性が豚{'と 8・わILも.(イ且(ぞり機能の4更顧に漁 て.危
簾性はウ豚ll.)
655江職ム趣の廿単(非線型パッメーターを虜駿データより推定する〕に応用 た 場ノ合袖耽迄、Z競朗すら。7.ロノ7'ラムの漁武'よ図うであb.計鋪この芳窒によウ.便
"n.BOSnF6RTRAN7oログラムイ列こえの出力(ユ〕
I I v l . 「 I S N = 3 f
I M T l S N 車 1 1 A X ( 1 ) b61
I M T l S N = 1 2 X I M T I S N ■ 1 3 X Y 1 M T I S N ■ 6 F
I N I T I S N = 1 1 A X ( 3 ) l r o I T l S N 毎 q F
I M T I S N = 1 1 A X ( 4 ) bb2
l M T I S N ■ 1 2 x I N I T l S N 毎 1 3 X Y
I M T I S N = 6 F
I I w l l I S N a l l A X ( 3 ) I I v I T I S N = 9 f
I I v l T I S N = 1 1 A X ( b ) bb?
】 I d l T l S N ■ 1 2 X l M T l S N = 1 3 X Y
I n i T I S N = 6 F
I I v I T I S N = 1 1 A x ( I ) I M T l S N 色 9 F
I N 1 Y I S N = 1 1 A X ( 6 ) sEISAKU−−MuHATA
jJ,上寅"〒爵間4sEC(DEBU6の時)@F13DXと解無すj
T R A C E I S N = 6 S T ・ N O ■ 1 0 0 I I w I T I S N = 6 A A
I N I T I S N = 6 A B I N I T I S N = 6 D I N I T I S N = 6 T I I w I T I s I w a b N e A I
S l j 6 T R A C E i S m i c 7 F L E V E L o l I N I T I S N ・ 3 D X
T R A C E I S N = 1 0 S T ・ N O ■ ユ 0 I M T I S N D 1 0 F
I S N ・ 1 1 L E Y E L ・ 1
RにTURIv
I I w i l T I s N 。 1 1 4 x 《 エ ) I N I T I S N = 8 1
I N I T I S N = 9 N 3ユ913
I N I T I S N a l 2 X I I v I T I S N = 1 3 X Y
S I J A 1 R A C E I S N c l 4 F E L E V F L = 1 I N I T I S N c 6 0 X
T H A C E I S N a l O S T o N O ■ 1 0 1 1 ・ 4 1 T I S N = 1 0 F
R E ' U R N I s N = 1 1 ̲ L E Y f L 。 1 1 1 , l i f I S N 。 1 1 4 X < ̲ 3 )
T R A C E I s N = 1 5 s T 2 N o ■ ユ
S u 8 T R A C E I S N 軍 ユ う F G L E V E L ■ 1 I N I T I S N m 9 D X
T R A C E I S N p l O S T ・ N O ■ 1 0 I m , I T I S N = 1 0 f
R E T U R I u I S N ■ 1 1 L E V E L ■ 1 1 N I T l S N ■ ユ ユ A X 4 )《
I M T I S N 画 1 1 1 I I W I T I S N a 9 N 3』9ユ5
上人ェ填行時間9SEC(TRACEの喝)④圭力の−識のaナ
0020100201111112112111131130000000000000000000O0000000EEDじじEEじとヒレしりヒヒDEED︑︑ヒヒ︑ヒヒp3う86795095374うう4う9361090008986837887う2371う2128う172174うう101671う79う6219.7120990210161383643944363943980494844814808う28828うう19889908689う8601?0224284832518う13787037017361619619171221229う1344348100●●●●●●●●●●●︒■00●●●●●●●●■●00000000000OOOOOOOOOOOOOOOO
口垂一一口
0011う20002233010012200002000000000000DDDDDtとEEDDDEEEED3う0063う388679520098001980668378388510075190016713ぅぅ1300013488364329948008489008う289881200012400224?56836121368116196111
0●●●●◆00●00●●●9O●00000000000000000−一や一一一一 01211うう00000EEEfD951337592279855447332845う48733911770●00000000口一
− 1 3 −