sig
module Font :
sig
type t = { family : string; size : string; }
val family : (GapiAdsenseV1_4Model.AdStyle.Font.t, string) GapiLens.t
val size : (GapiAdsenseV1_4Model.AdStyle.Font.t, string) GapiLens.t
val empty : GapiAdsenseV1_4Model.AdStyle.Font.t
val render :
GapiAdsenseV1_4Model.AdStyle.Font.t -> GapiJson.json_data_model list
val parse :
GapiAdsenseV1_4Model.AdStyle.Font.t ->
GapiJson.json_data_model -> GapiAdsenseV1_4Model.AdStyle.Font.t
end
module Colors :
sig
type t = {
background : string;
border : string;
text : string;
title : string;
url : string;
}
val background :
(GapiAdsenseV1_4Model.AdStyle.Colors.t, string) GapiLens.t
val border : (GapiAdsenseV1_4Model.AdStyle.Colors.t, string) GapiLens.t
val text : (GapiAdsenseV1_4Model.AdStyle.Colors.t, string) GapiLens.t
val title : (GapiAdsenseV1_4Model.AdStyle.Colors.t, string) GapiLens.t
val url : (GapiAdsenseV1_4Model.AdStyle.Colors.t, string) GapiLens.t
val empty : GapiAdsenseV1_4Model.AdStyle.Colors.t
val render :
GapiAdsenseV1_4Model.AdStyle.Colors.t ->
GapiJson.json_data_model list
val parse :
GapiAdsenseV1_4Model.AdStyle.Colors.t ->
GapiJson.json_data_model -> GapiAdsenseV1_4Model.AdStyle.Colors.t
end
type t = {
colors : GapiAdsenseV1_4Model.AdStyle.Colors.t;
corners : string;
font : GapiAdsenseV1_4Model.AdStyle.Font.t;
kind : string;
}
val colors :
(GapiAdsenseV1_4Model.AdStyle.t, GapiAdsenseV1_4Model.AdStyle.Colors.t)
GapiLens.t
val corners : (GapiAdsenseV1_4Model.AdStyle.t, string) GapiLens.t
val font :
(GapiAdsenseV1_4Model.AdStyle.t, GapiAdsenseV1_4Model.AdStyle.Font.t)
GapiLens.t
val kind : (GapiAdsenseV1_4Model.AdStyle.t, string) GapiLens.t
val empty : GapiAdsenseV1_4Model.AdStyle.t
val render :
GapiAdsenseV1_4Model.AdStyle.t -> GapiJson.json_data_model list
val parse :
GapiAdsenseV1_4Model.AdStyle.t ->
GapiJson.json_data_model -> GapiAdsenseV1_4Model.AdStyle.t
val to_data_model :
GapiAdsenseV1_4Model.AdStyle.t -> GapiJson.json_data_model
val of_data_model :
GapiJson.json_data_model -> GapiAdsenseV1_4Model.AdStyle.t
end