sig
module StorageQuota :
sig
type t = {
limit : int64;
usage : int64;
usageInDrive : int64;
usageInDriveTrash : int64;
}
val limit : (GapiDriveV3Model.About.StorageQuota.t, int64) GapiLens.t
val usage : (GapiDriveV3Model.About.StorageQuota.t, int64) GapiLens.t
val usageInDrive :
(GapiDriveV3Model.About.StorageQuota.t, int64) GapiLens.t
val usageInDriveTrash :
(GapiDriveV3Model.About.StorageQuota.t, int64) GapiLens.t
val empty : GapiDriveV3Model.About.StorageQuota.t
val render :
GapiDriveV3Model.About.StorageQuota.t ->
GapiJson.json_data_model list
val parse :
GapiDriveV3Model.About.StorageQuota.t ->
GapiJson.json_data_model -> GapiDriveV3Model.About.StorageQuota.t
end
type t = {
appInstalled : bool;
exportFormats : (string * string list) list;
folderColorPalette : string list;
importFormats : (string * string list) list;
kind : string;
maxImportSizes : (string * int64) list;
maxUploadSize : int64;
storageQuota : GapiDriveV3Model.About.StorageQuota.t;
user : GapiDriveV3Model.User.t;
}
val appInstalled : (GapiDriveV3Model.About.t, bool) GapiLens.t
val exportFormats :
(GapiDriveV3Model.About.t, (string * string list) list) GapiLens.t
val folderColorPalette : (GapiDriveV3Model.About.t, string list) GapiLens.t
val importFormats :
(GapiDriveV3Model.About.t, (string * string list) list) GapiLens.t
val kind : (GapiDriveV3Model.About.t, string) GapiLens.t
val maxImportSizes :
(GapiDriveV3Model.About.t, (string * int64) list) GapiLens.t
val maxUploadSize : (GapiDriveV3Model.About.t, int64) GapiLens.t
val storageQuota :
(GapiDriveV3Model.About.t, GapiDriveV3Model.About.StorageQuota.t)
GapiLens.t
val user : (GapiDriveV3Model.About.t, GapiDriveV3Model.User.t) GapiLens.t
val empty : GapiDriveV3Model.About.t
val render : GapiDriveV3Model.About.t -> GapiJson.json_data_model list
val parse :
GapiDriveV3Model.About.t ->
GapiJson.json_data_model -> GapiDriveV3Model.About.t
val to_data_model : GapiDriveV3Model.About.t -> GapiJson.json_data_model
val of_data_model : GapiJson.json_data_model -> GapiDriveV3Model.About.t
end