@nfdi4plants/arctrl 3.0.0-beta.4 → 3.0.0-beta.6

package/dist/ts/ts/fable_modules/Fable.Fetch.2.6.0/Fetch.fs.js

@@ -1,6 +1,253 @@
+import { Union } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
+import { union_type, string_type, int32_type, obj_type, class_type, bool_type, array_type, tuple_type } from '../../../node_modules/@fable-org/fable-library-js/Reflection.js';
+import { defaultArg } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { empty } from '../../../node_modules/@fable-org/fable-library-js/Seq.js';
 import { keyValueList } from '../../../node_modules/@fable-org/fable-library-js/MapUtil.js';
 import { int32ToString } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
+import { singleton } from '../../../node_modules/@fable-org/fable-library-js/List.js';
+import { result } from '../Fable.Promise.3.2.0/Promise.fs.js';
 
+function Types_HttpRequestHeaders_Accept(Item) {
+  return new Types_HttpRequestHeaders(0, [Item]);
+}
+function Types_HttpRequestHeaders_AcceptCharset(Item) {
+  return new Types_HttpRequestHeaders(1, [Item]);
+}
+function Types_HttpRequestHeaders_AcceptEncoding(Item) {
+  return new Types_HttpRequestHeaders(2, [Item]);
+}
+function Types_HttpRequestHeaders_AcceptLanguage(Item) {
+  return new Types_HttpRequestHeaders(3, [Item]);
+}
+function Types_HttpRequestHeaders_AcceptDatetime(Item) {
+  return new Types_HttpRequestHeaders(4, [Item]);
+}
+function Types_HttpRequestHeaders_Authorization(Item) {
+  return new Types_HttpRequestHeaders(5, [Item]);
+}
+function Types_HttpRequestHeaders_CacheControl(Item) {
+  return new Types_HttpRequestHeaders(6, [Item]);
+}
+function Types_HttpRequestHeaders_Connection(Item) {
+  return new Types_HttpRequestHeaders(7, [Item]);
+}
+function Types_HttpRequestHeaders_Cookie(Item) {
+  return new Types_HttpRequestHeaders(8, [Item]);
+}
+function Types_HttpRequestHeaders_ContentLength(Item) {
+  return new Types_HttpRequestHeaders(9, [Item]);
+}
+function Types_HttpRequestHeaders_ContentMD5(Item) {
+  return new Types_HttpRequestHeaders(10, [Item]);
+}
+function Types_HttpRequestHeaders_ContentType(Item) {
+  return new Types_HttpRequestHeaders(11, [Item]);
+}
+function Types_HttpRequestHeaders_Date(Item) {
+  return new Types_HttpRequestHeaders(12, [Item]);
+}
+function Types_HttpRequestHeaders_Expect(Item) {
+  return new Types_HttpRequestHeaders(13, [Item]);
+}
+function Types_HttpRequestHeaders_Forwarded(Item) {
+  return new Types_HttpRequestHeaders(14, [Item]);
+}
+function Types_HttpRequestHeaders_From(Item) {
+  return new Types_HttpRequestHeaders(15, [Item]);
+}
+function Types_HttpRequestHeaders_Host(Item) {
+  return new Types_HttpRequestHeaders(16, [Item]);
+}
+function Types_HttpRequestHeaders_IfMatch(Item) {
+  return new Types_HttpRequestHeaders(17, [Item]);
+}
+function Types_HttpRequestHeaders_IfModifiedSince(Item) {
+  return new Types_HttpRequestHeaders(18, [Item]);
+}
+function Types_HttpRequestHeaders_IfNoneMatch(Item) {
+  return new Types_HttpRequestHeaders(19, [Item]);
+}
+function Types_HttpRequestHeaders_IfRange(Item) {
+  return new Types_HttpRequestHeaders(20, [Item]);
+}
+function Types_HttpRequestHeaders_IfUnmodifiedSince(Item) {
+  return new Types_HttpRequestHeaders(21, [Item]);
+}
+function Types_HttpRequestHeaders_MaxForwards(Item) {
+  return new Types_HttpRequestHeaders(22, [Item]);
+}
+function Types_HttpRequestHeaders_Origin(Item) {
+  return new Types_HttpRequestHeaders(23, [Item]);
+}
+function Types_HttpRequestHeaders_Pragma(Item) {
+  return new Types_HttpRequestHeaders(24, [Item]);
+}
+function Types_HttpRequestHeaders_ProxyAuthorization(Item) {
+  return new Types_HttpRequestHeaders(25, [Item]);
+}
+function Types_HttpRequestHeaders_Range(Item) {
+  return new Types_HttpRequestHeaders(26, [Item]);
+}
+function Types_HttpRequestHeaders_Referer(Item) {
+  return new Types_HttpRequestHeaders(27, [Item]);
+}
+function Types_HttpRequestHeaders_SOAPAction(Item) {
+  return new Types_HttpRequestHeaders(28, [Item]);
+}
+function Types_HttpRequestHeaders_TE(Item) {
+  return new Types_HttpRequestHeaders(29, [Item]);
+}
+function Types_HttpRequestHeaders_UserAgent(Item) {
+  return new Types_HttpRequestHeaders(30, [Item]);
+}
+function Types_HttpRequestHeaders_Upgrade(Item) {
+  return new Types_HttpRequestHeaders(31, [Item]);
+}
+function Types_HttpRequestHeaders_Via(Item) {
+  return new Types_HttpRequestHeaders(32, [Item]);
+}
+function Types_HttpRequestHeaders_Warning(Item) {
+  return new Types_HttpRequestHeaders(33, [Item]);
+}
+function Types_HttpRequestHeaders_XRequestedWith(Item) {
+  return new Types_HttpRequestHeaders(34, [Item]);
+}
+function Types_HttpRequestHeaders_DNT(Item) {
+  return new Types_HttpRequestHeaders(35, [Item]);
+}
+function Types_HttpRequestHeaders_XForwardedFor(Item) {
+  return new Types_HttpRequestHeaders(36, [Item]);
+}
+function Types_HttpRequestHeaders_XForwardedHost(Item) {
+  return new Types_HttpRequestHeaders(37, [Item]);
+}
+function Types_HttpRequestHeaders_XForwardedProto(Item) {
+  return new Types_HttpRequestHeaders(38, [Item]);
+}
+function Types_HttpRequestHeaders_FrontEndHttps(Item) {
+  return new Types_HttpRequestHeaders(39, [Item]);
+}
+function Types_HttpRequestHeaders_XHttpMethodOverride(Item) {
+  return new Types_HttpRequestHeaders(40, [Item]);
+}
+function Types_HttpRequestHeaders_XATTDeviceId(Item) {
+  return new Types_HttpRequestHeaders(41, [Item]);
+}
+function Types_HttpRequestHeaders_XWapProfile(Item) {
+  return new Types_HttpRequestHeaders(42, [Item]);
+}
+function Types_HttpRequestHeaders_ProxyConnection(Item) {
+  return new Types_HttpRequestHeaders(43, [Item]);
+}
+function Types_HttpRequestHeaders_XUIDH(Item) {
+  return new Types_HttpRequestHeaders(44, [Item]);
+}
+function Types_HttpRequestHeaders_XCsrfToken(Item) {
+  return new Types_HttpRequestHeaders(45, [Item]);
+}
+function Types_HttpRequestHeaders_Custom(key, value) {
+  return new Types_HttpRequestHeaders(46, [key, value]);
+}
+class Types_HttpRequestHeaders extends Union {
+  constructor(tag, fields) {
+    super();
+    this.tag = tag;
+    this.fields = fields;
+  }
+  cases() {
+    return ["Accept", "Accept-Charset", "Accept-Encoding", "Accept-Language", "Accept-Datetime", "Authorization", "Cache-Control", "Connection", "Cookie", "Content-Length", "Content-MD5", "Content-Type", "Date", "Expect", "Forwarded", "From", "Host", "If-Match", "If-Modified-Since", "If-None-Match", "If-Range", "If-Unmodified-Since", "Max-Forwards", "Origin", "Pragma", "Proxy-Authorization", "Range", "Referer", "SOAPAction", "TE", "User-Agent", "Upgrade", "Via", "Warning", "X-Requested-With", "DNT", "X-Forwarded-For", "X-Forwarded-Host", "X-Forwarded-Proto", "Front-End-Https", "X-Http-Method-Override", "X-ATT-DeviceId", "X-Wap-Profile", "Proxy-Connection", "X-UIDH", "X-Csrf-Token", "Custom"];
+  }
+}
+function Types_HttpRequestHeaders_$reflection() {
+  return union_type("Fetch.Types.HttpRequestHeaders", [], Types_HttpRequestHeaders, () => [[["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", int32_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["key", string_type], ["value", obj_type]]]);
+}
+function Types_RequestProperties_Method(Item) {
+  return new Types_RequestProperties(0, [Item]);
+}
+function Types_RequestProperties_Headers(Item) {
+  return new Types_RequestProperties(1, [Item]);
+}
+function Types_RequestProperties_Body(Item) {
+  return new Types_RequestProperties(2, [Item]);
+}
+function Types_RequestProperties_Mode(Item) {
+  return new Types_RequestProperties(3, [Item]);
+}
+function Types_RequestProperties_Credentials(Item) {
+  return new Types_RequestProperties(4, [Item]);
+}
+function Types_RequestProperties_Cache(Item) {
+  return new Types_RequestProperties(5, [Item]);
+}
+function Types_RequestProperties_Redirect(Item) {
+  return new Types_RequestProperties(6, [Item]);
+}
+function Types_RequestProperties_Referrer(Item) {
+  return new Types_RequestProperties(7, [Item]);
+}
+function Types_RequestProperties_ReferrerPolicy(Item) {
+  return new Types_RequestProperties(8, [Item]);
+}
+function Types_RequestProperties_Integrity(Item) {
+  return new Types_RequestProperties(9, [Item]);
+}
+function Types_RequestProperties_KeepAlive(Item) {
+  return new Types_RequestProperties(10, [Item]);
+}
+function Types_RequestProperties_Signal(Item) {
+  return new Types_RequestProperties(11, [Item]);
+}
+class Types_RequestProperties extends Union {
+  constructor(tag, fields) {
+    super();
+    this.tag = tag;
+    this.fields = fields;
+  }
+  cases() {
+    return ["Method", "Headers", "Body", "Mode", "Credentials", "Cache", "Redirect", "Referrer", "ReferrerPolicy", "Integrity", "KeepAlive", "Signal"];
+  }
+}
+function Types_RequestProperties_$reflection() {
+  return union_type("Fetch.Types.RequestProperties", [], Types_RequestProperties, () => [[["Item", string_type]], [["Item", class_type("Fetch.Types.IHttpRequestHeaders")]], [["Item", class_type("Fable.Core.U3`3", [class_type("Browser.Types.Blob", void 0), class_type("Browser.Types.FormData", void 0), string_type])]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", string_type]], [["Item", bool_type]], [["Item", class_type("Fetch.Types.AbortSignal")]]]);
+}
+function Types_ResponseInitProperties_Status(Item) {
+  return new Types_ResponseInitProperties(0, [Item]);
+}
+function Types_ResponseInitProperties_StatusText(Item) {
+  return new Types_ResponseInitProperties(1, [Item]);
+}
+function Types_ResponseInitProperties_Headers(Item) {
+  return new Types_ResponseInitProperties(2, [Item]);
+}
+class Types_ResponseInitProperties extends Union {
+  constructor(tag, fields) {
+    super();
+    this.tag = tag;
+    this.fields = fields;
+  }
+  cases() {
+    return ["Status", "StatusText", "Headers"];
+  }
+}
+function Types_ResponseInitProperties_$reflection() {
+  return union_type("Fetch.Types.ResponseInitProperties", [], Types_ResponseInitProperties, () => [[["Item", int32_type]], [["Item", string_type]], [["Item", array_type(tuple_type(string_type, string_type))]]]);
+}
+function Fetch_Types_Response__Response_create_Static_36F1D09D(content, options) {
+  const options_1 = defaultArg(options, empty());
+  return new Response(content, keyValueList(options_1, 1));
+}
+function Fetch_Types_Response__Response_create_Static_Z7AF41C79(content, options) {
+  const options_1 = defaultArg(options, empty());
+  return new Response(content, keyValueList(options_1, 1));
+}
+function Fetch_Types_Response__Response_create_Static_Z43D75E86(content, options) {
+  const options_1 = defaultArg(options, empty());
+  return new Response(content, keyValueList(options_1, 1));
+}
+function Fetch_Types_Response__Response_create_Static_7B93BED7(content, options) {
+  const options_1 = defaultArg(options, empty());
+  return new Response(content, keyValueList(options_1, 1));
+}
 function errorString(response) {
   return int32ToString(response.status) + " " + response.statusText + " for URL " + response.url;
 }
@@ -14,5 +261,14 @@ function fetch$(url, init) {
     }
   });
 }
+function fetchUnsafe(url, init) {
+  return fetch(url, keyValueList(init, 1));
+}
+function tryFetch(url, init) {
+  return result(fetch$(url, init));
+}
+function tryOptionsRequest(url) {
+  return result(fetch$(url, singleton(Types_RequestProperties_Method("OPTIONS"))));
+}
 
-export { fetch$ };
+export { Fetch_Types_Response__Response_create_Static_36F1D09D, Fetch_Types_Response__Response_create_Static_7B93BED7, Fetch_Types_Response__Response_create_Static_Z43D75E86, Fetch_Types_Response__Response_create_Static_Z7AF41C79, Types_HttpRequestHeaders, Types_HttpRequestHeaders_$reflection, Types_HttpRequestHeaders_Accept, Types_HttpRequestHeaders_AcceptCharset, Types_HttpRequestHeaders_AcceptDatetime, Types_HttpRequestHeaders_AcceptEncoding, Types_HttpRequestHeaders_AcceptLanguage, Types_HttpRequestHeaders_Authorization, Types_HttpRequestHeaders_CacheControl, Types_HttpRequestHeaders_Connection, Types_HttpRequestHeaders_ContentLength, Types_HttpRequestHeaders_ContentMD5, Types_HttpRequestHeaders_ContentType, Types_HttpRequestHeaders_Cookie, Types_HttpRequestHeaders_Custom, Types_HttpRequestHeaders_DNT, Types_HttpRequestHeaders_Date, Types_HttpRequestHeaders_Expect, Types_HttpRequestHeaders_Forwarded, Types_HttpRequestHeaders_From, Types_HttpRequestHeaders_FrontEndHttps, Types_HttpRequestHeaders_Host, Types_HttpRequestHeaders_IfMatch, Types_HttpRequestHeaders_IfModifiedSince, Types_HttpRequestHeaders_IfNoneMatch, Types_HttpRequestHeaders_IfRange, Types_HttpRequestHeaders_IfUnmodifiedSince, Types_HttpRequestHeaders_MaxForwards, Types_HttpRequestHeaders_Origin, Types_HttpRequestHeaders_Pragma, Types_HttpRequestHeaders_ProxyAuthorization, Types_HttpRequestHeaders_ProxyConnection, Types_HttpRequestHeaders_Range, Types_HttpRequestHeaders_Referer, Types_HttpRequestHeaders_SOAPAction, Types_HttpRequestHeaders_TE, Types_HttpRequestHeaders_Upgrade, Types_HttpRequestHeaders_UserAgent, Types_HttpRequestHeaders_Via, Types_HttpRequestHeaders_Warning, Types_HttpRequestHeaders_XATTDeviceId, Types_HttpRequestHeaders_XCsrfToken, Types_HttpRequestHeaders_XForwardedFor, Types_HttpRequestHeaders_XForwardedHost, Types_HttpRequestHeaders_XForwardedProto, Types_HttpRequestHeaders_XHttpMethodOverride, Types_HttpRequestHeaders_XRequestedWith, Types_HttpRequestHeaders_XUIDH, Types_HttpRequestHeaders_XWapProfile, Types_RequestProperties, Types_RequestProperties_$reflection, Types_RequestProperties_Body, Types_RequestProperties_Cache, Types_RequestProperties_Credentials, Types_RequestProperties_Headers, Types_RequestProperties_Integrity, Types_RequestProperties_KeepAlive, Types_RequestProperties_Method, Types_RequestProperties_Mode, Types_RequestProperties_Redirect, Types_RequestProperties_Referrer, Types_RequestProperties_ReferrerPolicy, Types_RequestProperties_Signal, Types_ResponseInitProperties, Types_ResponseInitProperties_$reflection, Types_ResponseInitProperties_Headers, Types_ResponseInitProperties_Status, Types_ResponseInitProperties_StatusText, fetch$, fetchUnsafe, tryFetch, tryOptionsRequest };

package/dist/ts/ts/fable_modules/Fable.Promise.3.2.0/Promise.fs.js

@@ -1,10 +1,74 @@
+import { FSharpResult$2_Ok, FSharpResult$2_Error, Result_Map, Result_MapError } from '../../../node_modules/@fable-org/fable-library-js/Result.js';
+import { class_type } from '../../../node_modules/@fable-org/fable-library-js/Reflection.js';
+import { getEnumerator, disposeSafe } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
+
+function tap(fn, a) {
+  return a.then((x) => {
+    fn(x);
+    return x;
+  });
+}
+function result(a) {
+  return a.then(FSharpResult$2_Ok).catch(FSharpResult$2_Error);
+}
+function mapResult(fn, a) {
+  return a.then((result_1) => Result_Map(fn, result_1));
+}
+function bindResult(fn, a) {
+  return a.then((a_1) => {
+    if (a_1.tag === /* Error */
+    1) {
+      const e = a_1.fields[0];
+      return Promise.resolve(FSharpResult$2_Error(e));
+    } else {
+      const pr = fn(a_1.fields[0]);
+      return pr.then(FSharpResult$2_Ok);
+    }
+  });
+}
+function mapResultError(fn, a) {
+  return a.then((result_1) => Result_MapError(fn, result_1));
+}
 class PromiseBuilder {
   constructor() {
   }
 }
+function PromiseBuilder_$reflection() {
+  return class_type("Promise.PromiseBuilder", void 0, PromiseBuilder);
+}
 function PromiseBuilder_$ctor() {
   return new PromiseBuilder();
 }
+function PromiseBuilder__For_1565554B(_, seq, body) {
+  let pr;
+  let p = Promise.resolve(void 0);
+  const enumerator = getEnumerator(seq);
+  try {
+    while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
+      const a = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
+      p = (pr = p, pr.then(() => body(a)));
+    }
+  } finally {
+    disposeSafe(enumerator);
+  }
+  return p;
+}
+function PromiseBuilder__While_2044D34(this$, guard, p) {
+  if (guard()) {
+    return p.then(() => PromiseBuilder__While_2044D34(this$, guard, p));
+  } else {
+    return Promise.resolve(void 0);
+  }
+}
+function PromiseBuilder__TryFinally_7D49A2FD(_, p, compensation) {
+  return p.then((x) => {
+    compensation();
+    return x;
+  }).catch((er) => {
+    compensation();
+    throw er;
+  });
+}
 function PromiseBuilder__Delay_62FBFDE1(_, generator) {
   return {
     then: (onSuccess, onError) => {
@@ -40,5 +104,11 @@ function PromiseBuilder__Delay_62FBFDE1(_, generator) {
 function PromiseBuilder__Run_212F1D4B(_, p) {
   return p.then((x) => x);
 }
+function PromiseBuilder__Using_74F7E79D(this$, resource, binder) {
+  return PromiseBuilder__TryFinally_7D49A2FD(this$, binder(resource), () => {
+    let copyOfStruct = resource;
+    disposeSafe(copyOfStruct);
+  });
+}
 
-export { PromiseBuilder, PromiseBuilder_$ctor, PromiseBuilder__Delay_62FBFDE1, PromiseBuilder__Run_212F1D4B };
+export { PromiseBuilder, PromiseBuilder_$ctor, PromiseBuilder_$reflection, PromiseBuilder__Delay_62FBFDE1, PromiseBuilder__For_1565554B, PromiseBuilder__Run_212F1D4B, PromiseBuilder__TryFinally_7D49A2FD, PromiseBuilder__Using_74F7E79D, PromiseBuilder__While_2044D34, bindResult, mapResult, mapResultError, result, tap };

package/dist/ts/ts/fable_modules/Fable.Promise.3.2.0/PromiseImpl.fs.js

@@ -1,5 +1,15 @@
 import { PromiseBuilder_$ctor } from './Promise.fs.js';
+import { value } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
+import { FSharpResult$2_Error, FSharpResult$2_Ok } from '../../../node_modules/@fable-org/fable-library-js/Result.js';
 
 const promise = PromiseBuilder_$ctor();
+function SettledValue_toResult(p) {
+  const matchValue = p.status;
+  if (matchValue === "rejected") {
+    return FSharpResult$2_Error(value(p.reason));
+  } else {
+    return FSharpResult$2_Ok(value(p.value));
+  }
+}
 
-export { promise };
+export { SettledValue_toResult, promise };

package/dist/ts/ts/fable_modules/Fable.SimpleHttp.3.5.0/Http.fs.js

@@ -1,15 +1,144 @@
 import { fromContinuations } from '../../../node_modules/@fable-org/fable-library-js/Async.js';
-import { singleton } from '../../../node_modules/@fable-org/fable-library-js/AsyncBuilder.js';
-import { HttpRequest, HttpMethod_GET, BodyContent_Empty, HttpResponse, ResponseContent_Text, ResponseContent_ArrayBuffer, ResponseContent_Blob, ResponseContent_Unknown } from './Types.fs.js';
-import { empty, ofArray as ofArray$1, isEmpty, head, tail } from '../../../node_modules/@fable-org/fable-library-js/List.js';
+import { singleton as singleton$1 } from '../../../node_modules/@fable-org/fable-library-js/AsyncBuilder.js';
+import { Header, HttpRequest, HttpMethod_GET, BodyContent_Empty, HttpResponse, ResponseContent_Text, ResponseContent_Unknown, ResponseContent_ArrayBuffer, ResponseContent_Blob, BodyContent_Text, HttpMethod_PUT, HttpMethod_DELETE, HttpMethod_PATCH, HttpMethod_POST } from './Types.fs.js';
+import { empty, append, singleton, ofArray as ofArray$1, isEmpty, head, tail } from '../../../node_modules/@fable-org/fable-library-js/List.js';
 import { empty as empty$1, ofArray } from '../../../node_modules/@fable-org/fable-library-js/Map.js';
 import { comparePrimitives, getEnumerator, disposeSafe } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
-import { join, isNullOrEmpty, split } from '../../../node_modules/@fable-org/fable-library-js/String.js';
+import { isNullOrEmpty, split, join } from '../../../node_modules/@fable-org/fable-library-js/String.js';
 import { choose } from '../../../node_modules/@fable-org/fable-library-js/Array.js';
 import { value, some } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
 
+function Blob_download(blob, fileName) {
+  const element = document.createElement("a");
+  element.target = "_blank";
+  element.href = window.URL.createObjectURL(blob);
+  element.setAttribute("download", fileName);
+  document.body.appendChild(element);
+  element.click();
+  document.body.removeChild(element);
+}
+function FileReader_readBlobAsText(blob) {
+  return fromContinuations((tupledArg) => {
+    const reader = new FileReader();
+    reader.onload = (_arg_2) => {
+      if (reader.readyState === 2) {
+        tupledArg[0](reader.result);
+      }
+    };
+    reader.readAsText(blob);
+  });
+}
+function FileReader_readFileAsText(file) {
+  return fromContinuations((tupledArg) => {
+    const reader = new FileReader();
+    reader.onload = (_arg_2) => {
+      if (reader.readyState === 2) {
+        tupledArg[0](reader.result);
+      }
+    };
+    reader.readAsText(file);
+  });
+}
+function FormData_append(key, value, form) {
+  form.append(key, value);
+  return form;
+}
+function FormData_appendFile(key, file, form) {
+  form.append(key, file);
+  return form;
+}
+function FormData_appendNamedFile(key, fileName, file, form) {
+  form.append(key, file, fileName);
+  return form;
+}
+function FormData_appendBlob(key, blob, form) {
+  form.append(key, blob);
+  return form;
+}
+function FormData_appendNamedBlob(key, fileName, blob, form) {
+  form.append(key, blob, fileName);
+  return form;
+}
+function Headers_contentType(value) {
+  return new Header("Content-Type", value);
+}
+function Headers_accept(value) {
+  return new Header("Accept", value);
+}
+function Headers_acceptCharset(value) {
+  return new Header("Accept-Charset", value);
+}
+function Headers_acceptEncoding(value) {
+  return new Header("Accept-Encoding", value);
+}
+function Headers_acceptLanguage(value) {
+  return new Header("Accept-Language", value);
+}
+function Headers_acceptDateTime(value) {
+  return new Header("Accept-Datetime", value);
+}
+function Headers_authorization(value) {
+  return new Header("Authorization", value);
+}
+function Headers_cacheControl(value) {
+  return new Header("Cache-Control", value);
+}
+function Headers_connection(value) {
+  return new Header("Connection", value);
+}
+function Headers_cookie(value) {
+  return new Header("Cookie", value);
+}
+function Headers_contentMD5(value) {
+  return new Header("Content-MD5", value);
+}
+function Headers_date(value) {
+  return new Header("Date", value);
+}
+function Headers_expect(value) {
+  return new Header("Expect", value);
+}
+function Headers_ifMatch(value) {
+  return new Header("If-Match", value);
+}
+function Headers_ifModifiedSince(value) {
+  return new Header("If-Modified-Since", value);
+}
+function Headers_ifNoneMatch(value) {
+  return new Header("If-None-Match", value);
+}
+function Headers_ifRange(value) {
+  return new Header("If-Range", value);
+}
+function Headers_IfUnmodifiedSince(value) {
+  return new Header("If-Unmodified-Since", value);
+}
+function Headers_maxForwards(value) {
+  return new Header("Max-Forwards", value);
+}
+function Headers_origin(value) {
+  return new Header("Origin", value);
+}
+function Headers_pragma(value) {
+  return new Header("Pragma", value);
+}
+function Headers_proxyAuthorization(value) {
+  return new Header("Proxy-Authorization", value);
+}
+function Headers_range(value) {
+  return new Header("Range", value);
+}
+function Headers_referer(value) {
+  return new Header("Referer", value);
+}
+function Headers_userAgent(value) {
+  return new Header("User-Agent", value);
+}
+function Headers_create(key, value) {
+  return new Header(key, value);
+}
 const Http_defaultRequest = new HttpRequest("", HttpMethod_GET(), empty(), false, void 0, void 0, void 0, BodyContent_Empty());
-new HttpResponse(0, "", "", "", empty$1({
+const Http_emptyResponse = new HttpResponse(0, "", "", "", empty$1({
   Compare: comparePrimitives
 }), ResponseContent_Text(""));
 function Http_splitAt(delimiter, input) {
@@ -49,6 +178,27 @@ function Http_request(url) {
 function Http_method(httpVerb, req) {
   return new HttpRequest(req.url, httpVerb, req.headers, req.withCredentials, req.overridenMimeType, req.overridenResponseType, req.timeout, req.content);
 }
+function Http_header(singleHeader, req) {
+  return new HttpRequest(req.url, req.method, append(req.headers, singleton(singleHeader)), req.withCredentials, req.overridenMimeType, req.overridenResponseType, req.timeout, req.content);
+}
+function Http_headers(values, req) {
+  return new HttpRequest(req.url, req.method, append(req.headers, values), req.withCredentials, req.overridenMimeType, req.overridenResponseType, req.timeout, req.content);
+}
+function Http_withCredentials(enabled, req) {
+  return new HttpRequest(req.url, req.method, req.headers, enabled, req.overridenMimeType, req.overridenResponseType, req.timeout, req.content);
+}
+function Http_withTimeout(timeoutInMilliseconds, req) {
+  return new HttpRequest(req.url, req.method, req.headers, req.withCredentials, req.overridenMimeType, req.overridenResponseType, timeoutInMilliseconds, req.content);
+}
+function Http_overrideMimeType(value, req) {
+  return new HttpRequest(req.url, req.method, req.headers, req.withCredentials, value, req.overridenResponseType, req.timeout, req.content);
+}
+function Http_overrideResponseType(value, req) {
+  return new HttpRequest(req.url, req.method, req.headers, req.withCredentials, req.overridenMimeType, value, req.timeout, req.content);
+}
+function Http_content(bodyContent, req) {
+  return new HttpRequest(req.url, req.method, req.headers, req.withCredentials, req.overridenMimeType, req.overridenResponseType, req.timeout, bodyContent);
+}
 function Http_send(req) {
   return fromContinuations((tupledArg) => {
     const xhr = new XMLHttpRequest();
@@ -81,12 +231,14 @@ function Http_send(req) {
     }
     xhr.withCredentials = req.withCredentials;
     const matchValue_3 = req.overridenMimeType;
-    if (matchValue_3 == null) ; else {
+    if (matchValue_3 == null) {
+    } else {
       const mimeType = value(matchValue_3);
       xhr.overrideMimeType(mimeType);
     }
     const matchValue_4 = req.overridenResponseType;
-    if (matchValue_4 == null) ; else {
+    if (matchValue_4 == null) {
+    } else {
       switch (value(matchValue_4).tag) {
         case /* Blob */
         1: {
@@ -103,7 +255,8 @@ function Http_send(req) {
       }
     }
     const matchValue_5 = req.timeout;
-    if (matchValue_5 == null) ; else {
+    if (matchValue_5 == null) {
+    } else {
       const timeout = value(matchValue_5) | 0;
       xhr.timeout = timeout | 0;
     }
@@ -133,10 +286,34 @@ function Http_send(req) {
   });
 }
 function Http_get(url) {
-  return singleton.Delay(() => singleton.Bind(Http_send(Http_method(HttpMethod_GET(), Http_request(url))), (_arg) => {
+  return singleton$1.Delay(() => singleton$1.Bind(Http_send(Http_method(HttpMethod_GET(), Http_request(url))), (_arg) => {
+    const response = _arg;
+    return singleton$1.Return([response.statusCode, response.responseText]);
+  }));
+}
+function Http_put(url, data) {
+  return singleton$1.Delay(() => singleton$1.Bind(Http_send(Http_content(BodyContent_Text(data), Http_method(HttpMethod_PUT(), Http_request(url)))), (_arg) => {
+    const response = _arg;
+    return singleton$1.Return([response.statusCode, response.responseText]);
+  }));
+}
+function Http_delete(url) {
+  return singleton$1.Delay(() => singleton$1.Bind(Http_send(Http_method(HttpMethod_DELETE(), Http_request(url))), (_arg) => {
+    const response = _arg;
+    return singleton$1.Return([response.statusCode, response.responseText]);
+  }));
+}
+function Http_patch(url, data) {
+  return singleton$1.Delay(() => singleton$1.Bind(Http_send(Http_content(BodyContent_Text(data), Http_method(HttpMethod_PATCH(), Http_request(url)))), (_arg) => {
+    const response = _arg;
+    return singleton$1.Return([response.statusCode, response.responseText]);
+  }));
+}
+function Http_post(url, data) {
+  return singleton$1.Delay(() => singleton$1.Bind(Http_send(Http_content(BodyContent_Text(data), Http_method(HttpMethod_POST(), Http_request(url)))), (_arg) => {
     const response = _arg;
-    return singleton.Return([response.statusCode, response.responseText]);
+    return singleton$1.Return([response.statusCode, response.responseText]);
   }));
 }
 
-export { Http_get, Http_method, Http_request, Http_send };
+export { Blob_download, FileReader_readBlobAsText, FileReader_readFileAsText, FormData_append, FormData_appendBlob, FormData_appendFile, FormData_appendNamedBlob, FormData_appendNamedFile, Headers_IfUnmodifiedSince, Headers_accept, Headers_acceptCharset, Headers_acceptDateTime, Headers_acceptEncoding, Headers_acceptLanguage, Headers_authorization, Headers_cacheControl, Headers_connection, Headers_contentMD5, Headers_contentType, Headers_cookie, Headers_create, Headers_date, Headers_expect, Headers_ifMatch, Headers_ifModifiedSince, Headers_ifNoneMatch, Headers_ifRange, Headers_maxForwards, Headers_origin, Headers_pragma, Headers_proxyAuthorization, Headers_range, Headers_referer, Headers_userAgent, Http_content, Http_delete, Http_get, Http_header, Http_headers, Http_method, Http_overrideMimeType, Http_overrideResponseType, Http_patch, Http_post, Http_put, Http_request, Http_send, Http_withCredentials, Http_withTimeout };