日時: | 2022-12-10 |
---|---|
作: | 時雨堂 |
バージョン: | 2022.1 |
URL: | https://github.com/OpenAyame |
このプロジェクトに興味がある人はこの資料や GitHub リポジトリ に Star をつけてもらえると嬉しいです。
日時: | 2022-12-10 |
---|---|
作: | 時雨堂 |
バージョン: | 2022.1 |
URL: | https://github.com/OpenAyame |
このプロジェクトに興味がある人はこの資料や GitHub リポジトリ に Star をつけてもらえると嬉しいです。
import TagField | |
import Data.Text (Text) | |
import Data.Aeson | |
data Banana = Banana | |
{ shape :: Field "banana-shape" Text | |
, size :: Field "banana size" (Maybe Int) | |
, name :: Field "banana's name" Text | |
} deriving Show |