今週は・・・
2008-05-31
今週は、わりと忙しかった。
月曜日は名大病院の歯科で、虫歯の治療をしてきた。いざ削り始めると根っこの方まで蝕まれていて、当分通わないといけなくなった。歯の方もドンドン加工度か増してきて、本来の歯が人工の歯に置き替わって行くようなってきた。現在上の前歯を工事中。これが終わると、下の前歯の工事になる。
予想より長生き出来ている。あとどの位生きられるか分からないけれど、歯がなくなるのと、命の蝋燭の炎が消えるのがどっちが先になるのだろう。多分歯がなくなると、会話不能になりそうである。その辺のことを、来週のＦ大先生の外来の時に尋ねてみようかと思う。
火曜日は、母の訪問入浴があった。
水曜日は、名大病院でＰＥＴ検査を受けてきた。昼のヘルパーさんのサービスが終わるのを待って、出掛けた。予約時間に間に合いそうになかったので、タクシーを手配して病院に行った。
道中、運転手さんと会話が弾んだ。運転手さんも大病を経験していたので、その後の心の変化など話しているうちに病院に着いた。何とか予約時間に間に合う。
ＰＥＴ検査は、薬剤を注射して４０分ほど専用の椅子で静かにしていて、検査の順番を待つ。その間何もせず、ボ〜としていなければならない。本も読んではいけない。何故なら脳が活発に働くと、それだけブドウ糖を代謝するので、肝心のガンが見つけづらくなるから。
待っている間、地下室の明るい照明の下で自分の細腕を見ると、沢山の血管が透けて見えた。どんな照明をつかっているのか、はっきりと血管が見えた。いくらか皮下脂肪がついたけれど、人体模型のようだった。普段見るより深い静脈の枝分かれまで透けて見えるので、自分の不健康さを再認識してきた。
木曜日は、母の主治医のＥ先生の往診があった。血液検査とバルーンカテーテルの交換があった。母は管か濁りやすいので、新しいのになってよく尿が出るようになった。管が汚れてくるとミキシングして掃除はするのだけれど、中々奇麗にはならない。たわんだ管の一番下に、そんのカスが溜まってドロドロ状態になるので、時々管を持ち上げて流してやらないといけない。
それらの間、先に公開したマス取りゲームのプログラムに続いて、遺伝的アルゴリズムのプログラムを作っていた。
解の構造体の領域をｍａｌｌｏｃで確保して、ポインターでつなぐというＣ言語らしい処理などを追加して遊んでいた。順次機能を追加していったので、コードが美しくなくなった。奇麗に修正したら、近日中に公開しようかとも思う。ただブログで紹介するには、少し大きくなってしまったけれど・・交差や突然変異の部分を機能強化したら、公開しようかと予定している。
やっと頭の配線が、Ｃ言語に馴染んできたよう気がする。この修正が終わり次第、ペンディングになっているプロダクションシステムに改めて挑戦してみようかと思う。
それから小室先生の本などで、中国に関しての勉強も少しずつしている。中国理解の鍵は、三国志にあると先生は分析されている。
若い頃これも教養の一つとばかりに三国志を読んだけれど、誰の書いた（ＯＲ訳した）三国志か忘れてしまった。そもそも登場する人物が多くて、何がなにやら分からなくなってしまう。
「喫人」のシーンを読んだ記憶がないので、吉川先生の作ではなさそうなのだが・・・
ちなみに「喫人」とは、「人」を食べることである。ついでに書くと、「喫」とは、食べることてある。だから「喫茶」とは、「食べてお茶を飲む」という意味になる。さらに書くと、塀の中では古い言葉がそのまま使われているようで、食事の合図か今でも「喫食」であるそうだ。
昨夜はＥＭＯＢＩＬの通信環境があまりよくなく、０．６Mしかなかった。通信速度は、平均すると１．３Ｍほどてある。何とかマコト君のブログが見られるくらいの速度である。
おまけに昨夜は、この所よくあるように、ＦＣ２は繋がりにくくて記事を書けなかった。だから昨日は、コメントの返事をしただけで終わってしまった。
月曜日は名大病院の歯科で、虫歯の治療をしてきた。いざ削り始めると根っこの方まで蝕まれていて、当分通わないといけなくなった。歯の方もドンドン加工度か増してきて、本来の歯が人工の歯に置き替わって行くようなってきた。現在上の前歯を工事中。これが終わると、下の前歯の工事になる。
予想より長生き出来ている。あとどの位生きられるか分からないけれど、歯がなくなるのと、命の蝋燭の炎が消えるのがどっちが先になるのだろう。多分歯がなくなると、会話不能になりそうである。その辺のことを、来週のＦ大先生の外来の時に尋ねてみようかと思う。
火曜日は、母の訪問入浴があった。
水曜日は、名大病院でＰＥＴ検査を受けてきた。昼のヘルパーさんのサービスが終わるのを待って、出掛けた。予約時間に間に合いそうになかったので、タクシーを手配して病院に行った。
道中、運転手さんと会話が弾んだ。運転手さんも大病を経験していたので、その後の心の変化など話しているうちに病院に着いた。何とか予約時間に間に合う。
ＰＥＴ検査は、薬剤を注射して４０分ほど専用の椅子で静かにしていて、検査の順番を待つ。その間何もせず、ボ〜としていなければならない。本も読んではいけない。何故なら脳が活発に働くと、それだけブドウ糖を代謝するので、肝心のガンが見つけづらくなるから。
待っている間、地下室の明るい照明の下で自分の細腕を見ると、沢山の血管が透けて見えた。どんな照明をつかっているのか、はっきりと血管が見えた。いくらか皮下脂肪がついたけれど、人体模型のようだった。普段見るより深い静脈の枝分かれまで透けて見えるので、自分の不健康さを再認識してきた。
木曜日は、母の主治医のＥ先生の往診があった。血液検査とバルーンカテーテルの交換があった。母は管か濁りやすいので、新しいのになってよく尿が出るようになった。管が汚れてくるとミキシングして掃除はするのだけれど、中々奇麗にはならない。たわんだ管の一番下に、そんのカスが溜まってドロドロ状態になるので、時々管を持ち上げて流してやらないといけない。
それらの間、先に公開したマス取りゲームのプログラムに続いて、遺伝的アルゴリズムのプログラムを作っていた。
解の構造体の領域をｍａｌｌｏｃで確保して、ポインターでつなぐというＣ言語らしい処理などを追加して遊んでいた。順次機能を追加していったので、コードが美しくなくなった。奇麗に修正したら、近日中に公開しようかとも思う。ただブログで紹介するには、少し大きくなってしまったけれど・・交差や突然変異の部分を機能強化したら、公開しようかと予定している。
やっと頭の配線が、Ｃ言語に馴染んできたよう気がする。この修正が終わり次第、ペンディングになっているプロダクションシステムに改めて挑戦してみようかと思う。
それから小室先生の本などで、中国に関しての勉強も少しずつしている。中国理解の鍵は、三国志にあると先生は分析されている。
若い頃これも教養の一つとばかりに三国志を読んだけれど、誰の書いた（ＯＲ訳した）三国志か忘れてしまった。そもそも登場する人物が多くて、何がなにやら分からなくなってしまう。
「喫人」のシーンを読んだ記憶がないので、吉川先生の作ではなさそうなのだが・・・
ちなみに「喫人」とは、「人」を食べることである。ついでに書くと、「喫」とは、食べることてある。だから「喫茶」とは、「食べてお茶を飲む」という意味になる。さらに書くと、塀の中では古い言葉がそのまま使われているようで、食事の合図か今でも「喫食」であるそうだ。
昨夜はＥＭＯＢＩＬの通信環境があまりよくなく、０．６Mしかなかった。通信速度は、平均すると１．３Ｍほどてある。何とかマコト君のブログが見られるくらいの速度である。
おまけに昨夜は、この所よくあるように、ＦＣ２は繋がりにくくて記事を書けなかった。だから昨日は、コメントの返事をしただけで終わってしまった。
自衛隊機の中国支援
2008-05-29
思わす耳を疑ったのが、中国からの自衛隊機による支援物資の輸送の要請であった。四川大地震後、ロシア軍による支援を受け入れてきた。また米軍機も中国を訪れているようである。
だが中国共産党のこれまでとってきた歴史感からすると、日本の自衛隊機を受け入れることは、特筆すべき出来事であるのは間違いないであろう。
災害救助隊や医療チームの活躍もあって、対日感情に変化があるにしても、「自衛隊」と称する「軍隊」を受け入れるほど、中国当局は困窮しているのかもしれない。単にテント等の物資以上に、地震後の復旧に対する日本からの支援の要請へのサインかもしれない。
また深読みすれば、これまでの中国経済の発展を支えてきたのは、安い労働力と、環境を無視した工業化であった。しかし、公害のひどさはかっての日本以上だし、賃金も大幅に上昇してしまった。
現状で、この二つの問題を克服する技術を持つのは、日本以外にない。
絶対に中国政府は認めないだろうけれど、現在の中国の繁栄の基礎を作ったのは、日本からのＯＤＡであった。周恩来先生の決断により、日中国交が開始されたのであるが、その時戦争後補償のかわりにＯＤＡが使われることになった。現に北京空港を作るときにもこの資金が使われているのだが、そのことを知る中国人はいないだろう。
中国は、日本を必要としているのかも知れない。今回は歴史のターニングポイントになるのかもしれない。
だが中国共産党のこれまでとってきた歴史感からすると、日本の自衛隊機を受け入れることは、特筆すべき出来事であるのは間違いないであろう。
災害救助隊や医療チームの活躍もあって、対日感情に変化があるにしても、「自衛隊」と称する「軍隊」を受け入れるほど、中国当局は困窮しているのかもしれない。単にテント等の物資以上に、地震後の復旧に対する日本からの支援の要請へのサインかもしれない。
また深読みすれば、これまでの中国経済の発展を支えてきたのは、安い労働力と、環境を無視した工業化であった。しかし、公害のひどさはかっての日本以上だし、賃金も大幅に上昇してしまった。
現状で、この二つの問題を克服する技術を持つのは、日本以外にない。
絶対に中国政府は認めないだろうけれど、現在の中国の繁栄の基礎を作ったのは、日本からのＯＤＡであった。周恩来先生の決断により、日中国交が開始されたのであるが、その時戦争後補償のかわりにＯＤＡが使われることになった。現に北京空港を作るときにもこの資金が使われているのだが、そのことを知る中国人はいないだろう。
中国は、日本を必要としているのかも知れない。今回は歴史のターニングポイントになるのかもしれない。
「眠らぬ街」 企業城下町に問われる「結いの心」
2008-05-28
「眠らぬ街」は、中日新聞のトヨタ様特集第三弾である。その第一回の「つながりを見失って」の記事の最後に、以下の言葉が書かれていた。
『巨大企業が２年間で４兆円の営業利益を積み上げる一方で、下請け企業との絆、原点の志を忘れていく。そのおひざ元の街もまた、使い捨ての労働力とされた人たちが、地域とのつながりをなくし、希望を見失っている。「トヨタの足元」「カローラの魂」に続く「眠らぬ街」では、企業城下町に問われる「結いの心」を考える。』
トヨタ様は、一体誰のための金儲けをしているのだろうか。「手段の目的化」が顕著になる時、組織は本来の存在意味を見失い、ひたすら「手段の純粋追求」にのめり込み、創業時の純心性を喪失し、崩壊への序章となる。驕れる者は久しからずである。
乾杯時に参加者に自ら酒を注いで回らないトヨタ様にたいして、こびへつらい寄り添うモノ達に囲まれていることの危険性に気付かないなら、ビックスリーの後追いをしているようなものである。
何のための利益追求なのか。利益が誰も幸せにしないなら、その企業の命脈は尽きたも同じである。
アメリカの企業の失敗は、そこに働く者たちの自尊心を満たさず、幸せをもたらさなかったからではないだろうか。ひたすら数字を追求するだけで、職場から人間性を失ったことが労働意欲の低下を招き、ひいては産業の地盤沈下をもたらした。
最後には物づくりの魂をなくし、マネーゲームに終始しだす。あのＧＥは、現在何で利益を上げているのだろうか。かっての戦勝国としてのアメリカンライフの主役であった家電品ではないことは確かであろう。
トヨタ様は、乱心した殿様になっているのではないか。黒沢監督が描いた、あの殿様のように・・・
今生産ラインで汗を流す労働者達を虐げている管理職も、実は自身を組織に簒奪され、心を失い赤い血の流れない「ヒト」以外のものになってはいないだろうか。
貴兄の家庭は、温かいですか？
貴兄の子供達は、天使の微笑をしていますか？？
貴兄は今日手作りの家庭料理を食べただろうか？？？
つながり見失って 眠らぬ街＜１＞ 結いの心
これじゃ根づけない 眠らぬ街＜２＞ 結いの心
「母さんを頼んだぞ」 眠らぬ街＜３＞ 結いの心
優しい日本人 どこへ 眠らぬ街＜４＞ 結いの心
信じ合えず、悲しいネ 眠らぬ街＜５＞:結いの心
この恩は永遠に 眠らぬ街＜６＞:結いの心
『巨大企業が２年間で４兆円の営業利益を積み上げる一方で、下請け企業との絆、原点の志を忘れていく。そのおひざ元の街もまた、使い捨ての労働力とされた人たちが、地域とのつながりをなくし、希望を見失っている。「トヨタの足元」「カローラの魂」に続く「眠らぬ街」では、企業城下町に問われる「結いの心」を考える。』
トヨタ様は、一体誰のための金儲けをしているのだろうか。「手段の目的化」が顕著になる時、組織は本来の存在意味を見失い、ひたすら「手段の純粋追求」にのめり込み、創業時の純心性を喪失し、崩壊への序章となる。驕れる者は久しからずである。
乾杯時に参加者に自ら酒を注いで回らないトヨタ様にたいして、こびへつらい寄り添うモノ達に囲まれていることの危険性に気付かないなら、ビックスリーの後追いをしているようなものである。
何のための利益追求なのか。利益が誰も幸せにしないなら、その企業の命脈は尽きたも同じである。
アメリカの企業の失敗は、そこに働く者たちの自尊心を満たさず、幸せをもたらさなかったからではないだろうか。ひたすら数字を追求するだけで、職場から人間性を失ったことが労働意欲の低下を招き、ひいては産業の地盤沈下をもたらした。
最後には物づくりの魂をなくし、マネーゲームに終始しだす。あのＧＥは、現在何で利益を上げているのだろうか。かっての戦勝国としてのアメリカンライフの主役であった家電品ではないことは確かであろう。
トヨタ様は、乱心した殿様になっているのではないか。黒沢監督が描いた、あの殿様のように・・・
今生産ラインで汗を流す労働者達を虐げている管理職も、実は自身を組織に簒奪され、心を失い赤い血の流れない「ヒト」以外のものになってはいないだろうか。
貴兄の家庭は、温かいですか？
貴兄の子供達は、天使の微笑をしていますか？？
貴兄は今日手作りの家庭料理を食べただろうか？？？
つながり見失って 眠らぬ街＜１＞ 結いの心
これじゃ根づけない 眠らぬ街＜２＞ 結いの心
「母さんを頼んだぞ」 眠らぬ街＜３＞ 結いの心
優しい日本人 どこへ 眠らぬ街＜４＞ 結いの心
信じ合えず、悲しいネ 眠らぬ街＜５＞:結いの心
この恩は永遠に 眠らぬ街＜６＞:結いの心
「四川大地震」の報道に思うこと
2008-05-26
まずは以下の中国の地図を眺めて欲しい。
日本で報道されている地震の模様は、四川省に限れているように思えてならない。震源だった四川省北部に隣接する、青海省や甘肅省のことは一言も触れられていない。距離的に、大きな被害が出ているはずなのに。ましてお隣の西藏省（チベット）のことなどかいもく分からなくなっている。
明らかに、中国当局によって情報操作されている。地震発生当時から、四川省に限り被害の模様を国内外に発信してきた。また地震発生時中国にいた外国メディアにも、四川省内ならわりと自由に取材させているようである。
この事実に日本のマスコミは触れようとしない。毎度お馴染みの「大本営発表」を、そのまま垂れ流してるだけである。どのマスコミも中国への義援金の募金をお願いしますと言っているが、真の報道機関の役割をこなしていない君らに、そんなおこがましいことを言う権利があのだろうか。
四川省の北西方向の各省は、中国にとって扱いの厄介な所である。だから四川省の取材をこれまでになく自由にさせることで、より深刻な問題を隠しているきらいがある。
素人でも気づくこんな幼稚な情報操作に踊らされている日本のマスコミに、中国当局は大成功と喜んでいるだろう。
日本で報道されている地震の模様は、四川省に限れているように思えてならない。震源だった四川省北部に隣接する、青海省や甘肅省のことは一言も触れられていない。距離的に、大きな被害が出ているはずなのに。ましてお隣の西藏省（チベット）のことなどかいもく分からなくなっている。
明らかに、中国当局によって情報操作されている。地震発生当時から、四川省に限り被害の模様を国内外に発信してきた。また地震発生時中国にいた外国メディアにも、四川省内ならわりと自由に取材させているようである。
この事実に日本のマスコミは触れようとしない。毎度お馴染みの「大本営発表」を、そのまま垂れ流してるだけである。どのマスコミも中国への義援金の募金をお願いしますと言っているが、真の報道機関の役割をこなしていない君らに、そんなおこがましいことを言う権利があのだろうか。
四川省の北西方向の各省は、中国にとって扱いの厄介な所である。だから四川省の取材をこれまでになく自由にさせることで、より深刻な問題を隠しているきらいがある。
素人でも気づくこんな幼稚な情報操作に踊らされている日本のマスコミに、中国当局は大成功と喜んでいるだろう。
Ｃ言語 ます取りゲーム
2008-05-26
中々プロダクションシステムのコンパイルが完了にならない。プリントアウトしてニラメッコしてもよく分からんので、もう一度幼稚園からやり直してみることにした。
昨日一日かかって、ある本に出ていたゲームをいじくり回してみた。原型をほとんどとどめていないので、公開しても問題ないと思われる。
ゲームは、「ビン取りゲーム」とか、「コイン取りゲーム」として知られているものである。今回は「ます取りゲーム」にしてみた。
先日東京三菱ＵＦＪ銀行のシステム統合のテストで、問題があったと報じられていた。確か日本で銀行システムに詳しい人の１／３以上の人材を集めて、入念な準備のもとにおこなわれたはずである。だけどうまく行かなかったようである。コンビニのＡＴＭシステムとのデータのやり取りに、チェック漏れなどあったようである。
ただでさえ巨大で、歴史のある銀行のコンピュータシステムである。それを三つも統合しようなどという無謀極まりない試みである。
プログラムの作り方のイロハを教えてくれた、派遣先の先輩の教えを今でも覚えている。今回もその人の教えを守りながらプログラムを作ってある。だからＣ言語に慣れた人からすれば、下手くそで悠長なソースコードになっている。
私がソフトを作っていた頃のメインフレームと呼ばれるようなコンピュータ室に鎮座ましましていた巨大システムの場合、同じ言語でもメーカー間では互換性はなかった。そもそも同じメーカーでも、機種が違うとか、さらに同じ機種でも世代が違うと全く互換性がなかった。コンピューターの買い替え時に、ソフトを移植するのも大仕事であった。
だからコーディングするときには、出来るだけその言語の基本的な命令でプログラムを書くのが、メンテナンスを容易にするコツであると教わった。便利になるように特別に用意された命令は、そのマシーンだけ有効なのであって、移植時には全部作り変えなければならなくなったりするからである。
また必ず修正かあるのがシステムの宿命なので、将来修正する人のために「読めるプログラム」でなければならないと鍛えられた。他の資料を見なくても、プログラムを見さえすれば分かるように工夫しなければならないと指導された。
だから以下のプログラムは、技巧的でなく、幼稚にみえるはずである。なのでＣ言語に初めて接する人には、かえって分かりやすいはずである。。。。？？？
またエディターから、コピー＆ペーストしてきた。ＨＴＭＬ化するとインデンテーションが崩れないのだが、余計なアトリビュートがはいってコンパイル時に嫌われることがあるようなので、安全な方法にしてある。これだとそのままこコピーしてもらえば、問題なくコンパイルできるはずである。そもそも、ブログでソースコードなど載せるのは、アホの証拠であるが。。。。
あぁぁ〜と、そこの君、学校の宿題用にコピーしてそのまま提出するなよぉぉぉ・・・参考にして自分で工夫せよ！！！！、若者よ！
/***** masutori : マス取りゲーム *****/
#include
#include
#include
#include
#define TRUE 1
#define FALSE 0
#define getmax 3 /*** 一度に取れるマスの最大数 ***/
int p_turn; /*** プレイヤーターン ***/
int masu_max; /*** マスの総本数 ***/
int masu; /*** 残りマスの本数 ***/
int player_get; /*** プレイヤーの取ったマスの数 ***/
int comp_get; /*** コンピュータの取ったマスの数 ***/
void masunum(void);
void sengo(void);
void game(void);
void hatei(void);
int ending(void);
int input(void);
/***** メインルーチン *****/
main() {
int loopflg;
int num;
srand(time(NULL));
printf("＜＜ マスとりゲーム ＞＞\n");
printf("交互に1〜3個のマスを取りあいます。\n");
printf("最後のマスを取った人が負けです。\n");
loopflg = TRUE;
while(loopflg == TRUE){
masunum();
sengo();
game();
hatei();
num = ending();
if (num == 1){
loopflg = FALSE;
}
}
printf("\n====================ゲーム終了=====================\n");
return 0;
}
/***** マスの総数を決める *****/
void masunum(){
masu_max = rand()%5 + 20;
masu = masu_max;
printf("マスの数：%d\n", masu_max);
}
/***** 先攻後攻を決める *****/
void sengo(){
int loopflg;
printf("先攻 ： １\n後攻 ： ２\n");
loopflg = TRUE;
while(loopflg == TRUE){
p_turn = input();
if(( p_turn == 1)||(p_turn == 2)){
loopflg = FALSE;
}
else{
printf("入力ミスです\n");
printf("もう一度入力して下さい\n");
}
}
printf("=============あなたの");
if(p_turn == 1) {
printf("先攻");
}
else {
printf("後攻");
}
printf("でスタート！==============\n");
}
/***** マスを交互に取る *****/
void game(void){
int ii;
int loopflg;
while( masu > 1) {
if(p_turn == 1){ /*** プレイヤーのターン ***/
loopflg = TRUE;
comp_get = 0;
while(loopflg == TRUE) {
printf("何個取りますか？ ");
player_get = input();
if ((player_get >= 1)&&(player_get <= getmax)){
loopflg = FALSE;
}
else {
printf("入力ミスです\n");
printf("もう一度入力して下さい\n");
}
}
masu = masu - player_get;
if(masu <= 0) {
printf("0になっちゃったよ・・・\n");
}
}
else { /*** コンピュータのターン ***/
if (masu <= getmax + 1) {
comp_get = masu - 1;
}
else {
comp_get = rand()%getmax + 1;
}
Sleep(2000);
printf("コンピュータ> %d 個取ったぞ！\n",comp_get);
masu = masu - comp_get;
}
if(masu >= 1) { /*** 残り個数の表示 ***/
for(ii = 0; ii < masu_max; ii++) {
if(ii < masu_max - masu) {
printf("□");
}
else {
printf("■");
}
}
printf(" あと %d 個\n", masu);
}
if (p_turn == 1){
p_turn = 2;
}
else{
p_turn = 1;
}
}
}
/***** 勝敗判定 *****/
void hatei(void){
if (p_turn == 1) {
printf("アンタさんの負け\n");
printf("また挑戦したってちょ！\n");
}
else {
printf("おみゃぁさんの勝ち！\n");
printf("まぁいっぺんやろまい\n");
}
}
/***** 終了判定 *****/
int ending(void){
int loopflg;
int num;
loopflg = TRUE;
while(loopflg == TRUE){
printf("もう一回？\n");
printf("継続 ： ０\n");
printf("終了 ： １\n");
num = input();
if ((num == 0)||(num == 1)){
return(num);
}
printf("入力ミスです\n");
printf("もう一度入力して下さい\n");
}
}
/***** 入力 *****/
int input(void){
char data[5];
int loopflg;
int num;
loopflg = TRUE;
while(loopflg == TRUE){
scanf("%s",data);
if ((data[0] >= '0')&&(data[0] <= '9')){
if (data[1] == '\0'){
num = data[0] - 48;
return(num);
}
}
printf("１〜９以外だでよ、\n");
printf("まぁいっぺん入力してちょうすか？\n");
}
}
昨日一日かかって、ある本に出ていたゲームをいじくり回してみた。原型をほとんどとどめていないので、公開しても問題ないと思われる。
ゲームは、「ビン取りゲーム」とか、「コイン取りゲーム」として知られているものである。今回は「ます取りゲーム」にしてみた。
先日東京三菱ＵＦＪ銀行のシステム統合のテストで、問題があったと報じられていた。確か日本で銀行システムに詳しい人の１／３以上の人材を集めて、入念な準備のもとにおこなわれたはずである。だけどうまく行かなかったようである。コンビニのＡＴＭシステムとのデータのやり取りに、チェック漏れなどあったようである。
ただでさえ巨大で、歴史のある銀行のコンピュータシステムである。それを三つも統合しようなどという無謀極まりない試みである。
プログラムの作り方のイロハを教えてくれた、派遣先の先輩の教えを今でも覚えている。今回もその人の教えを守りながらプログラムを作ってある。だからＣ言語に慣れた人からすれば、下手くそで悠長なソースコードになっている。
私がソフトを作っていた頃のメインフレームと呼ばれるようなコンピュータ室に鎮座ましましていた巨大システムの場合、同じ言語でもメーカー間では互換性はなかった。そもそも同じメーカーでも、機種が違うとか、さらに同じ機種でも世代が違うと全く互換性がなかった。コンピューターの買い替え時に、ソフトを移植するのも大仕事であった。
だからコーディングするときには、出来るだけその言語の基本的な命令でプログラムを書くのが、メンテナンスを容易にするコツであると教わった。便利になるように特別に用意された命令は、そのマシーンだけ有効なのであって、移植時には全部作り変えなければならなくなったりするからである。
また必ず修正かあるのがシステムの宿命なので、将来修正する人のために「読めるプログラム」でなければならないと鍛えられた。他の資料を見なくても、プログラムを見さえすれば分かるように工夫しなければならないと指導された。
だから以下のプログラムは、技巧的でなく、幼稚にみえるはずである。なのでＣ言語に初めて接する人には、かえって分かりやすいはずである。。。。？？？
またエディターから、コピー＆ペーストしてきた。ＨＴＭＬ化するとインデンテーションが崩れないのだが、余計なアトリビュートがはいってコンパイル時に嫌われることがあるようなので、安全な方法にしてある。これだとそのままこコピーしてもらえば、問題なくコンパイルできるはずである。そもそも、ブログでソースコードなど載せるのは、アホの証拠であるが。。。。
あぁぁ〜と、そこの君、学校の宿題用にコピーしてそのまま提出するなよぉぉぉ・・・参考にして自分で工夫せよ！！！！、若者よ！
/***** masutori : マス取りゲーム *****/
#include
#include
#include
#include
#define TRUE 1
#define FALSE 0
#define getmax 3 /*** 一度に取れるマスの最大数 ***/
int p_turn; /*** プレイヤーターン ***/
int masu_max; /*** マスの総本数 ***/
int masu; /*** 残りマスの本数 ***/
int player_get; /*** プレイヤーの取ったマスの数 ***/
int comp_get; /*** コンピュータの取ったマスの数 ***/
void masunum(void);
void sengo(void);
void game(void);
void hatei(void);
int ending(void);
int input(void);
/***** メインルーチン *****/
main() {
int loopflg;
int num;
srand(time(NULL));
printf("＜＜ マスとりゲーム ＞＞\n");
printf("交互に1〜3個のマスを取りあいます。\n");
printf("最後のマスを取った人が負けです。\n");
loopflg = TRUE;
while(loopflg == TRUE){
masunum();
sengo();
game();
hatei();
num = ending();
if (num == 1){
loopflg = FALSE;
}
}
printf("\n====================ゲーム終了=====================\n");
return 0;
}
/***** マスの総数を決める *****/
void masunum(){
masu_max = rand()%5 + 20;
masu = masu_max;
printf("マスの数：%d\n", masu_max);
}
/***** 先攻後攻を決める *****/
void sengo(){
int loopflg;
printf("先攻 ： １\n後攻 ： ２\n");
loopflg = TRUE;
while(loopflg == TRUE){
p_turn = input();
if(( p_turn == 1)||(p_turn == 2)){
loopflg = FALSE;
}
else{
printf("入力ミスです\n");
printf("もう一度入力して下さい\n");
}
}
printf("=============あなたの");
if(p_turn == 1) {
printf("先攻");
}
else {
printf("後攻");
}
printf("でスタート！==============\n");
}
/***** マスを交互に取る *****/
void game(void){
int ii;
int loopflg;
while( masu > 1) {
if(p_turn == 1){ /*** プレイヤーのターン ***/
loopflg = TRUE;
comp_get = 0;
while(loopflg == TRUE) {
printf("何個取りますか？ ");
player_get = input();
if ((player_get >= 1)&&(player_get <= getmax)){
loopflg = FALSE;
}
else {
printf("入力ミスです\n");
printf("もう一度入力して下さい\n");
}
}
masu = masu - player_get;
if(masu <= 0) {
printf("0になっちゃったよ・・・\n");
}
}
else { /*** コンピュータのターン ***/
if (masu <= getmax + 1) {
comp_get = masu - 1;
}
else {
comp_get = rand()%getmax + 1;
}
Sleep(2000);
printf("コンピュータ> %d 個取ったぞ！\n",comp_get);
masu = masu - comp_get;
}
if(masu >= 1) { /*** 残り個数の表示 ***/
for(ii = 0; ii < masu_max; ii++) {
if(ii < masu_max - masu) {
printf("□");
}
else {
printf("■");
}
}
printf(" あと %d 個\n", masu);
}
if (p_turn == 1){
p_turn = 2;
}
else{
p_turn = 1;
}
}
}
/***** 勝敗判定 *****/
void hatei(void){
if (p_turn == 1) {
printf("アンタさんの負け\n");
printf("また挑戦したってちょ！\n");
}
else {
printf("おみゃぁさんの勝ち！\n");
printf("まぁいっぺんやろまい\n");
}
}
/***** 終了判定 *****/
int ending(void){
int loopflg;
int num;
loopflg = TRUE;
while(loopflg == TRUE){
printf("もう一回？\n");
printf("継続 ： ０\n");
printf("終了 ： １\n");
num = input();
if ((num == 0)||(num == 1)){
return(num);
}
printf("入力ミスです\n");
printf("もう一度入力して下さい\n");
}
}
/***** 入力 *****/
int input(void){
char data[5];
int loopflg;
int num;
loopflg = TRUE;
while(loopflg == TRUE){
scanf("%s",data);
if ((data[0] >= '0')&&(data[0] <= '9')){
if (data[1] == '\0'){
num = data[0] - 48;
return(num);
}
}
printf("１〜９以外だでよ、\n");
printf("まぁいっぺん入力してちょうすか？\n");
}
}
不死認錯 天津大地震
2008-05-24
中国語（北京語ｏｒ広東語ｏｒ上海語・・・・）で「不死認錯」を何と読むのか知らないけれど、意味は「死んでも自分の間違いを認めない」とったような意味になるはずである。
例えば交通事故で、いかに自分に非があろうとも、絶対に自分の過失を認めず、相手が悪いと言い合うのが中国人の基本的行動様式であるようである。一言でも謝ろうものなら、全ての責任が謝った方にあることになってしまう。
すぐ謝る日本人には、理解できない中国人の行動の一つであろう。
あの文化大革命のとき、紅衛兵たちは無実の人々を粛清しまくった。だけど殺すには前提条件があって、本人の自白がなければならなかった。だから目標となった人を集団でつるし上げ、でっち上げた罪を認めるように強要した。いわゆる「自己批判せよ」と怒鳴りつけ、よってたかって恫喝し、無理矢理認めさせたのである。
その言葉による集団暴行に堪えかねて、ひとたび本人の口から「ＹＥＳ」の言質を取ったなら、すかさず粛清されてしまった。スターリンのように問答無用で粛清できないのが、中国人の特徴であった。
今回の四川大地震で亡くなられた方の一割ほどが、学校で被災した人々であると今日のニュースで報じていた。いくつか見た学校倒壊現場を伝える報道で、父親が倒壊した学校のコンクリートをつかんで、「こんなにもろいコンクリートだ。手抜き工事は明らかである。建築を急いだ国の責任である。」と叫んでいる映像を見た。
映像を見る限り、あのように脆く壊れさった学校の建物に、まともな鉄筋が入っていないのは明らかであった。だけど国は、絶対自らの政策の失敗を認めないであろう。
被災の実体が知られるようになり、被災者の多さに復興がままならず、人々の不満は、日々つのっていくことだろう。ネット上では、政府を批判しているらしい。必死に政府が削除に勤め、批判を封じ込めようとしているらしい。
この所の投機マネーの跳梁跋扈により、エネルギーと食料価格は高騰を続けている。インフレ圧力は、益々亢進している。
一方でもうすぐ北京オリンピックである。どこの国でも、オリンピック後は景気が後退する。何故なら、公共投資と海外からの観光客による有効需要が一気に無くなるからである。
インフレと不景気が同時に、中国を襲うことになる。恐怖の大王「スタフグレーション」様の登場である。
いったんスタフグレーションに襲われたなら、その国の経済は死を宣告されたようなものである。そこに先のチベットに端を発する民族問題と、今回の四川大地震に関しての人々の不満が重なると、この先中国に何が起こるか、容易に連想される。それの影響は中国一国に留まることはなく、全世界に波及し、世界情勢はさらに不安定化するであろう。
人類滅亡への序曲は、奏でられてしまったのではないだろうか？？
その演者は、何人目の天使なのだろう？？
黙示録に登場するのは、四人しかいない。
例えば交通事故で、いかに自分に非があろうとも、絶対に自分の過失を認めず、相手が悪いと言い合うのが中国人の基本的行動様式であるようである。一言でも謝ろうものなら、全ての責任が謝った方にあることになってしまう。
すぐ謝る日本人には、理解できない中国人の行動の一つであろう。
あの文化大革命のとき、紅衛兵たちは無実の人々を粛清しまくった。だけど殺すには前提条件があって、本人の自白がなければならなかった。だから目標となった人を集団でつるし上げ、でっち上げた罪を認めるように強要した。いわゆる「自己批判せよ」と怒鳴りつけ、よってたかって恫喝し、無理矢理認めさせたのである。
その言葉による集団暴行に堪えかねて、ひとたび本人の口から「ＹＥＳ」の言質を取ったなら、すかさず粛清されてしまった。スターリンのように問答無用で粛清できないのが、中国人の特徴であった。
今回の四川大地震で亡くなられた方の一割ほどが、学校で被災した人々であると今日のニュースで報じていた。いくつか見た学校倒壊現場を伝える報道で、父親が倒壊した学校のコンクリートをつかんで、「こんなにもろいコンクリートだ。手抜き工事は明らかである。建築を急いだ国の責任である。」と叫んでいる映像を見た。
映像を見る限り、あのように脆く壊れさった学校の建物に、まともな鉄筋が入っていないのは明らかであった。だけど国は、絶対自らの政策の失敗を認めないであろう。
被災の実体が知られるようになり、被災者の多さに復興がままならず、人々の不満は、日々つのっていくことだろう。ネット上では、政府を批判しているらしい。必死に政府が削除に勤め、批判を封じ込めようとしているらしい。
この所の投機マネーの跳梁跋扈により、エネルギーと食料価格は高騰を続けている。インフレ圧力は、益々亢進している。
一方でもうすぐ北京オリンピックである。どこの国でも、オリンピック後は景気が後退する。何故なら、公共投資と海外からの観光客による有効需要が一気に無くなるからである。
インフレと不景気が同時に、中国を襲うことになる。恐怖の大王「スタフグレーション」様の登場である。
いったんスタフグレーションに襲われたなら、その国の経済は死を宣告されたようなものである。そこに先のチベットに端を発する民族問題と、今回の四川大地震に関しての人々の不満が重なると、この先中国に何が起こるか、容易に連想される。それの影響は中国一国に留まることはなく、全世界に波及し、世界情勢はさらに不安定化するであろう。
人類滅亡への序曲は、奏でられてしまったのではないだろうか？？
その演者は、何人目の天使なのだろう？？
黙示録に登場するのは、四人しかいない。
錆付いて軋んでいる
2008-05-23
この所頭の錆落としのために挑戦している、れいのＣ言語に書き換え中の「多倍長精度演算」のプログラムが行き詰っている。
問題なのは、入出力の部分と、割り算の部分である。割り算の方は、アルゴリズムが少し面倒くさいだけで何とかなりそうなのだけれど、大きな桁（１００桁ぐらい）の数値の入力と、計算結果の表示をどうするかである。
とりあえず入力部分を二通り作りコーディングしてみたのだけれど、何となくしっくりこない。
どうも頭の回転がＣ言語向きになっていないような気がしたので、また押入れの中をあさって、人工知能関連の本に紹介されていた他のＣ言語プログラムを入力して、頭をならしてみようかと思った。５００ｓｔｅｐほどのプログラムである。
それて昨日から、簡単なプロダクションシステムのプログラムを入力してみた。構造体をポインターでたどって・・・質問をして、答えを表示するシステムになっている。
現在のANSI規格と少し違う所があった。もしかしたらｌａｔｔｉｃ Ｃ（←こんなスペルだったと思うのだが？？）のような書式だった。入力しながら、それらしく修正しておいた。
タイプミスが結構あったので、コンパイルしたら悲惨な結果になって、一日かかってあと少しのところまできたのだけれど・・・
Ｃコンパイラーは不親切なので、何処に問題があるのかよく分からない。そろそろ、何が問題なのか分からなくなってきた。Ｃ言語の入門書と首っ引きて、問題解決に当たっている。
関数の引数と、配列の扱いとポインターの関係辺りに問題がありそうなんだけれど・・・よく分からん。
益々頭が混乱してきた。
ドンクサイ言語である。
問題なのは、入出力の部分と、割り算の部分である。割り算の方は、アルゴリズムが少し面倒くさいだけで何とかなりそうなのだけれど、大きな桁（１００桁ぐらい）の数値の入力と、計算結果の表示をどうするかである。
とりあえず入力部分を二通り作りコーディングしてみたのだけれど、何となくしっくりこない。
どうも頭の回転がＣ言語向きになっていないような気がしたので、また押入れの中をあさって、人工知能関連の本に紹介されていた他のＣ言語プログラムを入力して、頭をならしてみようかと思った。５００ｓｔｅｐほどのプログラムである。
それて昨日から、簡単なプロダクションシステムのプログラムを入力してみた。構造体をポインターでたどって・・・質問をして、答えを表示するシステムになっている。
現在のANSI規格と少し違う所があった。もしかしたらｌａｔｔｉｃ Ｃ（←こんなスペルだったと思うのだが？？）のような書式だった。入力しながら、それらしく修正しておいた。
タイプミスが結構あったので、コンパイルしたら悲惨な結果になって、一日かかってあと少しのところまできたのだけれど・・・
Ｃコンパイラーは不親切なので、何処に問題があるのかよく分からない。そろそろ、何が問題なのか分からなくなってきた。Ｃ言語の入門書と首っ引きて、問題解決に当たっている。
関数の引数と、配列の扱いとポインターの関係辺りに問題がありそうなんだけれど・・・よく分からん。
益々頭が混乱してきた。
ドンクサイ言語である。
事実上強制された業務 トヨタの桎梏
2008-05-22
トヨタ自動車は２１日、生産現場の従業員が勤務時間外にグループで取り組む「カイゼン」活動について、残業代を全額支払うことを決めた。生産現場の従業員がグループ単位で改善提案に取り組む「ＱＣサークル活動」の中核である活動である。
あまりに当然過ぎて、何をいまさらと思わざるおえない。最近日本マクドナルドが、「名ばかり管理職」に対する残業代未払い問題で指弾されたた流れを受けて、トヨタ様は方向転換したように思わせているのではないだろうか。
これからは「公の業務」としての「カイゼン」であり「ＱＣ活動」となるのだから、コレまで以上に成果を求められることになる。「カイゼン」の提案が、はっきりと強制であり義務化するのは目に見えている。
トヨタ様の冷酷非情さは、さきの地元紙の中日新聞の「結いの心 トヨタの足元」という特集記事を読めばはっきりしている。
この先トヨタ様の生産現場で働けるのは、低賃金で身分不安定な非正規雇用のロボットの代わりの作業員か、よっぽど有能で常に何かを提案できるごく少数か、もしくは生産現場で汗を流す人々にたいして血も涙もない冷血漢の正規社員となるであろう。
これまでトヨタ様を支えてきた企業文化が（「カイゼン」「ＱＣ活動」「カンバン」）が、システム化してトヨタ様自身の首を絞めることになりつつある。
中日新聞の「結いの心 トヨタの足元」という特集記事に続く、特集記事「カローラの魂」
絆の原点忘れるな カローラの魂＜１＞:結いの心
一体感どこへいった カローラの魂＜２＞:結いの心
職人の誇り置き去り カローラの魂＜３＞:結いの心
裸のつき合い あるか カローラの魂＜４＞:結いの心
映ったのは「不信」だけ カローラの魂＜５＞:結いの心
人は合理化できない カローラの魂＜６＞:結いの心
薄れゆく「世のために」 カローラの魂＜７＞:結いの心
コップの手におごり カローラの魂＜８＞:結いの心
あまりに当然過ぎて、何をいまさらと思わざるおえない。最近日本マクドナルドが、「名ばかり管理職」に対する残業代未払い問題で指弾されたた流れを受けて、トヨタ様は方向転換したように思わせているのではないだろうか。
これからは「公の業務」としての「カイゼン」であり「ＱＣ活動」となるのだから、コレまで以上に成果を求められることになる。「カイゼン」の提案が、はっきりと強制であり義務化するのは目に見えている。
トヨタ様の冷酷非情さは、さきの地元紙の中日新聞の「結いの心 トヨタの足元」という特集記事を読めばはっきりしている。
この先トヨタ様の生産現場で働けるのは、低賃金で身分不安定な非正規雇用のロボットの代わりの作業員か、よっぽど有能で常に何かを提案できるごく少数か、もしくは生産現場で汗を流す人々にたいして血も涙もない冷血漢の正規社員となるであろう。
これまでトヨタ様を支えてきた企業文化が（「カイゼン」「ＱＣ活動」「カンバン」）が、システム化してトヨタ様自身の首を絞めることになりつつある。
中日新聞の「結いの心 トヨタの足元」という特集記事に続く、特集記事「カローラの魂」
絆の原点忘れるな カローラの魂＜１＞:結いの心
一体感どこへいった カローラの魂＜２＞:結いの心
職人の誇り置き去り カローラの魂＜３＞:結いの心
裸のつき合い あるか カローラの魂＜４＞:結いの心
映ったのは「不信」だけ カローラの魂＜５＞:結いの心
人は合理化できない カローラの魂＜６＞:結いの心
薄れゆく「世のために」 カローラの魂＜７＞:結いの心
コップの手におごり カローラの魂＜８＞:結いの心
五十歩百歩
2008-05-21
開高健先生は、エッセイで「五十歩百歩というけれど、やはり五十歩と百歩は違うんじゃないだろうか」と書かれていた。
今回の中国の四川省の地震にちなんで書くなら、前に台湾に地震があったとき真っ先に日本から援助隊が駆けつけた。それが影響して、台湾の新幹線は日本のシステムが採用になったとか言われている。今回も日本の災害救助隊が中国に駆けつけたのは、今後の日中関係にとって良かったことだと思う。残念ながら、生存者は発見できなかったけれど、もし一人でも生存者を見つけていたら、一大ニュースとして中国全土で放送されていだろう。
以下は先日携帯カメラで撮った、近所の公園の百合の様子。道の左右（東西）に植えられている。西側は木陰になるので、まだ花が咲いていなかったが、日の当たる東側の花壇の百合は奇麗に咲き誇っていた。距離にして五メートルも違わないのに。
人生の明暗も、こんな微差なのかも知れないと思った。
「もっと光りを！」と人生の最後に叫んだのは、誰だったかナァァァァ？
光り始めた頭頂をなでながら・・・・・
今回の中国の四川省の地震にちなんで書くなら、前に台湾に地震があったとき真っ先に日本から援助隊が駆けつけた。それが影響して、台湾の新幹線は日本のシステムが採用になったとか言われている。今回も日本の災害救助隊が中国に駆けつけたのは、今後の日中関係にとって良かったことだと思う。残念ながら、生存者は発見できなかったけれど、もし一人でも生存者を見つけていたら、一大ニュースとして中国全土で放送されていだろう。
以下は先日携帯カメラで撮った、近所の公園の百合の様子。道の左右（東西）に植えられている。西側は木陰になるので、まだ花が咲いていなかったが、日の当たる東側の花壇の百合は奇麗に咲き誇っていた。距離にして五メートルも違わないのに。
人生の明暗も、こんな微差なのかも知れないと思った。
「もっと光りを！」と人生の最後に叫んだのは、誰だったかナァァァァ？
光り始めた頭頂をなでながら・・・・・
東名古屋病院に行ってきた
2008-05-21
昨日は、東名古屋病院の外来に行ってきた。遠くにありながら前線を刺激して各地で大雨を降らせた台風の影響か、血ガスは低下気味であった。ＰＣＯ２＝４０．４、ＰＯ２＝６２．８、ＳＯ２＝９３．６であった。そのせいで帰り道買い物したスーパーで、袋に商品を入れているときにクラッとして倒れそうになった。下を向いていたので、口の中に唾液が溜まるから口を閉じていたら、酸欠になったようである。深呼吸を繰り返して、酸素を供給した。
東名古屋病院は、名古屋の名東区と日進市との境界の梅森にあり、名古屋の東の外れである。片道一時間半ほどかかる。だから毎回、母には昼食用の弁当を用意している。ついでに入院中のＡ嬢の分も用意して、見舞いの菓子とともに持って行った。診察後慰問に病室を訪ねた。心配したように、まだ８度台後半の熱が続いている上に、胸の痛みが出てきたと言っていた。邪魔にならないように五分ほど話をして、早々に退散してきた。
（補）以下の写真は、クリックすると若干大きくなる。
左がＡ嬢用の弁当で、右が母の分。
三色お握り（タラコ、小魚、菜飯）、卵焼（ハムとネギ入り）
カッパのキュウちゃん、生姜
トマトピューレの煮込みハンバーク（Ａ嬢のみ）とペンネ
病院の南側の有料老人ホームのための整地作業か進んでいたので、その模様を撮影してきた。
平針行きのバス停辺りにあった看板を、2006年10月27に携帯カメラで撮影したのが残っていた。コレによると。１０階建てになるらしいが・・・
結核病棟のある病院と同じ敷地内に、老人ホームを建設するのもどうかと思う。ただ独立行政法人の病院としては、病院に併設する老人ホームは、東名古屋病院が初の試みであると病院のパンフレットで読んだ記憶がある。
Ａ嬢が入院している五階のエレベーターホールから撮った、病院南側の駐車場の向こうの切り開かれた建設予定地の模様。
駐車場から撮影した、木々の伐採をした後の整地の模様。
病院東側にある散歩コースからの、整地の様子。
伐採し整地される以前の、病院敷地内に残されている自然林の様子。赤松が多く生えていたのだけれど、松喰い虫の影響で多くの木が枯れてしまったので、私が入院してた時分より「生い茂る」という感じがなくなっている。
病院の敷地の東にあるリハビリ学院校舎の散歩コースに面した南側に植えられている梅の木々。「梅森」の地名にちなんだ植樹のようである。
散歩コースから撮った、第二北病棟の様子。第一と第二北病棟の間の鬱蒼とした木々の間に、神社がある。現在第一北病棟には、老人達がいるけれど、私が入院していた時分には重度の障害児達がいた。普通の車椅子では、無理なくらいの子供たちだった。
かって「療養所」だった頃は、こんな感じだったのかもしれない。外来に昔と今の病院のジオラマが置かれている。前に撮影しようとしたが、カバーのアクリル（？）で光りが反射するのでうまく撮れなかった。
市営バス「梅森荘バス停」から撮った病院北東角の木々と、その反対のバス停から北東の方向の風景。まだ少し木々が残っている。
何だかマコト君の所のような、写真が多い記事になってしまった。
東名古屋病院は、名古屋の名東区と日進市との境界の梅森にあり、名古屋の東の外れである。片道一時間半ほどかかる。だから毎回、母には昼食用の弁当を用意している。ついでに入院中のＡ嬢の分も用意して、見舞いの菓子とともに持って行った。診察後慰問に病室を訪ねた。心配したように、まだ８度台後半の熱が続いている上に、胸の痛みが出てきたと言っていた。邪魔にならないように五分ほど話をして、早々に退散してきた。
（補）以下の写真は、クリックすると若干大きくなる。
左がＡ嬢用の弁当で、右が母の分。
三色お握り（タラコ、小魚、菜飯）、卵焼（ハムとネギ入り）
カッパのキュウちゃん、生姜
トマトピューレの煮込みハンバーク（Ａ嬢のみ）とペンネ
病院の南側の有料老人ホームのための整地作業か進んでいたので、その模様を撮影してきた。
平針行きのバス停辺りにあった看板を、2006年10月27に携帯カメラで撮影したのが残っていた。コレによると。１０階建てになるらしいが・・・
結核病棟のある病院と同じ敷地内に、老人ホームを建設するのもどうかと思う。ただ独立行政法人の病院としては、病院に併設する老人ホームは、東名古屋病院が初の試みであると病院のパンフレットで読んだ記憶がある。
Ａ嬢が入院している五階のエレベーターホールから撮った、病院南側の駐車場の向こうの切り開かれた建設予定地の模様。
駐車場から撮影した、木々の伐採をした後の整地の模様。
病院東側にある散歩コースからの、整地の様子。
伐採し整地される以前の、病院敷地内に残されている自然林の様子。赤松が多く生えていたのだけれど、松喰い虫の影響で多くの木が枯れてしまったので、私が入院してた時分より「生い茂る」という感じがなくなっている。
病院の敷地の東にあるリハビリ学院校舎の散歩コースに面した南側に植えられている梅の木々。「梅森」の地名にちなんだ植樹のようである。
散歩コースから撮った、第二北病棟の様子。第一と第二北病棟の間の鬱蒼とした木々の間に、神社がある。現在第一北病棟には、老人達がいるけれど、私が入院していた時分には重度の障害児達がいた。普通の車椅子では、無理なくらいの子供たちだった。
かって「療養所」だった頃は、こんな感じだったのかもしれない。外来に昔と今の病院のジオラマが置かれている。前に撮影しようとしたが、カバーのアクリル（？）で光りが反射するのでうまく撮れなかった。
市営バス「梅森荘バス停」から撮った病院北東角の木々と、その反対のバス停から北東の方向の風景。まだ少し木々が残っている。
何だかマコト君の所のような、写真が多い記事になってしまった。
どおするＮＨＫ 大相撲 暴行事件
2008-05-19
また繰り返された、相撲部屋の暴行傷害事件。陸奥部屋と間垣部屋で、若い力士への暴行がが繰り返されている。
どれほど殴ったら、体にあんな青あざか残るのてあろうか。どんなにお玉で殴ったら、八針を縫うほどの怪我をするのであろうか？
そもそもが、なんで弟子を育てるのに暴行傷害が必要なのだろう。暴行を加えることが弟子を育てる当然の手段であると語る親方や兄弟子の言い分など、まったく理解できない。
大相撲は、クズの集団である。
もはや有能な若手で、相撲部屋に入門しようなどと思うものはいないだろう。間違って相撲で収入を得ようとするなら、なにも腐った相撲部屋で無用な苦労をするよりも、推薦で大学までいって、それなりに成績をのこして横滑りしたほうが安全であると考える様になるであろう。
子供の頃から、相撲大会に出て好成績に残している若者にはあまたの部屋から誘いがあるだろうけれど、そのまま相撲部屋に入ることのバカらしさが露呈してしまった現状では、よっぽど世間を知らないで、一度もスポーツの経験のない単に体のでかい者だけが、新弟子と入門するようになるであろう。
何の内的動機のないものが、プロスポーツで成功するはずもない。
一方で現在の相撲部屋のシステムでは、弟子の数がいないと大相撲協会からの金が流れてこないので立ち行かない。それ故に弟子を逃がさないように、あの殺人事件のように部屋から逃げたら制裁を加える結果になってしまっている。やっている行為は、かっての女郎部屋の虐待と何ら変わりない。
度々週刊誌（ポスト）で報じられてきた八百長問題に加えて、最近明らかになった一連の暴行傷害事件があるのに、ＮＨＫはそれらを取材して特集番組で報じないのか？？
自らの既得権益を守れるなら、そのような問題は無視するのだろうか？？？
それならばＮＨＫは、報道機関としての地位と自尊心をを放棄するのであろうか？？？？
ただでさえＮＨＫは放送料金の問題で国権の関与を許しがちなのに、このままで「言論の自由」を語る資格があるのだろうか？？？？
どれほど殴ったら、体にあんな青あざか残るのてあろうか。どんなにお玉で殴ったら、八針を縫うほどの怪我をするのであろうか？
そもそもが、なんで弟子を育てるのに暴行傷害が必要なのだろう。暴行を加えることが弟子を育てる当然の手段であると語る親方や兄弟子の言い分など、まったく理解できない。
大相撲は、クズの集団である。
もはや有能な若手で、相撲部屋に入門しようなどと思うものはいないだろう。間違って相撲で収入を得ようとするなら、なにも腐った相撲部屋で無用な苦労をするよりも、推薦で大学までいって、それなりに成績をのこして横滑りしたほうが安全であると考える様になるであろう。
子供の頃から、相撲大会に出て好成績に残している若者にはあまたの部屋から誘いがあるだろうけれど、そのまま相撲部屋に入ることのバカらしさが露呈してしまった現状では、よっぽど世間を知らないで、一度もスポーツの経験のない単に体のでかい者だけが、新弟子と入門するようになるであろう。
何の内的動機のないものが、プロスポーツで成功するはずもない。
一方で現在の相撲部屋のシステムでは、弟子の数がいないと大相撲協会からの金が流れてこないので立ち行かない。それ故に弟子を逃がさないように、あの殺人事件のように部屋から逃げたら制裁を加える結果になってしまっている。やっている行為は、かっての女郎部屋の虐待と何ら変わりない。
度々週刊誌（ポスト）で報じられてきた八百長問題に加えて、最近明らかになった一連の暴行傷害事件があるのに、ＮＨＫはそれらを取材して特集番組で報じないのか？？
自らの既得権益を守れるなら、そのような問題は無視するのだろうか？？？
それならばＮＨＫは、報道機関としての地位と自尊心をを放棄するのであろうか？？？？
ただでさえＮＨＫは放送料金の問題で国権の関与を許しがちなのに、このままで「言論の自由」を語る資格があるのだろうか？？？？
鏡の思い出
2008-05-19
舌ガンの手術で、首のリンパ節に転移があったのでリンパの郭清をした。だから術後、放射線治療をしていた。その間、手術の時に開けた穴にはカニューラが入ったままになっていて、そこから自分で痰を吸引していた。その時使っていたのが、この鏡である。入院中に使っているうちに鏡の下の回転軸にひびが入っていた。最近母の顔に赤い発疹があったので、何度かその状態を母に見せているうちに、とうとう折れてしまった。
残念ながら、引退となった。
ついでに、その気管穴のあとの現在の様子。退院して結核病棟にいた母の見舞いに行くために、退院間際に一針縫ってもらったので痕が残ってしまった。カニューラを抜いて、すぐに穴は小さくなりかけていたのだけれど、さすがに喉に穴が開いたまま結核病棟に行くのはためらわれた。
まぁ、勲章である。
唇の真ん中から顎にかけての手術の痕は奇麗に治っていて、さほど目立たなくなっている。さすが形成外科である。
デジタル辞書とアナログ辞書
2008-05-18
舌ガンの手術j前にいくつか用意したものの中に、このノートＰＣと電子辞書があった。その電子辞書が、ご臨終あそばされてしまった。手紙を書くときや、ブログを書くときになどに重宝していた。語彙や漢字の読みに関して不自由することは無いのだけれど、こと漢字を書くときになるとなると俄然小学生低学年並みになってしまう。今でもＡ嬢宛や他の方々にもアナログ・メールを書くのだけれ、ワープロで下書きして、その後人力プリンターをする場合は、そのままコピーすればいいので問題ないのだけれど、これが完全手書きの場合には大変なことになる。
下書きをほとんどひらがなで書いて、推敲しながら漢字を恥ずかしくない程度にシコシコ調べなければならない。だから時間がかかるのである。さらに問題なのは、その労力に見合うだけの内容の手紙ではないことかもしれない。
当面デシタル辞書を買えそうにないので、暫くは書く手段もアナログとなりそうである。
Ｊリーグは退屈
2008-05-17
日本のプロ野球は試合の流れに関係なくただただうるさく、おまけに何かの新興宗教集会を見るような単調な動作の応援スタイルに、見る気がしないと散々書いてきたので、今回はＪリーグがつまらないというお題で一言。
まず一番の問題は、少しぶつかると直ぐころんで痛がる。アホナ審判は、直ちに笛を吹いて試合を止めてしまう。サッカーの醍醐味は、流れるようなボールの動きから、相手の一瞬の隙をついた強烈なシュートをキーパーがセーブすることであるはずである。
なのにも怪我をしたわけでもないのに、すぐ試合を止めてしまう。代表の国際試合や。プレミア・リーグを見れば分かるように、チョット接触しただけで痛がって寝転んでいることはない。審判は、試合の流れを妨げることはない。
「野球」と「ベースボール」は、ボールの大きさやストライクとボールの順番が違うなど、本来の「ベースボール」とは違ってしまっている。アンパンやカレーパンのように、「ベースボール」が日本化したものが「野球」になっている。それは本来「ナイト・ゲーム」なのに、「ナイター」というわけの分からない「日本語」を生んだ事からも証明される。それはそれで、「日本化」とは日本人が親しんできた証拠でもあるのだが。
もう一つが、中距離のパスにスピードがないことである。せっかく受け手がフリーでいるのに、パスにスピードが無いので、トラップしたときにはディフェンダーが迫っている。
この「コンタクト・プレーに弱い」のと、「中距離のパスのスピードのなさ」は、日本代表チームに共通する弱点である。この弱点が無かったのが、あの中田英寿選手であった。代表で一緒に練習した都並敏史さんが、中田選手とパスの練習すると、ビシバシとパスがくるので、トラップするのが大変だったと語っていたのを思い出した。
野球と違って、サッカーは世界中で愛されているスポーツである。是非とも世界標準に近づいて欲しいものである。
ガンバがレッズを破ったのを身ながら・・・
ラグビーは、試合が終わればノーサイドである。放送終了間際に写っていた、試合後ごねていたレッズのキーパは無様であった。
まず一番の問題は、少しぶつかると直ぐころんで痛がる。アホナ審判は、直ちに笛を吹いて試合を止めてしまう。サッカーの醍醐味は、流れるようなボールの動きから、相手の一瞬の隙をついた強烈なシュートをキーパーがセーブすることであるはずである。
なのにも怪我をしたわけでもないのに、すぐ試合を止めてしまう。代表の国際試合や。プレミア・リーグを見れば分かるように、チョット接触しただけで痛がって寝転んでいることはない。審判は、試合の流れを妨げることはない。
「野球」と「ベースボール」は、ボールの大きさやストライクとボールの順番が違うなど、本来の「ベースボール」とは違ってしまっている。アンパンやカレーパンのように、「ベースボール」が日本化したものが「野球」になっている。それは本来「ナイト・ゲーム」なのに、「ナイター」というわけの分からない「日本語」を生んだ事からも証明される。それはそれで、「日本化」とは日本人が親しんできた証拠でもあるのだが。
もう一つが、中距離のパスにスピードがないことである。せっかく受け手がフリーでいるのに、パスにスピードが無いので、トラップしたときにはディフェンダーが迫っている。
この「コンタクト・プレーに弱い」のと、「中距離のパスのスピードのなさ」は、日本代表チームに共通する弱点である。この弱点が無かったのが、あの中田英寿選手であった。代表で一緒に練習した都並敏史さんが、中田選手とパスの練習すると、ビシバシとパスがくるので、トラップするのが大変だったと語っていたのを思い出した。
野球と違って、サッカーは世界中で愛されているスポーツである。是非とも世界標準に近づいて欲しいものである。
ガンバがレッズを破ったのを身ながら・・・
ラグビーは、試合が終わればノーサイドである。放送終了間際に写っていた、試合後ごねていたレッズのキーパは無様であった。
遣り繰り算段
2008-05-17
三年前の私の舌ガンの手術での親不孝のせいで、体調を崩した母の介護の日々となっている。何もする気の父親だから病老介護となり、主夫をしている。ケアマネさんなど、何もしようとしない父親に呆れている。
家計簿などというめんどくさいものをつける余裕はないけれど、もらう生活費で遣り繰りしなければならないので、レシートをＡ４のルーズリーフに貼って家計簿の代わりにしている。それが溜まってきたので、古いのから破棄することにした。一番最初のＡ４ノートのレシートは、黄ばんできている。今貼っているレシートが黄ばむまで生きていられるだろうか。
前は何とか少しずつ繰り越しできていたのだけれど、肺がん後は赤字続きである。何故ならこちらに体力と気持ちに余裕がなくなったので、介護の日々にストレスが多くなり、ついついアルコールの量が多くなってきたからである。現在アル中街道一直線である。まぁ、他に楽しみがないので・・・
掃除・洗濯・料理（母の肝臓病食と私の嚥下食）などは無難にこなせるのだけれど、遣り繰りだけは苦手である。料理は元々好きだったので、問題はない。ただ味付けは舌がないので、調味料の量と色で判断して作っている。全く味覚が無いわけではない。口の奥にある味蕾でかすかに味を感じることが出来る。たたし、味が濃いとか薄いはわからない。
今母の体調はわりと落ち着いている。病院で亡くなる方達を見ていきた経験からすると、今の母の好調さは、ロウソクの最後の炎と思っている。あと少し、と思って日々過ごしているが、段々こちらも弱ってきているのを実感する毎日である。
頭の体操 −多倍長精度演算 （整数）−
2008-05-15
初めは中国の地震にからんで儒教の話を書いていたのだけれど、途中でエンターを押したつもりがその横のどれかのキーで、消えてしまったので・・・・再度書く気にならななった。
なにやら「多倍長」で検索された方が一名いらしたようなので、途中経過を報告してみることにした。またエディターから、コピー＆ペーストしただけなのでインデンテーションが無くなってしまった。半角スペースが無視される為の様である。相変らず、ＰＡＳＣＡＬとＣの間で頭が混乱している。
サブルーチ間の引数がめんどくさいので、広域変数として宣言してある。広域変数であることを識別するために、先頭の一文字を大文字にしてある。ちなみ#defineで宣言した定数は、大文字にしてある。
Char_string[256]に入力されたのを、NumX[SIZE]に変換する。実際の計算用のワークエリアとしては、WorkX[SIZE]に代入され、計算結果はWorkXY[SIZE]に納められる。WorkX[0]に、桁数と正負が格納される。例えば六桁の負数なら、WorkX[0]=-6となっている。
/***** グローバル変数 ***********************************************/
int NumX[SIZE];
int NumY[SIZE];
int WorkXY[SIZE];
int WorkX[SIZE];
Int WorkY[SIZE];
char Char_string[256];
int Keizou;
int Select;
メインは、こんな感じ。
/***** start of main ************************************************/
void main(void)
{
Keizou = FLAGON;
while(Keizou == FLAGON){ /*** 継続ループの開始 ***/
data_keyin();
switch(Select){
case(1):addition();
case(2):subtraction();
case(3):multiply();
case(4):divison();
case(5):power();
case(6):factorial();
case(7):nroot();
default:
}
Keizou = syuryo();
} /*** 継続ループの終了 ***/
printf("\n再見！！！\n");
printf("end of program 多倍長精度演算（整数）");
}/***** end of main *************************************************/
本に紹介されていた足し算のサブルーチンを参考にして作ってみた、引き算のサブルーチン。
/****** subtraction : 減算 ******************************************/
/* */
void subtraction(void)
{
int fugou;
int daisho;
daisho = compar(WorkX,WorkY);
if ((daisho = 1) or (daisho = 3)){ /*** abs(x) >= abs(y) ***/
if ((WorkX[0] >= 0) and (WorkY[0] >= 0)){ /*** 正−正 >=0 ***/
fugou = 1;
}
else if ((WorkX[0] >= 0) and (WorkY[0] < 0)){/*** 正−負 >= 0 ***/
fugou = 2;
}
else if ((WorkX[0] < 0) and (WorkY[0] >= 0)){/*** 負−正 < 0 ***/
fugou = 3;
}
else if ((WorkX[0] < 0) and (WorkY[0] < 0)){ /*** 負−負 < 0 ***/
fugou = 4;
}
}
else if (daisho = 2){ /*** abs(x) < abs(y) ***/
if ((WorkX[0] >= 0) and (WorkY[0] >= 0)){ /*** 正−正 < 0 ***/
fugou = 5;
}
else if ((WorkX[0] >= 0) and (WorkY[0] < 0)){/*** 正−負 >= 0 ***/
fugou = 6;
}
else if ((WorkX[0] < 0) and (WorkY[0] >= 0)){/*** 負−正 < 0 ***/
fugou = 7;
}
else if ((WorkX[0] < 0) and (WorkY[0] < 0)){ /*** 負−負 >= 0 ***/
fugou = 8;
}
}
switch(fugou){
case(1): /*** 正−正 >=0 ***/
sub();
case(2): /*** 正−負 >=0 ***/
WorkY[0} = -1 * WorkY[0];
add();
case(3): /*** 負−正 <0 ***/
WorkX[0] = -1 * WorkX[0];
WorkY[0] = -1 * WorkY[0];
add();
WorkXY[0] = -1 * WorkXY[0];
case(4): /*** 負−負 <0 ***/
WorkY[0] = -1 * WorkY[0];
sub();
WorkXY[0] = -1 * WorkXY[0];
case(5): /*** 正−正 <0 ***/
sub();
WorkXY[0] = -1 * WorkXY[0];
case(6): /*** 正−負 >=0 ***/
WorkY[0] = -1 * WorkY[0];
add();
case(7): /*** 負−正 <0 ***/
WorkX[0] = -1 * WorkX[0];
WorkY[0] = -1 * WorkY[0];
add();
WorkXY[0] = -1 * WorkXY[0];
case(8): /*** 負−負 >=0 ***/
WorkY[0] = -1 * WorkY[0];
add();
}
if ((WorkXY[0] = -1) and (WorkXY[1] = 0)){
WorkXY[0] = 1; /*** ゼロの正規化 ***/
}
}/***** end of substraction *****************************************/
以下が、実際の足し算と引き算をするサブルーチン。
/****** add : 足し算 ************************************************/
/* */
void add(void)
{
int ketaX,ketaY;
int bigger;
int ii;
int addwork;
ketaX = abs(WorkX[0]);
ketaY = abs(WorkY[0]);
if (ketaX >= ketaY){
bigger = ketaX;
}
else{
bigger = ketaY;
}
bigger = bigger + 1; /*** max(X,Y)+1 ***/
clear(WorkXY);
for(ii=1;ii<=(bigger-1);ii++){
addwork = WorkX[ii] + WorkY[ii];
if (addwork >= HUNDRED){
WorkXY[ii] = addwork - HUNDRED;
WorkXY[ii+1] = WorkXY[ii+1] + 1;
}
else{
WorkXY[ii] = addwork;
}
}
adjust();
}/***** end of add **************************************************/
/****** sub : 引き算 ************************************************/
/* */
void sub(void)
{
int ketaX,ketaY;
int bigger;
int ii;
int subwork;
ketaX = abs(WorkX[0]);
ketaY = abs(WorkY[0]);
if (ketaX >= ketaY){
bigger = ketaX;
}
else{
bigger = ketaY;
}
bigger = bigger + 1; /*** max(X,Y)+1 ***/
clear(WorkXY);
for(ii=1;ii<=(bigger);ii++){
subwork = WorkX[ii] - WorkY[ii];
if (subwork < 0){
WorkXY[ii] = subwork + HUNDRED;
WorkXY[ii+1] = WorkXY[ii+1] - 1;
}
else{
WorkXY[ii] = subwork;
}
}
adjust();
}/***** end of sub **************************************************/
まだデーターの入出力の部分をどうするか迷っている。加算減算乗算はなんとか作ったのだけれど、除算は少しアルゴリズムが難しくなるので、只今解読中である。
なにやら「多倍長」で検索された方が一名いらしたようなので、途中経過を報告してみることにした。またエディターから、コピー＆ペーストしただけなのでインデンテーションが無くなってしまった。半角スペースが無視される為の様である。相変らず、ＰＡＳＣＡＬとＣの間で頭が混乱している。
サブルーチ間の引数がめんどくさいので、広域変数として宣言してある。広域変数であることを識別するために、先頭の一文字を大文字にしてある。ちなみ#defineで宣言した定数は、大文字にしてある。
Char_string[256]に入力されたのを、NumX[SIZE]に変換する。実際の計算用のワークエリアとしては、WorkX[SIZE]に代入され、計算結果はWorkXY[SIZE]に納められる。WorkX[0]に、桁数と正負が格納される。例えば六桁の負数なら、WorkX[0]=-6となっている。
/***** グローバル変数 ***********************************************/
int NumX[SIZE];
int NumY[SIZE];
int WorkXY[SIZE];
int WorkX[SIZE];
Int WorkY[SIZE];
char Char_string[256];
int Keizou;
int Select;
メインは、こんな感じ。
/***** start of main ************************************************/
void main(void)
{
Keizou = FLAGON;
while(Keizou == FLAGON){ /*** 継続ループの開始 ***/
data_keyin();
switch(Select){
case(1):addition();
case(2):subtraction();
case(3):multiply();
case(4):divison();
case(5):power();
case(6):factorial();
case(7):nroot();
default:
}
Keizou = syuryo();
} /*** 継続ループの終了 ***/
printf("\n再見！！！\n");
printf("end of program 多倍長精度演算（整数）");
}/***** end of main *************************************************/
本に紹介されていた足し算のサブルーチンを参考にして作ってみた、引き算のサブルーチン。
/****** subtraction : 減算 ******************************************/
/* */
void subtraction(void)
{
int fugou;
int daisho;
daisho = compar(WorkX,WorkY);
if ((daisho = 1) or (daisho = 3)){ /*** abs(x) >= abs(y) ***/
if ((WorkX[0] >= 0) and (WorkY[0] >= 0)){ /*** 正−正 >=0 ***/
fugou = 1;
}
else if ((WorkX[0] >= 0) and (WorkY[0] < 0)){/*** 正−負 >= 0 ***/
fugou = 2;
}
else if ((WorkX[0] < 0) and (WorkY[0] >= 0)){/*** 負−正 < 0 ***/
fugou = 3;
}
else if ((WorkX[0] < 0) and (WorkY[0] < 0)){ /*** 負−負 < 0 ***/
fugou = 4;
}
}
else if (daisho = 2){ /*** abs(x) < abs(y) ***/
if ((WorkX[0] >= 0) and (WorkY[0] >= 0)){ /*** 正−正 < 0 ***/
fugou = 5;
}
else if ((WorkX[0] >= 0) and (WorkY[0] < 0)){/*** 正−負 >= 0 ***/
fugou = 6;
}
else if ((WorkX[0] < 0) and (WorkY[0] >= 0)){/*** 負−正 < 0 ***/
fugou = 7;
}
else if ((WorkX[0] < 0) and (WorkY[0] < 0)){ /*** 負−負 >= 0 ***/
fugou = 8;
}
}
switch(fugou){
case(1): /*** 正−正 >=0 ***/
sub();
case(2): /*** 正−負 >=0 ***/
WorkY[0} = -1 * WorkY[0];
add();
case(3): /*** 負−正 <0 ***/
WorkX[0] = -1 * WorkX[0];
WorkY[0] = -1 * WorkY[0];
add();
WorkXY[0] = -1 * WorkXY[0];
case(4): /*** 負−負 <0 ***/
WorkY[0] = -1 * WorkY[0];
sub();
WorkXY[0] = -1 * WorkXY[0];
case(5): /*** 正−正 <0 ***/
sub();
WorkXY[0] = -1 * WorkXY[0];
case(6): /*** 正−負 >=0 ***/
WorkY[0] = -1 * WorkY[0];
add();
case(7): /*** 負−正 <0 ***/
WorkX[0] = -1 * WorkX[0];
WorkY[0] = -1 * WorkY[0];
add();
WorkXY[0] = -1 * WorkXY[0];
case(8): /*** 負−負 >=0 ***/
WorkY[0] = -1 * WorkY[0];
add();
}
if ((WorkXY[0] = -1) and (WorkXY[1] = 0)){
WorkXY[0] = 1; /*** ゼロの正規化 ***/
}
}/***** end of substraction *****************************************/
以下が、実際の足し算と引き算をするサブルーチン。
/****** add : 足し算 ************************************************/
/* */
void add(void)
{
int ketaX,ketaY;
int bigger;
int ii;
int addwork;
ketaX = abs(WorkX[0]);
ketaY = abs(WorkY[0]);
if (ketaX >= ketaY){
bigger = ketaX;
}
else{
bigger = ketaY;
}
bigger = bigger + 1; /*** max(X,Y)+1 ***/
clear(WorkXY);
for(ii=1;ii<=(bigger-1);ii++){
addwork = WorkX[ii] + WorkY[ii];
if (addwork >= HUNDRED){
WorkXY[ii] = addwork - HUNDRED;
WorkXY[ii+1] = WorkXY[ii+1] + 1;
}
else{
WorkXY[ii] = addwork;
}
}
adjust();
}/***** end of add **************************************************/
/****** sub : 引き算 ************************************************/
/* */
void sub(void)
{
int ketaX,ketaY;
int bigger;
int ii;
int subwork;
ketaX = abs(WorkX[0]);
ketaY = abs(WorkY[0]);
if (ketaX >= ketaY){
bigger = ketaX;
}
else{
bigger = ketaY;
}
bigger = bigger + 1; /*** max(X,Y)+1 ***/
clear(WorkXY);
for(ii=1;ii<=(bigger);ii++){
subwork = WorkX[ii] - WorkY[ii];
if (subwork < 0){
WorkXY[ii] = subwork + HUNDRED;
WorkXY[ii+1] = WorkXY[ii+1] - 1;
}
else{
WorkXY[ii] = subwork;
}
}
adjust();
}/***** end of sub **************************************************/
まだデーターの入出力の部分をどうするか迷っている。加算減算乗算はなんとか作ったのだけれど、除算は少しアルゴリズムが難しくなるので、只今解読中である。
中日新聞 結いの心 トヨタの足元
2008-05-14
今中日新聞の朝刊に、「結いの心 トヨタの足元」という特集記事か連載されている。地元紙の中日新聞にしては、「トヨタ様」の現状に踏み込んだ内容となっている。希望見えぬ「世界一」 トヨタの足元＜１＞
「身の丈見失うな」 トヨタの足元＜２＞
誰のための削減か トヨタの足元＜３＞
町工場の事情がある トヨタの足元＜４＞
努力だけじゃ勝てぬ トヨタの足元＜５＞
「つぶれても仕方ない」 トヨタの足元＜６＞
号令一下、政治まで トヨタの足元＜７＞
鉄くずまで削られる トヨタの足元＜８＞
これらを読めば、いかにトヨタ様が非情なお殿様であるがよく分かる。ご自慢の「カイゼン」ですら、コストカットの方便に成り下がっている。そもそもが、モノづくりの工夫のために始まったものが、非人間的生産現場と、下請けへのコストカットの理由のための手段になっている。またカンバンシステムを押し付けて、互いに助け合ってきた中小の下請け各社を潰していく。
今のトヨタ様のなさっていることは、滅んでいった戦国大名のようである。領民を重い年貢て虐げていた領主のように。
いかにトヨタ様が利益を上げようと、そこに働く非正規雇用の労働者達は自分達の作っている車を買えないし、職人気質の優秀な下請けはドンドン潰れていく。
誇りと謙虚さを失った企業の行く末は、明瞭である。世界をリードしてきた米国のビックスリーの惨状を見れば十分であろう。
前にアメリカのウォルマートの記事を読んだことを思い出している。アメリカ最大の量販店である。メーカーにとって、取引出来れば大量の発注により安定経営が期待されていた。ところがどっこい、一端取引が始まると、嵐のような価格の値下げにさらされる。
大量発注をこなしているうちに、ウォルマートからの受注なくしては会社が成り立たない。さりとてドンドン値下げされて、利益が無くなる。ここまでくると、もはや底なし沼状態で、引くに引けず、結局赤字で倒産することになる。
車の生産を支える技術を持った企業の数は、有限である。もう直ぐ潰してしまった代わりがない状態になる事は明白である。それがトヨタ様の首を絞めることになるだう。今自分自身が、自分が首を突っ込んでいる首吊りのの輪の紐を、自分自身で引っ張っていることに気付いていないのではないだろうか。
補足） ０８／０５／１９
８回をもってトヨタの足元の連載が終了した。この特集を読んだなら、いかにトヨタ様が「大企業病」に蝕まれているかがよく分かる。病膏肓に入っているようである。この頚木の自覚がないなら、トヨタ様の明日はないだろう。何故なら、現在の世界の変化のスピードは、以前より遥かに速いから、病の症状が現われるのが速くなっているだろうから。
地上絵
2008-05-13
温かくなってきたので、夕方団地内の公園で遊んでいる子供たちが増えてきた。昨日その子供たちが地面に書いていた絵がまだ残っていたので、撮影してみた。
アンパンマンらしいのとか、あれやこれや書かれている。
毎日夕方、子供たちの声が響いてくる。我々のころと違って、こんな遊びが出来る場所が少なくなっている現在では、貴重な体験だと思われる。こんな遊びが、子供の心を豊かにする。
母の日と歯科
2008-05-12
昨日の母の日は、花より団子でシュークリーム一個で済ませた。この所母が入院したときに退院が決まると、毎回お祝いにシュークリームを買っていくのが恒例になっている。ショートケーキなどより、こちらの方が喜ぶ。
母が元気な頃は、カーネーションの鉢を買ってきていたけれど、ベッドでの生活となった今では、普段食べさせられないシュークリームの方を喜んでいる。
買い物帰りにコンビニに寄って、１０５円の大きいヤツを買って帰った。帰ったら爆睡中だったので、三時過ぎに目を覚ましたときに「ハイ」と渡してやった。大喜びで、たちまち完食であった。
そして今日は、連休前にとれた前歯をもって名大の歯科に行ってきた。とりあえず貼り付けてもらった。次回、麻酔をして虫歯になっている所を本格的に大工事してもらうことになった。歯がついたので話すとき息が漏れなくなって、いくらか言葉が明瞭になた。二回ほど、短期間に通わなければならない。
それと、ｍｉｘｉで高校の後輩と新たに知り合いになった。もっとも私は新設高の第一回卒業生なので、先輩はいないのだけれど・・・
出身校のコミュニティーに登録している人を全部チェックしたわけではないけれど、私と同じ一回生は一人もいないようである。二回生も見かけない。どうも同世代は、デジタル・ワールドに疎いようである。なにか理由があるのかな？？
母が元気な頃は、カーネーションの鉢を買ってきていたけれど、ベッドでの生活となった今では、普段食べさせられないシュークリームの方を喜んでいる。
買い物帰りにコンビニに寄って、１０５円の大きいヤツを買って帰った。帰ったら爆睡中だったので、三時過ぎに目を覚ましたときに「ハイ」と渡してやった。大喜びで、たちまち完食であった。
そして今日は、連休前にとれた前歯をもって名大の歯科に行ってきた。とりあえず貼り付けてもらった。次回、麻酔をして虫歯になっている所を本格的に大工事してもらうことになった。歯がついたので話すとき息が漏れなくなって、いくらか言葉が明瞭になた。二回ほど、短期間に通わなければならない。
それと、ｍｉｘｉで高校の後輩と新たに知り合いになった。もっとも私は新設高の第一回卒業生なので、先輩はいないのだけれど・・・
出身校のコミュニティーに登録している人を全部チェックしたわけではないけれど、私と同じ一回生は一人もいないようである。二回生も見かけない。どうも同世代は、デジタル・ワールドに疎いようである。なにか理由があるのかな？？
それでもダイヤの結婚指輪を買うのか？
2008-05-11
今日のテレビ番組の写真である。クリックして見てもらえれば分かるように、今夜はＮＨＫの衛星放送で「ＢＳ 世界のドキュメンタリー・アフリカ 『ダイヤモンド・ロード 前・後編』」、ＷＯＷＯＷで「ブラッド・ダイヤモンド」を同時間帯に放送されるようである。今でもこんなアホな言葉が残っているのは日本ぐらいであろうが、「結婚指輪は、月収の三か月分」などというクダラン言葉が。
ブラッド・ピットの「ブラッド・ダイヤモンド」は見ていないけれど、ＮＨＫ方ののドキュメント「ダイヤモンド・ロード」は、以前見た記憶がある。題名を忘れたので自信がないが、同じ番組だと思う。
コレを見てもなお、ダイヤなど買うのだろうか？？
今現在のアフリカのダイヤ産地（確かコンゴ）に取材したのが、「ブラッド・ダイヤモンド」のはずである。これらを見て、それでもダイヤを有り難がるのなら、その人の知性と品性を疑いたくなる。
それと何故ユダヤ人が迫害されてきたか、その一端を覗ける様なドキュメントであったはずであ。すなわち「陰謀の影にユダヤ人あり」というような。
記憶の片巣によれば、主要なダイヤ産地は、南アフリカ、コンゴ、ロシア、それとオーストラリア。ダイヤの使い道としては、宝石用より工業用の方が多かったように記憶しているのだが・・・最近ては人工ダイヤもあることだし。
ご光臨感謝します
2008-05-10
なにやら最近アクセス数が多くなったので、アクセス解析を覗いて見た。どうもグーグルの検索で、「site:ncubic.blog57.fc2.com blｏｇ」と指定してお読みいただいている方がいるようである。統一したテーマがなくて、アレコレ書き散らかしてあるのでかなり読みづらいブログとなっています。
お読みいただいた方々に感謝します。
もうすぐ記事の数が、１０００に届きそうです。なんとかそれまでは生きていられそうです。このＦＣ２の記事のカウンターでは、昨日が１０００になっていました。どうも一度保存して、その後削除したのまでカウントしている節があります。この辺りは、記事をどのように数えるかのシステムの設計仕様によるので、バグとは言い切れない。
それから挑戦し始めた多倍長演算のプログラムは、本体の四則演算以外のサブルーチンから作っている最中です。オリジナルのパスカルのプログラムそのままではＣ言語では記述できないので、データの入出力に一工夫しないといけないようなので、考えている所です。
そこが完成してテスト終了となったら、まず加算から作ってみようかと思っている。
お読みいただいた方々に感謝します。
もうすぐ記事の数が、１０００に届きそうです。なんとかそれまでは生きていられそうです。このＦＣ２の記事のカウンターでは、昨日が１０００になっていました。どうも一度保存して、その後削除したのまでカウントしている節があります。この辺りは、記事をどのように数えるかのシステムの設計仕様によるので、バグとは言い切れない。
それから挑戦し始めた多倍長演算のプログラムは、本体の四則演算以外のサブルーチンから作っている最中です。オリジナルのパスカルのプログラムそのままではＣ言語では記述できないので、データの入出力に一工夫しないといけないようなので、考えている所です。
そこが完成してテスト終了となったら、まず加算から作ってみようかと思っている。
「黄金虫に嫉妬する」の巻き
2008-05-09
今日ベランダの花に水をやろうとしたら、黄金虫のカップルが「子作り」に励んでいた。雌と思われるほうか花粉まみれになってたので、食事中を襲われたのかもしれない。大急ぎて部屋に戻って、デジカメを取ってき、撮影してみた。風があって中々花がジットしていないので、ちょっとピンボケになってしまった。子孫繁栄にいそしんでいるカップルに対して、自主的ボカシかな？？
ついでに、ベランダの花々。水仙とチューリップなどは終わったので、鉢を隅に移動させたところである。昨年末母が入院中に植えた球根が、順次芽を出し始めている。名前を控えてくるのが面倒なので・・・明日にする。。。。気が向いたら。
葉牡丹は、二度目のお勤めをしている。初めに咲いた茎が終わり切ってやったら、わき目が成長してきて、また黄色い花が咲き始めてきた。
錆ついた脳ミソを無理矢理と・・・
2008-05-08
最近頻繁になってきたことの一つに、物忘れがある。「アレ」を取りに台所から自分の部屋に行くと、「ナンダッケ？？」状態になってしまう。結局元に戻って「うぅぅぅぅん」と唸ると、「アッ！ソッダッタ
」と思い出す。余計な手間がかがってドタバタして、少ないなったエネルギーを無駄遣いして疲れるばかりになっている。
久しぶりに経済誌の「週刊 東洋経済」の中国特集の号を読んでいるのだけれど、頭の歯車がギシギシと悲鳴を上げている。
例えば、「元とドルの為替レートを維持するために、ドル買いを続けている」という記述を読んでも、
「中国によるドル買いがなくなったとき、ドルは暴落するのか？」とか、
「世界は密やかに、かつ粛々（しゅくしゅく）とドルからユーロへの流れになっているとき、極端に巨額でドルに片寄った外貨準備が元に及ぼす影響は？」とか、
「ドル買いと米国債買いで膨らんだ中国経済の健全性は？」とか、
「巨額のイラク戦争の経費のために発行されるドルと米国債を中国を買いまくって、アメリカの好景気を支えてきたのではなかろうか？」などと脳裏を疑問がかすめても、答えが浮かんでこない。
黄昏てきたのは髪の毛だけでなく、その中身も同様のようである。
なんか頭を使わないといけないと思い、また久しぶりにプログラムでも作ってみようかと考えた。何を作ろうかと迷ったので、押入れ中の本をあさって、Ｐａｓｃａｌで書かれているプログラムをＣ言語で作り直してみようかと思った。
アルゴリズム選集��
整列・探索・予測・多倍長演算編
安居院猛 著
新紀元社
１９９２年１月１６日 初版発行
の中から、「多倍長精度演算の整数演算」に挑戦してみようかとコードとにらめっこしている。昔読んだときの書き込みが残っている。当時はコードを読みこなせたらしい？ 今は何がなにやらチンプンカンプンである。
クリックすると、過去の悪戦奮闘振りがわかる。昔はＰａｓｃａｌでアルゴリズムを紹介している本が多かった。この本では、ＴＵＲＢＯ Ｐａｓｃａｌ ｖｅｒ５．０でプログラムが記述されている。今はＣとＰａｓｃａｌで、余計に頭が混乱している。
データ構造の基本は、以下のように設定されている。
ｔｙｐｅ ｌｏｎｇ＝ａｒｒａｙ［０．．ｓｉｚｅ］ｏｆ ｉｎｔｅｒｇｅｒ；
ｖａｒ Ａ：ｌｏｎｇ；
に対して、１２３４５６を代入すると、
A[3]=12 A[2]=34 A[1]=56 a[0]=6
となる。a{0}に、桁数と正負の情報を格納する。
上記の例で負数の場合には、A[0]=-6
ゼロの場合には、A[1]=0 A[0]=1
このように配列に整数を格納して四則演算をすることで、大きな桁数の整数演算を可能ならしめているのが、工夫された所である。上記の場合、ＣＯＮＳＴで宣言されているｓｉｚｅに、任意の値を設定するだけですむようになっている。
」と思い出す。余計な手間がかがってドタバタして、少ないなったエネルギーを無駄遣いして疲れるばかりになっている。久しぶりに経済誌の「週刊 東洋経済」の中国特集の号を読んでいるのだけれど、頭の歯車がギシギシと悲鳴を上げている。
例えば、「元とドルの為替レートを維持するために、ドル買いを続けている」という記述を読んでも、
「中国によるドル買いがなくなったとき、ドルは暴落するのか？」とか、
「世界は密やかに、かつ粛々（しゅくしゅく）とドルからユーロへの流れになっているとき、極端に巨額でドルに片寄った外貨準備が元に及ぼす影響は？」とか、
「ドル買いと米国債買いで膨らんだ中国経済の健全性は？」とか、
「巨額のイラク戦争の経費のために発行されるドルと米国債を中国を買いまくって、アメリカの好景気を支えてきたのではなかろうか？」などと脳裏を疑問がかすめても、答えが浮かんでこない。
黄昏てきたのは髪の毛だけでなく、その中身も同様のようである。
なんか頭を使わないといけないと思い、また久しぶりにプログラムでも作ってみようかと考えた。何を作ろうかと迷ったので、押入れ中の本をあさって、Ｐａｓｃａｌで書かれているプログラムをＣ言語で作り直してみようかと思った。
アルゴリズム選集��整列・探索・予測・多倍長演算編
安居院猛 著
新紀元社
１９９２年１月１６日 初版発行
の中から、「多倍長精度演算の整数演算」に挑戦してみようかとコードとにらめっこしている。昔読んだときの書き込みが残っている。当時はコードを読みこなせたらしい？ 今は何がなにやらチンプンカンプンである。
クリックすると、過去の悪戦奮闘振りがわかる。昔はＰａｓｃａｌでアルゴリズムを紹介している本が多かった。この本では、ＴＵＲＢＯ Ｐａｓｃａｌ ｖｅｒ５．０でプログラムが記述されている。今はＣとＰａｓｃａｌで、余計に頭が混乱している。
データ構造の基本は、以下のように設定されている。
ｔｙｐｅ ｌｏｎｇ＝ａｒｒａｙ［０．．ｓｉｚｅ］ｏｆ ｉｎｔｅｒｇｅｒ；
ｖａｒ Ａ：ｌｏｎｇ；
に対して、１２３４５６を代入すると、
A[3]=12 A[2]=34 A[1]=56 a[0]=6
となる。a{0}に、桁数と正負の情報を格納する。
上記の例で負数の場合には、A[0]=-6
ゼロの場合には、A[1]=0 A[0]=1
このように配列に整数を格納して四則演算をすることで、大きな桁数の整数演算を可能ならしめているのが、工夫された所である。上記の場合、ＣＯＮＳＴで宣言されているｓｉｚｅに、任意の値を設定するだけですむようになっている。
連休終わって・・・「異様なる威容」と「可愛いナャ」
2008-05-07
結局連休は何処へも出掛けず、母の介護に終始して過ぎてしまった。ストレスから、ビールと水割りの量が増えただけだった。今日は久しぶりの訪問看護とペパーさんの来宅があり、刺激的な一日だったので、昼食をヘルパーさんと喋りながら食べた後、直ぐウトウトしていた。その間に、久しぶりに熱田イオンに買い物に出かけた。
その途中、神宮東公園（北側）の池で見かけたアイガモの親子。毎年池の中の小島で雛を孵しているのだけれど、今年は、三羽孵ったようである。最近団地のゴミ捨て場に覆いをするようになって、カラスの数か減っている。以前はカラスに狙われて、うまく育たないことが多かった。団地にいついているネコも、ここまでは来ないので、池のほとりで休憩していても大丈夫のようである。気持ち良さそうに泳いでいる親子を見ていると、心和むものがある。
一応写真の上でクリックすると、少し大きくなる。
例の高層マンション「ザ・ライオンズ ミッドキャピタルタワー」の「異様なる威容」。公園からと、建物の東側のパチンコ店の駐車場から撮影してみた。建物の近くだと、仰ぎ見るだけで首が痛くなる。もはや何階まで出来ているのか、目で数えられなくなってきた。下のほうの階の部屋に、電灯が点いていたから、モデルルームとして公開しているのかもしれない。
現代中国の学習 その一
2008-05-05
チベット問題と聖火リレーの騒動に端を発して、北京オリンピック後の中国情勢と世界の動向に関して興味があるので、なにか書こうかと再度中国関係の勉強をしてみようかと思った。マコト君からも、中国の歴史についてコメントをもらったりしている。
とりあえずとっつきやすい経済学関係から接近を試みるべく、久しぶり経済専門誌を買ってきて読んだりしている。この手の専門誌を読むのは久しぶりなので、頭から煙が出そうである。
週刊 東洋経済 ５／３−１０
チャイナシンドローム！
中国と世界経済
北京五輪後に何がおこる！！
本箱の中から、かつて読んだ小室直樹先生と山本七平先生の著作を引っ張り出してきて、枕元においておいて、時々眺めている。どちらも、もはや古典の部類に入る著作だけれど、書かれている内容は今でも新鮮である。
資本主義中国の挑戦
小室直樹 著
光文社 カッパビジネス
昭和５７年７月３０日 初版一刷発行
あのソ連崩壊を理論的に預言した名著「ソビエト帝国の崩壊」に続く、先生の一連のご託宣の一冊。
日本人と中国人
なぜ、あの国とまともに付き合えないのか
イザヤ・ベンタサン 著
山本七平 訳
祥伝社
こちらは昭和４７年（１９７２年）から４９年にかけて、月刊「文藝春秋」断続的に連載されて、その後平成８年（１９９６年）に山本七平ライブラリー１３巻に収録されていたものが、平成１７年に単行本化されたものである。
開高健先生や河合隼雄先生の全集同様、山本七平先生の著作集も貧民は買えなかった。残念な事の一つであ。それらを購うお金もなければ、そもそも収蔵する場所もないのだけれど・・・
とりあえずとっつきやすい経済学関係から接近を試みるべく、久しぶり経済専門誌を買ってきて読んだりしている。この手の専門誌を読むのは久しぶりなので、頭から煙が出そうである。
週刊 東洋経済 ５／３−１０チャイナシンドローム！
中国と世界経済
北京五輪後に何がおこる！！
本箱の中から、かつて読んだ小室直樹先生と山本七平先生の著作を引っ張り出してきて、枕元においておいて、時々眺めている。どちらも、もはや古典の部類に入る著作だけれど、書かれている内容は今でも新鮮である。
資本主義中国の挑戦小室直樹 著
光文社 カッパビジネス
昭和５７年７月３０日 初版一刷発行
あのソ連崩壊を理論的に預言した名著「ソビエト帝国の崩壊」に続く、先生の一連のご託宣の一冊。
日本人と中国人なぜ、あの国とまともに付き合えないのか
イザヤ・ベンタサン 著
山本七平 訳
祥伝社
こちらは昭和４７年（１９７２年）から４９年にかけて、月刊「文藝春秋」断続的に連載されて、その後平成８年（１９９６年）に山本七平ライブラリー１３巻に収録されていたものが、平成１７年に単行本化されたものである。
開高健先生や河合隼雄先生の全集同様、山本七平先生の著作集も貧民は買えなかった。残念な事の一つであ。それらを購うお金もなければ、そもそも収蔵する場所もないのだけれど・・・
疲れたガヤ
2008-05-05
４日は弟一家が、昼ご飯を食べに来た。連休明けが次男坊の誕生日なので、金一封をもらいに来たのである。
用意したのは、
冷やし中華
竹輪の中にチーズ蒲鉾を入れたもの
だし巻きたまご（真ん中にカニカマ）
手羽中の中華風（フライパンで炒めた）
きれいに無くなっていたから、ソコソコの出来だったようである。長男坊は中三なのであまり喋らないし、次男坊は恥ずかしがって喋らないし、お嬢様はご機嫌うるわしくなくでブス〜としていて、味の感想が分からなかったから。
オフクロサンも車椅子で一緒に食卓で食べたので、喜んでいた。だだ疲れたようで、一時半頃弟一家が帰ったら直ぐに爆睡状態であった。三時ごろ目覚めたら、「今何時？？」「夜中？？」と寝ぼけていた。
私も疲れたので、九時半にはウイスキーの水割りの酔いで寝てしまった。目覚めたら二時で、それから衛星放送のメジャーリーグを見ながらコレを書いている。
再三触れるのであるが、メジャーの方が野球を見ている気がする。日本の球場はうるさ過ぎて見る気がしない。球団は何故あんな騒音を許しているのか理解できない。いわゆる私設応援団など、野球を見るためには邪魔でしかない。
高校野球の悪しき伝統が影響しているのと、広島の山本浩二さんに対するラッパから広まった今の騒音である。群れる事に安心感を感じる日本人にとって、あのように扇動されることで、幻想的な一体感に酔っている様である。私には、観客が野球を見て楽しんでいるように思えない。
用意したのは、
冷やし中華
竹輪の中にチーズ蒲鉾を入れたもの
だし巻きたまご（真ん中にカニカマ）
手羽中の中華風（フライパンで炒めた）
きれいに無くなっていたから、ソコソコの出来だったようである。長男坊は中三なのであまり喋らないし、次男坊は恥ずかしがって喋らないし、お嬢様はご機嫌うるわしくなくでブス〜としていて、味の感想が分からなかったから。
オフクロサンも車椅子で一緒に食卓で食べたので、喜んでいた。だだ疲れたようで、一時半頃弟一家が帰ったら直ぐに爆睡状態であった。三時ごろ目覚めたら、「今何時？？」「夜中？？」と寝ぼけていた。
私も疲れたので、九時半にはウイスキーの水割りの酔いで寝てしまった。目覚めたら二時で、それから衛星放送のメジャーリーグを見ながらコレを書いている。
再三触れるのであるが、メジャーの方が野球を見ている気がする。日本の球場はうるさ過ぎて見る気がしない。球団は何故あんな騒音を許しているのか理解できない。いわゆる私設応援団など、野球を見るためには邪魔でしかない。
高校野球の悪しき伝統が影響しているのと、広島の山本浩二さんに対するラッパから広まった今の騒音である。群れる事に安心感を感じる日本人にとって、あのように扇動されることで、幻想的な一体感に酔っている様である。私には、観客が野球を見て楽しんでいるように思えない。