文字列の反転 in Haskell DouKaku?

与えられた文字列sを前後逆転したものを返す関数reverse_stringを作成してください。ただし、sはShift-JISでエンコードされている文字列だと仮定して構いません。

サンプル入出力

>>> print reverse_string("Hello")
olleH
>>> print reverse_string("こんにちは")
はちにんこ
>>> print reverse_string("濁点(だくてん)")
)んてくだ(点濁

Haskellでは文字列は文字のリストにすぎませんので
「文字列が構築されているなら」、reverse で反転できます。

1 2	reverseString :: String -> String reverseString = reverse

HackageDBにある utf8-stringというライブラリを使う。
ソースコードはUTF8，U.putStrLnは文字列をUTF8バイト列に変換して出力する

see: The utf8-string package

module Main where
import qualified System.IO.UTF8 as U

reverseString :: String -> String
reverseString = reverse

main :: IO ()
main = do { U.putStrLn $ reverseString "Hello"
          ; U.putStrLn $ reverseString "こんにちは"
          ; U.putStrLn $ reverseString "濁点(だくてん)"
	  }

{-
*Main> :main
Loading package utf8-string-0.1 ... linking ... done.
olleH
はちにんこ
)んてくだ(点濁
-}

DouKaku?

文字列の反転

Posted feedbacks - Haskell

Index

Feed

Other

Link

Pathtraq