src/expressions/id_type.ml


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

type 'a t = 'a ScTypes.Type.t

type 'a obs = 'a ScTypes.Type.t

let str s = ScTypes.Type.string s

let num n = ScTypes.Type.number n

let date d = ScTypes.Type.date d

let bool b = ScTypes.Type.boolean b

let observe x = x