module Gargantext.Components.GraphQL.IMT where

import Gargantext.Prelude

import Affjax.RequestBody (RequestBody(..))
import Data.Array as A
import Data.Lens (Lens', lens)
import Data.Maybe (Maybe(..), fromMaybe, maybe)
import GraphQL.Client.Args (NotNull, (=>>))
import GraphQL.Client.Variable (Var(..))


type School
  = { school_id        :: String
    , school_longName  :: String
    , school_shortName :: String
    }

schoolsQuery = { imt_schools:
                  { school_id: unit
                  , school_longName: unit
                  , school_shortName: unit}
                }