Tailwind classes in OCaml
anil.recoil.org
1(** Spacing utilities for padding, margin, gap, and space *)
2
3(** Represents spacing configuration *)
4type t
5
6(** Direction for spacing *)
7type direction =
8 | All (** All sides *)
9 | X (** Horizontal (left and right) *)
10 | Y (** Vertical (top and bottom) *)
11 | Top (** Top only *)
12 | Right (** Right only *)
13 | Bottom (** Bottom only *)
14 | Left (** Left only *)
15 | Start (** Inline start (logical) *)
16 | End (** Inline end (logical) *)
17
18(** Create padding classes *)
19val padding : direction -> Size.t -> t
20
21(** Create margin classes *)
22val margin : direction -> Size.t -> t
23
24(** Create gap classes for flexbox/grid *)
25val gap : [`All | `X | `Y] -> Size.t -> t
26
27(** Create space-between classes *)
28val space : [`X | `Y] -> Size.t -> t
29
30(** Convert spacing to CSS class *)
31val to_class : t -> Css.t
32
33(** Shorthand constructors *)
34
35(** Padding all sides *)
36val p : Size.t -> t
37
38(** Padding horizontal *)
39val px : Size.t -> t
40
41(** Padding vertical *)
42val py : Size.t -> t
43
44(** Padding top *)
45val pt : Size.t -> t
46
47(** Padding right *)
48val pr : Size.t -> t
49
50(** Padding bottom *)
51val pb : Size.t -> t
52
53(** Padding left *)
54val pl : Size.t -> t
55
56(** Margin all sides *)
57val m : Size.t -> t
58
59(** Margin horizontal *)
60val mx : Size.t -> t
61
62(** Margin vertical *)
63val my : Size.t -> t
64
65(** Margin top *)
66val mt : Size.t -> t
67
68(** Margin right *)
69val mr : Size.t -> t
70
71(** Margin bottom *)
72val mb : Size.t -> t
73
74(** Margin left *)
75val ml : Size.t -> t