(1)と書いてしまったので(2)、(3)もあるんでしょうね、きっと笑 Stateモナドの導入ということで。 今までどのようなものか、という概念ばかりを読んでいたので実際に触ったことはなかった。 では、さわってみるかー、と。 ghciで色々実験してみました。 主に…

さて。 16->10進数変換の簡単な関数が容易されているとのことで。 書いてみた。 import Numeric main = getLine >>= \n -> print (fst.head $ readHex n) Numericモジュール内の、readHexですね！ 定義なんかも調べてみる $ hoogle readHex Numeric readHex …

昨日、pngのチャンクデータを読んだはいいが、 IHDRのチャンクタイプが 49 48 44 52 となるべきなのに、 73 72 68 82 となっていて、おかしいなあ、と思っていたら。 単純に。 上は16進数、下は10進数ですね。 なるほど じゃあ一応、それが正しいかどうか確…

できたー！！ pngのヘッダ部分から、幅、高さ、カラータイプ、深度を読むことに成功。 深度とカラータイプは昨夜のうちにできていたのですが、幅と高さがどうしても変な値になってしまっていて。 読む位置はあってるはずなのにな....と思いつつ pngのチャン…

Fedoraで、実際のところ、pngファイルの中身はどうなってるんだろうと思い、バイナリエデイタを利用することにttp://kajuhome.com/tips/tips_00_010.shtmlこのサイトを参考にさせてもらいました sudo yum -y install hexeditで、バイナリエディタインストー…

Haskellでバイナリファイルを読み出す。 読み出してファイルに保存するついでに、端末に出力するプログラム。 import System.IO import Data.ByteString.Char8 as B main = B.readFile "haskell.png" >>= \fs -> B.writeFile "log.txt" fs >> print fs Haske…

昨日は、勉強会の概要を決定したあと帰宅、量子論を少しやって夕食を食べてから面接に出発鍼灸治療をしているところでして。 先生と先輩一人というとてもこじんまりした感じ まずは片付けしてー、ということでお手伝い。 鍼の分類なんかをするわけですが、な…

さあ。 昨日できなかった、FFIのテスト C言語関数をHaskellで利用する。 逆は考えません、Haskellを活かせない気がする。 ネットで調べてみると、sin関数をCから引っ張ってくるものがあったのでそれでちょっと簡単な実験をすることに {-# LANGUAGE ForeignFu…

昨日の日記 ひさびさに日記かくー朝11時半頃に家を出て待ち合わせの駅に Haskell でのFFIの方法やモナドを勉強して時間を潰すそれから移動 暑いですねー。練習したり雑談しながら到着。 早速昼食を食べよう！ということで。タイ風焼きそば、ツナトマトスパゲ…

今日の日記 朝ぐだぐだ 10時起床 足が若干筋肉痛。腕はやはりちょっぴり日焼け。 すこぶる快調！ 朝食を食べながら妹の話を聞き、それからドイツ語とグラフ理論を少し勉強。暑くて全然集中できない。 昼 あまりにも暑いので、そうめんを湯掻いて食べるそれか…

昨日プログラミングの最終課題を終えて提出したので、これでC言語プログラミングはしばなくなし。 あ、C++での開発はあるか。でもこれは授業とは別だから。 というわけで、これからはHaskell学習に集中できる！！ と思うことはなかなか。 これから試験ラッシ…

最近視力低下が甚だしくて困る 今も、ヒープソートの課題中で眼が痛い。 cygwin利用して苦労して環境構築せずとも家でgccさわれるのは便利だが、眼が痛いー てかもうこんな時間か

Haskellで数値計算 こういう、無限級数の予想などを、Haskellではとても簡単にかけるので便利 main = print $ sum $ map (\n -> 1/(4*n*n-1)) [1..100000] フーリエ余弦級数を用いて f(x) = sinx を表し、その結果出てきた Σ1/(4n^2-1) の計算結果が正しいか…

USBも学生証も、バイト先の鍵も行方不明で困る..... バイト先の鍵は、もう返却したような気もするけど、USBとか...最近新しいの買ったけれどそれも今人に預けてる。 もう一本のUSBは、FedoraのライブUSBになってるからなー。 どうしたものか 学生証と最後に…

眠い.... 眼が痛い 明日も朝一から病院が以来だからもう寝ないと 手遅れな気がするけど笑 今日は、食堂で解析学と情報通信の試験勉強してから帰宅 夕食食べて、量子論に悩んで気がついたらHaskell入門の文章作り笑 風呂に入って、さっきから2時間ばかりOpenG…

Maybeモナドを使おう！ ということで。 バイトの行き帰りにlookup関数を使ってトライ。 とりあえず、Maybe使った製作予定のものがあるので、そのデータ構造をタプルに落とし込み適用してやるとちゃんと動いた！！ Nothingのときの関数の挙動をどうするか悩む…

七月いっぱいで、今のバイト3つのうち2つが終わってしまうので、夏休みからのバイトを探そうとさっきから色々調べてはいるものの..... なかなかないですね 長期でならあるんだけれど、来セメの予定わからんし。 今から少し調べてみよう。 交通費有りで梅田あ…

寝ようと思ってなかなか寝られないです笑 この間の、二分探索木について、網羅し忘れていた関数たち 最小要素を削除する関数 deleteMin :: Bstree Int -> Bstree Int deleteMin t = case t of Null -> Null Branch _ Null tr -> tr Branch a tl tr -> Branch…

頭痛いーさて。 夕方、大学で試してみたOpenGL 家にて導入に再挑戦。 よく調べてみると、 GHCを入れただけではOpenGLはついてこないんですね、今は。 昔はGHCに標準でついていたようですが、今は軽量化のため、そのようなライブラリは全てplatformに一任、と…

現在大学の図書館。 空腹なのでそろそろ帰る Haskellで、windowsではOpenGL触ったことあるけど、Fedoraでもできるだろうか。 と思って、せっかく無線LANもつながっていることだし、と思い、試してみることに sudo yum install freeglut sudo yum install fre…

今日は真面目に勉強情報理論、解析学、情報通信を主に。 といっても。集中力続いたのは3時間程度でしたが。 やはり涼しい場所でやるに限る！！ 情報通信に関しては大体完成したような。ただ、解析学.....問題はあるのですが、肝心の解答に間違いがありすぎて…

図書館で借りてきた本に、カレンダーを作る、という項目があったので、自分で書いたらどうなるかやってみよう！ ということで Haskellでカレンダーを作ろうと思って少しずつ制作中。 といっても、もうすぐでできそう 方針としては、 [1..31]のリストに対しZe…

ああ、なんか眠いのに眠れないー Haskellで二分探索木を小一時間で書いてみる作業 とりあえず、木を以下のように定義 data Bstree a = Null |Branch a (Bstree a) (Bstree a) deriving (Show , Eq) で、値の挿入を以下のように定義 insert:: Bstree Int -> I…

Haskellでのカレンダー、一応完成..... もう眠いので整形を途中で断念。 もっと関数減らせる import Control.Monad main= do cs <- getLine putStrLn " Su Mo Tu We Th Fr Sa" forM_ (map (disp.disp1st) $zip (map show [1..31]) $ input $map read $ words…

今日は大阪大学の医学部陣営が主催する移植説明会に行ってきました。 まあ既知の内容ばかりで特に真新しいことはなかったですが。 このブログを始めた理由とかも実はここにありますからねえ笑 最近は専らHaskellの記事ばかりで、開設当初の目的からは外れて…

Haskellでは関数のリストもできるはずだ！ ということで。 今日はその実験をば flist = [map (\n->n*n),filter even] main = print $ sum $ foldr ($) [1..100] flist flistをなんと画期的なことか、関数のリストに束縛してやる！！ foldr関数で、右結合のよ…