src/Aliment.purs


1
2
3
4
5
6
7
8
9
10
11
12
13

module Aliment where

all :: Array Aliment
all =
  [ { name: "Oignon", gi: 15 }
  , { name: "Olive", gi: 15 }
  , { name: "Haricot rouge", gi: 35 }
  ]

type Aliment =
  { name :: String
  , gi :: Int
  }