Albatross_provisionSourceval sign :
?dbname:??? ->
?certname:??? ->
X509.Extension.t ->
X509.Distinguished_name.t ->
X509.Private_key.t ->
X509.Signing_request.t ->
Duration.t ->
(unit, [> Rresult.R.msg ]) Rresult.resultval priv_key :
?bits:??? ->
string ->
(X509.Private_key.t, [> `Msg of string ]) Rresult.result