espial 0.0.5.1 → 0.0.7
raw patch · 63 files changed
+17281/−14613 lines, 63 filesdep +attoparsecdep +entropydep +http-api-datadep −monad-controldep −pinboarddep ~aesondep ~basedep ~bytestringbinary-added
Dependencies added: attoparsec, entropy, http-api-data, http-client, http-client-tls, http-types, parser-combinators
Dependencies removed: monad-control, pinboard
Dependency ranges changed: aeson, base, bytestring, classy-prelude, classy-prelude-conduit, classy-prelude-yesod, conduit, directory, fast-logger, hjsmin, http-conduit, monad-logger, persistent, persistent-template, shakespeare, text, wai-extra, wai-logger, warp, yaml, yesod, yesod-auth, yesod-core, yesod-form, yesod-static
Files
- LICENSE +660/−0
- README.md +34/−21
- app/migration/Main.hs +19/−8
- changelog.md +1/−12
- config/routes +10/−3
- config/settings.yml +3/−0
- espial.cabal +159/−118
- purs/Makefile +19/−32
- purs/packages.dhall +121/−0
- purs/psc-package.json +0/−23
- purs/spago.dhall +24/−0
- purs/src/App.purs +119/−120
- purs/src/Component/AccountSettings.purs +91/−0
- purs/src/Component/Add.purs +179/−0
- purs/src/Component/BList.purs +48/−0
- purs/src/Component/BMark.purs +247/−0
- purs/src/Component/Markdown.purs +15/−0
- purs/src/Component/NList.purs +75/−0
- purs/src/Component/NNote.purs +197/−0
- purs/src/Component/RawHtml.js +8/−0
- purs/src/Component/RawHtml.purs +62/−0
- purs/src/Globals.purs +7/−1
- purs/src/Main.purs +57/−1
- purs/src/Marked.js +7/−0
- purs/src/Marked.purs +9/−0
- purs/src/Model.purs +16/−0
- purs/src/User.purs +0/−47
- purs/src/Util.purs +24/−1
- src/Application.hs +19/−12
- src/Foundation.hs +27/−47
- src/Generic.hs +20/−0
- src/Handler/AccountSettings.hs +50/−0
- src/Handler/Add.hs +14/−11
- src/Handler/Archive.hs +106/−0
- src/Handler/Common.hs +1/−1
- src/Handler/Docs.hs +9/−0
- src/Handler/Edit.hs +3/−3
- src/Handler/Notes.hs +42/−29
- src/Handler/User.hs +13/−12
- src/Import/NoFoundation.hs +2/−1
- src/Model.hs +285/−98
- src/ModelCrypto.hs +0/−32
- src/ModelCustom.hs +60/−0
- src/PathPiece.hs +6/−5
- src/Settings.hs +8/−1
- src/Types.hs +2/−6
- static/css/main.css +56/−2
- static/js/app.js +14152/−13905
- static/js/app.js.gz binary
- static/js/app.min.js +1/−1
- static/js/app.min.js.gz binary
- static/js/marked.min.js +6/−0
- static/js/marked.min.js.gz binary
- templates/change-password.hamlet +18/−0
- templates/default-layout.hamlet +6/−3
- templates/docs-search.hamlet +86/−0
- templates/notes.hamlet +3/−1
- templates/pager.hamlet +2/−2
- templates/popup-layout.hamlet +1/−1
- templates/search.hamlet +14/−0
- templates/user-settings.hamlet +5/−2
- templates/user.hamlet +52/−50
- test/Handler/HomeSpec.hs +1/−1
+ LICENSE view
@@ -0,0 +1,660 @@+### GNU AFFERO GENERAL PUBLIC LICENSE++Version 3, 19 November 2007++Copyright (C) 2007 Free Software Foundation, Inc.+<https://fsf.org/>++Everyone is permitted to copy and distribute verbatim copies of this+license document, but changing it is not allowed.++### Preamble++The GNU Affero General Public License is a free, copyleft license for+software and other kinds of works, specifically designed to ensure+cooperation with the community in the case of network server software.++The licenses for most software and other practical works are designed+to take away your freedom to share and change the works. By contrast,+our General Public Licenses are intended to guarantee your freedom to+share and change all versions of a program--to make sure it remains+free software for all its users.++When we speak of free software, we are referring to freedom, not+price. Our General Public Licenses are designed to make sure that you+have the freedom to distribute copies of free software (and charge for+them if you wish), that you receive source code or can get it if you+want it, that you can change the software or use pieces of it in new+free programs, and that you know you can do these things.++Developers that use our General Public Licenses protect your rights+with two steps: (1) assert copyright on the software, and (2) offer+you this License which gives you legal permission to copy, distribute+and/or modify the software.++A secondary benefit of defending all users' freedom is that+improvements made in alternate versions of the program, if they+receive widespread use, become available for other developers to+incorporate. Many developers of free software are heartened and+encouraged by the resulting cooperation. However, in the case of+software used on network servers, this result may fail to come about.+The GNU General Public License permits making a modified version and+letting the public access it on a server without ever releasing its+source code to the public.++The GNU Affero General Public License is designed specifically to+ensure that, in such cases, the modified source code becomes available+to the community. It requires the operator of a network server to+provide the source code of the modified version running there to the+users of that server. Therefore, public use of a modified version, on+a publicly accessible server, gives the public access to the source+code of the modified version.++An older license, called the Affero General Public License and+published by Affero, was designed to accomplish similar goals. This is+a different license, not a version of the Affero GPL, but Affero has+released a new version of the Affero GPL which permits relicensing+under this license.++The precise terms and conditions for copying, distribution and+modification follow.++### TERMS AND CONDITIONS++#### 0. Definitions.++"This License" refers to version 3 of the GNU Affero General Public+License.++"Copyright" also means copyright-like laws that apply to other kinds+of works, such as semiconductor masks.++"The Program" refers to any copyrightable work licensed under this+License. Each licensee is addressed as "you". "Licensees" and+"recipients" may be individuals or organizations.++To "modify" a work means to copy from or adapt all or part of the work+in a fashion requiring copyright permission, other than the making of+an exact copy. The resulting work is called a "modified version" of+the earlier work or a work "based on" the earlier work.++A "covered work" means either the unmodified Program or a work based+on the Program.++To "propagate" a work means to do anything with it that, without+permission, would make you directly or secondarily liable for+infringement under applicable copyright law, except executing it on a+computer or modifying a private copy. Propagation includes copying,+distribution (with or without modification), making available to the+public, and in some countries other activities as well.++To "convey" a work means any kind of propagation that enables other+parties to make or receive copies. Mere interaction with a user+through a computer network, with no transfer of a copy, is not+conveying.++An interactive user interface displays "Appropriate Legal Notices" to+the extent that it includes a convenient and prominently visible+feature that (1) displays an appropriate copyright notice, and (2)+tells the user that there is no warranty for the work (except to the+extent that warranties are provided), that licensees may convey the+work under this License, and how to view a copy of this License. If+the interface presents a list of user commands or options, such as a+menu, a prominent item in the list meets this criterion.++#### 1. Source Code.++The "source code" for a work means the preferred form of the work for+making modifications to it. "Object code" means any non-source form of+a work.++A "Standard Interface" means an interface that either is an official+standard defined by a recognized standards body, or, in the case of+interfaces specified for a particular programming language, one that+is widely used among developers working in that language.++The "System Libraries" of an executable work include anything, other+than the work as a whole, that (a) is included in the normal form of+packaging a Major Component, but which is not part of that Major+Component, and (b) serves only to enable use of the work with that+Major Component, or to implement a Standard Interface for which an+implementation is available to the public in source code form. A+"Major Component", in this context, means a major essential component+(kernel, window system, and so on) of the specific operating system+(if any) on which the executable work runs, or a compiler used to+produce the work, or an object code interpreter used to run it.++The "Corresponding Source" for a work in object code form means all+the source code needed to generate, install, and (for an executable+work) run the object code and to modify the work, including scripts to+control those activities. However, it does not include the work's+System Libraries, or general-purpose tools or generally available free+programs which are used unmodified in performing those activities but+which are not part of the work. For example, Corresponding Source+includes interface definition files associated with source files for+the work, and the source code for shared libraries and dynamically+linked subprograms that the work is specifically designed to require,+such as by intimate data communication or control flow between those+subprograms and other parts of the work.++The Corresponding Source need not include anything that users can+regenerate automatically from other parts of the Corresponding Source.++The Corresponding Source for a work in source code form is that same+work.++#### 2. Basic Permissions.++All rights granted under this License are granted for the term of+copyright on the Program, and are irrevocable provided the stated+conditions are met. This License explicitly affirms your unlimited+permission to run the unmodified Program. The output from running a+covered work is covered by this License only if the output, given its+content, constitutes a covered work. This License acknowledges your+rights of fair use or other equivalent, as provided by copyright law.++You may make, run and propagate covered works that you do not convey,+without conditions so long as your license otherwise remains in force.+You may convey covered works to others for the sole purpose of having+them make modifications exclusively for you, or provide you with+facilities for running those works, provided that you comply with the+terms of this License in conveying all material for which you do not+control copyright. Those thus making or running the covered works for+you must do so exclusively on your behalf, under your direction and+control, on terms that prohibit them from making any copies of your+copyrighted material outside their relationship with you.++Conveying under any other circumstances is permitted solely under the+conditions stated below. Sublicensing is not allowed; section 10 makes+it unnecessary.++#### 3. Protecting Users' Legal Rights From Anti-Circumvention Law.++No covered work shall be deemed part of an effective technological+measure under any applicable law fulfilling obligations under article+11 of the WIPO copyright treaty adopted on 20 December 1996, or+similar laws prohibiting or restricting circumvention of such+measures.++When you convey a covered work, you waive any legal power to forbid+circumvention of technological measures to the extent such+circumvention is effected by exercising rights under this License with+respect to the covered work, and you disclaim any intention to limit+operation or modification of the work as a means of enforcing, against+the work's users, your or third parties' legal rights to forbid+circumvention of technological measures.++#### 4. Conveying Verbatim Copies.++You may convey verbatim copies of the Program's source code as you+receive it, in any medium, provided that you conspicuously and+appropriately publish on each copy an appropriate copyright notice;+keep intact all notices stating that this License and any+non-permissive terms added in accord with section 7 apply to the code;+keep intact all notices of the absence of any warranty; and give all+recipients a copy of this License along with the Program.++You may charge any price or no price for each copy that you convey,+and you may offer support or warranty protection for a fee.++#### 5. Conveying Modified Source Versions.++You may convey a work based on the Program, or the modifications to+produce it from the Program, in the form of source code under the+terms of section 4, provided that you also meet all of these+conditions:++- a) The work must carry prominent notices stating that you modified+ it, and giving a relevant date.+- b) The work must carry prominent notices stating that it is+ released under this License and any conditions added under+ section 7. This requirement modifies the requirement in section 4+ to "keep intact all notices".+- c) You must license the entire work, as a whole, under this+ License to anyone who comes into possession of a copy. This+ License will therefore apply, along with any applicable section 7+ additional terms, to the whole of the work, and all its parts,+ regardless of how they are packaged. This License gives no+ permission to license the work in any other way, but it does not+ invalidate such permission if you have separately received it.+- d) If the work has interactive user interfaces, each must display+ Appropriate Legal Notices; however, if the Program has interactive+ interfaces that do not display Appropriate Legal Notices, your+ work need not make them do so.++A compilation of a covered work with other separate and independent+works, which are not by their nature extensions of the covered work,+and which are not combined with it such as to form a larger program,+in or on a volume of a storage or distribution medium, is called an+"aggregate" if the compilation and its resulting copyright are not+used to limit the access or legal rights of the compilation's users+beyond what the individual works permit. Inclusion of a covered work+in an aggregate does not cause this License to apply to the other+parts of the aggregate.++#### 6. Conveying Non-Source Forms.++You may convey a covered work in object code form under the terms of+sections 4 and 5, provided that you also convey the machine-readable+Corresponding Source under the terms of this License, in one of these+ways:++- a) Convey the object code in, or embodied in, a physical product+ (including a physical distribution medium), accompanied by the+ Corresponding Source fixed on a durable physical medium+ customarily used for software interchange.+- b) Convey the object code in, or embodied in, a physical product+ (including a physical distribution medium), accompanied by a+ written offer, valid for at least three years and valid for as+ long as you offer spare parts or customer support for that product+ model, to give anyone who possesses the object code either (1) a+ copy of the Corresponding Source for all the software in the+ product that is covered by this License, on a durable physical+ medium customarily used for software interchange, for a price no+ more than your reasonable cost of physically performing this+ conveying of source, or (2) access to copy the Corresponding+ Source from a network server at no charge.+- c) Convey individual copies of the object code with a copy of the+ written offer to provide the Corresponding Source. This+ alternative is allowed only occasionally and noncommercially, and+ only if you received the object code with such an offer, in accord+ with subsection 6b.+- d) Convey the object code by offering access from a designated+ place (gratis or for a charge), and offer equivalent access to the+ Corresponding Source in the same way through the same place at no+ further charge. You need not require recipients to copy the+ Corresponding Source along with the object code. If the place to+ copy the object code is a network server, the Corresponding Source+ may be on a different server (operated by you or a third party)+ that supports equivalent copying facilities, provided you maintain+ clear directions next to the object code saying where to find the+ Corresponding Source. Regardless of what server hosts the+ Corresponding Source, you remain obligated to ensure that it is+ available for as long as needed to satisfy these requirements.+- e) Convey the object code using peer-to-peer transmission,+ provided you inform other peers where the object code and+ Corresponding Source of the work are being offered to the general+ public at no charge under subsection 6d.++A separable portion of the object code, whose source code is excluded+from the Corresponding Source as a System Library, need not be+included in conveying the object code work.++A "User Product" is either (1) a "consumer product", which means any+tangible personal property which is normally used for personal,+family, or household purposes, or (2) anything designed or sold for+incorporation into a dwelling. In determining whether a product is a+consumer product, doubtful cases shall be resolved in favor of+coverage. For a particular product received by a particular user,+"normally used" refers to a typical or common use of that class of+product, regardless of the status of the particular user or of the way+in which the particular user actually uses, or expects or is expected+to use, the product. A product is a consumer product regardless of+whether the product has substantial commercial, industrial or+non-consumer uses, unless such uses represent the only significant+mode of use of the product.++"Installation Information" for a User Product means any methods,+procedures, authorization keys, or other information required to+install and execute modified versions of a covered work in that User+Product from a modified version of its Corresponding Source. The+information must suffice to ensure that the continued functioning of+the modified object code is in no case prevented or interfered with+solely because modification has been made.++If you convey an object code work under this section in, or with, or+specifically for use in, a User Product, and the conveying occurs as+part of a transaction in which the right of possession and use of the+User Product is transferred to the recipient in perpetuity or for a+fixed term (regardless of how the transaction is characterized), the+Corresponding Source conveyed under this section must be accompanied+by the Installation Information. But this requirement does not apply+if neither you nor any third party retains the ability to install+modified object code on the User Product (for example, the work has+been installed in ROM).++The requirement to provide Installation Information does not include a+requirement to continue to provide support service, warranty, or+updates for a work that has been modified or installed by the+recipient, or for the User Product in which it has been modified or+installed. Access to a network may be denied when the modification+itself materially and adversely affects the operation of the network+or violates the rules and protocols for communication across the+network.++Corresponding Source conveyed, and Installation Information provided,+in accord with this section must be in a format that is publicly+documented (and with an implementation available to the public in+source code form), and must require no special password or key for+unpacking, reading or copying.++#### 7. Additional Terms.++"Additional permissions" are terms that supplement the terms of this+License by making exceptions from one or more of its conditions.+Additional permissions that are applicable to the entire Program shall+be treated as though they were included in this License, to the extent+that they are valid under applicable law. If additional permissions+apply only to part of the Program, that part may be used separately+under those permissions, but the entire Program remains governed by+this License without regard to the additional permissions.++When you convey a copy of a covered work, you may at your option+remove any additional permissions from that copy, or from any part of+it. (Additional permissions may be written to require their own+removal in certain cases when you modify the work.) You may place+additional permissions on material, added by you to a covered work,+for which you have or can give appropriate copyright permission.++Notwithstanding any other provision of this License, for material you+add to a covered work, you may (if authorized by the copyright holders+of that material) supplement the terms of this License with terms:++- a) Disclaiming warranty or limiting liability differently from the+ terms of sections 15 and 16 of this License; or+- b) Requiring preservation of specified reasonable legal notices or+ author attributions in that material or in the Appropriate Legal+ Notices displayed by works containing it; or+- c) Prohibiting misrepresentation of the origin of that material,+ or requiring that modified versions of such material be marked in+ reasonable ways as different from the original version; or+- d) Limiting the use for publicity purposes of names of licensors+ or authors of the material; or+- e) Declining to grant rights under trademark law for use of some+ trade names, trademarks, or service marks; or+- f) Requiring indemnification of licensors and authors of that+ material by anyone who conveys the material (or modified versions+ of it) with contractual assumptions of liability to the recipient,+ for any liability that these contractual assumptions directly+ impose on those licensors and authors.++All other non-permissive additional terms are considered "further+restrictions" within the meaning of section 10. If the Program as you+received it, or any part of it, contains a notice stating that it is+governed by this License along with a term that is a further+restriction, you may remove that term. If a license document contains+a further restriction but permits relicensing or conveying under this+License, you may add to a covered work material governed by the terms+of that license document, provided that the further restriction does+not survive such relicensing or conveying.++If you add terms to a covered work in accord with this section, you+must place, in the relevant source files, a statement of the+additional terms that apply to those files, or a notice indicating+where to find the applicable terms.++Additional terms, permissive or non-permissive, may be stated in the+form of a separately written license, or stated as exceptions; the+above requirements apply either way.++#### 8. Termination.++You may not propagate or modify a covered work except as expressly+provided under this License. Any attempt otherwise to propagate or+modify it is void, and will automatically terminate your rights under+this License (including any patent licenses granted under the third+paragraph of section 11).++However, if you cease all violation of this License, then your license+from a particular copyright holder is reinstated (a) provisionally,+unless and until the copyright holder explicitly and finally+terminates your license, and (b) permanently, if the copyright holder+fails to notify you of the violation by some reasonable means prior to+60 days after the cessation.++Moreover, your license from a particular copyright holder is+reinstated permanently if the copyright holder notifies you of the+violation by some reasonable means, this is the first time you have+received notice of violation of this License (for any work) from that+copyright holder, and you cure the violation prior to 30 days after+your receipt of the notice.++Termination of your rights under this section does not terminate the+licenses of parties who have received copies or rights from you under+this License. If your rights have been terminated and not permanently+reinstated, you do not qualify to receive new licenses for the same+material under section 10.++#### 9. Acceptance Not Required for Having Copies.++You are not required to accept this License in order to receive or run+a copy of the Program. Ancillary propagation of a covered work+occurring solely as a consequence of using peer-to-peer transmission+to receive a copy likewise does not require acceptance. However,+nothing other than this License grants you permission to propagate or+modify any covered work. These actions infringe copyright if you do+not accept this License. Therefore, by modifying or propagating a+covered work, you indicate your acceptance of this License to do so.++#### 10. Automatic Licensing of Downstream Recipients.++Each time you convey a covered work, the recipient automatically+receives a license from the original licensors, to run, modify and+propagate that work, subject to this License. You are not responsible+for enforcing compliance by third parties with this License.++An "entity transaction" is a transaction transferring control of an+organization, or substantially all assets of one, or subdividing an+organization, or merging organizations. If propagation of a covered+work results from an entity transaction, each party to that+transaction who receives a copy of the work also receives whatever+licenses to the work the party's predecessor in interest had or could+give under the previous paragraph, plus a right to possession of the+Corresponding Source of the work from the predecessor in interest, if+the predecessor has it or can get it with reasonable efforts.++You may not impose any further restrictions on the exercise of the+rights granted or affirmed under this License. For example, you may+not impose a license fee, royalty, or other charge for exercise of+rights granted under this License, and you may not initiate litigation+(including a cross-claim or counterclaim in a lawsuit) alleging that+any patent claim is infringed by making, using, selling, offering for+sale, or importing the Program or any portion of it.++#### 11. Patents.++A "contributor" is a copyright holder who authorizes use under this+License of the Program or a work on which the Program is based. The+work thus licensed is called the contributor's "contributor version".++A contributor's "essential patent claims" are all patent claims owned+or controlled by the contributor, whether already acquired or+hereafter acquired, that would be infringed by some manner, permitted+by this License, of making, using, or selling its contributor version,+but do not include claims that would be infringed only as a+consequence of further modification of the contributor version. For+purposes of this definition, "control" includes the right to grant+patent sublicenses in a manner consistent with the requirements of+this License.++Each contributor grants you a non-exclusive, worldwide, royalty-free+patent license under the contributor's essential patent claims, to+make, use, sell, offer for sale, import and otherwise run, modify and+propagate the contents of its contributor version.++In the following three paragraphs, a "patent license" is any express+agreement or commitment, however denominated, not to enforce a patent+(such as an express permission to practice a patent or covenant not to+sue for patent infringement). To "grant" such a patent license to a+party means to make such an agreement or commitment not to enforce a+patent against the party.++If you convey a covered work, knowingly relying on a patent license,+and the Corresponding Source of the work is not available for anyone+to copy, free of charge and under the terms of this License, through a+publicly available network server or other readily accessible means,+then you must either (1) cause the Corresponding Source to be so+available, or (2) arrange to deprive yourself of the benefit of the+patent license for this particular work, or (3) arrange, in a manner+consistent with the requirements of this License, to extend the patent+license to downstream recipients. "Knowingly relying" means you have+actual knowledge that, but for the patent license, your conveying the+covered work in a country, or your recipient's use of the covered work+in a country, would infringe one or more identifiable patents in that+country that you have reason to believe are valid.++If, pursuant to or in connection with a single transaction or+arrangement, you convey, or propagate by procuring conveyance of, a+covered work, and grant a patent license to some of the parties+receiving the covered work authorizing them to use, propagate, modify+or convey a specific copy of the covered work, then the patent license+you grant is automatically extended to all recipients of the covered+work and works based on it.++A patent license is "discriminatory" if it does not include within the+scope of its coverage, prohibits the exercise of, or is conditioned on+the non-exercise of one or more of the rights that are specifically+granted under this License. You may not convey a covered work if you+are a party to an arrangement with a third party that is in the+business of distributing software, under which you make payment to the+third party based on the extent of your activity of conveying the+work, and under which the third party grants, to any of the parties+who would receive the covered work from you, a discriminatory patent+license (a) in connection with copies of the covered work conveyed by+you (or copies made from those copies), or (b) primarily for and in+connection with specific products or compilations that contain the+covered work, unless you entered into that arrangement, or that patent+license was granted, prior to 28 March 2007.++Nothing in this License shall be construed as excluding or limiting+any implied license or other defenses to infringement that may+otherwise be available to you under applicable patent law.++#### 12. No Surrender of Others' Freedom.++If conditions are imposed on you (whether by court order, agreement or+otherwise) that contradict the conditions of this License, they do not+excuse you from the conditions of this License. If you cannot convey a+covered work so as to satisfy simultaneously your obligations under+this License and any other pertinent obligations, then as a+consequence you may not convey it at all. For example, if you agree to+terms that obligate you to collect a royalty for further conveying+from those to whom you convey the Program, the only way you could+satisfy both those terms and this License would be to refrain entirely+from conveying the Program.++#### 13. Remote Network Interaction; Use with the GNU General Public License.++Notwithstanding any other provision of this License, if you modify the+Program, your modified version must prominently offer all users+interacting with it remotely through a computer network (if your+version supports such interaction) an opportunity to receive the+Corresponding Source of your version by providing access to the+Corresponding Source from a network server at no charge, through some+standard or customary means of facilitating copying of software. This+Corresponding Source shall include the Corresponding Source for any+work covered by version 3 of the GNU General Public License that is+incorporated pursuant to the following paragraph.++Notwithstanding any other provision of this License, you have+permission to link or combine any covered work with a work licensed+under version 3 of the GNU General Public License into a single+combined work, and to convey the resulting work. The terms of this+License will continue to apply to the part which is the covered work,+but the work with which it is combined will remain governed by version+3 of the GNU General Public License.++#### 14. Revised Versions of this License.++The Free Software Foundation may publish revised and/or new versions+of the GNU Affero General Public License from time to time. Such new+versions will be similar in spirit to the present version, but may+differ in detail to address new problems or concerns.++Each version is given a distinguishing version number. If the Program+specifies that a certain numbered version of the GNU Affero General+Public License "or any later version" applies to it, you have the+option of following the terms and conditions either of that numbered+version or of any later version published by the Free Software+Foundation. If the Program does not specify a version number of the+GNU Affero General Public License, you may choose any version ever+published by the Free Software Foundation.++If the Program specifies that a proxy can decide which future versions+of the GNU Affero General Public License can be used, that proxy's+public statement of acceptance of a version permanently authorizes you+to choose that version for the Program.++Later license versions may give you additional or different+permissions. However, no additional obligations are imposed on any+author or copyright holder as a result of your choosing to follow a+later version.++#### 15. Disclaimer of Warranty.++THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY+APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT+WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR+A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND+PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE+DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR+CORRECTION.++#### 16. Limitation of Liability.++IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR+CONVEYS THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES+ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT+NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR+LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM+TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER+PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.++#### 17. Interpretation of Sections 15 and 16.++If the disclaimer of warranty and limitation of liability provided+above cannot be given local legal effect according to their terms,+reviewing courts shall apply local law that most closely approximates+an absolute waiver of all civil liability in connection with the+Program, unless a warranty or assumption of liability accompanies a+copy of the Program in return for a fee.++END OF TERMS AND CONDITIONS++### How to Apply These Terms to Your New Programs++If you develop a new program, and you want it to be of the greatest+possible use to the public, the best way to achieve this is to make it+free software which everyone can redistribute and change under these+terms.++To do so, attach the following notices to the program. It is safest to+attach them to the start of each source file to most effectively state+the exclusion of warranty; and each file should have at least the+"copyright" line and a pointer to where the full notice is found.++ <one line to give the program's name and a brief idea of what it does.>+ Copyright (C) <year> <name of author>++ This program is free software: you can redistribute it and/or modify+ it under the terms of the GNU Affero General Public License as+ published by the Free Software Foundation, either version 3 of the+ License, or (at your option) any later version.++ This program is distributed in the hope that it will be useful,+ but WITHOUT ANY WARRANTY; without even the implied warranty of+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the+ GNU Affero General Public License for more details.++ You should have received a copy of the GNU Affero General Public License+ along with this program. If not, see <https://www.gnu.org/licenses/>.++Also add information on how to contact you by electronic and paper+mail.++If your software can interact with users remotely through a computer+network, you should also make sure that it provides a way for users to+get its source. For example, if your program is a web application, its+interface could display a "Source" link that leads users to an archive+of the code. There are many ways you could offer source, and different+solutions will be better for different programs; see section 13 for+the specific requirements.++You should also get your employer (if you work as a programmer) or+school, if any, to sign a "copyright disclaimer" for the program, if+necessary. For more information on this, and how to apply and follow+the GNU AGPL, see <https://www.gnu.org/licenses/>.
README.md view
@@ -14,63 +14,76 @@ https://esp.ae8.org/u:demo -----## Haskell Setup+ -1. If you haven't already, [install Stack](https://haskell-lang.org/get-started)- * On POSIX systems, this is usually `curl -sSL https://get.haskellstack.org/ | sh`-2. Install the `yesod` command line tool: `stack install yesod-bin --install-ghc`+## Server Setup (from source) -## Espial Setup+1. [Install Stack](https://haskell-lang.org/get-started)+ - On POSIX systems, this is usually `curl -sSL https://get.haskellstack.org/ | sh` -1. Build executables+2. Build executables ``` stack build ``` -2. Create the database+3. Create the database ``` stack exec migration -- createdb --conn espial.sqlite3 ``` -3. Create a user+4. Create a user ``` stack exec migration -- createuser --conn espial.sqlite3 --userName myusername --userPassword myuserpassword ``` -4. Import a bookmark file for a user (optional)+5. Import a bookmark file for a user (optional) ``` stack exec migration -- importbookmarks --conn espial.sqlite3 --userName myusername --bookmarkFile sample-bookmarks.json ``` -5. Start a development server:+6. Start a production server: ```- stack exec -- yesod devel+ stack exec espial -- +RTS -T ``` -6. Start a production server:+see `config/settings.yml` for changing default run-time parameters / environment variables +default app http port: `3000`++default ekg http port: `8000`++ssl: use reverse proxy++## Development ++### Backend++- Install the `yesod` command line tool: `stack install yesod-bin --install-ghc`+++- Start a development server:+ ```- stack exec espial+ yesod devel ``` +### Frontend++- See `purs/` folder+ ## Import Bookmark file format -see `sample-bookmarks.json`, which contains a JSON array, each line containing a `Post` object. +see `sample-bookmarks.json`, which contains a JSON array, each line containing a `FileBookmark` object. example: ```-[ {"href":"http:\/\/mqtt.org\/","description":"MQTT","extended":"long description","time":"2018-02-25T21:22:42Z","shared":"yes","toread":"no","tags":"mqtt"}-, {"href":"http:\/\/mqtt.com\/","description":"MQTT","extended":"big description","time":"2019-02-25T21:22:42Z","shared":"yes","toread":"no","tags":"mqtt"}+[ {"href":"http://raganwald.com/2018/02/23/forde.html","description":"Forde's Tenth Rule, or, \"How I Learned to Stop Worrying and \u2764\ufe0f the State Machine\"","extended":"","time":"2018-02-26T22:57:20Z","shared":"yes","toread":"yes","tags":"raganwald"},+, {"href":"http://downloads.haskell.org/~ghc/latest/docs/html/users_guide/flags.html","description":"7.6. Flag reference \u2014 Glasgow Haskell Compiler 8.2.2 User's Guide","extended":"-fprint-expanded-synonyms","time":"2018-02-26T21:52:02Z","shared":"yes","toread":"no","tags":"ghc haskell"}, ]- ```
app/migration/Main.hs view
@@ -4,12 +4,13 @@ import Types import Model-import ModelCrypto+import ModelCustom import qualified Database.Persist as P import qualified Database.Persist.Sqlite as P import ClassyPrelude+import Lens.Micro import Options.Generic @@ -18,7 +19,7 @@ | CreateUser { conn :: Text , userName :: Text , userPassword :: Text- , userApiToken :: Maybe Text}+ , userApiToken :: Maybe Text } | DeleteUser { conn :: Text , userName :: Text} | ImportBookmarks { conn :: Text@@ -27,6 +28,7 @@ | ImportNotes { conn :: Text , userName :: Text , noteDirectory :: FilePath}+ | PrintMigrateDB { conn :: Text} deriving (Generic, Show) instance ParseRecord MigrationOpts@@ -35,17 +37,26 @@ main = do args <- getRecord "Migrations" case args of+ PrintMigrateDB conn ->+ P.runSqlite conn dumpMigration - CreateDB conn ->- P.runSqlite conn runMigrations+ CreateDB conn -> do+ let connInfo = P.mkSqliteConnectionInfo conn+ & set P.fkEnabled False+ P.runSqliteInfo connInfo runMigrations CreateUser conn uname upass utoken -> P.runSqlite conn $ do hash' <- liftIO (hashPassword upass) void $ P.upsertBy (UniqueUserName uname)- (User uname hash' utoken)- [UserPasswordHash P.=. hash', UserApiToken P.=. utoken]+ (User uname hash' utoken False False False)+ [ UserPasswordHash P.=. hash'+ , UserApiToken P.=. utoken+ , UserPrivateDefault P.=. False+ , UserArchiveDefault P.=. False+ , UserPrivacyLock P.=. False+ ] pure () :: DB () DeleteUser conn uname ->@@ -61,12 +72,12 @@ P.runSqlite conn $ do muser <- P.getBy (UniqueUserName uname) case muser of- Just (P.Entity uid _) -> insertFilePbPosts uid file+ Just (P.Entity uid _) -> insertFileBookmarks uid file Nothing -> liftIO (print (uname ++ "not found")) ImportNotes conn uname dir -> P.runSqlite conn $ do muser <- P.getBy (UniqueUserName uname) case muser of- Just (P.Entity uid _) -> insertDirPbNotes uid dir+ Just (P.Entity uid _) -> insertDirFileNotes uid dir Nothing -> liftIO (print (uname ++ "not found"))
changelog.md view
@@ -1,15 +1,4 @@-__v0.0.5__ -add notes, ekg. update data fetches --__v0.0.3__--replaced jQuery and .julius scripts with PureScript-compiled static js file--__v0.0.2__--pkg bounds--__v0.0.1__+__v0.0.7__ init
config/routes view
@@ -7,10 +7,10 @@ -- notes !/#UserNameP/notes NotesR GET-!/#UserNameP/notes/#Int64 NoteR GET !/#UserNameP/notes/add AddNoteViewR GET-!/api/note/#Int64 DeleteNoteR DELETE+!/#UserNameP/notes/#NtSlug NoteR GET !/api/note/add AddNoteR POST+!/api/note/#Int64 DeleteNoteR DELETE -- user / HomeR GET@@ -20,8 +20,12 @@ !/#UserNameP/#TagsP UserTagsR GET -- settings-!/#UserNameP/Settings UserSettingsR GET+/Settings AccountSettingsR GET+api/accountSettings EditAccountSettingsR POST +-- settings/password+/Settings/Password ChangePasswordR GET POST+ -- add /add AddViewR GET api/add AddR POST@@ -31,3 +35,6 @@ /bm/#Int64/read ReadR POST /bm/#Int64/star StarR POST /bm/#Int64/unstar UnstarR POST++-- doc+/docs/search DocsSearchR GET
config/settings.yml view
@@ -36,3 +36,6 @@ copyright: Insert copyright statement here #analytics: UA-YOURCODE++ekg-host: "_env:EKG_HOST:0.0.0.0"+ekg-port: "_env:EKG_PORT:8000"
espial.cabal view
@@ -2,10 +2,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: e78c7d3efd692f7d703d66a290a754767073d84eab71dce29e7075a1d52d8a5a+-- hash: 417de4bead54d60a2c091ad91c61dc715571ef7421e702f157a3766daf4f4700 name: espial-version: 0.0.5.1+version: 0.0.7 synopsis: Espial is an open-source, web-based bookmarking server. description: . Espial is an open-source, web-based bookmarking server.@@ -18,7 +18,8 @@ author: Jon Schoning maintainer: jonschoning@gmail.com copyright: Copyright (c) 2018 Jon Schoning-license: MIT+license: AGPL-3+license-file: LICENSE build-type: Simple cabal-version: >= 1.10 extra-source-files:@@ -30,13 +31,24 @@ config/settings.yml config/test-settings.yml purs/Makefile- purs/psc-package.json+ purs/packages.dhall+ purs/spago.dhall purs/src/App.purs+ purs/src/Component/AccountSettings.purs+ purs/src/Component/Add.purs+ purs/src/Component/BList.purs+ purs/src/Component/BMark.purs+ purs/src/Component/Markdown.purs+ purs/src/Component/NList.purs+ purs/src/Component/NNote.purs+ purs/src/Component/RawHtml.js+ purs/src/Component/RawHtml.purs purs/src/Globals.js purs/src/Globals.purs purs/src/Main.purs+ purs/src/Marked.js+ purs/src/Marked.purs purs/src/Model.purs- purs/src/User.purs purs/src/Util.purs purs/test/Main.purs README.md@@ -53,16 +65,21 @@ static/js/html5shiv.min.js.gz static/js/js.cookie-2.2.0.min.js static/js/js.cookie-2.2.0.min.js.gz+ static/js/marked.min.js+ static/js/marked.min.js.gz static/js/moment.min.js static/js/moment.min.js.gz+ templates/change-password.hamlet templates/default-layout-wrapper.hamlet templates/default-layout.hamlet+ templates/docs-search.hamlet templates/homepage.hamlet templates/login.hamlet templates/note.hamlet templates/notes.hamlet templates/pager.hamlet templates/popup-layout.hamlet+ templates/search.hamlet templates/user-settings.hamlet templates/user.hamlet @@ -83,59 +100,64 @@ library hs-source-dirs: src- default-extensions: BangPatterns CPP ConstraintKinds DeriveDataTypeable DeriveGeneric EmptyDataDecls FlexibleContexts FlexibleInstances GADTs GeneralizedNewtypeDeriving InstanceSigs LambdaCase MultiParamTypeClasses MultiWayIf NoImplicitPrelude OverloadedStrings QuasiQuotes RankNTypes RecordWildCards ScopedTypeVariables StandaloneDeriving TemplateHaskell TupleSections TypeFamilies TypeOperators ViewPatterns+ default-extensions: BangPatterns CPP ConstraintKinds DataKinds DeriveDataTypeable DeriveGeneric EmptyDataDecls FlexibleContexts FlexibleInstances GADTs GeneralizedNewtypeDeriving InstanceSigs KindSignatures LambdaCase MultiParamTypeClasses MultiWayIf NoImplicitPrelude OverloadedStrings PolyKinds PolymorphicComponents QuasiQuotes Rank2Types RankNTypes RecordWildCards ScopedTypeVariables StandaloneDeriving TemplateHaskell TupleSections TypeApplications TypeFamilies TypeOperators TypeSynonymInstances ViewPatterns build-depends:- aeson >=0.11.1- , base >=4.8.2.0 && <4.9 || >=4.9.1.0 && <4.11+ aeson >=1.4+ , attoparsec+ , base >=4.8.2.0 && <4.9 || >=4.9.1.0 && <5 , bcrypt >=0.0.8- , bytestring >=0.9+ , bytestring >=0.9 && <0.11 , case-insensitive- , classy-prelude >=0.10.2- , classy-prelude-conduit >=0.10.2- , classy-prelude-yesod >=0.10.2 && <1.0 || >=1.1- , conduit >=1.0+ , classy-prelude >=1.4 && <1.6+ , classy-prelude-conduit >=1.4 && <1.6+ , classy-prelude-yesod >=1.4 && <1.6+ , conduit >=1.0 && <2.0 , containers , data-default- , directory >=1.1+ , directory >=1.1 && <1.4 , ekg , ekg-core+ , entropy , esqueleto- , fast-logger >=2.2+ , fast-logger >=2.2 && <2.5 , file-embed , foreign-store- , hjsmin >=0.1+ , hjsmin >=0.1 && <0.3 , hscolour- , http-conduit >=2.1+ , http-api-data >=0.3.4+ , http-client+ , http-client-tls >=0.3 && <0.4+ , http-conduit >=2.3 && <2.4+ , http-types , iso8601-time >=0.1.3 , microlens- , monad-control >=0.3- , monad-logger >=0.3+ , monad-logger >=0.3 && <0.4 , monad-metrics , mtl- , persistent >=2.0+ , parser-combinators+ , persistent >=2.8 && <2.10 , persistent-sqlite >=2.6.2- , persistent-template >=2.0- , pinboard+ , persistent-template >=2.5 && <2.9 , pretty-show , safe- , shakespeare >=2.0+ , shakespeare >=2.0 && <2.1 , template-haskell- , text >=0.11+ , text >=0.11 && <2.0 , time , transformers >=0.2.2 , unordered-containers , vector , wai- , wai-extra >=3.0- , wai-logger >=2.2+ , wai-extra >=3.0 && <3.1+ , wai-logger >=2.2 && <2.4 , wai-middleware-metrics- , warp >=3.0- , yaml >=0.8- , yesod >=1.4.3- , yesod-auth >=1.4.0- , yesod-core >=1.4.30- , yesod-form >=1.4.0- , yesod-static >=1.4.0.3+ , warp >=3.0 && <3.3+ , yaml >=0.8 && <0.12+ , yesod >=1.6 && <1.7+ , yesod-auth >=1.6 && <1.7+ , yesod-core >=1.6 && <1.7+ , yesod-form >=1.6 && <1.7+ , yesod-static >=1.6 && <1.7 if (flag(dev)) || (flag(library-only)) ghc-options: -Wall -fwarn-tabs -O0 cpp-options: -DDEVELOPMENT@@ -144,8 +166,12 @@ exposed-modules: Application Foundation+ Generic+ Handler.AccountSettings Handler.Add+ Handler.Archive Handler.Common+ Handler.Docs Handler.Edit Handler.Home Handler.Notes@@ -153,7 +179,7 @@ Import Import.NoFoundation Model- ModelCrypto+ ModelCustom PathPiece Pretty Settings@@ -167,61 +193,66 @@ main-is: main.hs hs-source-dirs: app- default-extensions: BangPatterns CPP ConstraintKinds DeriveDataTypeable DeriveGeneric EmptyDataDecls FlexibleContexts FlexibleInstances GADTs GeneralizedNewtypeDeriving InstanceSigs LambdaCase MultiParamTypeClasses MultiWayIf NoImplicitPrelude OverloadedStrings QuasiQuotes RankNTypes RecordWildCards ScopedTypeVariables StandaloneDeriving TemplateHaskell TupleSections TypeFamilies TypeOperators ViewPatterns+ default-extensions: BangPatterns CPP ConstraintKinds DataKinds DeriveDataTypeable DeriveGeneric EmptyDataDecls FlexibleContexts FlexibleInstances GADTs GeneralizedNewtypeDeriving InstanceSigs KindSignatures LambdaCase MultiParamTypeClasses MultiWayIf NoImplicitPrelude OverloadedStrings PolyKinds PolymorphicComponents QuasiQuotes Rank2Types RankNTypes RecordWildCards ScopedTypeVariables StandaloneDeriving TemplateHaskell TupleSections TypeApplications TypeFamilies TypeOperators TypeSynonymInstances ViewPatterns ghc-options: -threaded -rtsopts -with-rtsopts=-N build-depends:- aeson >=0.11.1- , base >=4.8.2.0 && <4.9 || >=4.9.1.0 && <4.11+ aeson >=1.4+ , attoparsec+ , base >=4.8.2.0 && <4.9 || >=4.9.1.0 && <5 , bcrypt >=0.0.8- , bytestring >=0.9+ , bytestring >=0.9 && <0.11 , case-insensitive- , classy-prelude >=0.10.2- , classy-prelude-conduit >=0.10.2- , classy-prelude-yesod >=0.10.2 && <1.0 || >=1.1- , conduit >=1.0+ , classy-prelude >=1.4 && <1.6+ , classy-prelude-conduit >=1.4 && <1.6+ , classy-prelude-yesod >=1.4 && <1.6+ , conduit >=1.0 && <2.0 , containers , data-default- , directory >=1.1+ , directory >=1.1 && <1.4 , ekg , ekg-core+ , entropy , espial , esqueleto- , fast-logger >=2.2+ , fast-logger >=2.2 && <2.5 , file-embed , foreign-store- , hjsmin >=0.1+ , hjsmin >=0.1 && <0.3 , hscolour- , http-conduit >=2.1+ , http-api-data >=0.3.4+ , http-client+ , http-client-tls >=0.3 && <0.4+ , http-conduit >=2.3 && <2.4+ , http-types , iso8601-time >=0.1.3 , microlens- , monad-control >=0.3- , monad-logger >=0.3+ , monad-logger >=0.3 && <0.4 , monad-metrics , mtl- , persistent >=2.0+ , parser-combinators+ , persistent >=2.8 && <2.10 , persistent-sqlite >=2.6.2- , persistent-template >=2.0- , pinboard+ , persistent-template >=2.5 && <2.9 , pretty-show , safe- , shakespeare >=2.0+ , shakespeare >=2.0 && <2.1 , template-haskell- , text >=0.11+ , text >=0.11 && <2.0 , time , transformers >=0.2.2 , unordered-containers , vector , wai- , wai-extra >=3.0- , wai-logger >=2.2+ , wai-extra >=3.0 && <3.1+ , wai-logger >=2.2 && <2.4 , wai-middleware-metrics- , warp >=3.0- , yaml >=0.8- , yesod >=1.4.3- , yesod-auth >=1.4.0- , yesod-core >=1.4.30- , yesod-form >=1.4.0- , yesod-static >=1.4.0.3+ , warp >=3.0 && <3.3+ , yaml >=0.8 && <0.12+ , yesod >=1.6 && <1.7+ , yesod-auth >=1.6 && <1.7+ , yesod-core >=1.6 && <1.7+ , yesod-form >=1.6 && <1.7+ , yesod-static >=1.6 && <1.7 if flag(library-only) buildable: False other-modules:@@ -233,62 +264,67 @@ main-is: Main.hs hs-source-dirs: app/migration- default-extensions: BangPatterns CPP ConstraintKinds DeriveDataTypeable DeriveGeneric EmptyDataDecls FlexibleContexts FlexibleInstances GADTs GeneralizedNewtypeDeriving InstanceSigs LambdaCase MultiParamTypeClasses MultiWayIf NoImplicitPrelude OverloadedStrings QuasiQuotes RankNTypes RecordWildCards ScopedTypeVariables StandaloneDeriving TemplateHaskell TupleSections TypeFamilies TypeOperators ViewPatterns+ default-extensions: BangPatterns CPP ConstraintKinds DataKinds DeriveDataTypeable DeriveGeneric EmptyDataDecls FlexibleContexts FlexibleInstances GADTs GeneralizedNewtypeDeriving InstanceSigs KindSignatures LambdaCase MultiParamTypeClasses MultiWayIf NoImplicitPrelude OverloadedStrings PolyKinds PolymorphicComponents QuasiQuotes Rank2Types RankNTypes RecordWildCards ScopedTypeVariables StandaloneDeriving TemplateHaskell TupleSections TypeApplications TypeFamilies TypeOperators TypeSynonymInstances ViewPatterns ghc-options: -threaded -rtsopts -with-rtsopts=-N build-depends:- aeson >=0.11.1- , base >=4.8.2.0 && <4.9 || >=4.9.1.0 && <4.11+ aeson >=1.4+ , attoparsec+ , base >=4.8.2.0 && <4.9 || >=4.9.1.0 && <5 , bcrypt >=0.0.8- , bytestring >=0.9+ , bytestring >=0.9 && <0.11 , case-insensitive- , classy-prelude >=0.10.2- , classy-prelude-conduit >=0.10.2- , classy-prelude-yesod >=0.10.2 && <1.0 || >=1.1- , conduit >=1.0+ , classy-prelude >=1.4 && <1.6+ , classy-prelude-conduit >=1.4 && <1.6+ , classy-prelude-yesod >=1.4 && <1.6+ , conduit >=1.0 && <2.0 , containers , data-default- , directory >=1.1+ , directory >=1.1 && <1.4 , ekg , ekg-core+ , entropy , espial , esqueleto- , fast-logger >=2.2+ , fast-logger >=2.2 && <2.5 , file-embed , foreign-store- , hjsmin >=0.1+ , hjsmin >=0.1 && <0.3 , hscolour- , http-conduit >=2.1+ , http-api-data >=0.3.4+ , http-client+ , http-client-tls >=0.3 && <0.4+ , http-conduit >=2.3 && <2.4+ , http-types , iso8601-time >=0.1.3 , microlens- , monad-control >=0.3- , monad-logger >=0.3+ , monad-logger >=0.3 && <0.4 , monad-metrics , mtl , optparse-generic >=1.2.3- , persistent >=2.0+ , parser-combinators+ , persistent >=2.8 && <2.10 , persistent-sqlite >=2.6.2- , persistent-template >=2.0- , pinboard+ , persistent-template >=2.5 && <2.9 , pretty-show , safe- , shakespeare >=2.0+ , shakespeare >=2.0 && <2.1 , template-haskell- , text >=0.11+ , text >=0.11 && <2.0 , time , transformers >=0.2.2 , unordered-containers , vector , wai- , wai-extra >=3.0- , wai-logger >=2.2+ , wai-extra >=3.0 && <3.1+ , wai-logger >=2.2 && <2.4 , wai-middleware-metrics- , warp >=3.0- , yaml >=0.8- , yesod >=1.4.3- , yesod-auth >=1.4.0- , yesod-core >=1.4.30- , yesod-form >=1.4.0- , yesod-static >=1.4.0.3+ , warp >=3.0 && <3.3+ , yaml >=0.8 && <0.12+ , yesod >=1.6 && <1.7+ , yesod-auth >=1.6 && <1.7+ , yesod-core >=1.6 && <1.7+ , yesod-form >=1.6 && <1.7+ , yesod-static >=1.6 && <1.7 if flag(library-only) buildable: False other-modules:@@ -300,62 +336,67 @@ main-is: Spec.hs hs-source-dirs: test- default-extensions: BangPatterns CPP ConstraintKinds DeriveDataTypeable DeriveGeneric EmptyDataDecls FlexibleContexts FlexibleInstances GADTs GeneralizedNewtypeDeriving InstanceSigs LambdaCase MultiParamTypeClasses MultiWayIf NoImplicitPrelude OverloadedStrings QuasiQuotes RankNTypes RecordWildCards ScopedTypeVariables StandaloneDeriving TemplateHaskell TupleSections TypeFamilies TypeOperators ViewPatterns+ default-extensions: BangPatterns CPP ConstraintKinds DataKinds DeriveDataTypeable DeriveGeneric EmptyDataDecls FlexibleContexts FlexibleInstances GADTs GeneralizedNewtypeDeriving InstanceSigs KindSignatures LambdaCase MultiParamTypeClasses MultiWayIf NoImplicitPrelude OverloadedStrings PolyKinds PolymorphicComponents QuasiQuotes Rank2Types RankNTypes RecordWildCards ScopedTypeVariables StandaloneDeriving TemplateHaskell TupleSections TypeApplications TypeFamilies TypeOperators TypeSynonymInstances ViewPatterns ghc-options: -Wall build-depends:- aeson >=0.11.1- , base >=4.8.2.0 && <4.9 || >=4.9.1.0 && <4.11+ aeson >=1.4+ , attoparsec+ , base >=4.8.2.0 && <4.9 || >=4.9.1.0 && <5 , bcrypt >=0.0.8- , bytestring >=0.9+ , bytestring >=0.9 && <0.11 , case-insensitive- , classy-prelude >=0.10.2- , classy-prelude-conduit >=0.10.2- , classy-prelude-yesod >=0.10.2 && <1.0 || >=1.1- , conduit >=1.0+ , classy-prelude >=1.4 && <1.6+ , classy-prelude-conduit >=1.4 && <1.6+ , classy-prelude-yesod >=1.4 && <1.6+ , conduit >=1.0 && <2.0 , containers , data-default- , directory >=1.1+ , directory >=1.1 && <1.4 , ekg , ekg-core+ , entropy , espial , esqueleto- , fast-logger >=2.2+ , fast-logger >=2.2 && <2.5 , file-embed , foreign-store- , hjsmin >=0.1+ , hjsmin >=0.1 && <0.3 , hscolour , hspec >=2.0.0- , http-conduit >=2.1+ , http-api-data >=0.3.4+ , http-client+ , http-client-tls >=0.3 && <0.4+ , http-conduit >=2.3 && <2.4+ , http-types , iso8601-time >=0.1.3 , microlens- , monad-control >=0.3- , monad-logger >=0.3+ , monad-logger >=0.3 && <0.4 , monad-metrics , mtl- , persistent >=2.0+ , parser-combinators+ , persistent >=2.8 && <2.10 , persistent-sqlite >=2.6.2- , persistent-template >=2.0- , pinboard+ , persistent-template >=2.5 && <2.9 , pretty-show , safe- , shakespeare >=2.0+ , shakespeare >=2.0 && <2.1 , template-haskell- , text >=0.11+ , text >=0.11 && <2.0 , time , transformers >=0.2.2 , unordered-containers , vector , wai- , wai-extra >=3.0- , wai-logger >=2.2+ , wai-extra >=3.0 && <3.1+ , wai-logger >=2.2 && <2.4 , wai-middleware-metrics- , warp >=3.0- , yaml >=0.8- , yesod >=1.4.3- , yesod-auth >=1.4.0- , yesod-core >=1.4.30- , yesod-form >=1.4.0- , yesod-static >=1.4.0.3+ , warp >=3.0 && <3.3+ , yaml >=0.8 && <0.12+ , yesod >=1.6 && <1.7+ , yesod-auth >=1.6 && <1.7+ , yesod-core >=1.6 && <1.7+ , yesod-form >=1.6 && <1.7+ , yesod-static >=1.6 && <1.7 , yesod-test other-modules: Handler.CommonSpec
purs/Makefile view
@@ -1,41 +1,28 @@-o_dist = dist-o_name = app.js-m_name = app.min.js-y_name = app.min.js-y_static = ../static/js-pulp = pulp --psc-package-modules = --modules App,User,Globals,Util-skip = --skip-entry-point - .PHONY: clean build -all: deploy--build: - $(pulp) build -O \- $(skip) \- $(modules) \- --to $(o_dist)/$(o_name) && \- (cd $(o_dist) && terser $(o_name) -m -c -o $(m_name)) && \- rm -f $(o_dist)/*.gz && \- gzip -k $(o_dist)/$(o_name) && \- gzip -k $(o_dist)/$(m_name) && \- ls -lh $(o_dist)+all: build -watch:- $(pulp) -w build -O $(skip) $(modules) --to $(o_dist)/$(o_name)+install: + spago install -deploy: build- cp $(o_dist)/$(o_name) $(y_static)/$(o_name) && \- cp $(o_dist)/$(o_name).gz $(y_static)/$(o_name).gz && \- cp $(o_dist)/$(m_name) $(y_static)/$(y_name) && \- cp $(o_dist)/$(m_name).gz $(y_static)/$(y_name).gz+build: + @spago build+ @spago bundle --to dist/app.js+ @(cd dist && terser app.js -m -c -o app.min.js)+ @rm -f dist/*.gz+ @gzip -k dist/app.js+ @gzip -k dist/app.min.js+ @find dist -type f -printf "%kK\\t%h/%f\\n" | sort -k 2+ @cp dist/app.js ../static/js/app.js+ @cp dist/app.js.gz ../static/js/app.js.gz+ @cp dist/app.min.js ../static/js/app.min.js+ @cp dist/app.min.js.gz ../static/js/app.min.js.gz docs:- $(pulp) docs -- --format html--repl:- $(pulp) repl+ @rm -Rf generated-docs+ @purs docs ".spago/*/*/src/**/*.purs" --format html clean: rm -f dist/*++# inotifywait -m -r -q -e close_write --format '%T %w%f' --timefmt '%T' src | while read FILE; do echo $FILE; make; done
+ purs/packages.dhall view
@@ -0,0 +1,121 @@+{-+Welcome to Spacchetti local packages!++Below are instructions for how to edit this file for most use+cases, so that you don't need to know Dhall to use it.++## Warning: Don't Move This Top-Level Comment!++Due to how `dhall format` currently works, this comment's+instructions cannot appear near corresponding sections below+because `dhall format` will delete the comment. However,+it will not delete a top-level comment like this one.++## Use Cases++Most will want to do one or both of these options:+1. Override/Patch a package's dependency+2. Add a package not already in the default package set++This file will continue to work whether you use one or both options.+Instructions for each option are explained below.++### Overriding/Patching a package++Purpose:+- Change a package's dependency to a newer/older release than the+ default package set's release+- Use your own modified version of some dependency that may+ include new API, changed API, removed API by+ using your custom git repo of the library rather than+ the package set's repo++Syntax:+Replace the overrides' "{=}" (an empty record) with the following idea+The "//" or "⫽" means "merge these two records and+ when they have the same value, use the one on the right:"+-------------------------------+let override =+ { packageName =+ upstream.packageName ⫽ { updateEntity1 = "new value", updateEntity2 = "new value" }+ , packageName =+ upstream.packageName ⫽ { version = "v4.0.0" }+ , packageName =+ upstream.packageName // { repo = "https://www.example.com/path/to/new/repo.git" }+ }+-------------------------------++Example:+-------------------------------+let overrides =+ { halogen =+ upstream.halogen ⫽ { version = "master" }+ , halogen-vdom =+ upstream.halogen-vdom ⫽ { version = "v4.0.0" }+ }+-------------------------------++### Additions++Purpose:+- Add packages that aren't alread included in the default package set++Syntax:+Replace the additions' "{=}" (an empty record) with the following idea:+-------------------------------+let additions =+ { "package-name" =+ mkPackage+ [ "dependency1"+ , "dependency2"+ ]+ "https://example.com/path/to/git/repo.git"+ "tag ('v4.0.0') or branch ('master')"+ , "package-name" =+ mkPackage+ [ "dependency1"+ , "dependency2"+ ]+ "https://example.com/path/to/git/repo.git"+ "tag ('v4.0.0') or branch ('master')"+ , etc.+ }+-------------------------------++Example:+-------------------------------+let additions =+ { benchotron =+ mkPackage+ [ "arrays"+ , "exists"+ , "profunctor"+ , "strings"+ , "quickcheck"+ , "lcg"+ , "transformers"+ , "foldable-traversable"+ , "exceptions"+ , "node-fs"+ , "node-buffer"+ , "node-readline"+ , "datetime"+ , "now"+ ]+ "https://github.com/hdgarrood/purescript-benchotron.git"+ "v7.0.0"+ }+-------------------------------+-}++let mkPackage =+ https://raw.githubusercontent.com/spacchetti/spacchetti/20190105/src/mkPackage.dhall sha256:8e1c6636f8a089f972b21cde0cef4b33fa36a2e503ad4c77928aabf92d2d4ec9++let upstream =+ https://raw.githubusercontent.com/spacchetti/spacchetti/20190105/src/packages.dhall sha256:38fc3e19c193bb006c773ac84fc4a2888e5dcc610d36e49a9bdef7ecc7e1f8c9++let overrides = {=}++let additions = {=}++in upstream ⫽ overrides ⫽ additions
− purs/psc-package.json
@@ -1,23 +0,0 @@-{ - "name": "purs", - "set": "psc-0.12.0-20180704", - "source": "https://github.com/purescript/package-sets.git", - "depends": [ - "aff", - "simple-json", - "affjax", - "argonaut", - "arrays", - "console", - "debug", - "effect", - "either", - "functions", - "halogen", - "prelude", - "psci-support", - "strings", - "transformers", - "web-html" - ] -}
+ purs/spago.dhall view
@@ -0,0 +1,24 @@+{ name =+ "espial"+, dependencies =+ [ "aff"+ , "simple-json"+ , "affjax"+ , "argonaut"+ , "arrays"+ , "console"+ , "debug"+ , "effect"+ , "either"+ , "functions"+ , "halogen"+ , "prelude"+ , "psci-support"+ , "strings"+ , "transformers"+ , "web-html"+ , "profunctor-lenses"+ ]+, packages =+ ./packages.dhall+}
purs/src/App.purs view
@@ -1,120 +1,119 @@-module App where - -import Prelude - -import Data.Argonaut (Json) -import Data.Array ((:)) -import Data.Either (Either(..)) -import Data.FormURLEncoded (FormURLEncoded) -import Data.HTTP.Method (Method(..)) -import Data.Maybe (Maybe(..)) -import Data.MediaType.Common (applicationFormURLEncoded, applicationJSON) -import Effect (Effect) -import Effect.Aff (Aff, launchAff) -import Effect.Class (liftEffect) -import Globals (app') -import Model (Bookmark, Bookmark'(..), Note, Note'(..)) -import Network.HTTP.Affjax (affjax, AffjaxResponse) -import Network.HTTP.Affjax (defaultRequest) as AX -import Network.HTTP.Affjax.Request (Request(..)) -import Network.HTTP.Affjax.Request as AXReq -import Network.HTTP.Affjax.Response (Response(..)) -import Network.HTTP.Affjax.Response as AXRes -import Network.HTTP.RequestHeader (RequestHeader(..)) -import Simple.JSON as J -import Web.Event.Event (Event, preventDefault) -import Web.HTML (window) -import Web.HTML.Location (reload) -import Web.HTML.Window (location) - -data StarAction = Star | UnStar -instance showStar :: Show StarAction where - show Star = "star" - show UnStar = "unstar" - -toggleStar :: Int -> StarAction -> Aff Unit -toggleStar bid action = do - let path = "bm/" <> show bid <> "/" <> show action - void (fetchUrlEnc POST path Nothing AXRes.ignore) - -destroy :: Int -> Aff (AffjaxResponse Unit) -destroy bid = - fetchUrlEnc DELETE ("bm/" <> show bid) Nothing AXRes.ignore - -markRead :: Int -> Aff (AffjaxResponse Unit) -markRead bid = do - let path = "bm/" <> show bid <> "/read" - fetchUrlEnc POST path Nothing AXRes.ignore - -editBookmark :: Bookmark -> Aff (AffjaxResponse Unit) -editBookmark bm = do - fetchJson POST "api/add" (Just (Bookmark' bm)) AXRes.ignore - -editNote :: Note -> Aff (AffjaxResponse Json) -editNote bm = do - fetchJson POST "api/note/add" (Just (Note' bm)) AXRes.json - -destroyNote :: Int -> Aff (AffjaxResponse Unit) -destroyNote nid = do - fetchUrlEnc DELETE ("api/note/" <> show nid) Nothing AXRes.ignore - -logoutE :: Event -> Effect Unit -logoutE e = void <<< launchAff <<< logout =<< preventDefault e - -logout :: Unit -> Aff Unit -logout u = do - void (fetchUrl POST app.authRlogoutR [] Nothing AXRes.ignore) - liftEffect (window >>= location >>= reload) - where - app = app' u - -fetchJson - :: forall a b. - J.WriteForeign b - => Method - -> String - -> Maybe b - -> AXRes.Response a - -> Aff (AffjaxResponse a) -fetchJson method path content rt = - fetchPath method path [ContentType applicationJSON] (AXReq.string <<< J.writeJSON <$> content) rt - -fetchUrlEnc - :: forall a. - Method - -> String - -> Maybe FormURLEncoded - -> AXRes.Response a - -> Aff (AffjaxResponse a) -fetchUrlEnc method path content rt = - fetchPath method path [ContentType applicationFormURLEncoded] (AXReq.FormURLEncoded <$> content) rt - -fetchPath - :: forall a. - Method - -> String - -> Array RequestHeader - -> Maybe AXReq.Request - -> AXRes.Response a - -> Aff (AffjaxResponse a) -fetchPath method path headers content rt = - fetchUrl method ((app' unit).homeR <> path) headers content rt - -fetchUrl - :: forall a. - Method - -> String - -> Array RequestHeader - -> Maybe AXReq.Request - -> AXRes.Response a - -> Aff (AffjaxResponse a) -fetchUrl method url headers content rt = - affjax rt - AX.defaultRequest - { url = url - , method = Left method - , headers = RequestHeader app.csrfHeaderName app.csrfToken : headers - , content = content - } - where - app = app' unit +module App where++import Prelude++import Affjax (Response, ResponseFormatError)+import Affjax (defaultRequest) as AX+import Affjax as Ax+import Affjax.RequestBody as AXReq+import Affjax.RequestHeader (RequestHeader(..))+import Affjax.ResponseFormat as AXRes+import Data.Argonaut (Json)+import Data.Array ((:))+import Data.Either (Either(..))+import Data.FormURLEncoded (FormURLEncoded)+import Data.HTTP.Method (Method(..))+import Data.Maybe (Maybe(..))+import Data.MediaType.Common (applicationFormURLEncoded, applicationJSON)+import Effect.Aff (Aff)+import Effect.Class (liftEffect)+import Globals (app')+import Model (Bookmark, Bookmark'(..), Note, Note'(..), AccountSettings, AccountSettings'(..))+import Simple.JSON as J+import Web.HTML (window)+import Web.HTML.Location (reload)+import Web.HTML.Window (location)++data StarAction = Star | UnStar+instance showStar :: Show StarAction where+ show Star = "star"+ show UnStar = "unstar"++toggleStar :: Int -> StarAction -> Aff Unit+toggleStar bid action = do+ let path = "bm/" <> show bid <> "/" <> show action+ void (fetchUrlEnc POST path Nothing AXRes.ignore)++destroy :: Int -> Aff (Response (Either ResponseFormatError Unit))+destroy bid =+ fetchUrlEnc DELETE ("bm/" <> show bid) Nothing AXRes.ignore++markRead :: Int -> Aff (Response (Either ResponseFormatError Unit))+markRead bid = do+ let path = "bm/" <> show bid <> "/read"+ fetchUrlEnc POST path Nothing AXRes.ignore++editBookmark :: Bookmark -> Aff (Response (Either ResponseFormatError Unit))+editBookmark bm = do+ fetchJson POST "api/add" (Just (Bookmark' bm)) AXRes.ignore++editNote :: Note -> Aff (Response (Either ResponseFormatError Json))+editNote bm = do+ fetchJson POST "api/note/add" (Just (Note' bm)) AXRes.json++destroyNote :: Int -> Aff (Response (Either ResponseFormatError Unit))+destroyNote nid = do+ fetchUrlEnc DELETE ("api/note/" <> show nid) Nothing AXRes.ignore++editAccountSettings :: AccountSettings -> Aff (Response (Either ResponseFormatError Unit))+editAccountSettings us = do+ fetchJson POST "api/accountSettings" (Just (AccountSettings' us)) AXRes.ignore++logout :: Unit -> Aff Unit+logout u = do+ void (fetchUrl POST app.authRlogoutR [] Nothing AXRes.ignore)+ liftEffect (window >>= location >>= reload)+ where+ app = app' u++fetchJson+ :: forall a b.+ J.WriteForeign b+ => Method+ -> String+ -> Maybe b+ -> AXRes.ResponseFormat a+ -> Aff (Response (Either ResponseFormatError a))+fetchJson method path content rt =+ fetchPath method path [ContentType applicationJSON] (AXReq.string <<< J.writeJSON <$> content) rt++fetchUrlEnc+ :: forall a.+ Method+ -> String+ -> Maybe FormURLEncoded+ -> AXRes.ResponseFormat a+ -> Aff (Response (Either ResponseFormatError a))+fetchUrlEnc method path content rt =+ fetchPath method path [ContentType applicationFormURLEncoded] (AXReq.FormURLEncoded <$> content) rt++fetchPath+ :: forall a.+ Method+ -> String+ -> Array RequestHeader+ -> Maybe AXReq.RequestBody+ -> AXRes.ResponseFormat a+ -> Aff (Response (Either ResponseFormatError a))+fetchPath method path headers content rt =+ fetchUrl method ((app' unit).homeR <> path) headers content rt++fetchUrl+ :: forall a.+ Method+ -> String+ -> Array RequestHeader+ -> Maybe AXReq.RequestBody+ -> AXRes.ResponseFormat a+ -> Aff (Response (Either ResponseFormatError a))+fetchUrl method url headers content rt =+ Ax.request+ AX.defaultRequest+ { url = url+ , method = Left method+ , headers = RequestHeader app.csrfHeaderName app.csrfToken : headers+ , content = content+ , responseFormat = rt+ }+ where+ app = app' unit
+ purs/src/Component/AccountSettings.purs view
@@ -0,0 +1,91 @@+module Component.AccountSettings where++import Prelude hiding (div)++import App (editAccountSettings)+import Data.Lens (Lens', lens, use, (%=))+import Data.Maybe (Maybe(..))+import Effect.Aff (Aff)+import Globals (app')+import Halogen as H+import Halogen.HTML (HTML, div, input, text)+import Halogen.HTML.Elements (label)+import Halogen.HTML.Events (onChecked)+import Halogen.HTML.Events as HE+import Halogen.HTML.Properties (InputType(..), checked, for, id_, name, type_)+import Model (AccountSettings)+import Util (class_)+import Web.Event.Event (Event)++type UState =+ { us :: AccountSettings+ }++_us :: Lens' UState AccountSettings+_us = lens _.us (_ { us = _ })++data UQuery a+ = UEditField EditField a+ | USubmit Event a++data EditField+ = EarchiveDefault Boolean+ | EprivateDefault Boolean+ | EprivacyLock Boolean+++-- | The bookmark component definition.+usetting :: AccountSettings -> H.Component HTML UQuery Unit Unit Aff+usetting u' =+ H.component+ { initialState: const (mkState u')+ , render+ , eval+ , receiver: const Nothing+ }+ where+ app = app' unit++ mkState u =+ { us: u+ }++ render :: UState -> H.ComponentHTML UQuery+ render { us } =+ div [ class_ "settings-form" ]+ [ div [ class_ "fw7 mb2"] [ text "Account Settings" ]+ , div [ class_ "flex items-center mb2" ]+ [ input [ type_ InputCheckbox , class_ "pointer mr2" , id_ "archiveDefault", name "archiveDefault"+ , checked (us.archiveDefault) , onChecked (editField EarchiveDefault) ]+ , label [ for "archiveDefault", class_ "lh-copy" ]+ [ text "Archive Non-Private Bookmarks (archive.li)" ]+ ]+ , div [ class_ "flex items-center mb2" ]+ [ input [ type_ InputCheckbox , class_ "pointer mr2" , id_ "privateDefault", name "privateDefault"+ , checked (us.privateDefault) , onChecked (editField EprivateDefault) ]+ , label [ for "privateDefault", class_ "lh-copy" ]+ [ text "Default new bookmarks to Private" ]+ ]+ , div [ class_ "flex items-center mb2" ]+ [ input [ type_ InputCheckbox , class_ "pointer mr2" , id_ "privacyLock", name "privacyLock"+ , checked (us.privacyLock) , onChecked (editField EprivacyLock) ]+ , label [ for "privacyLock", class_ "lh-copy" ]+ [ text "Privacy Lock (Private Account)" ]+ ]+ ]+ where+ editField :: forall a. (a -> EditField) -> a -> Maybe (UQuery Unit)+ editField f = HE.input UEditField <<< f++ eval :: UQuery ~> H.ComponentDSL UState UQuery Unit Aff+ eval (UEditField f next) = do+ _us %= case f of+ EarchiveDefault e -> _ { archiveDefault = e }+ EprivateDefault e -> _ { privateDefault = e }+ EprivacyLock e -> _ { privacyLock = e }+ pure next++ eval (USubmit e next) = do+ us <- use _us+ void $ H.liftAff (editAccountSettings us)+ pure next
+ purs/src/Component/Add.purs view
@@ -0,0 +1,179 @@+module Component.Add where++import Prelude hiding (div)++import App (destroy, editBookmark)+import Data.Array (drop, foldMap)+import Data.Lens (Lens', lens, use, (%=), (.=))+import Data.Maybe (Maybe(..), maybe)+import Data.Monoid (guard)+import Data.String (null)+import Data.String (split) as S+import Data.String.Pattern (Pattern(..))+import Data.Tuple (fst, snd)+import Effect.Aff (Aff)+import Effect.Class (liftEffect)+import Globals (app', closeWindow, mmoment8601)+import Halogen as H+import Halogen.HTML (HTML, br_, button, div, div_, form, input, label, p, span, table, tbody_, td, td_, text, textarea, tr_)+import Halogen.HTML.Events (onSubmit, onValueChange, onChecked, onClick)+import Halogen.HTML.Events as HE+import Halogen.HTML.Properties (autofocus, ButtonType(..), InputType(..), autocomplete, checked, for, id_, name, required, rows, title, type_, value)+import Model (Bookmark)+import Util (_curQuerystring, _loc, _lookupQueryStringValue, attr, class_)+import Web.Event.Event (Event, preventDefault)+import Web.HTML (window)+import Web.HTML.Location (setHref)++data BQuery a+ = BEditField EditField a+ | BEditSubmit Event a+ | BDeleteAsk Boolean a+ | BDestroy a++data EditField+ = Eurl String+ | Etitle String+ | Edescription String+ | Etags String+ | Eprivate Boolean+ | Etoread Boolean++type BState =+ { bm :: Bookmark+ , edit_bm :: Bookmark+ , deleteAsk :: Boolean+ , destroyed :: Boolean+ }++_bm :: Lens' BState Bookmark+_bm = lens _.bm (_ { bm = _ })++_edit_bm :: Lens' BState Bookmark+_edit_bm = lens _.edit_bm (_ { edit_bm = _ })++addbmark :: Bookmark -> H.Component HTML BQuery Unit Unit Aff+addbmark b' =+ H.component+ { initialState: const (mkState b')+ , render+ , eval+ , receiver: const Nothing+ }+ where+ app = app' unit++ mkState b =+ { bm: b+ , edit_bm: b+ , deleteAsk: false+ , destroyed: false+ }++ render :: BState -> H.ComponentHTML BQuery+ render s@{ bm, edit_bm } =+ div_ [ if not s.destroyed then display_edit else display_destroyed ]+ where+ display_edit =+ form [ onSubmit (HE.input BEditSubmit) ]+ [ table [ class_ "w-100" ]+ [ tbody_+ [ tr_+ [ td [ class_ "w1" ] [ ]+ , td_ $ guard (bm.bid > 0) [ display_exists ]+ ]+ , tr_+ [ td_ [ label [ for "url" ] [ text "URL" ] ]+ , td_ [ input [ type_ InputUrl , id_ "url", class_ "w-100 mv1" , required true, name "url", autofocus (null bm.url)+ , value (edit_bm.url) , onValueChange (editField Eurl)] ]+ ]+ , tr_+ [ td_ [ label [ for "title" ] [ text "title" ] ]+ , td_ [ input [ type_ InputText , id_ "title", class_ "w-100 mv1" , name "title"+ , value (edit_bm.title) , onValueChange (editField Etitle)] ]+ ]+ , tr_+ [ td_ [ label [ for "description" ] [ text "description" ] ]+ , td_ [ textarea [ class_ "w-100 mt1 mid-gray" , id_ "description", name "description", rows 4+ , value (edit_bm.description) , onValueChange (editField Edescription)] ]+ ]+ , tr_+ [ td_ [ label [ for "tags" ] [ text "tags" ] ]+ , td_ [ input [ type_ InputText , id_ "tags", class_ "w-100 mv1" , name "tags", autocomplete false, attr "autocapitalize" "off", autofocus (not $ null bm.url)+ , value (edit_bm.tags) , onValueChange (editField Etags)] ]+ ]+ , tr_+ [ td_ [ label [ for "private" ] [ text "private" ] ]+ , td_ [ input [ type_ InputCheckbox , id_ "private", class_ "private pointer" , name "private"+ , checked (edit_bm.private) , onChecked (editField Eprivate)] ]+ ]+ , tr_+ [ td_ [ label [ for "toread" ] [ text "read later" ] ]+ , td_ [ input [ type_ InputCheckbox , id_ "toread", class_ "toread pointer" , name "toread"+ , checked (edit_bm.toread) , onChecked (editField Etoread)] ]+ ]+ , tr_+ [ td_ [ ]+ , td_ [ input [ type_ InputSubmit , class_ "ph3 pv2 input-reset ba b--navy bg-transparent pointer f6 dib mt1 dim"+ , value (if bm.bid > 0 then "update bookmark" else "add bookmark") ] ]+ ]+ ]+ ]+ ]++ display_exists = + div [ class_ "alert" ]+ [ text "previously saved "+ , span [ class_ "link f7 dib gray pr3" , title (maybe bm.time snd mmoment) ]+ [ text (maybe " " fst mmoment) ]+ , div [ class_ "edit_links dib ml1" ]+ [ div [ class_ "delete_link di" ]+ [ button ([ type_ ButtonButton, onClick (HE.input_ (BDeleteAsk true)), class_ "delete" ] <> guard s.deleteAsk [ attr "hidden" "hidden" ]) [ text "delete" ]+ , span ([ class_ "confirm red" ] <> guard (not s.deleteAsk) [ attr "hidden" "hidden" ])+ [ button [ type_ ButtonButton, onClick (HE.input_ (BDeleteAsk false))] [ text "cancel / " ]+ , button [ type_ ButtonButton, onClick (HE.input_ BDestroy), class_ "red" ] [ text "destroy" ]+ ] + ]+ ]+ ]++ display_destroyed = p [ class_ "red"] [text "you killed this bookmark"]++ editField :: forall a. (a -> EditField) -> a -> Maybe (BQuery Unit)+ editField f = HE.input BEditField <<< f+ mmoment = mmoment8601 bm.time+ toTextarea =+ drop 1+ <<< foldMap (\x -> [br_, text x])+ <<< S.split (Pattern "\n")++ eval :: BQuery ~> H.ComponentDSL BState BQuery Unit Aff+ eval (BDeleteAsk e next) = do+ H.modify_ (_ { deleteAsk = e })+ pure next+ eval (BDestroy next) = do+ bid <- H.gets _.bm.bid+ void $ H.liftAff (destroy bid)+ H.modify_ (_ { destroyed = true })+ pure next+ eval (BEditField f next) = do+ _edit_bm %= case f of+ Eurl e -> _ { url = e }+ Etitle e -> _ { title = e }+ Edescription e -> _ { description = e }+ Etags e -> _ { tags = e }+ Eprivate e -> _ { private = e }+ Etoread e -> _ { toread = e }+ pure next+ eval (BEditSubmit e next) = do+ H.liftEffect (preventDefault e)+ edit_bm <- use _edit_bm + void $ H.liftAff (editBookmark edit_bm)+ _bm .= edit_bm+ loc <- liftEffect _loc+ win <- liftEffect window+ qs <- liftEffect _curQuerystring+ case _lookupQueryStringValue qs "next" of+ Just n -> liftEffect (setHref n loc)+ _ -> liftEffect (closeWindow win)+ pure next
+ purs/src/Component/BList.purs view
@@ -0,0 +1,48 @@+module Component.BList where + +import Prelude + +import Component.BMark (BMessage(..), BQuery, bmark) +import Model (Bookmark, BookmarkId) + +import Data.Array (filter) +import Data.Maybe (Maybe(..)) +import Effect.Aff (Aff) +import Halogen as H +import Halogen.HTML as HH +import Halogen.HTML.Events as HE + +type BSlot = BookmarkId + +data LQuery a = + HandleBMessage BSlot BMessage a + +blist :: Array Bookmark -> H.Component HH.HTML LQuery Unit Void Aff +blist st = + H.parentComponent + { initialState: const st + , render + , eval + , receiver: const Nothing + } + where + + render :: Array Bookmark -> H.ParentHTML LQuery BQuery BSlot Aff + render bms = + HH.div_ (map renderBookmark bms) + where + renderBookmark :: Bookmark -> H.ParentHTML LQuery BQuery BSlot Aff + renderBookmark b = + HH.slot + b.bid + (bmark b) + unit + (HE.input (HandleBMessage b.bid)) + + eval :: LQuery ~> H.ParentDSL (Array Bookmark) LQuery BQuery BSlot Void Aff + eval (HandleBMessage p BNotifyRemove next) = do + H.modify_ (removeBookmark p) + pure next + where + removeBookmark :: BookmarkId -> Array Bookmark -> Array Bookmark + removeBookmark bookmarkId = filter (\b -> b.bid /= bookmarkId)
+ purs/src/Component/BMark.purs view
@@ -0,0 +1,247 @@+module Component.BMark where + +import Prelude hiding (div) + +import App (StarAction(..), destroy, editBookmark, markRead, toggleStar) +import Data.Array (drop, foldMap) +import Data.Lens (Lens', lens, use, (%=), (.=)) +import Data.Maybe (Maybe(..), fromMaybe, isJust, maybe) +import Data.Monoid (guard) +import Data.Nullable (toMaybe) +import Data.String (null, split, take) as S +import Data.String.Pattern (Pattern(..)) +import Data.Tuple (fst, snd) +import Effect.Aff (Aff) +import Globals (app', mmoment8601) +import Halogen as H +import Halogen.HTML (HTML, a, br_, button, div, div_, form, input, label, span, text, textarea) +import Halogen.HTML.Events (onSubmit, onValueChange, onChecked, onClick) +import Halogen.HTML.Events as HE +import Halogen.HTML.Properties (ButtonType(..), InputType(..), autocomplete, checked, for, href, id_, name, required, rows, target, title, type_, value) +import Model (Bookmark) +import Util (class_, attr, fromNullableStr) +import Web.Event.Event (Event, preventDefault) + +-- | UI Events +data BQuery a + = BStar Boolean a + | BDeleteAsk Boolean a + | BDestroy a + | BEdit Boolean a + | BEditField EditField a + | BEditSubmit Event a + | BMarkRead a + +-- | FormField Edits +data EditField + = Eurl String + | Etitle String + | Edescription String + | Etags String + | Eprivate Boolean + | Etoread Boolean + +-- | Messages to parent +data BMessage + = BNotifyRemove + +type BState = + { bm :: Bookmark + , edit_bm :: Bookmark + , deleteAsk:: Boolean + , edit :: Boolean + } + +_bm :: Lens' BState Bookmark +_bm = lens _.bm (_ { bm = _ }) + +_edit_bm :: Lens' BState Bookmark +_edit_bm = lens _.edit_bm (_ { edit_bm = _ }) + +_edit :: Lens' BState Boolean +_edit = lens _.edit (_ { edit = _ }) + +bmark :: Bookmark -> H.Component HTML BQuery Unit BMessage Aff +bmark b' = + H.component + { initialState: const (mkState b') + , render + , eval + , receiver: const Nothing + } + where + app = app' unit + + mkState b = + { bm: b + , edit_bm: b + , deleteAsk: false + , edit: false + } + + render :: BState -> H.ComponentHTML BQuery + render s@{ bm, edit_bm } = + div [ id_ (show bm.bid) , class_ ("bookmark w-100 mw7 pa1 mb3" <> guard bm.private " private")] $ + star <> + if s.edit + then display_edit + else display + where + + star = + guard app.dat.isowner + [ div [ class_ ("star fl pointer" <> guard bm.selected " selected") ] + [ button [ class_ "moon-gray", onClick (HE.input_ (BStar (not bm.selected))) ] [ text "✭" ] ] + ] + + display = + [ div [ class_ "display" ] $ + [ a [ href bm.url, target "_blank", class_ ("link f5 lh-title" <> guard bm.toread " unread")] + [ text $ if S.null bm.title then "[no title]" else bm.title ] + , br_ + , a [ href bm.url , class_ "link f7 gray hover-blue" ] [ text bm.url ] + , a [ href (fromMaybe ("http://archive.is/" <> bm.url) (toMaybe bm.archiveUrl)) + , class_ ("link f7 gray hover-blue ml2" <> (guard (isJust (toMaybe bm.archiveUrl)) " green")) + , target "_blank", title "archive link"] + [ if isJust (toMaybe bm.archiveUrl) then text "☑" else text "☐" ] + , br_ + -- + , div [ class_ "description mt1 mid-gray" ] (toTextarea bm.description) + , div [ class_ "tags" ] $ + guard (not (S.null bm.tags)) + map (\tag -> a [ class_ ("link tag mr1" <> guard (S.take 1 tag == ".") " private") + , href (linkToFilterTag tag) ] + [ text tag ]) + (S.split (Pattern " ") bm.tags) + , a [ class_ "link f7 dib gray w4", title (maybe bm.time snd mmoment) , href (linkToFilterSingle bm.slug) ] + [ text (maybe " " fst mmoment) ] + ] + <> links + ] + + display_edit = + [ div [ class_ "edit_bookmark_form pa2 pt0 bg-white" ] $ + [ form [ onSubmit (HE.input BEditSubmit) ] + [ div_ [ text "url" ] + , input [ type_ InputUrl , class_ "url w-100 mb2 pt1 f7 edit_form_input" , required true , name "url" + , value (edit_bm.url) , onValueChange (editField Eurl) ] + , br_ + , div_ [ text "title" ] + , input [ type_ InputText , class_ "title w-100 mb2 pt1 f7 edit_form_input" , name "title" + , value (edit_bm.title) , onValueChange (editField Etitle) ] + , br_ + , div_ [ text "description" ] + , textarea [ class_ "description w-100 mb1 pt1 f7 edit_form_input" , name "description", rows 5 + , value (edit_bm.description) , onValueChange (editField Edescription) ] + , br_ + , div [ id_ "tags_input_box"] + [ div_ [ text "tags" ] + , input [ type_ InputText , class_ "tags w-100 mb1 pt1 f7 edit_form_input" , name "tags" + , autocomplete false, attr "autocapitalize" "off" + , value (edit_bm.tags) , onValueChange (editField Etags) ] + , br_ + ] + , div [ class_ "edit_form_checkboxes mv3"] + [ input [ type_ InputCheckbox , class_ "private pointer" , id_ "edit_private", name "private" + , checked (edit_bm.private) , onChecked (editField Eprivate) ] + , text " " + , label [ for "edit_private" , class_ "mr2" ] [ text "private" ] + , text " " + , input [ type_ InputCheckbox , class_ "toread pointer" , id_ "edit_toread", name "toread" + , checked (edit_bm.toread) , onChecked (editField Etoread) ] + , text " " + , label [ for "edit_toread" ] [ text "to-read" ] + , br_ + ] + , input [ type_ InputSubmit , class_ "mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim" , value "save" ] + , text " " + , input [ type_ InputReset , class_ "pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim" , value "cancel" + , onClick (HE.input_ (BEdit false)) ] + ] + ] + ] + + links = + guard app.dat.isowner + [ div [ class_ "edit_links di" ] + [ button [ type_ ButtonButton, onClick (HE.input_ (BEdit true)), class_ "edit light-silver hover-blue" ] [ text "edit " ] + , div [ class_ "delete_link di" ] + [ button [ type_ ButtonButton, onClick (HE.input_ (BDeleteAsk true)), class_ ("delete light-silver hover-blue" <> guard s.deleteAsk " dn") ] [ text "delete" ] + , span ([ class_ ("confirm red" <> guard (not s.deleteAsk) " dn") ] ) + [ button [ type_ ButtonButton, onClick (HE.input_ (BDeleteAsk false))] [ text "cancel / " ] + , button [ type_ ButtonButton, onClick (HE.input_ BDestroy), class_ "red" ] [ text "destroy" ] + ] + ] + ] + , div [ class_ "read di" ] $ + guard bm.toread + [ text " " + , button [ onClick (HE.input_ BMarkRead), class_ "mark_read" ] [ text "mark as read"] + ] + ] + + editField :: forall a. (a -> EditField) -> a -> Maybe (BQuery Unit) + editField f = HE.input BEditField <<< f + linkToFilterSingle slug = fromNullableStr app.userR <> "/b:" <> slug + linkToFilterTag tag = fromNullableStr app.userR <> "/t:" <> tag + mmoment = mmoment8601 bm.time + toTextarea input = + S.split (Pattern "\n") input + # foldMap (\x -> [br_, text x]) + # drop 1 + + eval :: BQuery ~> H.ComponentDSL BState BQuery BMessage Aff + + -- | Star + eval (BStar e next) = do + bm <- use _bm + H.liftAff (toggleStar bm.bid (if e then Star else UnStar)) + _bm %= _ { selected = e } + _edit_bm %= _ { selected = e } + pure next + + -- | Delete + eval (BDeleteAsk e next) = do + H.modify_ (_ { deleteAsk = e }) + pure next + + -- | Destroy + eval (BDestroy next) = do + bm <- use _bm + void $ H.liftAff (destroy bm.bid) + H.raise BNotifyRemove + pure next + + -- | Mark Read + eval (BMarkRead next) = do + bm <- use _bm + void (H.liftAff (markRead bm.bid)) + _bm %= _ { toread = false } + pure next + + -- | Start/Stop Editing + eval (BEdit e next) = do + bm <- use _bm + _edit_bm .= bm + _edit .= e + pure next + + -- | Update Form Field + eval (BEditField f next) = do + _edit_bm %= case f of + Eurl e -> _ { url = e } + Etitle e -> _ { title = e } + Edescription e -> _ { description = e } + Etags e -> _ { tags = e } + Eprivate e -> _ { private = e } + Etoread e -> _ { toread = e } + pure next + + -- | Submit + eval (BEditSubmit e next) = do + H.liftEffect (preventDefault e) + edit_bm <- use _edit_bm + void $ H.liftAff (editBookmark edit_bm) + _bm .= edit_bm + _edit .= false + pure next
+ purs/src/Component/Markdown.purs view
@@ -0,0 +1,15 @@+module Component.Markdown (component, MInput, MQuery, MOutput, module RHExt) where++import Component.RawHtml as RH+import Component.RawHtml (Query(Receive)) as RHExt+import Effect.Aff (Aff)+import Foreign.Marked (marked)+import Halogen as H+import Halogen.HTML as HH++type MInput = String+type MQuery = RH.Query String+type MOutput = RH.Output++component :: H.Component HH.HTML MQuery MInput MOutput Aff+component = RH.mkComponent marked
+ purs/src/Component/NList.purs view
@@ -0,0 +1,75 @@+module Component.NList where++import Prelude hiding (div)++import Data.Array (drop, foldMap)+import Data.Maybe (Maybe(..), maybe)+import Data.String (null, split, take) as S+import Data.String.Pattern (Pattern(..))+import Data.Tuple (fst, snd)+import Effect.Aff (Aff)+import Globals (app', mmoment8601)+import Halogen as H+import Halogen.HTML (a, br_, div, text)+import Halogen.HTML as HH+import Halogen.HTML.Properties (href, id_, title)+import Model (Note, NoteSlug)+import Util (class_, fromNullableStr)++data NLQuery a+ = NLNop a++type NLSlot = NoteSlug++type NLState =+ { notes :: Array Note+ , cur :: Maybe NLSlot+ , deleteAsk:: Boolean+ , edit :: Boolean+ }+++nlist :: Array Note -> H.Component HH.HTML NLQuery Unit Void Aff+nlist st' =+ H.component+ { initialState: const (mkState st')+ , render+ , eval+ , receiver: const Nothing+ }+ where+ app = app' unit++ mkState notes' =+ { notes: notes'+ , cur: Nothing+ , deleteAsk: false+ , edit: false+ }++ render :: NLState -> H.ComponentHTML NLQuery+ render st@{ notes } =+ HH.div_ (map renderNote notes)+ where+ renderNote :: Note -> H.ComponentHTML NLQuery+ renderNote bm =+ div [ id_ (show bm.id) , class_ ("note w-100 mw7 pa1 mb2")] $+ [ div [ class_ "display" ] $+ [ a [ href (linkToFilterSingle bm.slug), class_ ("link f5 lh-title")]+ [ text $ if S.null bm.title then "[no title]" else bm.title ]+ , br_+ , div [ class_ "description mt1 mid-gray" ] (toTextarea (S.take 200 bm.text))+ , a [ class_ "link f7 dib gray w4", title (maybe bm.created snd (mmoment bm)) , href (linkToFilterSingle bm.slug) ]+ [ text (maybe " " fst (mmoment bm)) ]+ ]+ ]++ mmoment bm = mmoment8601 bm.created+ linkToFilterSingle slug = fromNullableStr app.userR <> "/notes/" <> slug+ toTextarea input =+ S.split (Pattern "\n") input+ # foldMap (\x -> [br_, text x])+ # drop 1++ eval :: NLQuery ~> H.ComponentDSL NLState NLQuery Void Aff+ eval (NLNop next) = pure next
+ purs/src/Component/NNote.purs view
@@ -0,0 +1,197 @@+module Component.NNote where++import Prelude hiding (div)++import App (destroyNote, editNote)+import Component.Markdown as Markdown+import Data.Array (drop, foldMap)+import Data.Either (Either(..))+import Data.Lens (Lens', lens, use, (%=), (.=))+import Data.Maybe (Maybe(..), maybe)+import Data.Monoid (guard)+import Data.String (null, split) as S+import Data.String.Pattern (Pattern(..))+import Data.Tuple (fst, snd)+import Effect.Aff (Aff)+import Effect.Class (liftEffect)+import Globals (app', mmoment8601)+import Halogen as H+import Halogen.HTML (br_, button, div, form, input, label, p, span, text, textarea)+import Halogen.HTML as HH+import Halogen.HTML.Events (onChecked, onClick, onSubmit, onValueChange)+import Halogen.HTML.Events as HE+import Halogen.HTML.Properties (ButtonType(..), InputType(..), checked, for, id_, name, rows, title, type_, value)+import Model (Note)+import Util (_loc, class_, fromNullableStr)+import Web.Event.Event (Event, preventDefault)+import Web.HTML.Location (setHref)++data NQuery a+ = NNop a+ | NEditField EditField a+ | NEditSubmit Event a+ | NEdit Boolean a+ | NDeleteAsk Boolean a+ | NDestroy a++type NState =+ { note :: Note+ , edit_note :: Note+ , deleteAsk :: Boolean+ , edit :: Boolean+ , destroyed :: Boolean+ }++_note :: Lens' NState Note+_note = lens _.note (_ { note = _ })++_edit_note :: Lens' NState Note+_edit_note = lens _.edit_note (_ { edit_note = _ })++_edit :: Lens' NState Boolean+_edit = lens _.edit (_ { edit = _ })++-- | FormField Edits+data EditField+ = Etitle String+ | Etext String+ | EisMarkdown Boolean++type NChildQuery = Markdown.MQuery++nnote :: Note -> H.Component HH.HTML NQuery Unit Void Aff+nnote st' =+ H.parentComponent+ { initialState: const (mkState st')+ , render+ , eval+ , receiver: const Nothing+ }+ where+ app = app' unit++ mkState note' =+ { note: note'+ , edit_note: note'+ , deleteAsk: false+ , edit: note'.id <= 0+ , destroyed: false+ }++ render :: NState -> H.ParentHTML NQuery NChildQuery Unit Aff+ render st@{ note, edit_note } =+ if st.destroyed+ then display_destroyed+ else+ if st.edit+ then renderNote_edit+ else renderNote+ where++ renderNote =+ div [ id_ (show note.id) , class_ ("note w-100 mw7 pa1 mb2")] $+ [ div [ class_ "display" ] $+ [ div [ class_ ("link f5 lh-title")]+ [ text $ if S.null note.title then "[no title]" else note.title ]+ , br_+ , if note.isMarkdown+ then div [ class_ "description mt1" ] [ HH.slot unit Markdown.component note.text absurd ]+ else div [ class_ "description mt1 mid-gray" ] (toTextarea note.text)+ , div [ class_ "link f7 dib gray w4", title (maybe note.created snd (mmoment note)) ]+ [ text (maybe " " fst (mmoment note)) ]+ ]+ ]+ <> -- | Render Action Links+ [ div [ class_ "edit_links db mt3" ]+ [ button [ type_ ButtonButton, onClick (HE.input_ (NEdit true)), class_ "edit light-silver hover-blue" ] [ text "edit " ]+ , div [ class_ "delete_link di" ]+ [ button [ type_ ButtonButton, onClick (HE.input_ (NDeleteAsk true)), class_ ("delete light-silver hover-blue" <> guard st.deleteAsk " dn") ] [ text "delete" ]+ , span ([ class_ ("confirm red" <> guard (not st.deleteAsk) " dn") ] )+ [ button [ type_ ButtonButton, onClick (HE.input_ (NDeleteAsk false))] [ text "cancel / " ]+ , button [ type_ ButtonButton, onClick (HE.input_ NDestroy), class_ "red" ] [ text "destroy" ]+ ] + ]+ ]+ ]++ renderNote_edit =+ form [ onSubmit (HE.input NEditSubmit) ]+ [ p [ class_ "mt2 mb1"] [ text "title:" ]+ , input [ type_ InputText , class_ "title w-100 mb1 pt1 f7 edit_form_input" , name "title"+ , value (edit_note.title) , onValueChange (editField Etitle)+ ]+ , br_+ , p [ class_ "mt2 mb1"] [ text "description:" ]+ , textarea [ class_ "description w-100 mb1 pt1 f7 edit_form_input" , name "text", rows 30+ , value (edit_note.text) , onValueChange (editField Etext)+ ]+ , div [ class_ "edit_form_checkboxes mb3"]+ [ input [ type_ InputCheckbox , class_ "is-markdown pointer" , id_ "edit_ismarkdown", name "ismarkdown"+ , checked (edit_note.isMarkdown) , onChecked (editField EisMarkdown) ]+ , text " "+ , label [ for "edit_ismarkdown" , class_ "mr2" ] [ text "use markdown?" ]+ , br_+ ]+ , input [ type_ InputSubmit , class_ "mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim" , value "save" ]+ , text " "+ , input [ type_ InputReset , class_ "pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim" , value "cancel"+ , onClick (HE.input_ (NEdit false))+ ]+ ]++ display_destroyed = p [ class_ "red"] [text "you killed this note"]++ mmoment n = mmoment8601 n.created+ editField :: forall a. (a -> EditField) -> a -> Maybe (NQuery Unit)+ editField f = HE.input NEditField <<< f+ toTextarea input =+ S.split (Pattern "\n") input+ # foldMap (\x -> [br_, text x])+ # drop 1+++ eval :: NQuery ~> H.ParentDSL NState NQuery NChildQuery Unit Void Aff+ eval (NNop next) = pure next++ -- | EditField+ eval (NEditField f next) = do+ _edit_note %= case f of+ Etitle e -> _ { title = e }+ Etext e -> _ { text = e }+ EisMarkdown e -> _ { isMarkdown = e }+ pure next++ -- | Delete+ eval (NDeleteAsk e next) = do+ H.modify_ (_ { deleteAsk = e })+ pure next++ -- | Destroy+ eval (NDestroy next) = do+ note <- use _note+ void $ H.liftAff (destroyNote note.id)+ H.modify_ (_ { destroyed = true })+ pure next++ -- | Start/Stop Editing+ eval (NEdit e next) = do+ note <- use _note+ _edit_note .= note+ _edit .= e+ pure next++ -- | Submit+ eval (NEditSubmit e next) = do+ H.liftEffect (preventDefault e)+ edit_note <- use _edit_note+ res <- H.liftAff (editNote edit_note)+ case res.body of+ Left err -> pure next+ Right r -> do+ if (edit_note.id == 0)+ then do+ liftEffect (setHref (fromNullableStr app.noteR) =<< _loc)+ else do+ _note .= edit_note+ _edit .= false+ pure next
+ purs/src/Component/RawHtml.js view
@@ -0,0 +1,8 @@+// use at your own risk!+exports.unsafeSetInnerHTML = function(element) {+ return function(html) {+ return function() {+ element.innerHTML = html;+ };+ };+};
+ purs/src/Component/RawHtml.purs view
@@ -0,0 +1,62 @@+module Component.RawHtml where++import Prelude++import Data.Foldable (for_)+import Data.Maybe (Maybe(..))+import Effect (Effect)+import Effect.Aff (Aff)+import Globals (RawHTML(..))+import Halogen as H+import Halogen.HTML as HH+import Halogen.HTML.Events as HE+import Halogen.HTML.Properties as HP+import Web.HTML (HTMLElement)++foreign import unsafeSetInnerHTML :: HTMLElement -> RawHTML -> Effect Unit++data Query i a+ = SetInnerHTML a+ | Receive (Input i) a++type Input i = i++type Output = Void++type State i =+ { elRef :: H.RefLabel+ , inputval :: Input i+ }++component :: H.Component HH.HTML (Query String) (Input String) Output Aff+component = mkComponent RawHTML++mkComponent :: forall i. (Input i -> RawHTML) -> H.Component HH.HTML (Query i) (Input i) Output Aff+mkComponent toRawHTML = H.lifecycleComponent+ { initialState: \inputval -> { elRef: H.RefLabel "inputval", inputval } + , render+ , eval+ , receiver: HE.input Receive+ , initializer: Just $ H.action SetInnerHTML+ , finalizer: Nothing+ }+ where+ render :: (State i) -> H.ComponentHTML (Query i)+ render state = + HH.div + [ HP.ref state.elRef ] + []++ eval :: (Query i) ~> H.ComponentDSL (State i) (Query i) Output Aff+ eval = case _ of+ SetInnerHTML a -> do+ { elRef } <- H.get+ mel <- H.getHTMLElementRef elRef+ for_ mel \el -> do + { inputval } <- H.get+ H.liftEffect (unsafeSetInnerHTML el (toRawHTML inputval))+ pure a+ + Receive inputval a -> do+ H.modify_ _ { inputval = inputval }+ eval $ SetInnerHTML a
purs/src/Globals.purs view
@@ -11,6 +11,7 @@ import Web.DOM (Element, Node) import Web.HTML (HTMLElement, HTMLFormElement, Window) import Web.XHR.FormData (FormData) +import Data.Newtype (class Newtype) type App = { csrfHeaderName :: String @@ -19,7 +20,8 @@ , csrfToken :: String , homeR :: String , authRlogoutR :: String - , userR :: String + , userR :: Nullable String + , noteR :: Nullable String , dat :: AppData } @@ -89,3 +91,7 @@ closeWindow :: Window -> Effect Unit closeWindow win = pure $ runFn1 _closeWindow win + +newtype RawHTML = RawHTML String + +derive instance newtypeRawHTML :: Newtype RawHTML _
purs/src/Main.purs view
@@ -1,7 +1,63 @@ module Main where -import Effect (Effect) import Prelude +import App (logout) +import Component.Add (addbmark) +import Component.BList (blist) +import Component.NList (nlist) +import Component.NNote (nnote) +import Component.AccountSettings (usetting) +import Data.Foldable (traverse_) +import Effect (Effect) +import Effect.Aff (Aff, launchAff) +import Effect.Class (liftEffect) +import Halogen.Aff as HA +import Halogen.VDom.Driver (runUI) +import Model (Bookmark, Note, AccountSettings) +import Web.DOM.Element (removeAttribute) +import Web.DOM.ParentNode (QuerySelector(..)) +import Web.Event.Event (Event, preventDefault) +import Web.HTML.HTMLElement (toElement) + main :: Effect Unit main = pure unit + +logoutE :: Event -> Effect Unit +logoutE e = void <<< launchAff <<< logout =<< preventDefault e + +renderBookmarks :: String -> Array Bookmark -> Effect Unit +renderBookmarks renderElSelector bmarks = do + HA.runHalogenAff do + HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do + void $ runUI (blist bmarks) unit el + showFooter + +renderAddForm :: String -> Bookmark -> Effect Unit +renderAddForm renderElSelector bmark = do + HA.runHalogenAff do + HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do + runUI (addbmark bmark) unit el + +renderNotes :: String -> Array Note -> Effect Unit +renderNotes renderElSelector notes = do + HA.runHalogenAff do + HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do + void $ runUI (nlist notes) unit el + showFooter + +renderNote :: String -> Note -> Effect Unit +renderNote renderElSelector note = do + HA.runHalogenAff do + HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do + void $ runUI (nnote note) unit el + +renderAccountSettings :: String -> AccountSettings -> Effect Unit +renderAccountSettings renderElSelector accountSettings = do + HA.runHalogenAff do + HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do + void $ runUI (usetting accountSettings) unit el + +showFooter :: Aff Unit +showFooter = HA.selectElement (QuerySelector ".user_footer") >>= traverse_ \el -> + liftEffect $ removeAttribute "hidden" (toElement el)
+ purs/src/Marked.js view
@@ -0,0 +1,7 @@+exports.markedImpl = function(str) {+ marked.setOptions({+ pedantic: false,+ gfm: true+ });+ return marked(str);+};
+ purs/src/Marked.purs view
@@ -0,0 +1,9 @@+module Foreign.Marked where++import Prelude+import Globals (RawHTML(..))++foreign import markedImpl :: String -> String++marked :: String -> RawHTML+marked = RawHTML <<< markedImpl
purs/src/Model.purs view
@@ -1,5 +1,6 @@ module Model where +import Data.Nullable (Nullable) import Simple.JSON as J type BookmarkId = Int @@ -13,8 +14,10 @@ , private :: Boolean , toread :: Boolean , bid :: BookmarkId + , slug :: String , selected :: Boolean , time :: String + , archiveUrl :: Nullable String } newtype Bookmark' = Bookmark' Bookmark @@ -22,12 +25,15 @@ derive newtype instance bookmark_wfI :: J.WriteForeign Bookmark' type NoteId = Int +type NoteSlug = String type Note = { id :: NoteId + , slug :: NoteSlug , title :: String , text :: String , length :: Int + , isMarkdown :: Boolean , created :: String , updated :: String } @@ -35,3 +41,13 @@ newtype Note' = Note' Note derive newtype instance note_rfI :: J.ReadForeign Note' derive newtype instance note_wfI :: J.WriteForeign Note' + +type AccountSettings = + { archiveDefault :: Boolean + , privateDefault :: Boolean + , privacyLock :: Boolean + } + +newtype AccountSettings' = AccountSettings' AccountSettings +derive newtype instance usersettings_rfI :: J.ReadForeign AccountSettings' +derive newtype instance usersettings_wfI :: J.WriteForeign AccountSettings'
− purs/src/User.purs
@@ -1,47 +0,0 @@-module User where - -import Prelude - -import Component.Add (addbmark) -import Component.BList (blist) -import Component.NList (nlist, nnote) -import Data.Foldable (traverse_) -import Effect (Effect) -import Effect.Aff (Aff) -import Effect.Class (liftEffect) -import Halogen.Aff as HA -import Halogen.VDom.Driver (runUI) -import Model (Bookmark, Note) -import Web.DOM.Element (removeAttribute) -import Web.DOM.ParentNode (QuerySelector(..)) -import Web.HTML.HTMLElement (toElement) - -renderBookmarks :: String -> Array Bookmark -> Effect Unit -renderBookmarks renderElSelector bmarks = do - HA.runHalogenAff do - HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do - void $ runUI (blist bmarks) unit el - showFooter - -renderAddForm :: String -> Bookmark -> Effect Unit -renderAddForm renderElSelector bmark = do - HA.runHalogenAff do - HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do - runUI (addbmark bmark) unit el - -renderNotes :: String -> Array Note -> Effect Unit -renderNotes renderElSelector notes = do - HA.runHalogenAff do - HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do - void $ runUI (nlist notes) unit el - showFooter - -renderNote :: String -> Note -> Effect Unit -renderNote renderElSelector note = do - HA.runHalogenAff do - HA.selectElement (QuerySelector renderElSelector) >>= traverse_ \el -> do - void $ runUI (nnote note) unit el - -showFooter :: Aff Unit -showFooter = HA.selectElement (QuerySelector ".user_footer") >>= traverse_ \el -> - liftEffect $ removeAttribute "hidden" (toElement el)
purs/src/Util.purs view
@@ -5,11 +5,13 @@ import Control.Monad.Maybe.Trans (MaybeT(..)) import Data.Array (filter, find, mapMaybe) import Data.Foldable (for_) -import Data.Maybe (Maybe(..), fromJust) +import Data.Maybe (Maybe(..), fromJust, fromMaybe, maybe) +import Data.Nullable (Nullable, toMaybe) import Data.String (Pattern(..), Replacement(..), drop, replaceAll, split, take) import Data.Tuple (Tuple(..), fst, snd) import Effect (Effect) import Global.Unsafe (unsafeDecodeURIComponent) +import Halogen (ClassName(..)) import Halogen.HTML as HH import Halogen.HTML.Properties as HP import Partial.Unsafe (unsafePartial) @@ -111,3 +113,24 @@ _mt_pure :: forall a. Maybe a -> MaybeT Effect a _mt_pure = MaybeT <<< pure + +dummyAttr :: forall r i. HP.IProp r i +dummyAttr = HP.attr (HH.AttrName "data-dummy") "" + +whenP :: forall r i. Boolean -> HP.IProp r i -> HP.IProp r i +whenP b p = if b then p else dummyAttr + +maybeP :: forall a r i. Maybe a -> (a -> HP.IProp r i) -> HP.IProp r i +maybeP m p = maybe dummyAttr p m + +whenC :: Boolean -> ClassName -> ClassName +whenC b c = if b then c else ClassName "" + +whenH :: forall p i. Boolean -> (Unit -> HH.HTML p i) -> HH.HTML p i +whenH b k = if b then k unit else HH.text "" + +maybeH :: forall a p i. Maybe a -> (a -> HH.HTML p i) -> HH.HTML p i +maybeH m k = maybe (HH.text "") k m + +fromNullableStr :: Nullable String -> String +fromNullableStr = fromMaybe "" <<< toMaybe
src/Application.hs view
@@ -21,6 +21,7 @@ import Yesod.Auth (getAuth) import Language.Haskell.TH.Syntax (qLocation) import Lens.Micro+import Network.HTTP.Client.TLS import Network.Wai (Middleware) import Network.Wai.Middleware.Autohead import Network.Wai.Middleware.AcceptOverride@@ -45,15 +46,17 @@ import Handler.Common import Handler.Home import Handler.User+import Handler.AccountSettings import Handler.Add import Handler.Edit import Handler.Notes+import Handler.Docs mkYesodDispatch "App" resourcesApp makeFoundation :: AppSettings -> IO App makeFoundation appSettings = do- appHttpManager <- newManager+ appHttpManager <- getGlobalManager appLogger <- newStdoutLoggerSet defaultBufSize >>= makeYesodLogger store <- EKG.newStore EKG.registerGcMetrics store@@ -86,9 +89,10 @@ makeMiddleware :: WM.WaiMetrics -> Middleware makeMiddleware waiMetrics =- WM.metrics waiMetrics . acceptOverride . autohead . gzip def- { gzipFiles = GzipPreCompressed GzipIgnore- } .+ WM.metrics waiMetrics .+ acceptOverride .+ autohead .+ gzip def {gzipFiles = GzipPreCompressed GzipIgnore} . methodOverride makeLogWare :: App -> IO Middleware@@ -129,7 +133,7 @@ foundation <- makeFoundation settings wsettings <- getDevSettings (warpSettings foundation) app <- makeApplication foundation- void $ forkEKG foundation+ forkEKG foundation return (wsettings, app) getAppSettings :: IO AppSettings@@ -139,12 +143,15 @@ develMain :: IO () develMain = develMainHelper getApplicationDev -forkEKG :: App -> IO EKG.Server+forkEKG :: App -> IO () forkEKG foundation = - EKG.forkServerWith- (appMetrics foundation ^. MM.metricsStore)- "localhost"- 8000+ let settings = appSettings foundation in+ for_ (appEkgHost settings) $ \ekgHost ->+ for_ (appEkgPort settings) $ \ekgPort ->+ EKG.forkServerWith+ (appMetrics foundation ^. MM.metricsStore)+ (encodeUtf8 ekgHost)+ ekgPort -- | The @main@ function for an executable running this site. appMain :: IO ()@@ -152,7 +159,7 @@ settings <- loadYamlSettingsArgs [configSettingsYmlValue] useEnv foundation <- makeFoundation settings app <- makeApplication foundation- void $ forkEKG foundation+ forkEKG foundation runSettings (warpSettings foundation) app getApplicationRepl :: IO (Int, App, Application)@@ -171,5 +178,5 @@ handler h = getAppSettings >>= makeFoundation >>= flip unsafeHandler h -- | Run DB queries-db :: ReaderT SqlBackend (HandlerT App IO) a -> IO a+db :: ReaderT SqlBackend (HandlerFor App) a -> IO a db = handler . runDB
src/Foundation.hs view
@@ -1,3 +1,5 @@+{-# LANGUAGE DeriveGeneric #-} +{-# LANGUAGE StandaloneDeriving #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} module Foundation where @@ -19,8 +21,6 @@ import qualified Data.Text.Encoding as TE import qualified Yesod.Core.Unsafe as Unsafe -deriving instance Typeable Route - data App = App { appSettings :: AppSettings , appStatic :: Static -- ^ Settings for static file serving. @@ -32,6 +32,9 @@ mkYesodData "App" $(parseRoutesFile "config/routes") +deriving instance Typeable Route +deriving instance Generic (Route App) + -- YesodPersist instance YesodPersist App where @@ -63,6 +66,7 @@ urlrender <- getUrlRender mmsg <- getMessage musername <- maybeAuthUsername + muser <- (fmap.fmap) snd maybeAuthPair mcurrentRoute <- getCurrentRoute void $ mapM (incrementRouteEKG req) mcurrentRoute pc <- widgetToPageContent $ do @@ -87,10 +91,8 @@ where genFileName lbs = "autogen-" ++ base64md5 lbs - shouldLog app _source level = - appShouldLogAll (appSettings app) - || level == LevelWarn - || level == LevelError + shouldLogIO app _source level = + pure $ appShouldLogAll (appSettings app) || level == LevelWarn || level == LevelError makeLogger = return . appLogger authRoute _ = Just (AuthR LoginR) @@ -145,39 +147,14 @@ incrementRouteEKG :: YesodRequest -> Route App -> Handler () -incrementRouteEKG req = MM.increment . (\r -> "route." <> r <> "." <> method) . routeToConstr +incrementRouteEKG req = MM.increment . (\r -> "route." <> r <> "." <> method) . pack . constrName where method = decodeUtf8 $ NW.requestMethod $ reqWaiRequest req -routeToConstr :: Route App -> Text -routeToConstr = \case - StaticR _ -> "StaticR" - FaviconR -> "FaviconR" - RobotsR -> "RobotsR" - AuthR _ -> "AuthR" - HomeR -> "HomeR" - UserR _ -> "UserR" - UserSharedR _ _ -> "UserSharedR" - UserFilterR _ _ -> "UserFilterR" - UserTagsR _ _ -> "UserTagsR" - AddViewR -> "AddViewR" - AddR -> "AddR" - DeleteR _ -> "DeleteR" - ReadR _ -> "ReadR" - StarR _ -> "StarR" - UnstarR _ -> "UnstarR" - NotesR _ -> "NotesR" - NoteR _ _ -> "NoteR" - DeleteNoteR _ -> "DeleteNoteR" - AddNoteR -> "AddNoteR" - AddNoteViewR _ -> "AddNoteViewR" - UserSettingsR _ -> "UserSettingsR" - - -- YesodAuth instance YesodAuth App where type AuthId App = UserId - authHttpManager = getHttpManager + -- authHttpManager = getHttpManager authPlugins _ = [dbAuthPlugin] authenticate = authenticateCreds loginDest = const HomeR @@ -192,7 +169,7 @@ instance YesodAuthPersist App instance MM.MonadMetrics Handler where - getMetrics = asks appMetrics + getMetrics = pure . appMetrics =<< getYesod -- session keys @@ -229,14 +206,13 @@ dbPostLoginR :: AuthHandler master TypedContent dbPostLoginR = do - mresult <- lift $ runInputPostResult (dbLoginCreds - <$> ireq textField "username" - <*> ireq textField "password") + mresult <- runInputPostResult (dbLoginCreds + <$> ireq textField "username" + <*> ireq textField "password") case mresult of - FormSuccess creds -> lift (setCredsRedirect creds) + FormSuccess creds -> setCredsRedirect creds _ -> loginErrorMessageI LoginR InvalidUsernamePass - dbLoginCreds :: Text -> Text -> Creds master dbLoginCreds username password = Creds @@ -245,14 +221,16 @@ , credsExtra = [("password", password)] } -authenticateCreds - :: (AuthId master ~ UserId) - => Creds master - -> Handler (AuthenticationResult App) -authenticateCreds creds = do - muser <- runDB (authenticatePassword - (credsIdent creds) - (fromMaybe "" (lookup "password" (credsExtra creds)))) +authenticateCreds :: + (MonadHandler m, HandlerSite m ~ App) + => Creds App + -> m (AuthenticationResult App) +authenticateCreds Creds {..} = do + muser <- + case credsPlugin of + p | p == dbAuthPluginName -> liftHandler $ runDB $ + join <$> mapM (authenticatePassword credsIdent) (lookup "password" credsExtra) + _ -> pure Nothing case muser of Nothing -> pure (UserError InvalidUsernamePass) Just (Entity uid _) -> pure (Authenticated uid) @@ -260,9 +238,11 @@ -- Util instance RenderMessage App FormMessage where + renderMessage :: App -> [Lang] -> FormMessage -> Text renderMessage _ _ = defaultFormMessage instance HasHttpManager App where + getHttpManager :: App -> Manager getHttpManager = appHttpManager unsafeHandler :: App -> Handler a -> IO a
+ src/Generic.hs view
@@ -0,0 +1,20 @@+module Generic where++import GHC.Generics+import ClassyPrelude.Yesod++constrName :: (HasConstructor (Rep a), Generic a)=> a -> String+constrName = genericConstrName . from ++class HasConstructor (f :: * -> *) where+ genericConstrName :: f x -> String++instance HasConstructor f => HasConstructor (D1 c f) where+ genericConstrName (M1 x) = genericConstrName x++instance (HasConstructor x, HasConstructor y) => HasConstructor (x :+: y) where+ genericConstrName (L1 l) = genericConstrName l+ genericConstrName (R1 r) = genericConstrName r++instance Constructor c => HasConstructor (C1 c f) where+ genericConstrName x = conName x
+ src/Handler/AccountSettings.hs view
@@ -0,0 +1,50 @@+module Handler.AccountSettings where++import Import+import qualified ClassyPrelude.Yesod as CP++getAccountSettingsR :: Handler Html+getAccountSettingsR = do+ (_, user) <- requireAuthPair+ let accountSettingsEl = "accountSettings" :: Text+ let accountSettings = toAccountSettingsForm user+ defaultLayout $ do+ $(widgetFile "user-settings")+ toWidgetBody [julius|+ app.userR = "@{UserR (UserNameP $ userName user)}";+ app.dat.accountSettings = #{ toJSON accountSettings } || []; + |]+ toWidget [julius|+ PS['Main'].renderAccountSettings('##{rawJS accountSettingsEl}')(app.dat.accountSettings)();+ |]++postEditAccountSettingsR :: Handler ()+postEditAccountSettingsR = do+ userId <- requireAuthId+ accountSettingsForm <- requireCheckJsonBody+ runDB (updateUserFromAccountSettingsForm userId accountSettingsForm)+++getChangePasswordR :: Handler Html+getChangePasswordR = do+ void requireAuthId+ req <- getRequest+ defaultLayout $+ $(widgetFile "change-password")++postChangePasswordR :: Handler Html+postChangePasswordR = do+ userId <- requireAuthId+ mauthuname <- maybeAuthUsername+ mresult <- runInputPostResult ((,) <$> ireq textField "oldpassword" <*> ireq textField "newpassword")+ case (mauthuname, mresult) of+ (Just uname, FormSuccess (old, new)) -> do+ muser <- runDB (authenticatePassword uname old)+ case muser of+ Just _ -> do + new' <- liftIO (hashPassword new)+ void $ runDB (update userId [UserPasswordHash CP.=. new'])+ setMessage "Password Changed Successfully"+ _ -> setMessage "Incorrect Old Password"+ _ -> setMessage "Missing Required Fields"+ redirect ChangePasswordR
src/Handler/Add.hs view
@@ -1,9 +1,7 @@-{-# OPTIONS_GHC -fno-warn-unused-matches #-} - module Handler.Add where import Import -import Database.Persist.Sql +import Handler.Archive import Data.List (nub) -- View @@ -26,21 +24,24 @@ app.dat.bmark = #{ toJSON (fromMaybe formurl mformdb) }; |] toWidget [julius| - PS['User'].renderAddForm('##{rawJS renderEl}')(app.dat.bmark)(); + PS['Main'].renderAddForm('##{rawJS renderEl}')(app.dat.bmark)(); |] bookmarkFormUrl :: Handler BookmarkForm -bookmarkFormUrl = +bookmarkFormUrl = do + Entity _ user <- requireAuth BookmarkForm <$> (lookupGetParam "url" >>= pure . fromMaybe "") <*> (lookupGetParam "title") <*> (lookupGetParam "description" >>= pure . fmap Textarea) <*> (lookupGetParam "tags") - <*> (lookupGetParam "private" >>= pure . fmap parseChk) + <*> (lookupGetParam "private" >>= pure . fmap parseChk <&> (<|> Just (userPrivateDefault user))) <*> (lookupGetParam "toread" >>= pure . fmap parseChk) <*> pure Nothing <*> pure Nothing <*> pure Nothing + <*> pure Nothing + <*> pure Nothing where parseChk s = s == "yes" || s == "on" @@ -55,10 +56,12 @@ _handleFormSuccess :: BookmarkForm -> Handler (UpsertResult, Key Bookmark) _handleFormSuccess bookmarkForm = do - cpprint bookmarkForm - userId <- requireAuthId - time <- liftIO getCurrentTime - runDB (upsertBookmark kbid (_toBookmark userId time bookmarkForm) tags) + (userId, user) <- requireAuthPair + bm <- liftIO $ _toBookmark userId bookmarkForm + (res, kbid) <- runDB (upsertBookmark mkbid bm tags) + whenM (shouldArchiveBookmark user kbid) $ + void $ async (archiveBookmarkUrl kbid (unpack (bookmarkHref bm))) + pure (res, kbid) where - kbid = toSqlKey <$> _bid bookmarkForm + mkbid = BookmarkKey <$> _bid bookmarkForm tags = maybe [] (nub . words) (_tags bookmarkForm)
+ src/Handler/Archive.hs view
@@ -0,0 +1,106 @@+module Handler.Archive where++import Import+import Data.Function ((&))+import qualified Data.Attoparsec.ByteString.Char8 as AP+import qualified Data.ByteString as BS+import qualified Data.ByteString.Lazy as LBS+import qualified Data.ByteString.Char8 as BS8+import qualified Network.HTTP.Client as NH+import qualified Network.HTTP.Client.TLS as NH+import qualified Network.HTTP.Types.Status as NH+import qualified Web.FormUrlEncoded as WH+import qualified Control.Monad.Metrics as MM++shouldArchiveBookmark :: User -> Key Bookmark -> Handler Bool+shouldArchiveBookmark user kbid = do+ runDB (get kbid) >>= \case+ Nothing -> pure False+ Just bm -> do+ pure $+ (isNothing $ bookmarkArchiveHref bm) &&+ (bookmarkShared bm)+ && not (_isArchiveBlacklisted bm)+ && not (userPrivacyLock user)+ && userArchiveDefault user++archiveBookmarkUrl :: Key Bookmark -> String -> Handler ()+archiveBookmarkUrl kbid url =+ (_fetchArchiveSubmitInfo >>= \case+ Left e -> do+ MM.increment "archive.fetchSubmitId_noparse"+ $(logError) (pack e)+ Right submitInfo -> do+ userId <- requireAuthId+ let req = _buildArchiveSubmitRequest submitInfo url+ MM.increment "archive.submit" + res <- liftIO $ NH.httpLbs req =<< NH.getGlobalManager+ let status = NH.responseStatus res+ MM.increment ("archive.submit_status_" <> (pack.show) (NH.statusCode status)) + let updateArchiveUrl = runDB . updateBookmarkArchiveUrl userId kbid . Just+ headers = NH.responseHeaders res+ case status of+ s | s == NH.status200 ->+ for_ (lookup "Refresh" headers >>= _parseRefreshHeaderUrl) updateArchiveUrl+ s | s == NH.status302 -> + for_ (lookup "Location" headers) (updateArchiveUrl . decodeUtf8)+ _ -> $(logError) (pack (show res)))+ `catch` (\(e::SomeException) -> ($(logError) $ (pack.show) e) >> throwIO e)++_isArchiveBlacklisted :: Bookmark -> Bool+_isArchiveBlacklisted (Bookmark {..}) =+ [ "hulu"+ , "livestream"+ , "netflix"+ , "skillsmatter"+ , "twitch.tv"+ , "vimeo"+ , "youtu.be"+ , "youtube"+ , "archive."+ ] &+ any (`isInfixOf` bookmarkHref)++_parseRefreshHeaderUrl :: ByteString -> Maybe Text+_parseRefreshHeaderUrl h = do+ let u = BS8.drop 1 $ BS8.dropWhile (/= '=') h+ if (not (null u))+ then Just $ decodeUtf8 u+ else Nothing++_buildArchiveSubmitRequest :: (String, String) -> String -> NH.Request+_buildArchiveSubmitRequest (action, submitId) href =+ NH.parseRequest_ ("POST " <> action) & \r ->+ r { NH.requestHeaders =+ [ ("User-Agent", _archiveUserAgent)+ , ("Content-Type", "application/x-www-form-urlencoded")+ ]+ , NH.requestBody = NH.RequestBodyLBS $ WH.urlEncodeAsForm ((+ [ ("submitid" , submitId)+ , ("url", href)+ ]) :: [(String, String)])+ , NH.redirectCount = 0+ }++_fetchArchiveSubmitInfo :: Handler (Either String (String , String))+_fetchArchiveSubmitInfo = do+ MM.increment "archive.fetchSubmitId" + res <- liftIO $ NH.httpLbs buildSubmitRequest =<< NH.getGlobalManager+ MM.increment ("archive.fetchSubmitId_status_" <> (pack.show) (NH.statusCode (NH.responseStatus res))) + let body = LBS.toStrict (responseBody res)+ action = _parseSubstring (AP.string "action=\"") (AP.notChar '"') body+ submitId = _parseSubstring (AP.string "submitid\" value=\"") (AP.notChar '"') body+ pure $ (,) <$> action <*> submitId+ where+ buildSubmitRequest =+ NH.parseRequest_ "https://archive.li/" & \r ->+ r {NH.requestHeaders = [("User-Agent", _archiveUserAgent)]}++_archiveUserAgent :: ByteString+_archiveUserAgent = "espial"++_parseSubstring :: AP.Parser ByteString -> AP.Parser Char -> BS.ByteString -> Either String String+_parseSubstring start inner res = do+ (flip AP.parseOnly) res (skipAnyTill start >> AP.many1 inner)+ where+ skipAnyTill end = go where go = end *> pure () <|> AP.anyChar *> go
src/Handler/Common.hs view
@@ -24,7 +24,7 @@ lookupPagingParams = do cq <- fmap parseMaybe (lookupGetParam "count") cs <- fmap parseMaybe (lookupSession "count")- mapM_ (setSession "count" . (pack . show)) cq+ for_ cq (setSession "count" . (pack . show)) pq <- fmap parseMaybe (lookupGetParam "page") pure (cq <|> cs, pq) where
+ src/Handler/Docs.hs view
@@ -0,0 +1,9 @@+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++module Handler.Docs where++import Import++getDocsSearchR :: Handler Html+getDocsSearchR = popupLayout $+ $(widgetFile "docs-search")
src/Handler/Edit.hs view
@@ -12,7 +12,7 @@ deleteDeleteR bid = do userId <- requireAuthId runDB $ do- let k_bid = toSqlKey bid+ let k_bid = BookmarkKey bid _ <- requireResource userId k_bid deleteCascade k_bid return ""@@ -21,7 +21,7 @@ postReadR bid = do userId <- requireAuthId runDB $ do- let k_bid = toSqlKey bid+ let k_bid = BookmarkKey bid _ <- requireResource userId k_bid update k_bid [BookmarkToRead =. False] return ""@@ -38,7 +38,7 @@ _setSelected bid selected = do userId <- requireAuthId runDB $ do- let k_bid = toSqlKey bid+ let k_bid = BookmarkKey bid bm <- requireResource userId k_bid update k_bid [BookmarkSelected =. selected] pure ""
src/Handler/Notes.hs view
@@ -3,82 +3,88 @@ import Import import Handler.Common (lookupPagingParams)-import Database.Persist.Sql import qualified Data.Aeson as A+import qualified Data.Text as T getNotesR :: UserNameP -> Handler Html getNotesR unamep@(UserNameP uname) = do void requireAuthId (limit', page') <- lookupPagingParams+ let queryp = "query" :: Text+ mquery <- lookupGetParam queryp let limit = maybe 20 fromIntegral limit' page = maybe 1 fromIntegral page'- renderEl = "notes" :: Text+ mqueryp = fmap (\q -> (queryp, q)) mquery (bcount, notes) <- runDB $ do Entity userId _ <- getBy404 (UniqueUserName uname)- getNoteList userId limit page+ getNoteList userId mquery limit page req <- getRequest mroute <- getCurrentRoute - let pager = $(widgetFile "pager") defaultLayout $ do+ let pager = $(widgetFile "pager")+ search = $(widgetFile "search")+ renderEl = "notes" :: Text $(widgetFile "notes") toWidgetBody [julius| app.userR = "@{UserR unamep}"; app.dat.notes = #{ toJSON notes } || []; |] toWidget [julius|- PS['User'].renderNotes('##{rawJS renderEl}')(app.dat.notes)();+ PS['Main'].renderNotes('##{rawJS renderEl}')(app.dat.notes)(); |] -getNoteR :: UserNameP -> Int64 -> Handler Html-getNoteR unamep@(UserNameP uname) nid = do+getNoteR :: UserNameP -> NtSlug -> Handler Html+getNoteR unamep@(UserNameP uname) slug = do void requireAuthId let renderEl = "note" :: Text note <- runDB $ do Entity userId _ <- getBy404 (UniqueUserName uname)- mnote <- getNote userId nid+ mnote <- getNote userId slug maybe notFound pure mnote defaultLayout $ do+ addScript (StaticR js_marked_min_js) $(widgetFile "note") toWidgetBody [julius| app.userR = "@{UserR unamep}"; app.dat.note = #{ toJSON note } || []; |] toWidget [julius|- PS['User'].renderNote('##{rawJS renderEl}')(app.dat.note)();+ PS['Main'].renderNote('##{rawJS renderEl}')(app.dat.note)(); |] getAddNoteViewR :: UserNameP -> Handler Html getAddNoteViewR unamep@(UserNameP uname) = do userId <- requireAuthId- time <- liftIO getCurrentTime let renderEl = "note" :: Text- let note = Entity (toSqlKey 0) $ _toNote userId time (NoteForm Nothing Nothing Nothing Nothing Nothing)+ note <- liftIO $ Entity (NoteKey 0) <$> _toNote userId (NoteForm Nothing Nothing Nothing Nothing Nothing Nothing Nothing) defaultLayout $ do+ addScript (StaticR js_marked_min_js) $(widgetFile "note") toWidgetBody [julius| app.userR = "@{UserR unamep}";+ app.noteR = "@{NoteR unamep (noteSlug (entityVal note))}"; app.dat.note = #{ toJSON note } || []; |] toWidget [julius|- PS['User'].renderNote('##{rawJS renderEl}')(app.dat.note)();+ PS['Main'].renderNote('##{rawJS renderEl}')(app.dat.note)(); |] deleteDeleteNoteR :: Int64 -> Handler Html-deleteDeleteNoteR bid = do+deleteDeleteNoteR nid = do userId <- requireAuthId runDB $ do- let k_bid = toSqlKey bid- _ <- requireResource userId k_bid- deleteCascade k_bid+ let k_nid = NoteKey nid+ _ <- requireResource userId k_nid+ deleteCascade k_nid return "" postAddNoteR :: Handler () postAddNoteR = do noteForm <- requireCheckJsonBody _handleFormSuccess noteForm >>= \case- (Created, bid) -> sendStatusJSON created201 bid+ (Created, nid) -> sendStatusJSON created201 nid (Updated, _) -> sendResponseStatus noContent204 () requireResource :: UserId -> Key Note -> DBM Handler Note@@ -90,17 +96,18 @@ _handleFormSuccess :: NoteForm -> Handler (UpsertResult, Key Note) _handleFormSuccess noteForm = do- cpprint noteForm userId <- requireAuthId- time <- liftIO getCurrentTime- runDB (upsertNote kbid (_toNote userId time noteForm))+ note <- liftIO $ _toNote userId noteForm+ runDB (upsertNote knid note) where- kbid = toSqlKey <$> (_id noteForm >>= \i -> if i > 0 then Just i else Nothing)+ knid = NoteKey <$> (_id noteForm >>= \i -> if i > 0 then Just i else Nothing) data NoteForm = NoteForm { _id :: Maybe Int64+ , _slug :: Maybe NtSlug , _title :: Maybe Text , _text :: Maybe Textarea+ , _isMarkdown :: Maybe Bool , _created :: Maybe UTCTimeStr , _updated :: Maybe UTCTimeStr } deriving (Show, Eq, Read, Generic)@@ -111,11 +118,17 @@ gNoteFormOptions :: A.Options gNoteFormOptions = A.defaultOptions { A.fieldLabelModifier = drop 1 } -_toNote :: UserId -> UTCTime -> NoteForm -> Note-_toNote userId time NoteForm {..} =- Note userId - (length _text)- (fromMaybe "" _title)- (maybe "" unTextarea _text)- (fromMaybe time (fmap unUTCTimeStr _created))- (fromMaybe time (fmap unUTCTimeStr _updated))+_toNote :: UserId -> NoteForm -> IO Note+_toNote userId NoteForm {..} = do+ time <- liftIO getCurrentTime+ slug <- maybe mkNtSlug pure _slug+ pure $+ Note+ userId+ slug+ (length _text)+ (fromMaybe "" _title)+ (maybe "" unTextarea _text)+ (fromMaybe False _isMarkdown)+ (fromMaybe time (fmap unUTCTimeStr _created))+ (fromMaybe time (fmap unUTCTimeStr _updated))
src/Handler/User.hs view
@@ -2,14 +2,9 @@ module Handler.User where import Import +import qualified Data.Text as T import Handler.Common (lookupPagingParams) -getUserSettingsR :: UserNameP -> Handler Html -getUserSettingsR uname@(UserNameP name) = do - void requireAuthId - defaultLayout $ do - $(widgetFile "user-settings") - getUserR :: UserNameP -> Handler Html getUserR uname@(UserNameP name) = do _getUser uname SharedAll FilterAll (TagsP []) @@ -38,17 +33,24 @@ FilterSingle _ -> filterp' _ -> if isowner then filterp' else FilterAll isAll = filterp == FilterAll && sharedp == SharedAll && pathtags == [] + queryp = "query" :: Text + mquery <- lookupGetParam queryp + let mqueryp = fmap (\q -> (queryp, q)) mquery (bcount, bmarks, alltags) <- runDB $ - do Entity userId _ <- getBy404 (UniqueUserName uname) - (cnt, bm) <- bookmarksQuery userId sharedp filterp pathtags limit page + do Entity userId user <- getBy404 (UniqueUserName uname) + when (not isowner && userPrivacyLock user) + (redirect (AuthR LoginR)) + (cnt, bm) <- bookmarksQuery userId sharedp filterp pathtags mquery limit page tg <- tagsQuery bm pure (cnt, bm, tg) + when (bcount == 0) (case filterp of FilterSingle _ -> notFound; _ -> pure ()) mroute <- getCurrentRoute - let pager = $(widgetFile "pager") - let renderEl = "bookmarks" :: Text req <- getRequest defaultLayout $ do + let pager = $(widgetFile "pager") + search = $(widgetFile "search") + renderEl = "bookmarks" :: Text $(widgetFile "user") toWidgetBody [julius| app.dat.bmarks = #{ toJSON $ toBookmarkFormList bmarks alltags } || []; @@ -56,6 +58,5 @@ app.userR = "@{UserR unamep}"; |] toWidget [julius| - PS['User'].renderBookmarks('##{rawJS renderEl}')(app.dat.bmarks)(); + PS['Main'].renderBookmarks('##{rawJS renderEl}')(app.dat.bmarks)(); |] - where
src/Import/NoFoundation.hs view
@@ -19,10 +19,11 @@ import Text.Julius as Import import Model as Import-import ModelCrypto as Import+import ModelCustom as Import import Types as Import import Pretty as Import import Data.Functor as Import+import Generic as Import #if MIN_VERSION_base(4, 11, 0)
src/Model.hs view
@@ -2,34 +2,44 @@ module Model where +import qualified ClassyPrelude.Yesod as CP import qualified Data.Aeson as A - -import Control.Monad.Writer (tell, appEndo, Endo(..)) - -import Types -import ModelCrypto -import Pretty -import ClassyPrelude.Yesod -import System.Directory - +import qualified Data.Attoparsec.Text as P +import qualified Control.Monad.Combinators as PC +import qualified Data.List.NonEmpty as NE +import qualified Data.Time.ISO8601 as TI +import qualified Database.Esqueleto as E +import qualified Data.Time as TI +import ClassyPrelude.Yesod hiding ((||.)) import Control.Monad.Trans.Maybe +import Control.Monad.Writer (tell) +import Data.Char (isSpace) +import Data.Either (fromRight) +import Data.Foldable (foldl, foldl1, sequenceA_) +import Data.List.NonEmpty (NonEmpty(..)) import Database.Esqueleto hiding ((==.)) -import qualified Database.Esqueleto as E -import qualified Data.Time.ISO8601 as TI -import qualified Pinboard as PB +import Pretty +import System.Directory +import Types --- Physical model +import ModelCustom share [mkPersist sqlSettings, mkDeleteCascade sqlSettings, mkMigrate "migrateSchema"] [persistLowerCase| User json + Id Int64 name Text passwordHash BCrypt apiToken Text Maybe + privateDefault Bool + archiveDefault Bool + privacyLock Bool UniqueUserName name deriving Show Eq Typeable Ord Bookmark json + Id Int64 userId UserId + slug BmSlug default="(lower(hex(randomblob(6))))" href Text description Text extended Text @@ -37,10 +47,13 @@ shared Bool toRead Bool selected Bool + archiveHref Text Maybe UniqueUserHref userId href + UniqueUserSlug userId slug deriving Show Eq Typeable Ord BookmarkTag json + Id Int64 userId UserId tag Text bookmarkId BookmarkId @@ -50,17 +63,18 @@ deriving Show Eq Typeable Ord Note json + Id Int64 userId UserId + slug NtSlug default="(lower(hex(randomblob(10))))" length Int title Text text Text + isMarkdown Bool created UTCTime updated UTCTime deriving Show Eq Typeable Ord |] --- UTCTimeStr - newtype UTCTimeStr = UTCTimeStr { unUTCTimeStr :: UTCTime } deriving (Eq, Show, Read, Generic, FromJSON, ToJSON) @@ -69,9 +83,6 @@ toPathPiece (UTCTimeStr u) = pack (TI.formatISO8601Millis u) fromPathPiece s = UTCTimeStr <$> TI.parseISO8601 (unpack s) - --- newtypes - newtype UserNameP = UserNameP { unUserNameP :: Text } deriving (Eq, Show, Read) @@ -91,7 +102,7 @@ | FilterUnread | FilterUntagged | FilterStarred - | FilterSingle Int64 + | FilterSingle BmSlug deriving (Eq, Show, Read) newtype UnreadOnly = @@ -101,8 +112,6 @@ type Limit = Int64 type Page = Int64 --- Migration - migrateAll :: Migration migrateAll = migrateSchema >> migrateIndexes @@ -123,12 +132,6 @@ , "CREATE INDEX IF NOT EXISTS idx_note_user_created ON note (user_id, created DESC)" ] - - - - --- User - authenticatePassword :: Text -> Text -> DB (Maybe (Entity User)) authenticatePassword username password = do muser <- getBy (UniqueUserName username) @@ -138,26 +141,21 @@ if validatePasswordHash (userPasswordHash (entityVal dbuser)) password then return (Just dbuser) else return Nothing - - - - getUserByName :: UserNameP -> DB (Maybe (Entity User)) getUserByName (UserNameP uname) = do selectFirst [UserName ==. uname] [] --- bookmarks - bookmarksQuery :: Key User -> SharedP -> FilterP -> [Tag] + -> Maybe Text -> Limit -> Page -> DB (Int, [Entity Bookmark]) -bookmarksQuery userId sharedp filterp tags limit' page = +bookmarksQuery userId sharedp filterp tags mquery limit' page = (,) -- total count <$> fmap (sum . fmap E.unValue) (select $ @@ -175,23 +173,77 @@ where _whereClause b = do where_ $ - foldMap (\tag -> Endo $ (&&.) - (exists $ -- each tag becomes an exists constraint - from $ \t -> - where_ (t ^. BookmarkTagBookmarkId E.==. b ^. BookmarkId &&. - (t ^. BookmarkTagTag E.==. val tag)))) tags - `appEndo` (b ^. BookmarkUserId E.==. val userId) + foldl (\expr tag -> + expr &&. (exists $ -- each tag becomes an exists constraint + from $ \t -> + where_ (t ^. BookmarkTagBookmarkId E.==. b ^. BookmarkId &&. + (t ^. BookmarkTagTag `E.like` val tag)))) + (b ^. BookmarkUserId E.==. val userId) + tags case sharedp of SharedAll -> pure () SharedPublic -> where_ (b ^. BookmarkShared E.==. val True) SharedPrivate -> where_ (b ^. BookmarkShared E.==. val False) case filterp of FilterAll -> pure () - FilterUnread -> where_ (b ^. BookmarkToRead E.==. val True) - FilterStarred -> where_ (b ^. BookmarkSelected E.==. val True) - FilterSingle i -> where_ (b ^. BookmarkId E.==. val (toSqlKey i)) - FilterUntagged -> where_ $ notExists $ from (\t -> where_ $ t ^. BookmarkTagBookmarkId E.==. b ^. BookmarkId) + FilterUnread -> where_ (b ^. BookmarkToRead E.==. val True) + FilterStarred -> where_ (b ^. BookmarkSelected E.==. val True) + FilterSingle slug -> where_ (b ^. BookmarkSlug E.==. val slug) + FilterUntagged -> where_ $ notExists $ from (\t -> where_ $ + (t ^. BookmarkTagBookmarkId E.==. b ^. BookmarkId)) + -- search + sequenceA_ (parseSearchQuery (toLikeExpr b) =<< mquery) + toLikeExpr :: E.SqlExpr (Entity Bookmark) -> Text -> E.SqlExpr (E.Value Bool) + toLikeExpr b term = fromRight p_allFields (P.parseOnly p_onefield term) + where + wild s = (E.%) ++. val s ++. (E.%) + toLikeB field s = b ^. field `E.like` wild s + p_allFields = + (toLikeB BookmarkHref term) ||. + (toLikeB BookmarkDescription term) ||. + (toLikeB BookmarkExtended term) ||. + (exists $ from (\t -> where_ $ + (t ^. BookmarkTagBookmarkId E.==. b ^. BookmarkId) &&. + (t ^. BookmarkTagTag `E.like` (wild term)))) + p_onefield = p_url <|> p_title <|> p_description <|> p_tags <|> p_after <|> p_before + where + p_url = "url:" *> fmap (toLikeB BookmarkHref) P.takeText + p_title = "title:" *> fmap (toLikeB BookmarkDescription) P.takeText + p_description = "description:" *> fmap (toLikeB BookmarkExtended) P.takeText + p_tags = "tags:" *> fmap (\term' -> exists $ from (\t -> where_ $ + (t ^. BookmarkTagBookmarkId E.==. b ^. BookmarkId) &&. + (t ^. BookmarkTagTag `E.like` wild term'))) P.takeText + p_after = "after:" *> fmap ((b ^. BookmarkTime E.>=.) . val) (parseTimeText =<< P.takeText) + p_before = "before:" *> fmap ((b ^. BookmarkTime E.<=.) . val) (parseTimeText =<< P.takeText) + +parseSearchQuery :: + (Text -> E.SqlExpr (E.Value Bool)) + -> Text + -> Maybe (E.SqlQuery ()) +parseSearchQuery toExpr = + fmap where_ . either (const Nothing) Just . P.parseOnly andE + where + andE = foldl1 (&&.) <$> P.many1 (P.skipSpace *> orE <|> tokenTermE) + orE = foldl1 (||.) <$> tokenTermE `P.sepBy1` P.char '|' + tokenTermE = negE termE <|> termE + where + negE p = not_ <$> (P.char '-' *> p) + termE = toExpr <$> (fieldTerm <|> quotedTerm <|> simpleTerm) + fieldTerm = concat <$> sequence [simpleTerm, P.string ":", quotedTerm <|> simpleTerm] + quotedTerm = PC.between (P.char '"') (P.char '"') (P.takeWhile1 (/= '"')) + simpleTerm = P.takeWhile1 (\c -> not (isSpace c) && c /= ':' && c /= '|') + +parseTimeText :: (TI.ParseTime t, Monad m, Alternative m) => Text -> m t +parseTimeText t = + asum $ + flip (parseTimeM True defaultTimeLocale) (unpack t) <$> + [ "%-m/%-d/%Y" , "%-m/%-d/%Y%z" , "%-m/%-d/%Y%Z" -- 12/31/2018 + , "%Y-%-m-%-d" , "%Y-%-m-%-d%z" , "%Y-%-m-%-d%Z" -- 2018-12-31 + , "%Y-%-m-%-dT%T" , "%Y-%-m-%-dT%T%z" , "%Y-%-m-%-dT%T%Z" -- 2018-12-31T06:40:53 + , "%s" -- 1535932800 + ] + tagsQuery :: [Entity Bookmark] -> DB [Entity BookmarkTag] tagsQuery bmarks = select $ @@ -206,26 +258,44 @@ -- Note List Query -getNote :: Key User -> Int64 -> DB (Maybe (Entity Note)) -getNote userKey nid = - selectFirst [NoteUserId ==. userKey, NoteId ==. toSqlKey nid] [] +getNote :: Key User -> NtSlug -> DB (Maybe (Entity Note)) +getNote userKey slug = + selectFirst [NoteUserId ==. userKey, NoteSlug ==. slug] [] -getNoteList :: Key User -> Limit -> Page -> DB (Int, [Entity Note]) -getNoteList key limit' page = +getNoteList :: Key User -> Maybe Text -> Limit -> Page -> DB (Int, [Entity Note]) +getNoteList key mquery limit' page = (,) -- total count <$> fmap (sum . fmap E.unValue) (select $ from $ \b -> do - where_ (b ^. NoteUserId E.==. val key) + _whereClause b pure $ E.countRows) <*> (select $ from $ \b -> do - where_ (b ^. NoteUserId E.==. val key) + _whereClause b orderBy [desc (b ^. NoteCreated)] limit limit' offset ((page - 1) * limit') pure b) + where + _whereClause b = do + where_ $ (b ^. NoteUserId E.==. val key) + -- search + sequenceA_ (parseSearchQuery (toLikeExpr b) =<< mquery) + toLikeExpr :: E.SqlExpr (Entity Note) -> Text -> E.SqlExpr (E.Value Bool) + toLikeExpr b term = fromRight p_allFields (P.parseOnly p_onefield term) + where + wild s = (E.%) ++. val s ++. (E.%) + toLikeN field s = b ^. field `E.like` wild s + p_allFields = toLikeN NoteTitle term ||. toLikeN NoteText term + p_onefield = p_title <|> p_text <|> p_after <|> p_before + where + p_title = "title:" *> fmap (toLikeN NoteTitle) P.takeText + p_text = "description:" *> fmap (toLikeN NoteText) P.takeText + p_after = "after:" *> fmap ((b ^. NoteCreated E.>=.) . val) (parseTimeText =<< P.takeText) + p_before = "before:" *> fmap ((b ^. NoteCreated E.<=.) . val) (parseTimeText =<< P.takeText) + -- Bookmark Files bookmarkEntityToTags :: Entity Bookmark -> [Tag] -> [BookmarkTag] @@ -236,55 +306,103 @@ (zip [1 ..] tags) -pbPostToBookmark :: UserId -> PB.Post -> Bookmark -pbPostToBookmark user PB.Post {..} = - Bookmark user postHref postDescription postExtended postTime postShared postToRead False +fileBookmarkToBookmark :: UserId -> FileBookmark -> IO Bookmark +fileBookmarkToBookmark user (FileBookmark {..}) = do + slug <- mkBmSlug + pure $ + Bookmark + user + slug + fileBookmarkHref + fileBookmarkDescription + fileBookmarkExtended + fileBookmarkTime + fileBookmarkShared + fileBookmarkToRead + False + Nothing -insertFilePbPosts :: Key User -> FilePath -> DB () -insertFilePbPosts userId bookmarkFile = do - posts' <- liftIO $ readPbPostFileJson bookmarkFile - case posts' of +insertFileBookmarks :: Key User -> FilePath -> DB () +insertFileBookmarks userId bookmarkFile = do + mfmarks <- liftIO $ readFileBookmarks bookmarkFile + case mfmarks of Left e -> print e - Right posts -> do - let bookmarks = fmap (pbPostToBookmark userId) posts + Right fmarks -> do + bookmarks <- liftIO $ mapM (fileBookmarkToBookmark userId) fmarks mbookmarkIds <- mapM insertUnique bookmarks let bookmarkTags = concatMap (uncurry bookmarkEntityToTags) $ catMaybes $ - zipWith3 (\mk v p -> map (\k -> (Entity k v, PB.postTags p)) mk) + zipWith3 (\mk v p -> map (\k -> (Entity k v, fileBookmarkTags p)) mk) mbookmarkIds bookmarks - posts + fmarks void $ mapM insertUnique bookmarkTags where - readPbPostFileJson :: MonadIO m => FilePath -> m (Either String [PB.Post]) - readPbPostFileJson fpath = pure . A.eitherDecode' . fromStrict =<< readFile fpath + readFileBookmarks :: MonadIO m => FilePath -> m (Either String [FileBookmark]) + readFileBookmarks fpath = pure . A.eitherDecode' . fromStrict =<< readFile fpath type Tag = Text -- Notes -pbNoteToNote :: UserId -> PB.Note -> Note -pbNoteToNote user PB.Note {..} = - Note user noteLength noteTitle noteText noteCreatedAt noteUpdatedAt +fileNoteToNote :: UserId -> FileNote -> IO Note +fileNoteToNote user (FileNote {..} ) = do + slug <- mkNtSlug + pure $ + Note + user + slug + fileNoteLength + fileNoteTitle + fileNoteText + False + fileNoteCreatedAt + fileNoteUpdatedAt -insertDirPbNotes :: Key User -> FilePath -> DB () -insertDirPbNotes userId noteDirectory = do - pbnotes' <- liftIO $ readPbNoteFileJson noteDirectory - case pbnotes' of +insertDirFileNotes :: Key User -> FilePath -> DB () +insertDirFileNotes userId noteDirectory = do + mfnotes <- liftIO $ readFileNotes noteDirectory + case mfnotes of Left e -> print e - Right pbnotes -> do - let notes = fmap (pbNoteToNote userId) pbnotes + Right fnotes -> do + notes <- liftIO $ mapM (fileNoteToNote userId) fnotes void $ mapM insertUnique notes where - readPbNoteFileJson :: MonadIO m => FilePath -> m (Either String [PB.Note]) - readPbNoteFileJson fdir = do + readFileNotes :: MonadIO m => FilePath -> m (Either String [FileNote]) + readFileNotes fdir = do files <- liftIO (listDirectory fdir) noteBSS <- mapM (readFile . (fdir </>)) files pure (mapM (A.eitherDecode' . fromStrict) noteBSS) +-- AccountSettingsForm +data AccountSettingsForm = AccountSettingsForm + { _privateDefault :: Bool + , _archiveDefault :: Bool + , _privacyLock :: Bool + } deriving (Show, Eq, Read, Generic) + +instance FromJSON AccountSettingsForm where parseJSON = A.genericParseJSON gDefaultFormOptions +instance ToJSON AccountSettingsForm where toJSON = A.genericToJSON gDefaultFormOptions + +toAccountSettingsForm :: User -> AccountSettingsForm +toAccountSettingsForm (User {..}) = + AccountSettingsForm + { _privateDefault = userPrivateDefault + , _archiveDefault = userArchiveDefault + , _privacyLock = userPrivacyLock + } + +updateUserFromAccountSettingsForm :: Key User -> AccountSettingsForm -> DB () +updateUserFromAccountSettingsForm userId (AccountSettingsForm {..}) = do + CP.update userId + [ UserPrivateDefault CP.=. _privateDefault + , UserArchiveDefault CP.=. _archiveDefault + , UserPrivacyLock CP.=. _privacyLock + ] + -- BookmarkForm data BookmarkForm = BookmarkForm @@ -295,15 +413,17 @@ , _private :: Maybe Bool , _toread :: Maybe Bool , _bid :: Maybe Int64 + , _slug :: Maybe BmSlug , _selected :: Maybe Bool , _time :: Maybe UTCTimeStr + , _archiveUrl :: Maybe Text } deriving (Show, Eq, Read, Generic) -instance FromJSON BookmarkForm where parseJSON = A.genericParseJSON gBookmarkFormOptions -instance ToJSON BookmarkForm where toJSON = A.genericToJSON gBookmarkFormOptions +instance FromJSON BookmarkForm where parseJSON = A.genericParseJSON gDefaultFormOptions +instance ToJSON BookmarkForm where toJSON = A.genericToJSON gDefaultFormOptions -gBookmarkFormOptions :: A.Options -gBookmarkFormOptions = A.defaultOptions { A.fieldLabelModifier = drop 1 } +gDefaultFormOptions :: A.Options +gDefaultFormOptions = A.defaultOptions { A.fieldLabelModifier = drop 1 } toBookmarkFormList :: [Entity Bookmark] -> [Entity BookmarkTag] -> [BookmarkForm] toBookmarkFormList bs as = do @@ -321,20 +441,29 @@ , _tags = Just $ unwords $ fmap (bookmarkTagTag . entityVal) tags , _private = Just $ not bookmarkShared , _toread = Just $ bookmarkToRead - , _bid = Just $ fromSqlKey $ bid + , _bid = Just $ unBookmarkKey $ bid + , _slug = Just $ bookmarkSlug , _selected = Just $ bookmarkSelected , _time = Just $ UTCTimeStr $ bookmarkTime + , _archiveUrl = bookmarkArchiveHref } -_toBookmark :: UserId -> UTCTime -> BookmarkForm -> Bookmark -_toBookmark userId time BookmarkForm {..} = - Bookmark userId _url - (fromMaybe "" _title) - (maybe "" unTextarea _description) - (fromMaybe time (fmap unUTCTimeStr _time)) - (maybe True not _private) - (fromMaybe False _toread) - (fromMaybe False _selected) +_toBookmark :: UserId -> BookmarkForm -> IO Bookmark +_toBookmark userId BookmarkForm {..} = do + time <- liftIO getCurrentTime + slug <- maybe mkBmSlug pure _slug + pure $ + Bookmark + userId + slug + _url + (fromMaybe "" _title) + (maybe "" unTextarea _description) + (fromMaybe time (fmap unUTCTimeStr _time)) + (maybe True not _private) + (fromMaybe False _toread) + (fromMaybe False _selected) + _archiveUrl fetchBookmarkByUrl :: Key User -> Maybe Text -> DB (Maybe (Entity Bookmark, [Entity BookmarkTag])) fetchBookmarkByUrl userId murl = runMaybeT $ do @@ -345,29 +474,38 @@ data UpsertResult = Created | Updated upsertBookmark:: Maybe (Key Bookmark) -> Bookmark -> [Text] -> DB (UpsertResult, Key Bookmark) -upsertBookmark mbid bmark@Bookmark{..} tags = do +upsertBookmark mbid bm tags = do res <- case mbid of Just bid -> do get bid >>= \case - Just _ -> replaceBookmark bid + Just prev_bm -> replaceBookmark bid prev_bm _ -> fail "not found" Nothing -> do - getBy (UniqueUserHref bookmarkUserId bookmarkHref) >>= \case - Just (Entity bid _) -> replaceBookmark bid - _ -> (Created,) <$> insert bmark - insertTags bookmarkUserId (snd res) + getBy (UniqueUserHref (bookmarkUserId bm) (bookmarkHref bm)) >>= \case + Just (Entity bid prev_bm) -> replaceBookmark bid prev_bm + _ -> (Created,) <$> insert bm + insertTags (bookmarkUserId bm) (snd res) pure res where - replaceBookmark bid = do - replace bid bmark + prepareReplace prev_bm = do + if (bookmarkHref bm /= bookmarkHref prev_bm) + then bm { bookmarkArchiveHref = Nothing } + else bm { bookmarkArchiveHref = bookmarkArchiveHref prev_bm } + replaceBookmark bid prev_bm = do + replace bid (prepareReplace prev_bm) deleteTags bid pure (Updated, bid) deleteTags bid = deleteWhere [BookmarkTagBookmarkId ==. bid] insertTags userId bid' = - forM_ (zip [1 ..] tags) $ + for_ (zip [1 ..] tags) $ \(i, tag) -> void $ insert $ BookmarkTag userId tag bid' i +updateBookmarkArchiveUrl :: Key User -> Key Bookmark -> Maybe Text -> DB () +updateBookmarkArchiveUrl userId bid marchiveUrl = do + updateWhere + [BookmarkUserId ==. userId, BookmarkId ==. bid] + [BookmarkArchiveHref CP.=. marchiveUrl] upsertNote:: Maybe (Key Note) -> Note -> DB (UpsertResult, Key Note) upsertNote mnid bmark@Note{..} = do @@ -380,3 +518,52 @@ _ -> fail "not found" Nothing -> do (Created,) <$> insert bmark + +-- * FileBookmarks + +data FileBookmark = FileBookmark + { fileBookmarkHref :: !Text + , fileBookmarkDescription :: !Text + , fileBookmarkExtended :: !Text + , fileBookmarkTime :: !UTCTime + , fileBookmarkShared :: !Bool + , fileBookmarkToRead :: !Bool + , fileBookmarkTags :: [Tag] + } deriving (Show, Eq, Typeable, Ord) + +instance FromJSON FileBookmark where + parseJSON (Object o) = + FileBookmark <$> o .: "href" <*> o .: "description" <*> o .: "extended" <*> + o .: "time" <*> + (boolFromYesNo <$> o .: "shared") <*> + (boolFromYesNo <$> o .: "toread") <*> + (words <$> o .: "tags") + parseJSON _ = fail "bad parse" + +boolFromYesNo :: Text -> Bool +boolFromYesNo "yes" = True +boolFromYesNo _ = False + +-- * FileNotes + +data FileNote = FileNote + { fileNoteId :: !Text + , fileNoteTitle :: !Text + , fileNoteText :: !Text + , fileNoteLength :: !Int + , fileNoteCreatedAt :: !UTCTime + , fileNoteUpdatedAt :: !UTCTime + } deriving (Show, Eq, Typeable, Ord) + +instance FromJSON FileNote where + parseJSON (Object o) = + FileNote <$> o .: "id" <*> o .: "title" <*> o .: "text" <*> + o .: "length" <*> + (readFileNoteTime =<< o .: "created_at") <*> + (readFileNoteTime =<< o .: "updated_at") + parseJSON _ = fail "bad parse" + +readFileNoteTime + :: Monad m + => String -> m UTCTime +readFileNoteTime = parseTimeM True defaultTimeLocale "%F %T"
− src/ModelCrypto.hs
@@ -1,32 +0,0 @@--module ModelCrypto where--import Prelude--import Crypto.BCrypt as Import hiding (hashPassword)-import Database.Persist.Sql-import Safe (fromJustNote)-import qualified Data.Text as T-import qualified Data.Text.Encoding as TE-import qualified Data.Aeson as A--policy :: HashingPolicy-policy =- HashingPolicy- { preferredHashCost = 12- , preferredHashAlgorithm = "$2a$"- }--newtype BCrypt = BCrypt- { unBCrypt :: T.Text- } deriving (Eq, PersistField, PersistFieldSql, Show, Ord, A.FromJSON, A.ToJSON)--hashPassword :: T.Text -> IO BCrypt-hashPassword rawPassword = do- mPassword <- hashPasswordUsingPolicy policy (TE.encodeUtf8 rawPassword)- return- (BCrypt (TE.decodeUtf8 (fromJustNote "Invalid hashing policy" mPassword)))--validatePasswordHash :: BCrypt -> T.Text -> Bool-validatePasswordHash hash' pass = do- validatePassword (TE.encodeUtf8 (unBCrypt hash')) (TE.encodeUtf8 pass)
+ src/ModelCustom.hs view
@@ -0,0 +1,60 @@++module ModelCustom where++import Prelude++import Crypto.BCrypt as Import hiding (hashPassword)+import Database.Persist.Sql+import Safe (fromJustNote)+import qualified Data.Text as T+import qualified Data.Text.Encoding as TE+import qualified Data.Aeson as A+import System.Entropy (getEntropy)+import qualified Data.ByteString.Builder as BB+import qualified Data.ByteString.Lazy as LBS++mkSlug :: Int -> IO T.Text+mkSlug size =+ TE.decodeUtf8 . LBS.toStrict . BB.toLazyByteString . BB.byteStringHex <$>+ getEntropy size++-- * Bookmark Slug++newtype BmSlug = BmSlug+ { unBmSlug :: T.Text+ } deriving (Eq, PersistField, PersistFieldSql, Show, Read, Ord, A.FromJSON, A.ToJSON)++mkBmSlug :: IO BmSlug+mkBmSlug = BmSlug <$> mkSlug 6++-- * Note Slug++newtype NtSlug = NtSlug+ { unNtSlug :: T.Text+ } deriving (Eq, PersistField, PersistFieldSql, Show, Read, Ord, A.FromJSON, A.ToJSON)++mkNtSlug :: IO NtSlug+mkNtSlug = NtSlug <$> mkSlug 10++-- * Model Crypto++policy :: HashingPolicy+policy =+ HashingPolicy+ { preferredHashCost = 12+ , preferredHashAlgorithm = "$2a$"+ }++newtype BCrypt = BCrypt+ { unBCrypt :: T.Text+ } deriving (Eq, PersistField, PersistFieldSql, Show, Ord, A.FromJSON, A.ToJSON)++hashPassword :: T.Text -> IO BCrypt+hashPassword rawPassword = do+ mPassword <- hashPasswordUsingPolicy policy (TE.encodeUtf8 rawPassword)+ return+ (BCrypt (TE.decodeUtf8 (fromJustNote "Invalid hashing policy" mPassword)))++validatePasswordHash :: BCrypt -> T.Text -> Bool+validatePasswordHash hash' pass = do+ validatePassword (TE.encodeUtf8 (unBCrypt hash')) (TE.encodeUtf8 pass)
src/PathPiece.hs view
@@ -40,15 +40,16 @@ FilterUnread -> "unread" FilterUntagged -> "untagged" FilterStarred -> "starred" - FilterSingle bid -> "b:" <> (pack . show) bid + FilterSingle slug -> "b:" <> unBmSlug slug fromPathPiece = \case "unread" -> Just FilterUnread "untagged" -> Just FilterUntagged "starred" -> Just FilterStarred s -> case splitOn ":" s of ["b", ""] -> Nothing - ["b", sbid] -> - case readMay sbid of - Just bid -> Just $ FilterSingle bid - _ -> Nothing + ["b", slug] -> Just $ FilterSingle (BmSlug slug) _ -> Nothing + + +deriving instance PathPiece NtSlug +deriving instance PathPiece BmSlug
src/Settings.hs view
@@ -36,7 +36,6 @@ , appIpFromHeader :: Bool -- ^ Get the IP address from the header when logging. Useful when sitting -- behind a reverse proxy.- , appDetailedRequestLogging :: Bool -- ^ Use detailed request logging system , appShouldLogAll :: Bool@@ -56,6 +55,11 @@ , appAuthDummyLogin :: Bool -- ^ Indicate if auth dummy login should be enabled.++ , appEkgHost :: Maybe Text+ -- ^ Host/interface the ekg server should bind to.+ , appEkgPort :: Maybe Int+ -- ^ Port to listen on } instance FromJSON AppSettings where@@ -85,6 +89,9 @@ appAnalytics <- o .:? "analytics" appAuthDummyLogin <- o .:? "auth-dummy-login" .!= dev++ appEkgHost <- o .:? "ekg-host"+ appEkgPort <- o .:? "ekg-port" return AppSettings {..}
src/Types.hs view
@@ -2,12 +2,7 @@ import ClassyPrelude.Yesod -type ControlIO m = (MonadIO m, MonadBaseControl IO m)--type DBM m a =- (ControlIO m, MonadThrow m, Monad m) => SqlPersistT m a--type DBH m a = (DBM m a)+type DBM m a = MonadUnliftIO m => SqlPersistT m a type DB a = forall m. DBM m a @@ -15,3 +10,4 @@ ( PersistEntity val , PersistEntityBackend val ~ SqlBackend , PersistStore (PersistEntityBackend val))+
static/css/main.css view
@@ -22,11 +22,65 @@ [hidden] { display: none !important } - +input::placeholder { + color: lightgray +} +.queryInput { + width: 128px; + padding: 0 22px 0 2px; + border-radius: 3px; + border-style: solid; + border-width: 1px; + border-color: gray; + height: 22px; + line-height: 22px; + transition: width .1s ease-in-out +} +.queryInput.search-inactive {} +.queryInput:focus { + width: 175px; +} +.submitting .queryInput, +.queryInput.search-active { + border-color: #990; + border-width: 2px; + background-color: #FF9; + width: 175px; +} +.queryIcon { + position: absolute; + right: 0; + top:1px; + cursor:pointer; + width:20px; + height: 20px; + fill: currentColor; +} label { cursor: pointer; } - +.close-x-wrap { + float: left; + width: 17px; + height: 17px; + top: 2px; + position: relative; + right: 2px; +} +.close-x { + stroke: gray; + fill: transparent; + stroke-linecap: round; + stroke-width: 3; +} +.query-info-icon { + position: absolute; + top: 0px; + right: -18px; + text-decoration: none; + font-size: 12px; + padding: 0 8px 8px 0; +} .star { margin-left:-20px; font-size:1.2em;
static/js/app.js view
@@ -1,13905 +1,14152 @@-// Generated by purs bundle 0.12.0-var PS = {};-(function(exports) {- "use strict";-- exports.arrayBind = function (arr) {- return function (f) {- var result = [];- for (var i = 0, l = arr.length; i < l; i++) {- Array.prototype.push.apply(result, f(arr[i]));- }- return result;- };- };-})(PS["Control.Bind"] = PS["Control.Bind"] || {});-(function(exports) {- "use strict";-- exports.arrayApply = function (fs) {- return function (xs) {- var l = fs.length;- var k = xs.length;- var result = new Array(l*k);- var n = 0;- for (var i = 0; i < l; i++) {- var f = fs[i];- for (var j = 0; j < k; j++) {- result[n++] = f(xs[j]);- }- }- return result;- };- };-})(PS["Control.Apply"] = PS["Control.Apply"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Semigroupoid = function (compose) {- this.compose = compose;- };- var semigroupoidFn = new Semigroupoid(function (f) {- return function (g) {- return function (x) {- return f(g(x));- };- };- });- var compose = function (dict) {- return dict.compose;- };- exports["compose"] = compose;- exports["Semigroupoid"] = Semigroupoid;- exports["semigroupoidFn"] = semigroupoidFn;-})(PS["Control.Semigroupoid"] = PS["Control.Semigroupoid"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Semigroupoid = PS["Control.Semigroupoid"]; - var Category = function (Semigroupoid0, identity) {- this.Semigroupoid0 = Semigroupoid0;- this.identity = identity;- };- var identity = function (dict) {- return dict.identity;- };- var categoryFn = new Category(function () {- return Control_Semigroupoid.semigroupoidFn;- }, function (x) {- return x;- });- exports["Category"] = Category;- exports["identity"] = identity;- exports["categoryFn"] = categoryFn;-})(PS["Control.Category"] = PS["Control.Category"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var otherwise = true;- exports["otherwise"] = otherwise;-})(PS["Data.Boolean"] = PS["Data.Boolean"] || {});-(function(exports) {- "use strict";-- exports.refEq = function (r1) {- return function (r2) {- return r1 === r2;- };- };-})(PS["Data.Eq"] = PS["Data.Eq"] || {});-(function(exports) {- "use strict";-- exports.boolConj = function (b1) {- return function (b2) {- return b1 && b2;- };- };-- exports.boolDisj = function (b1) {- return function (b2) {- return b1 || b2;- };- };-- exports.boolNot = function (b) {- return !b;- };-})(PS["Data.HeytingAlgebra"] = PS["Data.HeytingAlgebra"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Symbol"]; - var SProxy = (function () {- function SProxy() {-- };- SProxy.value = new SProxy();- return SProxy;- })();- var IsSymbol = function (reflectSymbol) {- this.reflectSymbol = reflectSymbol;- };- var reflectSymbol = function (dict) {- return dict.reflectSymbol;- };- exports["IsSymbol"] = IsSymbol;- exports["reflectSymbol"] = reflectSymbol;- exports["SProxy"] = SProxy;-})(PS["Data.Symbol"] = PS["Data.Symbol"] || {});-(function(exports) {- "use strict";-- exports.unit = {};-})(PS["Data.Unit"] = PS["Data.Unit"] || {});-(function(exports) {- "use strict";-- exports.showIntImpl = function (n) {- return n.toString();- };-- exports.showStringImpl = function (s) {- var l = s.length;- return "\"" + s.replace(- /[\0-\x1F\x7F"\\]/g, // eslint-disable-line no-control-regex- function (c, i) {- switch (c) {- case "\"":- case "\\":- return "\\" + c;- case "\x07": return "\\a";- case "\b": return "\\b";- case "\f": return "\\f";- case "\n": return "\\n";- case "\r": return "\\r";- case "\t": return "\\t";- case "\v": return "\\v";- }- var k = i + 1;- var empty = k < l && s[k] >= "0" && s[k] <= "9" ? "\\&" : "";- return "\\" + c.charCodeAt(0).toString(10) + empty;- }- ) + "\"";- };-})(PS["Data.Show"] = PS["Data.Show"] || {});-(function(exports) {- "use strict";-- exports.unsafeGet = function (label) {- return function (rec) {- return rec[label];- };- };-})(PS["Record.Unsafe"] = PS["Record.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Record.Unsafe"];- exports["unsafeGet"] = $foreign.unsafeGet;-})(PS["Record.Unsafe"] = PS["Record.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Show"];- var Data_Symbol = PS["Data.Symbol"];- var Record_Unsafe = PS["Record.Unsafe"];- var Type_Data_RowList = PS["Type.Data.RowList"]; - var Show = function (show) {- this.show = show;- };- var showString = new Show($foreign.showStringImpl);- var showInt = new Show($foreign.showIntImpl);- var show = function (dict) {- return dict.show;- };- exports["Show"] = Show;- exports["show"] = show;- exports["showInt"] = showInt;- exports["showString"] = showString;-})(PS["Data.Show"] = PS["Data.Show"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Unit"];- var Data_Show = PS["Data.Show"];- exports["unit"] = $foreign.unit;-})(PS["Data.Unit"] = PS["Data.Unit"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.HeytingAlgebra"];- var Data_Symbol = PS["Data.Symbol"];- var Data_Unit = PS["Data.Unit"];- var Record_Unsafe = PS["Record.Unsafe"];- var Type_Data_Row = PS["Type.Data.Row"];- var Type_Data_RowList = PS["Type.Data.RowList"]; - var HeytingAlgebra = function (conj, disj, ff, implies, not, tt) {- this.conj = conj;- this.disj = disj;- this.ff = ff;- this.implies = implies;- this.not = not;- this.tt = tt;- };- var tt = function (dict) {- return dict.tt;- };- var not = function (dict) {- return dict.not;- };- var implies = function (dict) {- return dict.implies;- };- var ff = function (dict) {- return dict.ff;- };- var disj = function (dict) {- return dict.disj;- };- var heytingAlgebraBoolean = new HeytingAlgebra($foreign.boolConj, $foreign.boolDisj, false, function (a) {- return function (b) {- return disj(heytingAlgebraBoolean)(not(heytingAlgebraBoolean)(a))(b);- };- }, $foreign.boolNot, true);- var conj = function (dict) {- return dict.conj;- };- var heytingAlgebraFunction = function (dictHeytingAlgebra) {- return new HeytingAlgebra(function (f) {- return function (g) {- return function (a) {- return conj(dictHeytingAlgebra)(f(a))(g(a));- };- };- }, function (f) {- return function (g) {- return function (a) {- return disj(dictHeytingAlgebra)(f(a))(g(a));- };- };- }, function (v) {- return ff(dictHeytingAlgebra);- }, function (f) {- return function (g) {- return function (a) {- return implies(dictHeytingAlgebra)(f(a))(g(a));- };- };- }, function (f) {- return function (a) {- return not(dictHeytingAlgebra)(f(a));- };- }, function (v) {- return tt(dictHeytingAlgebra);- });- };- exports["HeytingAlgebra"] = HeytingAlgebra;- exports["tt"] = tt;- exports["ff"] = ff;- exports["implies"] = implies;- exports["conj"] = conj;- exports["disj"] = disj;- exports["not"] = not;- exports["heytingAlgebraBoolean"] = heytingAlgebraBoolean;- exports["heytingAlgebraFunction"] = heytingAlgebraFunction;-})(PS["Data.HeytingAlgebra"] = PS["Data.HeytingAlgebra"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Eq"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Symbol = PS["Data.Symbol"];- var Data_Unit = PS["Data.Unit"];- var Data_Void = PS["Data.Void"];- var Record_Unsafe = PS["Record.Unsafe"];- var Type_Data_RowList = PS["Type.Data.RowList"]; - var Eq = function (eq) {- this.eq = eq;- };- var eqVoid = new Eq(function (v) {- return function (v1) {- return true;- };- });- var eqString = new Eq($foreign.refEq);- var eqInt = new Eq($foreign.refEq);- var eqChar = new Eq($foreign.refEq);- var eq = function (dict) {- return dict.eq;- };- exports["Eq"] = Eq;- exports["eq"] = eq;- exports["eqInt"] = eqInt;- exports["eqChar"] = eqChar;- exports["eqString"] = eqString;- exports["eqVoid"] = eqVoid;-})(PS["Data.Eq"] = PS["Data.Eq"] || {});-(function(exports) {- "use strict";-- exports.unsafeCompareImpl = function (lt) {- return function (eq) {- return function (gt) {- return function (x) {- return function (y) {- return x < y ? lt : x === y ? eq : gt;- };- };- };- };- };-})(PS["Data.Ord.Unsafe"] = PS["Data.Ord.Unsafe"] || {});-(function(exports) {- "use strict";-- exports.concatString = function (s1) {- return function (s2) {- return s1 + s2;- };- };-- exports.concatArray = function (xs) {- return function (ys) {- if (xs.length === 0) return ys;- if (ys.length === 0) return xs;- return xs.concat(ys);- };- };-})(PS["Data.Semigroup"] = PS["Data.Semigroup"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Semigroup"];- var Data_Symbol = PS["Data.Symbol"];- var Data_Unit = PS["Data.Unit"];- var Data_Void = PS["Data.Void"];- var Record_Unsafe = PS["Record.Unsafe"];- var Type_Data_RowList = PS["Type.Data.RowList"]; - var Semigroup = function (append) {- this.append = append;- }; - var semigroupString = new Semigroup($foreign.concatString);- var semigroupArray = new Semigroup($foreign.concatArray);- var append = function (dict) {- return dict.append;- };- var semigroupFn = function (dictSemigroup) {- return new Semigroup(function (f) {- return function (g) {- return function (x) {- return append(dictSemigroup)(f(x))(g(x));- };- };- });- };- exports["Semigroup"] = Semigroup;- exports["append"] = append;- exports["semigroupString"] = semigroupString;- exports["semigroupFn"] = semigroupFn;- exports["semigroupArray"] = semigroupArray;-})(PS["Data.Semigroup"] = PS["Data.Semigroup"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Eq = PS["Data.Eq"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"]; - var LT = (function () {- function LT() {-- };- LT.value = new LT();- return LT;- })();- var GT = (function () {- function GT() {-- };- GT.value = new GT();- return GT;- })();- var EQ = (function () {- function EQ() {-- };- EQ.value = new EQ();- return EQ;- })();- exports["LT"] = LT;- exports["GT"] = GT;- exports["EQ"] = EQ;-})(PS["Data.Ordering"] = PS["Data.Ordering"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Ord.Unsafe"];- var Data_Ordering = PS["Data.Ordering"]; - var unsafeCompare = $foreign.unsafeCompareImpl(Data_Ordering.LT.value)(Data_Ordering.EQ.value)(Data_Ordering.GT.value);- exports["unsafeCompare"] = unsafeCompare;-})(PS["Data.Ord.Unsafe"] = PS["Data.Ord.Unsafe"] || {});-(function(exports) {- "use strict";-- exports.intSub = function (x) {- return function (y) {- /* jshint bitwise: false */- return x - y | 0;- };- };-})(PS["Data.Ring"] = PS["Data.Ring"] || {});-(function(exports) {- "use strict";-- exports.intAdd = function (x) {- return function (y) {- /* jshint bitwise: false */- return x + y | 0;- };- };-- exports.intMul = function (x) {- return function (y) {- /* jshint bitwise: false */- return x * y | 0;- };- };-})(PS["Data.Semiring"] = PS["Data.Semiring"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Semiring"];- var Data_Symbol = PS["Data.Symbol"];- var Data_Unit = PS["Data.Unit"];- var Record_Unsafe = PS["Record.Unsafe"];- var Type_Data_Row = PS["Type.Data.Row"];- var Type_Data_RowList = PS["Type.Data.RowList"]; - var Semiring = function (add, mul, one, zero) {- this.add = add;- this.mul = mul;- this.one = one;- this.zero = zero;- };- var zero = function (dict) {- return dict.zero;- }; - var semiringInt = new Semiring($foreign.intAdd, $foreign.intMul, 1, 0);- var one = function (dict) {- return dict.one;- };- var mul = function (dict) {- return dict.mul;- };- var add = function (dict) {- return dict.add;- };- exports["Semiring"] = Semiring;- exports["add"] = add;- exports["zero"] = zero;- exports["mul"] = mul;- exports["one"] = one;- exports["semiringInt"] = semiringInt;-})(PS["Data.Semiring"] = PS["Data.Semiring"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Ring"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Symbol = PS["Data.Symbol"];- var Data_Unit = PS["Data.Unit"];- var Record_Unsafe = PS["Record.Unsafe"];- var Type_Data_RowList = PS["Type.Data.RowList"]; - var Ring = function (Semiring0, sub) {- this.Semiring0 = Semiring0;- this.sub = sub;- };- var sub = function (dict) {- return dict.sub;- }; - var ringInt = new Ring(function () {- return Data_Semiring.semiringInt;- }, $foreign.intSub);- exports["Ring"] = Ring;- exports["sub"] = sub;- exports["ringInt"] = ringInt;-})(PS["Data.Ring"] = PS["Data.Ring"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Ord"];- var Data_Eq = PS["Data.Eq"];- var Data_Ord_Unsafe = PS["Data.Ord.Unsafe"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Ring = PS["Data.Ring"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Unit = PS["Data.Unit"];- var Data_Void = PS["Data.Void"]; - var Ord = function (Eq0, compare) {- this.Eq0 = Eq0;- this.compare = compare;- };- var ordVoid = new Ord(function () {- return Data_Eq.eqVoid;- }, function (v) {- return function (v1) {- return Data_Ordering.EQ.value;- };- });- var ordString = new Ord(function () {- return Data_Eq.eqString;- }, Data_Ord_Unsafe.unsafeCompare);- var ordInt = new Ord(function () {- return Data_Eq.eqInt;- }, Data_Ord_Unsafe.unsafeCompare);- var ordChar = new Ord(function () {- return Data_Eq.eqChar;- }, Data_Ord_Unsafe.unsafeCompare);- var compare = function (dict) {- return dict.compare;- };- exports["Ord"] = Ord;- exports["compare"] = compare;- exports["ordInt"] = ordInt;- exports["ordString"] = ordString;- exports["ordChar"] = ordChar;- exports["ordVoid"] = ordVoid;-})(PS["Data.Ord"] = PS["Data.Ord"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Category = PS["Control.Category"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Ord = PS["Data.Ord"];- var Data_Ring = PS["Data.Ring"]; - var on = function (f) {- return function (g) {- return function (x) {- return function (y) {- return f(g(x))(g(y));- };- };- };- };- var flip = function (f) {- return function (b) {- return function (a) {- return f(a)(b);- };- };- };- var $$const = function (a) {- return function (v) {- return a;- };- };- exports["flip"] = flip;- exports["const"] = $$const;- exports["on"] = on;-})(PS["Data.Function"] = PS["Data.Function"] || {});-(function(exports) {- "use strict";-- exports.arrayMap = function (f) {- return function (arr) {- var l = arr.length;- var result = new Array(l);- for (var i = 0; i < l; i++) {- result[i] = f(arr[i]);- }- return result;- };- };-})(PS["Data.Functor"] = PS["Data.Functor"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Functor"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Function = PS["Data.Function"];- var Data_Unit = PS["Data.Unit"]; - var Functor = function (map) {- this.map = map;- };- var map = function (dict) {- return dict.map;- };- var $$void = function (dictFunctor) {- return map(dictFunctor)(Data_Function["const"](Data_Unit.unit));- };- var voidLeft = function (dictFunctor) {- return function (f) {- return function (x) {- return map(dictFunctor)(Data_Function["const"](x))(f);- };- };- };- var functorFn = new Functor(Control_Semigroupoid.compose(Control_Semigroupoid.semigroupoidFn));- var functorArray = new Functor($foreign.arrayMap);- exports["Functor"] = Functor;- exports["map"] = map;- exports["void"] = $$void;- exports["voidLeft"] = voidLeft;- exports["functorFn"] = functorFn;- exports["functorArray"] = functorArray;-})(PS["Data.Functor"] = PS["Data.Functor"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Control.Apply"];- var Control_Category = PS["Control.Category"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"]; - var Apply = function (Functor0, apply) {- this.Functor0 = Functor0;- this.apply = apply;- }; - var applyArray = new Apply(function () {- return Data_Functor.functorArray;- }, $foreign.arrayApply);- var apply = function (dict) {- return dict.apply;- };- var applySecond = function (dictApply) {- return function (a) {- return function (b) {- return apply(dictApply)(Data_Functor.map(dictApply.Functor0())(Data_Function["const"](Control_Category.identity(Control_Category.categoryFn)))(a))(b);- };- };- };- var lift2 = function (dictApply) {- return function (f) {- return function (a) {- return function (b) {- return apply(dictApply)(Data_Functor.map(dictApply.Functor0())(f)(a))(b);- };- };- };- };- exports["Apply"] = Apply;- exports["apply"] = apply;- exports["applySecond"] = applySecond;- exports["lift2"] = lift2;- exports["applyArray"] = applyArray;-})(PS["Control.Apply"] = PS["Control.Apply"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Apply = PS["Control.Apply"];- var Data_Functor = PS["Data.Functor"];- var Data_Unit = PS["Data.Unit"]; - var Applicative = function (Apply0, pure) {- this.Apply0 = Apply0;- this.pure = pure;- };- var pure = function (dict) {- return dict.pure;- };- var when = function (dictApplicative) {- return function (v) {- return function (v1) {- if (v) {- return v1;- };- if (!v) {- return pure(dictApplicative)(Data_Unit.unit);- };- throw new Error("Failed pattern match at Control.Applicative line 57, column 1 - line 57, column 63: " + [ v.constructor.name, v1.constructor.name ]);- };- };- };- var liftA1 = function (dictApplicative) {- return function (f) {- return function (a) {- return Control_Apply.apply(dictApplicative.Apply0())(pure(dictApplicative)(f))(a);- };- };- };- exports["Applicative"] = Applicative;- exports["pure"] = pure;- exports["liftA1"] = liftA1;- exports["when"] = when;-})(PS["Control.Applicative"] = PS["Control.Applicative"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Control.Bind"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Category = PS["Control.Category"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Unit = PS["Data.Unit"]; - var Bind = function (Apply0, bind) {- this.Apply0 = Apply0;- this.bind = bind;- };- var Discard = function (discard) {- this.discard = discard;- };- var discard = function (dict) {- return dict.discard;- }; - var bindArray = new Bind(function () {- return Control_Apply.applyArray;- }, $foreign.arrayBind);- var bind = function (dict) {- return dict.bind;- };- var bindFlipped = function (dictBind) {- return Data_Function.flip(bind(dictBind));- };- var composeKleisliFlipped = function (dictBind) {- return function (f) {- return function (g) {- return function (a) {- return bindFlipped(dictBind)(f)(g(a));- };- };- };- };- var composeKleisli = function (dictBind) {- return function (f) {- return function (g) {- return function (a) {- return bind(dictBind)(f(a))(g);- };- };- };- };- var discardUnit = new Discard(function (dictBind) {- return bind(dictBind);- });- var join = function (dictBind) {- return function (m) {- return bind(dictBind)(m)(Control_Category.identity(Control_Category.categoryFn));- };- };- exports["Bind"] = Bind;- exports["bind"] = bind;- exports["bindFlipped"] = bindFlipped;- exports["Discard"] = Discard;- exports["discard"] = discard;- exports["join"] = join;- exports["composeKleisli"] = composeKleisli;- exports["composeKleisliFlipped"] = composeKleisliFlipped;- exports["bindArray"] = bindArray;- exports["discardUnit"] = discardUnit;-})(PS["Control.Bind"] = PS["Control.Bind"] || {});-(function(exports) {- "use strict";-- //------------------------------------------------------------------------------- // Array size ------------------------------------------------------------------- //-------------------------------------------------------------------------------- exports.length = function (xs) {- return xs.length;- };-- //------------------------------------------------------------------------------- // Extending arrays ------------------------------------------------------------- //-------------------------------------------------------------------------------- exports.cons = function (e) {- return function (l) {- return [e].concat(l);- };- };-- exports.snoc = function (l) {- return function (e) {- var l1 = l.slice();- l1.push(e);- return l1;- };- };-- exports.concat = function (xss) {- if (xss.length <= 10000) {- // This method is faster, but it crashes on big arrays.- // So we use it when can and fallback to simple variant otherwise.- return Array.prototype.concat.apply([], xss);- }-- var result = [];- for (var i = 0, l = xss.length; i < l; i++) {- var xs = xss[i];- for (var j = 0, m = xs.length; j < m; j++) {- result.push(xs[j]);- }- }- return result;- };-- exports.filter = function (f) {- return function (xs) {- return xs.filter(f);- };- };-- //------------------------------------------------------------------------------- // Subarrays -------------------------------------------------------------------- //-------------------------------------------------------------------------------- exports.slice = function (s) {- return function (e) {- return function (l) {- return l.slice(s, e);- };- };- };-- exports.drop = function (n) {- return function (l) {- return n < 1 ? l : l.slice(n);- };- };-})(PS["Data.Array"] = PS["Data.Array"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Functor = PS["Data.Functor"];- var Data_Semigroup = PS["Data.Semigroup"]; - var Alt = function (Functor0, alt) {- this.Functor0 = Functor0;- this.alt = alt;- }; - var alt = function (dict) {- return dict.alt;- };- exports["Alt"] = Alt;- exports["alt"] = alt;-})(PS["Control.Alt"] = PS["Control.Alt"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Data_Functor = PS["Data.Functor"];- var Data_Unit = PS["Data.Unit"]; - var Monad = function (Applicative0, Bind1) {- this.Applicative0 = Applicative0;- this.Bind1 = Bind1;- };- var ap = function (dictMonad) {- return function (f) {- return function (a) {- return Control_Bind.bind(dictMonad.Bind1())(f)(function (v) {- return Control_Bind.bind(dictMonad.Bind1())(a)(function (v1) {- return Control_Applicative.pure(dictMonad.Applicative0())(v(v1));- });- });- };- };- };- exports["Monad"] = Monad;- exports["ap"] = ap;-})(PS["Control.Monad"] = PS["Control.Monad"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Category = PS["Control.Category"]; - var Bifunctor = function (bimap) {- this.bimap = bimap;- };- var bimap = function (dict) {- return dict.bimap;- };- var rmap = function (dictBifunctor) {- return bimap(dictBifunctor)(Control_Category.identity(Control_Category.categoryFn));- };- exports["bimap"] = bimap;- exports["Bifunctor"] = Bifunctor;- exports["rmap"] = rmap;-})(PS["Data.Bifunctor"] = PS["Data.Bifunctor"] || {});-(function(exports) {- "use strict";-- exports.topInt = 2147483647;- exports.bottomInt = -2147483648;-- exports.topChar = String.fromCharCode(65535);- exports.bottomChar = String.fromCharCode(0);-})(PS["Data.Bounded"] = PS["Data.Bounded"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Bounded"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Unit = PS["Data.Unit"]; - var Bounded = function (Ord0, bottom, top) {- this.Ord0 = Ord0;- this.bottom = bottom;- this.top = top;- };- var top = function (dict) {- return dict.top;- }; - var boundedInt = new Bounded(function () {- return Data_Ord.ordInt;- }, $foreign.bottomInt, $foreign.topInt);- var boundedChar = new Bounded(function () {- return Data_Ord.ordChar;- }, $foreign.bottomChar, $foreign.topChar);- var bottom = function (dict) {- return dict.bottom;- };- exports["Bounded"] = Bounded;- exports["bottom"] = bottom;- exports["top"] = top;- exports["boundedInt"] = boundedInt;- exports["boundedChar"] = boundedChar;-})(PS["Data.Bounded"] = PS["Data.Bounded"] || {});-(function(exports) {- "use strict";-- exports.foldrArray = function (f) {- return function (init) {- return function (xs) {- var acc = init;- var len = xs.length;- for (var i = len - 1; i >= 0; i--) {- acc = f(xs[i])(acc);- }- return acc;- };- };- };-- exports.foldlArray = function (f) {- return function (init) {- return function (xs) {- var acc = init;- var len = xs.length;- for (var i = 0; i < len; i++) {- acc = f(acc)(xs[i]);- }- return acc;- };- };- };-})(PS["Data.Foldable"] = PS["Data.Foldable"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Data_Functor = PS["Data.Functor"]; - var Plus = function (Alt0, empty) {- this.Alt0 = Alt0;- this.empty = empty;- }; - var empty = function (dict) {- return dict.empty;- };- exports["Plus"] = Plus;- exports["empty"] = empty;-})(PS["Control.Plus"] = PS["Control.Plus"] || {});-(function(exports) {- "use strict";-- exports.intDegree = function (x) {- return Math.min(Math.abs(x), 2147483647);- };-- // See the Euclidean definition in- // https://en.m.wikipedia.org/wiki/Modulo_operation.- exports.intDiv = function (x) {- return function (y) {- if (y === 0) return 0;- return y > 0 ? Math.floor(x / y) : -Math.floor(x / -y);- };- };-- exports.intMod = function (x) {- return function (y) {- if (y === 0) return 0;- var yy = Math.abs(y);- return ((x % yy) + yy) % yy;- };- };-})(PS["Data.EuclideanRing"] = PS["Data.EuclideanRing"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Ring = PS["Data.Ring"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Symbol = PS["Data.Symbol"];- var Data_Unit = PS["Data.Unit"]; - var CommutativeRing = function (Ring0) {- this.Ring0 = Ring0;- }; - var commutativeRingInt = new CommutativeRing(function () {- return Data_Ring.ringInt;- });- exports["CommutativeRing"] = CommutativeRing;- exports["commutativeRingInt"] = commutativeRingInt;-})(PS["Data.CommutativeRing"] = PS["Data.CommutativeRing"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.EuclideanRing"];- var Data_BooleanAlgebra = PS["Data.BooleanAlgebra"];- var Data_CommutativeRing = PS["Data.CommutativeRing"];- var Data_Eq = PS["Data.Eq"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Ring = PS["Data.Ring"];- var Data_Semiring = PS["Data.Semiring"]; - var EuclideanRing = function (CommutativeRing0, degree, div, mod) {- this.CommutativeRing0 = CommutativeRing0;- this.degree = degree;- this.div = div;- this.mod = mod;- };- var mod = function (dict) {- return dict.mod;- }; - var euclideanRingInt = new EuclideanRing(function () {- return Data_CommutativeRing.commutativeRingInt;- }, $foreign.intDegree, $foreign.intDiv, $foreign.intMod);- var div = function (dict) {- return dict.div;- };- var degree = function (dict) {- return dict.degree;- };- exports["EuclideanRing"] = EuclideanRing;- exports["degree"] = degree;- exports["div"] = div;- exports["mod"] = mod;- exports["euclideanRingInt"] = euclideanRingInt;-})(PS["Data.EuclideanRing"] = PS["Data.EuclideanRing"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Boolean = PS["Data.Boolean"];- var Data_Eq = PS["Data.Eq"];- var Data_EuclideanRing = PS["Data.EuclideanRing"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Symbol = PS["Data.Symbol"];- var Data_Unit = PS["Data.Unit"];- var Record_Unsafe = PS["Record.Unsafe"];- var Type_Data_RowList = PS["Type.Data.RowList"]; - var Monoid = function (Semigroup0, mempty) {- this.Semigroup0 = Semigroup0;- this.mempty = mempty;- }; - var monoidString = new Monoid(function () {- return Data_Semigroup.semigroupString;- }, ""); - var monoidArray = new Monoid(function () {- return Data_Semigroup.semigroupArray;- }, [ ]);- var mempty = function (dict) {- return dict.mempty;- };- var monoidFn = function (dictMonoid) {- return new Monoid(function () {- return Data_Semigroup.semigroupFn(dictMonoid.Semigroup0());- }, function (v) {- return mempty(dictMonoid);- });- };- var guard = function (dictMonoid) {- return function (v) {- return function (v1) {- if (v) {- return v1;- };- if (!v) {- return mempty(dictMonoid);- };- throw new Error("Failed pattern match at Data.Monoid line 74, column 1 - line 74, column 49: " + [ v.constructor.name, v1.constructor.name ]);- };- };- };- exports["Monoid"] = Monoid;- exports["mempty"] = mempty;- exports["guard"] = guard;- exports["monoidFn"] = monoidFn;- exports["monoidString"] = monoidString;- exports["monoidArray"] = monoidArray;-})(PS["Data.Monoid"] = PS["Data.Monoid"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Extend = PS["Control.Extend"];- var Control_Monad = PS["Control.Monad"];- var Control_MonadZero = PS["Control.MonadZero"];- var Control_Plus = PS["Control.Plus"];- var Data_Bounded = PS["Data.Bounded"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Functor_Invariant = PS["Data.Functor.Invariant"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_Unit = PS["Data.Unit"];- var Prelude = PS["Prelude"]; - var Nothing = (function () {- function Nothing() {-- };- Nothing.value = new Nothing();- return Nothing;- })();- var Just = (function () {- function Just(value0) {- this.value0 = value0;- };- Just.create = function (value0) {- return new Just(value0);- };- return Just;- })();- var maybe = function (v) {- return function (v1) {- return function (v2) {- if (v2 instanceof Nothing) {- return v;- };- if (v2 instanceof Just) {- return v1(v2.value0);- };- throw new Error("Failed pattern match at Data.Maybe line 218, column 1 - line 218, column 51: " + [ v.constructor.name, v1.constructor.name, v2.constructor.name ]);- };- };- };- var isNothing = maybe(true)(Data_Function["const"](false));- var isJust = maybe(false)(Data_Function["const"](true));- var functorMaybe = new Data_Functor.Functor(function (v) {- return function (v1) {- if (v1 instanceof Just) {- return new Just(v(v1.value0));- };- return Nothing.value;- };- });- var fromMaybe = function (a) {- return maybe(a)(Control_Category.identity(Control_Category.categoryFn));- };- var fromJust = function (dictPartial) {- return function (v) {- var $__unused = function (dictPartial1) {- return function ($dollar35) {- return $dollar35;- };- };- return $__unused(dictPartial)((function () {- if (v instanceof Just) {- return v.value0;- };- throw new Error("Failed pattern match at Data.Maybe line 269, column 1 - line 269, column 46: " + [ v.constructor.name ]);- })());- };- };- var applyMaybe = new Control_Apply.Apply(function () {- return functorMaybe;- }, function (v) {- return function (v1) {- if (v instanceof Just) {- return Data_Functor.map(functorMaybe)(v.value0)(v1);- };- if (v instanceof Nothing) {- return Nothing.value;- };- throw new Error("Failed pattern match at Data.Maybe line 67, column 1 - line 67, column 35: " + [ v.constructor.name, v1.constructor.name ]);- };- });- var bindMaybe = new Control_Bind.Bind(function () {- return applyMaybe;- }, function (v) {- return function (v1) {- if (v instanceof Just) {- return v1(v.value0);- };- if (v instanceof Nothing) {- return Nothing.value;- };- throw new Error("Failed pattern match at Data.Maybe line 126, column 1 - line 126, column 33: " + [ v.constructor.name, v1.constructor.name ]);- };- });- exports["Nothing"] = Nothing;- exports["Just"] = Just;- exports["maybe"] = maybe;- exports["fromMaybe"] = fromMaybe;- exports["isJust"] = isJust;- exports["isNothing"] = isNothing;- exports["fromJust"] = fromJust;- exports["functorMaybe"] = functorMaybe;- exports["applyMaybe"] = applyMaybe;- exports["bindMaybe"] = bindMaybe;-})(PS["Data.Maybe"] = PS["Data.Maybe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad = PS["Control.Monad"];- var Data_Bounded = PS["Data.Bounded"];- var Data_Eq = PS["Data.Eq"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Prelude = PS["Prelude"]; - var Disj = function (x) {- return x;- };- var semigroupDisj = function (dictHeytingAlgebra) {- return new Data_Semigroup.Semigroup(function (v) {- return function (v1) {- return Data_HeytingAlgebra.disj(dictHeytingAlgebra)(v)(v1);- };- });- };- var monoidDisj = function (dictHeytingAlgebra) {- return new Data_Monoid.Monoid(function () {- return semigroupDisj(dictHeytingAlgebra);- }, Data_HeytingAlgebra.ff(dictHeytingAlgebra));- };- exports["Disj"] = Disj;- exports["semigroupDisj"] = semigroupDisj;- exports["monoidDisj"] = monoidDisj;-})(PS["Data.Monoid.Disj"] = PS["Data.Monoid.Disj"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Monoid_Additive = PS["Data.Monoid.Additive"];- var Data_Monoid_Conj = PS["Data.Monoid.Conj"];- var Data_Monoid_Disj = PS["Data.Monoid.Disj"];- var Data_Monoid_Dual = PS["Data.Monoid.Dual"];- var Data_Monoid_Endo = PS["Data.Monoid.Endo"];- var Data_Monoid_Multiplicative = PS["Data.Monoid.Multiplicative"];- var Data_Semigroup_First = PS["Data.Semigroup.First"];- var Data_Semigroup_Last = PS["Data.Semigroup.Last"];- var Prelude = PS["Prelude"]; - var Newtype = function (unwrap, wrap) {- this.unwrap = unwrap;- this.wrap = wrap;- };- var wrap = function (dict) {- return dict.wrap;- };- var unwrap = function (dict) {- return dict.unwrap;- }; - var newtypeDisj = new Newtype(function (v) {- return v;- }, Data_Monoid_Disj.Disj);- var alaF = function (dictFunctor) {- return function (dictFunctor1) {- return function (dictNewtype) {- return function (dictNewtype1) {- return function (v) {- return function (f) {- return function ($80) {- return Data_Functor.map(dictFunctor1)(unwrap(dictNewtype1))(f(Data_Functor.map(dictFunctor)(wrap(dictNewtype))($80)));- };- };- };- };- };- };- };- exports["unwrap"] = unwrap;- exports["wrap"] = wrap;- exports["Newtype"] = Newtype;- exports["alaF"] = alaF;- exports["newtypeDisj"] = newtypeDisj;-})(PS["Data.Newtype"] = PS["Data.Newtype"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Foldable"];- var Control_Alt = PS["Control.Alt"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Maybe_First = PS["Data.Maybe.First"];- var Data_Maybe_Last = PS["Data.Maybe.Last"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Monoid_Additive = PS["Data.Monoid.Additive"];- var Data_Monoid_Conj = PS["Data.Monoid.Conj"];- var Data_Monoid_Disj = PS["Data.Monoid.Disj"];- var Data_Monoid_Dual = PS["Data.Monoid.Dual"];- var Data_Monoid_Endo = PS["Data.Monoid.Endo"];- var Data_Monoid_Multiplicative = PS["Data.Monoid.Multiplicative"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Unit = PS["Data.Unit"];- var Prelude = PS["Prelude"]; - var Foldable = function (foldMap, foldl, foldr) {- this.foldMap = foldMap;- this.foldl = foldl;- this.foldr = foldr;- };- var foldr = function (dict) {- return dict.foldr;- };- var traverse_ = function (dictApplicative) {- return function (dictFoldable) {- return function (f) {- return foldr(dictFoldable)(function ($195) {- return Control_Apply.applySecond(dictApplicative.Apply0())(f($195));- })(Control_Applicative.pure(dictApplicative)(Data_Unit.unit));- };- };- };- var for_ = function (dictApplicative) {- return function (dictFoldable) {- return Data_Function.flip(traverse_(dictApplicative)(dictFoldable));- };- };- var sequence_ = function (dictApplicative) {- return function (dictFoldable) {- return traverse_(dictApplicative)(dictFoldable)(Control_Category.identity(Control_Category.categoryFn));- };- };- var foldl = function (dict) {- return dict.foldl;- };- var intercalate = function (dictFoldable) {- return function (dictMonoid) {- return function (sep) {- return function (xs) {- var go = function (v) {- return function (x) {- if (v.init) {- return {- init: false,- acc: x- };- };- return {- init: false,- acc: Data_Semigroup.append(dictMonoid.Semigroup0())(v.acc)(Data_Semigroup.append(dictMonoid.Semigroup0())(sep)(x))- };- };- };- return (foldl(dictFoldable)(go)({- init: true,- acc: Data_Monoid.mempty(dictMonoid)- })(xs)).acc;- };- };- };- }; - var foldableMaybe = new Foldable(function (dictMonoid) {- return function (f) {- return function (v) {- if (v instanceof Data_Maybe.Nothing) {- return Data_Monoid.mempty(dictMonoid);- };- if (v instanceof Data_Maybe.Just) {- return f(v.value0);- };- throw new Error("Failed pattern match at Data.Foldable line 129, column 1 - line 129, column 41: " + [ f.constructor.name, v.constructor.name ]);- };- };- }, function (v) {- return function (z) {- return function (v1) {- if (v1 instanceof Data_Maybe.Nothing) {- return z;- };- if (v1 instanceof Data_Maybe.Just) {- return v(z)(v1.value0);- };- throw new Error("Failed pattern match at Data.Foldable line 129, column 1 - line 129, column 41: " + [ v.constructor.name, z.constructor.name, v1.constructor.name ]);- };- };- }, function (v) {- return function (z) {- return function (v1) {- if (v1 instanceof Data_Maybe.Nothing) {- return z;- };- if (v1 instanceof Data_Maybe.Just) {- return v(v1.value0)(z);- };- throw new Error("Failed pattern match at Data.Foldable line 129, column 1 - line 129, column 41: " + [ v.constructor.name, z.constructor.name, v1.constructor.name ]);- };- };- });- var foldMapDefaultR = function (dictFoldable) {- return function (dictMonoid) {- return function (f) {- return foldr(dictFoldable)(function (x) {- return function (acc) {- return Data_Semigroup.append(dictMonoid.Semigroup0())(f(x))(acc);- };- })(Data_Monoid.mempty(dictMonoid));- };- };- };- var foldableArray = new Foldable(function (dictMonoid) {- return foldMapDefaultR(foldableArray)(dictMonoid);- }, $foreign.foldlArray, $foreign.foldrArray);- var foldMap = function (dict) {- return dict.foldMap;- };- var find = function (dictFoldable) {- return function (p) {- var go = function (v) {- return function (v1) {- if (v instanceof Data_Maybe.Nothing && p(v1)) {- return new Data_Maybe.Just(v1);- };- return v;- };- };- return foldl(dictFoldable)(go)(Data_Maybe.Nothing.value);- };- };- var any = function (dictFoldable) {- return function (dictHeytingAlgebra) {- return Data_Newtype.alaF(Data_Functor.functorFn)(Data_Functor.functorFn)(Data_Newtype.newtypeDisj)(Data_Newtype.newtypeDisj)(Data_Monoid_Disj.Disj)(foldMap(dictFoldable)(Data_Monoid_Disj.monoidDisj(dictHeytingAlgebra)));- };- };- exports["Foldable"] = Foldable;- exports["foldr"] = foldr;- exports["foldl"] = foldl;- exports["foldMap"] = foldMap;- exports["foldMapDefaultR"] = foldMapDefaultR;- exports["traverse_"] = traverse_;- exports["for_"] = for_;- exports["sequence_"] = sequence_;- exports["intercalate"] = intercalate;- exports["any"] = any;- exports["find"] = find;- exports["foldableArray"] = foldableArray;- exports["foldableMaybe"] = foldableMaybe;-})(PS["Data.Foldable"] = PS["Data.Foldable"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Extend = PS["Control.Extend"];- var Control_Monad = PS["Control.Monad"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifoldable = PS["Data.Bifoldable"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Bitraversable = PS["Data.Bitraversable"];- var Data_Bounded = PS["Data.Bounded"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Functor_Invariant = PS["Data.Functor.Invariant"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Prelude = PS["Prelude"]; - var Left = (function () {- function Left(value0) {- this.value0 = value0;- };- Left.create = function (value0) {- return new Left(value0);- };- return Left;- })();- var Right = (function () {- function Right(value0) {- this.value0 = value0;- };- Right.create = function (value0) {- return new Right(value0);- };- return Right;- })();- var functorEither = new Data_Functor.Functor(function (f) {- return function (m) {- if (m instanceof Left) {- return new Left(m.value0);- };- if (m instanceof Right) {- return new Right(f(m.value0));- };- throw new Error("Failed pattern match at Data.Either line 35, column 8 - line 35, column 52: " + [ m.constructor.name ]);- };- });- var either = function (v) {- return function (v1) {- return function (v2) {- if (v2 instanceof Left) {- return v(v2.value0);- };- if (v2 instanceof Right) {- return v1(v2.value0);- };- throw new Error("Failed pattern match at Data.Either line 220, column 1 - line 220, column 64: " + [ v.constructor.name, v1.constructor.name, v2.constructor.name ]);- };- };- };- var bifunctorEither = new Data_Bifunctor.Bifunctor(function (v) {- return function (v1) {- return function (v2) {- if (v2 instanceof Left) {- return new Left(v(v2.value0));- };- if (v2 instanceof Right) {- return new Right(v1(v2.value0));- };- throw new Error("Failed pattern match at Data.Either line 40, column 1 - line 40, column 45: " + [ v.constructor.name, v1.constructor.name, v2.constructor.name ]);- };- };- });- var applyEither = new Control_Apply.Apply(function () {- return functorEither;- }, function (v) {- return function (v1) {- if (v instanceof Left) {- return new Left(v.value0);- };- if (v instanceof Right) {- return Data_Functor.map(functorEither)(v.value0)(v1);- };- throw new Error("Failed pattern match at Data.Either line 76, column 1 - line 76, column 41: " + [ v.constructor.name, v1.constructor.name ]);- };- });- exports["Left"] = Left;- exports["Right"] = Right;- exports["either"] = either;- exports["functorEither"] = functorEither;- exports["bifunctorEither"] = bifunctorEither;- exports["applyEither"] = applyEither;-})(PS["Data.Either"] = PS["Data.Either"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Comonad = PS["Control.Comonad"];- var Control_Extend = PS["Control.Extend"];- var Control_Lazy = PS["Control.Lazy"];- var Control_Monad = PS["Control.Monad"];- var Data_BooleanAlgebra = PS["Data.BooleanAlgebra"];- var Data_Bounded = PS["Data.Bounded"];- var Data_CommutativeRing = PS["Data.CommutativeRing"];- var Data_Eq = PS["Data.Eq"];- var Data_EuclideanRing = PS["Data.EuclideanRing"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Functor = PS["Data.Functor"];- var Data_Functor_Invariant = PS["Data.Functor.Invariant"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Prelude = PS["Prelude"]; - var Identity = function (x) {- return x;- };- var newtypeIdentity = new Data_Newtype.Newtype(function (n) {- return n;- }, Identity);- var functorIdentity = new Data_Functor.Functor(function (f) {- return function (m) {- return f(m);- };- });- var applyIdentity = new Control_Apply.Apply(function () {- return functorIdentity;- }, function (v) {- return function (v1) {- return v(v1);- };- });- var bindIdentity = new Control_Bind.Bind(function () {- return applyIdentity;- }, function (v) {- return function (f) {- return f(v);- };- });- var applicativeIdentity = new Control_Applicative.Applicative(function () {- return applyIdentity;- }, Identity);- var monadIdentity = new Control_Monad.Monad(function () {- return applicativeIdentity;- }, function () {- return bindIdentity;- });- exports["Identity"] = Identity;- exports["newtypeIdentity"] = newtypeIdentity;- exports["functorIdentity"] = functorIdentity;- exports["applyIdentity"] = applyIdentity;- exports["applicativeIdentity"] = applicativeIdentity;- exports["bindIdentity"] = bindIdentity;- exports["monadIdentity"] = monadIdentity;-})(PS["Data.Identity"] = PS["Data.Identity"] || {});-(function(exports) {- "use strict";-- exports.pureE = function (a) {- return function () {- return a;- };- };-- exports.bindE = function (a) {- return function (f) {- return function () {- return f(a())();- };- };- };-- exports.foreachE = function (as) {- return function (f) {- return function () {- for (var i = 0, l = as.length; i < l; i++) {- f(as[i])();- }- };- };- };-})(PS["Effect"] = PS["Effect"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Effect"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad = PS["Control.Monad"];- var Data_Functor = PS["Data.Functor"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Semigroup = PS["Data.Semigroup"];- var Prelude = PS["Prelude"]; - var monadEffect = new Control_Monad.Monad(function () {- return applicativeEffect;- }, function () {- return bindEffect;- });- var bindEffect = new Control_Bind.Bind(function () {- return applyEffect;- }, $foreign.bindE);- var applyEffect = new Control_Apply.Apply(function () {- return functorEffect;- }, Control_Monad.ap(monadEffect));- var applicativeEffect = new Control_Applicative.Applicative(function () {- return applyEffect;- }, $foreign.pureE);- var functorEffect = new Data_Functor.Functor(Control_Applicative.liftA1(applicativeEffect));- exports["functorEffect"] = functorEffect;- exports["applyEffect"] = applyEffect;- exports["applicativeEffect"] = applicativeEffect;- exports["bindEffect"] = bindEffect;- exports["monadEffect"] = monadEffect;- exports["foreachE"] = $foreign.foreachE;-})(PS["Effect"] = PS["Effect"] || {});-(function(exports) {- "use strict";-- exports.new = function (val) {- return function () {- return { value: val };- };- };-- exports.read = function (ref) {- return function () {- return ref.value;- };- };-- exports["modify'"] = function (f) {- return function (ref) {- return function () {- var t = f(ref.value);- ref.value = t.state;- return t.value;- };- };- };-- exports.write = function (val) {- return function (ref) {- return function () {- ref.value = val;- return {};- };- };- };-})(PS["Effect.Ref"] = PS["Effect.Ref"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Effect.Ref"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"]; - var modify = function (f) {- return $foreign["modify'"](function (s) {- var s$prime = f(s);- return {- state: s$prime,- value: s$prime- };- });- };- var modify_ = function (f) {- return function (s) {- return Data_Functor["void"](Effect.functorEffect)(modify(f)(s));- };- };- exports["modify"] = modify;- exports["modify_"] = modify_;- exports["new"] = $foreign["new"];- exports["read"] = $foreign.read;- exports["modify'"] = $foreign["modify'"];- exports["write"] = $foreign.write;-})(PS["Effect.Ref"] = PS["Effect.Ref"] || {});-(function(exports) {- "use strict";-- // module Partial.Unsafe-- exports.unsafePartial = function (f) {- return f();- };-})(PS["Partial.Unsafe"] = PS["Partial.Unsafe"] || {});-(function(exports) {- "use strict";-- // module Partial-- exports.crashWith = function () {- return function (msg) {- throw new Error(msg);- };- };-})(PS["Partial"] = PS["Partial"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Partial"];- exports["crashWith"] = $foreign.crashWith;-})(PS["Partial"] = PS["Partial"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Partial.Unsafe"];- var Partial = PS["Partial"];- var unsafeCrashWith = function (msg) {- return $foreign.unsafePartial(function (dictPartial) {- return Partial.crashWith(dictPartial)(msg);- });- };- exports["unsafeCrashWith"] = unsafeCrashWith;-})(PS["Partial.Unsafe"] = PS["Partial.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad = PS["Control.Monad"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Either = PS["Data.Either"];- var Data_Functor = PS["Data.Functor"];- var Data_Identity = PS["Data.Identity"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Ref = PS["Effect.Ref"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"]; - var Loop = (function () {- function Loop(value0) {- this.value0 = value0;- };- Loop.create = function (value0) {- return new Loop(value0);- };- return Loop;- })();- var Done = (function () {- function Done(value0) {- this.value0 = value0;- };- Done.create = function (value0) {- return new Done(value0);- };- return Done;- })();- var MonadRec = function (Monad0, tailRecM) {- this.Monad0 = Monad0;- this.tailRecM = tailRecM;- };- var tailRecM = function (dict) {- return dict.tailRecM;- }; - var monadRecEffect = new MonadRec(function () {- return Effect.monadEffect;- }, function (f) {- return function (a) {- var fromDone = function (v) {- var $__unused = function (dictPartial1) {- return function ($dollar19) {- return $dollar19;- };- };- return $__unused()((function () {- if (v instanceof Done) {- return v.value0;- };- throw new Error("Failed pattern match at Control.Monad.Rec.Class line 111, column 30 - line 111, column 44: " + [ v.constructor.name ]);- })());- };- return function __do() {- var v = Control_Bind.bindFlipped(Effect.bindEffect)(Effect_Ref["new"])(f(a))();- (function () {- while (!(function __do() {- var v1 = Effect_Ref.read(v)();- if (v1 instanceof Loop) {- var v2 = f(v1.value0)();- var v3 = Effect_Ref.write(v2)(v)();- return false;- };- if (v1 instanceof Done) {- return true;- };- throw new Error("Failed pattern match at Control.Monad.Rec.Class line 102, column 22 - line 107, column 28: " + [ v1.constructor.name ]);- })()) {-- };- return {};- })();- return Data_Functor.map(Effect.functorEffect)(fromDone)(Effect_Ref.read(v))();- };- };- });- exports["Loop"] = Loop;- exports["Done"] = Done;- exports["MonadRec"] = MonadRec;- exports["tailRecM"] = tailRecM;- exports["monadRecEffect"] = monadRecEffect;-})(PS["Control.Monad.Rec.Class"] = PS["Control.Monad.Rec.Class"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Biapplicative = PS["Control.Biapplicative"];- var Control_Biapply = PS["Control.Biapply"];- var Control_Bind = PS["Control.Bind"];- var Control_Comonad = PS["Control.Comonad"];- var Control_Extend = PS["Control.Extend"];- var Control_Lazy = PS["Control.Lazy"];- var Control_Monad = PS["Control.Monad"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifoldable = PS["Data.Bifoldable"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Bitraversable = PS["Data.Bitraversable"];- var Data_BooleanAlgebra = PS["Data.BooleanAlgebra"];- var Data_Bounded = PS["Data.Bounded"];- var Data_CommutativeRing = PS["Data.CommutativeRing"];- var Data_Distributive = PS["Data.Distributive"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Functor_Invariant = PS["Data.Functor.Invariant"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Maybe_First = PS["Data.Maybe.First"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Unit = PS["Data.Unit"];- var Prelude = PS["Prelude"];- var Type_Equality = PS["Type.Equality"]; - var Tuple = (function () {- function Tuple(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Tuple.create = function (value0) {- return function (value1) {- return new Tuple(value0, value1);- };- };- return Tuple;- })();- var snd = function (v) {- return v.value1;- };- var functorTuple = new Data_Functor.Functor(function (f) {- return function (m) {- return new Tuple(m.value0, f(m.value1));- };- }); - var fst = function (v) {- return v.value0;- };- exports["Tuple"] = Tuple;- exports["fst"] = fst;- exports["snd"] = snd;- exports["functorTuple"] = functorTuple;-})(PS["Data.Tuple"] = PS["Data.Tuple"] || {});-(function(exports) {- "use strict";-- exports.unfoldrArrayImpl = function (isNothing) {- return function (fromJust) {- return function (fst) {- return function (snd) {- return function (f) {- return function (b) {- var result = [];- var value = b;- while (true) { // eslint-disable-line no-constant-condition- var maybe = f(value);- if (isNothing(maybe)) return result;- var tuple = fromJust(maybe);- result.push(fst(tuple));- value = snd(tuple);- }- };- };- };- };- };- };-})(PS["Data.Unfoldable"] = PS["Data.Unfoldable"] || {});-(function(exports) {- "use strict";-- exports.unfoldr1ArrayImpl = function (isNothing) {- return function (fromJust) {- return function (fst) {- return function (snd) {- return function (f) {- return function (b) {- var result = [];- var value = b;- while (true) { // eslint-disable-line no-constant-condition- var tuple = f(value);- result.push(fst(tuple));- var maybe = snd(tuple);- if (isNothing(maybe)) return result;- value = fromJust(maybe);- }- };- };- };- };- };- };-})(PS["Data.Unfoldable1"] = PS["Data.Unfoldable1"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Unfoldable1"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Eq = PS["Data.Eq"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Tuple = PS["Data.Tuple"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"]; - var Unfoldable1 = function (unfoldr1) {- this.unfoldr1 = unfoldr1;- };- var unfoldr1 = function (dict) {- return dict.unfoldr1;- };- var unfoldable1Array = new Unfoldable1($foreign.unfoldr1ArrayImpl(Data_Maybe.isNothing)(Data_Maybe.fromJust())(Data_Tuple.fst)(Data_Tuple.snd));- exports["Unfoldable1"] = Unfoldable1;- exports["unfoldr1"] = unfoldr1;- exports["unfoldable1Array"] = unfoldable1Array;-})(PS["Data.Unfoldable1"] = PS["Data.Unfoldable1"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Unfoldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ring = PS["Data.Ring"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable1 = PS["Data.Unfoldable1"];- var Data_Unit = PS["Data.Unit"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"]; - var Unfoldable = function (Unfoldable10, unfoldr) {- this.Unfoldable10 = Unfoldable10;- this.unfoldr = unfoldr;- };- var unfoldr = function (dict) {- return dict.unfoldr;- };- var unfoldableArray = new Unfoldable(function () {- return Data_Unfoldable1.unfoldable1Array;- }, $foreign.unfoldrArrayImpl(Data_Maybe.isNothing)(Data_Maybe.fromJust())(Data_Tuple.fst)(Data_Tuple.snd));- exports["Unfoldable"] = Unfoldable;- exports["unfoldr"] = unfoldr;- exports["unfoldableArray"] = unfoldableArray;-})(PS["Data.Unfoldable"] = PS["Data.Unfoldable"] || {});-(function(exports) {- "use strict";-- // module Unsafe.Coerce-- exports.unsafeCoerce = function (x) {- return x;- };-})(PS["Unsafe.Coerce"] = PS["Unsafe.Coerce"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Unsafe.Coerce"];- exports["unsafeCoerce"] = $foreign.unsafeCoerce;-})(PS["Unsafe.Coerce"] = PS["Unsafe.Coerce"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Array"];- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Lazy = PS["Control.Lazy"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_ST = PS["Control.Monad.ST"];- var Control_Monad_ST_Internal = PS["Control.Monad.ST.Internal"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Array_NonEmpty_Internal = PS["Data.Array.NonEmpty.Internal"];- var Data_Array_ST = PS["Data.Array.ST"];- var Data_Array_ST_Iterator = PS["Data.Array.ST.Iterator"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var singleton = function (a) {- return [ a ];- };- var concatMap = Data_Function.flip(Control_Bind.bind(Control_Bind.bindArray));- var mapMaybe = function (f) {- return concatMap(function ($114) {- return Data_Maybe.maybe([ ])(singleton)(f($114));- });- };- exports["singleton"] = singleton;- exports["concatMap"] = concatMap;- exports["mapMaybe"] = mapMaybe;- exports["length"] = $foreign.length;- exports["cons"] = $foreign.cons;- exports["snoc"] = $foreign.snoc;- exports["filter"] = $foreign.filter;- exports["drop"] = $foreign.drop;-})(PS["Data.Array"] = PS["Data.Array"] || {});-(function(exports) {- "use strict";-- exports.replace = function (s1) {- return function (s2) {- return function (s3) {- return s3.replace(s1, s2);- };- };- };-- exports.replaceAll = function (s1) {- return function (s2) {- return function (s3) {- return s3.replace(new RegExp(s1.replace(/[-\/\\^$*+?.()|[\]{}]/g, "\\$&"), "g"), s2); // eslint-disable-line no-useless-escape- };- };- };-- exports.split = function (sep) {- return function (s) {- return s.split(sep);- };- };-- exports.joinWith = function (s) {- return function (xs) {- return xs.join(s);- };- };-})(PS["Data.String.Common"] = PS["Data.String.Common"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.String.Common"];- var Data_Eq = PS["Data.Eq"];- var Data_Ordering = PS["Data.Ordering"];- var Data_String_Pattern = PS["Data.String.Pattern"];- var Prelude = PS["Prelude"]; - var $$null = function (s) {- return s === "";- };- exports["null"] = $$null;- exports["replaceAll"] = $foreign.replaceAll;- exports["split"] = $foreign.split;- exports["joinWith"] = $foreign.joinWith;-})(PS["Data.String.Common"] = PS["Data.String.Common"] || {});-(function(exports) {- /* globals exports, JSON */- "use strict";-- exports.unsafeStringify = function (x) {- return JSON.stringify(x);- }; - exports.unsafeDecodeURIComponent = decodeURIComponent;- exports.unsafeEncodeURIComponent = encodeURIComponent;-})(PS["Global.Unsafe"] = PS["Global.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Global.Unsafe"];- exports["unsafeStringify"] = $foreign.unsafeStringify;- exports["unsafeDecodeURIComponent"] = $foreign.unsafeDecodeURIComponent;- exports["unsafeEncodeURIComponent"] = $foreign.unsafeEncodeURIComponent;-})(PS["Global.Unsafe"] = PS["Global.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_String = PS["Data.String"];- var Data_String_Common = PS["Data.String.Common"];- var Data_Tuple = PS["Data.Tuple"];- var Global_Unsafe = PS["Global.Unsafe"];- var Prelude = PS["Prelude"];- var toArray = function (v) {- return v;- }; - var encode = (function () {- var encodePart = function (v) {- if (v.value1 instanceof Data_Maybe.Nothing) {- return Global_Unsafe.unsafeEncodeURIComponent(v.value0);- };- if (v.value1 instanceof Data_Maybe.Just) {- return Global_Unsafe.unsafeEncodeURIComponent(v.value0) + ("=" + Global_Unsafe.unsafeEncodeURIComponent(v.value1.value0));- };- throw new Error("Failed pattern match at Data.FormURLEncoded line 35, column 18 - line 37, column 89: " + [ v.constructor.name ]);- };- return function ($14) {- return Data_String_Common.joinWith("&")(Data_Functor.map(Data_Functor.functorArray)(encodePart)(toArray($14)));- };- })();- exports["toArray"] = toArray;- exports["encode"] = encode;-})(PS["Data.FormURLEncoded"] = PS["Data.FormURLEncoded"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Either = PS["Data.Either"];- var Data_Eq = PS["Data.Eq"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_String = PS["Data.String"];- var Data_String_Common = PS["Data.String.Common"];- var Prelude = PS["Prelude"]; - var OPTIONS = (function () {- function OPTIONS() {-- };- OPTIONS.value = new OPTIONS();- return OPTIONS;- })();- var GET = (function () {- function GET() {-- };- GET.value = new GET();- return GET;- })();- var HEAD = (function () {- function HEAD() {-- };- HEAD.value = new HEAD();- return HEAD;- })();- var POST = (function () {- function POST() {-- };- POST.value = new POST();- return POST;- })();- var PUT = (function () {- function PUT() {-- };- PUT.value = new PUT();- return PUT;- })();- var DELETE = (function () {- function DELETE() {-- };- DELETE.value = new DELETE();- return DELETE;- })();- var TRACE = (function () {- function TRACE() {-- };- TRACE.value = new TRACE();- return TRACE;- })();- var CONNECT = (function () {- function CONNECT() {-- };- CONNECT.value = new CONNECT();- return CONNECT;- })();- var PROPFIND = (function () {- function PROPFIND() {-- };- PROPFIND.value = new PROPFIND();- return PROPFIND;- })();- var PROPPATCH = (function () {- function PROPPATCH() {-- };- PROPPATCH.value = new PROPPATCH();- return PROPPATCH;- })();- var MKCOL = (function () {- function MKCOL() {-- };- MKCOL.value = new MKCOL();- return MKCOL;- })();- var COPY = (function () {- function COPY() {-- };- COPY.value = new COPY();- return COPY;- })();- var MOVE = (function () {- function MOVE() {-- };- MOVE.value = new MOVE();- return MOVE;- })();- var LOCK = (function () {- function LOCK() {-- };- LOCK.value = new LOCK();- return LOCK;- })();- var UNLOCK = (function () {- function UNLOCK() {-- };- UNLOCK.value = new UNLOCK();- return UNLOCK;- })();- var PATCH = (function () {- function PATCH() {-- };- PATCH.value = new PATCH();- return PATCH;- })();- var unCustomMethod = function (v) {- return v;- };- var showMethod = new Data_Show.Show(function (v) {- if (v instanceof OPTIONS) {- return "OPTIONS";- };- if (v instanceof GET) {- return "GET";- };- if (v instanceof HEAD) {- return "HEAD";- };- if (v instanceof POST) {- return "POST";- };- if (v instanceof PUT) {- return "PUT";- };- if (v instanceof DELETE) {- return "DELETE";- };- if (v instanceof TRACE) {- return "TRACE";- };- if (v instanceof CONNECT) {- return "CONNECT";- };- if (v instanceof PROPFIND) {- return "PROPFIND";- };- if (v instanceof PROPPATCH) {- return "PROPPATCH";- };- if (v instanceof MKCOL) {- return "MKCOL";- };- if (v instanceof COPY) {- return "COPY";- };- if (v instanceof MOVE) {- return "MOVE";- };- if (v instanceof LOCK) {- return "LOCK";- };- if (v instanceof UNLOCK) {- return "UNLOCK";- };- if (v instanceof PATCH) {- return "PATCH";- };- throw new Error("Failed pattern match at Data.HTTP.Method line 40, column 1 - line 40, column 35: " + [ v.constructor.name ]);- });- var print = Data_Either.either(Data_Show.show(showMethod))(unCustomMethod);- exports["OPTIONS"] = OPTIONS;- exports["GET"] = GET;- exports["HEAD"] = HEAD;- exports["POST"] = POST;- exports["PUT"] = PUT;- exports["DELETE"] = DELETE;- exports["TRACE"] = TRACE;- exports["CONNECT"] = CONNECT;- exports["PROPFIND"] = PROPFIND;- exports["PROPPATCH"] = PROPPATCH;- exports["MKCOL"] = MKCOL;- exports["COPY"] = COPY;- exports["MOVE"] = MOVE;- exports["LOCK"] = LOCK;- exports["UNLOCK"] = UNLOCK;- exports["PATCH"] = PATCH;- exports["unCustomMethod"] = unCustomMethod;- exports["print"] = print;- exports["showMethod"] = showMethod;-})(PS["Data.HTTP.Method"] = PS["Data.HTTP.Method"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Eq = PS["Data.Eq"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Prelude = PS["Prelude"]; - var MediaType = function (x) {- return x;- }; - var newtypeMediaType = new Data_Newtype.Newtype(function (n) {- return n;- }, MediaType);- exports["MediaType"] = MediaType;- exports["newtypeMediaType"] = newtypeMediaType;-})(PS["Data.MediaType"] = PS["Data.MediaType"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_MediaType = PS["Data.MediaType"]; - var applicationJSON = "application/json";- var applicationFormURLEncoded = "application/x-www-form-urlencoded";- exports["applicationFormURLEncoded"] = applicationFormURLEncoded;- exports["applicationJSON"] = applicationJSON;-})(PS["Data.MediaType.Common"] = PS["Data.MediaType.Common"] || {});-(function(exports) {- /* globals setImmediate, clearImmediate, setTimeout, clearTimeout */- /* jshint -W083, -W098, -W003 */- "use strict";-- var Aff = function () {- // A unique value for empty.- var EMPTY = {};-- /*-- An awkward approximation. We elide evidence we would otherwise need in PS for- efficiency sake.-- data Aff eff a- = Pure a- | Throw Error- | Catch (Aff eff a) (Error -> Aff eff a)- | Sync (Eff eff a)- | Async ((Either Error a -> Eff eff Unit) -> Eff eff (Canceler eff))- | forall b. Bind (Aff eff b) (b -> Aff eff a)- | forall b. Bracket (Aff eff b) (BracketConditions eff b) (b -> Aff eff a)- | forall b. Fork Boolean (Aff eff b) ?(Fiber eff b -> a)- | Sequential (ParAff aff a)-- */ - var PURE = "Pure";- var THROW = "Throw";- var CATCH = "Catch";- var SYNC = "Sync";- var ASYNC = "Async";- var BIND = "Bind";- var BRACKET = "Bracket";- var FORK = "Fork";- var SEQ = "Sequential";-- /*-- data ParAff eff a- = forall b. Map (b -> a) (ParAff eff b)- | forall b. Apply (ParAff eff (b -> a)) (ParAff eff b)- | Alt (ParAff eff a) (ParAff eff a)- | ?Par (Aff eff a)-- */ - var MAP = "Map";- var APPLY = "Apply";- var ALT = "Alt";-- // Various constructors used in interpretation- var CONS = "Cons"; // Cons-list, for stacks- var RESUME = "Resume"; // Continue indiscriminately- var RELEASE = "Release"; // Continue with bracket finalizers- var FINALIZER = "Finalizer"; // A non-interruptible effect- var FINALIZED = "Finalized"; // Marker for finalization- var FORKED = "Forked"; // Reference to a forked fiber, with resumption stack- var FIBER = "Fiber"; // Actual fiber reference- var THUNK = "Thunk"; // Primed effect, ready to invoke-- function Aff(tag, _1, _2, _3) {- this.tag = tag;- this._1 = _1;- this._2 = _2;- this._3 = _3;- }-- function AffCtr(tag) {- var fn = function (_1, _2, _3) {- return new Aff(tag, _1, _2, _3);- };- fn.tag = tag;- return fn;- }-- function nonCanceler(error) {- return new Aff(PURE, void 0);- }-- function runEff(eff) {- try {- eff();- } catch (error) {- setTimeout(function () {- throw error;- }, 0);- }- }-- function runSync(left, right, eff) {- try {- return right(eff());- } catch (error) {- return left(error);- }- }-- function runAsync(left, eff, k) {- try {- return eff(k)();- } catch (error) {- k(left(error))();- return nonCanceler;- }- }-- var Scheduler = function () {- var limit = 1024;- var size = 0;- var ix = 0;- var queue = new Array(limit);- var draining = false;-- function drain() {- var thunk;- draining = true;- while (size !== 0) {- size--;- thunk = queue[ix];- queue[ix] = void 0;- ix = (ix + 1) % limit;- thunk();- }- draining = false;- }-- return {- isDraining: function () {- return draining;- },- enqueue: function (cb) {- var i, tmp;- if (size === limit) {- tmp = draining;- drain();- draining = tmp;- }-- queue[(ix + size) % limit] = cb;- size++;-- if (!draining) {- drain();- }- }- };- }();-- function Supervisor(util) {- var fibers = {};- var fiberId = 0;- var count = 0;-- return {- register: function (fiber) {- var fid = fiberId++;- fiber.onComplete({- rethrow: true,- handler: function (result) {- return function () {- count--;- delete fibers[fid];- };- }- });- fibers[fid] = fiber;- count++;- },- isEmpty: function () {- return count === 0;- },- killAll: function (killError, cb) {- return function () {- var killCount = 0;- var kills = {};-- function kill(fid) {- kills[fid] = fibers[fid].kill(killError, function (result) {- return function () {- delete kills[fid];- killCount--;- if (util.isLeft(result) && util.fromLeft(result)) {- setTimeout(function () {- throw util.fromLeft(result);- }, 0);- }- if (killCount === 0) {- cb();- }- };- })();- }-- for (var k in fibers) {- if (fibers.hasOwnProperty(k)) {- killCount++;- kill(k);- }- }-- fibers = {};- fiberId = 0;- count = 0;-- return function (error) {- return new Aff(SYNC, function () {- for (var k in kills) {- if (kills.hasOwnProperty(k)) {- kills[k]();- }- }- });- };- };- }- };- }-- // Fiber state machine- var SUSPENDED = 0; // Suspended, pending a join.- var CONTINUE = 1; // Interpret the next instruction.- var STEP_BIND = 2; // Apply the next bind.- var STEP_RESULT = 3; // Handle potential failure from a result.- var PENDING = 4; // An async effect is running.- var RETURN = 5; // The current stack has returned.- var COMPLETED = 6; // The entire fiber has completed.-- function Fiber(util, supervisor, aff) {- // Monotonically increasing tick, increased on each asynchronous turn.- var runTick = 0;-- // The current branch of the state machine.- var status = SUSPENDED;-- // The current point of interest for the state machine branch.- var step = aff; // Successful step- var fail = null; // Failure step- var interrupt = null; // Asynchronous interrupt-- // Stack of continuations for the current fiber.- var bhead = null;- var btail = null;-- // Stack of attempts and finalizers for error recovery. Every `Cons` is also- // tagged with current `interrupt` state. We use this to track which items- // should be ignored or evaluated as a result of a kill.- var attempts = null;-- // A special state is needed for Bracket, because it cannot be killed. When- // we enter a bracket acquisition or finalizer, we increment the counter,- // and then decrement once complete.- var bracketCount = 0;-- // Each join gets a new id so they can be revoked.- var joinId = 0;- var joins = null;- var rethrow = true;-- // Each invocation of `run` requires a tick. When an asynchronous effect is- // resolved, we must check that the local tick coincides with the fiber- // tick before resuming. This prevents multiple async continuations from- // accidentally resuming the same fiber. A common example may be invoking- // the provided callback in `makeAff` more than once, but it may also be an- // async effect resuming after the fiber was already cancelled.- function run(localRunTick) {- var tmp, result, attempt, canceler;- while (true) {- tmp = null;- result = null;- attempt = null;- canceler = null;-- switch (status) {- case STEP_BIND:- status = CONTINUE;- step = bhead(step);- if (btail === null) {- bhead = null;- } else {- bhead = btail._1;- btail = btail._2;- }- break;-- case STEP_RESULT:- if (util.isLeft(step)) {- status = RETURN;- fail = step;- step = null;- } else if (bhead === null) {- status = RETURN;- } else {- status = STEP_BIND;- step = util.fromRight(step);- }- break;-- case CONTINUE:- switch (step.tag) {- case BIND:- if (bhead) {- btail = new Aff(CONS, bhead, btail);- }- bhead = step._2;- status = CONTINUE;- step = step._1;- break;-- case PURE:- if (bhead === null) {- status = RETURN;- step = util.right(step._1);- } else {- status = STEP_BIND;- step = step._1;- }- break;-- case SYNC:- status = STEP_RESULT;- step = runSync(util.left, util.right, step._1);- break;-- case ASYNC:- status = PENDING;- step = runAsync(util.left, step._1, function (result) {- return function () {- if (runTick !== localRunTick) {- return;- }- runTick++;- Scheduler.enqueue(function () {- status = STEP_RESULT;- step = result;- run(runTick);- });- };- });- return;-- case THROW:- status = RETURN;- fail = util.left(step._1);- step = null;- break;-- // Enqueue the Catch so that we can call the error handler later on- // in case of an exception.- case CATCH:- if (bhead === null) {- attempts = new Aff(CONS, step, attempts, interrupt);- } else {- attempts = new Aff(CONS, step, new Aff(CONS, new Aff(RESUME, bhead, btail), attempts, interrupt), interrupt);- }- bhead = null;- btail = null;- status = CONTINUE;- step = step._1;- break;-- // Enqueue the Bracket so that we can call the appropriate handlers- // after resource acquisition.- case BRACKET:- bracketCount++;- if (bhead === null) {- attempts = new Aff(CONS, step, attempts, interrupt);- } else {- attempts = new Aff(CONS, step, new Aff(CONS, new Aff(RESUME, bhead, btail), attempts, interrupt), interrupt);- }- bhead = null;- btail = null;- status = CONTINUE;- step = step._1;- break;-- case FORK:- status = STEP_RESULT;- tmp = Fiber(util, supervisor, step._2);- if (supervisor) {- supervisor.register(tmp);- }- if (step._1) {- tmp.run();- }- step = util.right(tmp);- break;-- case SEQ:- status = CONTINUE;- step = sequential(util, supervisor, step._1);- break;- }- break;-- case RETURN:- bhead = null;- btail = null;- // If the current stack has returned, and we have no other stacks to- // resume or finalizers to run, the fiber has halted and we can- // invoke all join callbacks. Otherwise we need to resume.- if (attempts === null) {- status = COMPLETED;- step = interrupt || fail || step;- } else {- // The interrupt status for the enqueued item.- tmp = attempts._3;- attempt = attempts._1;- attempts = attempts._2;-- switch (attempt.tag) {- // We cannot recover from an interrupt. Otherwise we should- // continue stepping, or run the exception handler if an exception- // was raised.- case CATCH:- // We should compare the interrupt status as well because we- // only want it to apply if there has been an interrupt since- // enqueuing the catch.- if (interrupt && interrupt !== tmp) {- status = RETURN;- } else if (fail) {- status = CONTINUE;- step = attempt._2(util.fromLeft(fail));- fail = null;- }- break;-- // We cannot resume from an interrupt or exception.- case RESUME:- // As with Catch, we only want to ignore in the case of an- // interrupt since enqueing the item.- if (interrupt && interrupt !== tmp || fail) {- status = RETURN;- } else {- bhead = attempt._1;- btail = attempt._2;- status = STEP_BIND;- step = util.fromRight(step);- }- break;-- // If we have a bracket, we should enqueue the handlers,- // and continue with the success branch only if the fiber has- // not been interrupted. If the bracket acquisition failed, we- // should not run either.- case BRACKET:- bracketCount--;- if (fail === null) {- result = util.fromRight(step);- // We need to enqueue the Release with the same interrupt- // status as the Bracket that is initiating it.- attempts = new Aff(CONS, new Aff(RELEASE, attempt._2, result), attempts, tmp);- // We should only coninue as long as the interrupt status has not changed or- // we are currently within a non-interruptable finalizer.- if (interrupt === tmp || bracketCount > 0) {- status = CONTINUE;- step = attempt._3(result);- }- }- break;-- // Enqueue the appropriate handler. We increase the bracket count- // because it should not be cancelled.- case RELEASE:- bracketCount++;- attempts = new Aff(CONS, new Aff(FINALIZED, step), attempts, interrupt);- status = CONTINUE;- // It has only been killed if the interrupt status has changed- // since we enqueued the item.- if (interrupt && interrupt !== tmp) {- step = attempt._1.killed(util.fromLeft(interrupt))(attempt._2);- } else if (fail) {- step = attempt._1.failed(util.fromLeft(fail))(attempt._2);- } else {- step = attempt._1.completed(util.fromRight(step))(attempt._2);- }- break;-- case FINALIZER:- bracketCount++;- attempts = new Aff(CONS, new Aff(FINALIZED, step), attempts, interrupt);- status = CONTINUE;- step = attempt._1;- break;-- case FINALIZED:- bracketCount--;- status = RETURN;- step = attempt._1;- break;- }- }- break;-- case COMPLETED:- for (var k in joins) {- if (joins.hasOwnProperty(k)) {- rethrow = rethrow && joins[k].rethrow;- runEff(joins[k].handler(step));- }- }- joins = null;- // If we have an interrupt and a fail, then the thread threw while- // running finalizers. This should always rethrow in a fresh stack.- if (interrupt && fail) {- setTimeout(function () {- throw util.fromLeft(fail);- }, 0);- // If we have an unhandled exception, and no other fiber has joined- // then we need to throw the exception in a fresh stack.- } else if (util.isLeft(step) && rethrow) {- setTimeout(function () {- // Guard on reathrow because a completely synchronous fiber can- // still have an observer which was added after-the-fact.- if (rethrow) {- throw util.fromLeft(step);- }- }, 0);- }- return;- case SUSPENDED:- status = CONTINUE;- break;- case PENDING: return;- }- }- }-- function onComplete(join) {- return function () {- if (status === COMPLETED) {- rethrow = rethrow && join.rethrow;- join.handler(step)();- return function () {};- }-- var jid = joinId++;- joins = joins || {};- joins[jid] = join;-- return function() {- if (joins !== null) {- delete joins[jid];- }- };- };- }-- function kill(error, cb) {- return function () {- if (status === COMPLETED) {- cb(util.right(void 0))();- return function () {};- }-- var canceler = onComplete({- rethrow: false,- handler: function (/* unused */) {- return cb(util.right(void 0));- }- })();-- switch (status) {- case SUSPENDED:- interrupt = util.left(error);- status = COMPLETED;- step = interrupt;- run(runTick);- break;- case PENDING:- if (interrupt === null) {- interrupt = util.left(error);- }- if (bracketCount === 0) {- if (status === PENDING) {- attempts = new Aff(CONS, new Aff(FINALIZER, step(error)), attempts, interrupt);- }- status = RETURN;- step = null;- fail = null;- run(++runTick);- }- break;- default:- if (interrupt === null) {- interrupt = util.left(error);- }- if (bracketCount === 0) {- status = RETURN;- step = null;- fail = null;- }- }-- return canceler;- };- }-- function join(cb) {- return function () {- var canceler = onComplete({- rethrow: false,- handler: cb- })();- if (status === SUSPENDED) {- run(runTick);- }- return canceler;- };- }-- return {- kill: kill,- join: join,- onComplete: onComplete,- isSuspended: function () {- return status === SUSPENDED;- },- run: function () {- if (status === SUSPENDED) {- if (!Scheduler.isDraining()) {- Scheduler.enqueue(function () {- run(runTick);- });- } else {- run(runTick);- }- }- }- };- }-- function runPar(util, supervisor, par, cb) {- // Table of all forked fibers.- var fiberId = 0;- var fibers = {};-- // Table of currently running cancelers, as a product of `Alt` behavior.- var killId = 0;- var kills = {};-- // Error used for early cancelation on Alt branches.- var early = new Error("[ParAff] Early exit");-- // Error used to kill the entire tree.- var interrupt = null;-- // The root pointer of the tree.- var root = EMPTY;-- // Walks a tree, invoking all the cancelers. Returns the table of pending- // cancellation fibers.- function kill(error, par, cb) {- var step = par;- var head = null;- var tail = null;- var count = 0;- var kills = {};- var tmp, kid;-- loop: while (true) {- tmp = null;-- switch (step.tag) {- case FORKED:- if (step._3 === EMPTY) {- tmp = fibers[step._1];- kills[count++] = tmp.kill(error, function (result) {- return function () {- count--;- if (count === 0) {- cb(result)();- }- };- });- }- // Terminal case.- if (head === null) {- break loop;- }- // Go down the right side of the tree.- step = head._2;- if (tail === null) {- head = null;- } else {- head = tail._1;- tail = tail._2;- }- break;- case MAP:- step = step._2;- break;- case APPLY:- case ALT:- if (head) {- tail = new Aff(CONS, head, tail);- }- head = step;- step = step._1;- break;- }- }-- if (count === 0) {- cb(util.right(void 0))();- } else {- // Run the cancelation effects. We alias `count` because it's mutable.- kid = 0;- tmp = count;- for (; kid < tmp; kid++) {- kills[kid] = kills[kid]();- }- }-- return kills;- }-- // When a fiber resolves, we need to bubble back up the tree with the- // result, computing the applicative nodes.- function join(result, head, tail) {- var fail, step, lhs, rhs, tmp, kid;-- if (util.isLeft(result)) {- fail = result;- step = null;- } else {- step = result;- fail = null;- }-- loop: while (true) {- lhs = null;- rhs = null;- tmp = null;- kid = null;-- // We should never continue if the entire tree has been interrupted.- if (interrupt !== null) {- return;- }-- // We've made it all the way to the root of the tree, which means- // the tree has fully evaluated.- if (head === null) {- cb(fail || step)();- return;- }-- // The tree has already been computed, so we shouldn't try to do it- // again. This should never happen.- // TODO: Remove this?- if (head._3 !== EMPTY) {- return;- }-- switch (head.tag) {- case MAP:- if (fail === null) {- head._3 = util.right(head._1(util.fromRight(step)));- step = head._3;- } else {- head._3 = fail;- }- break;- case APPLY:- lhs = head._1._3;- rhs = head._2._3;- // If we have a failure we should kill the other side because we- // can't possible yield a result anymore.- if (fail) {- head._3 = fail;- tmp = true;- kid = killId++;-- kills[kid] = kill(early, fail === lhs ? head._2 : head._1, function (/* unused */) {- return function () {- delete kills[kid];- if (tmp) {- tmp = false;- } else if (tail === null) {- join(step, null, null);- } else {- join(step, tail._1, tail._2);- }- };- });-- if (tmp) {- tmp = false;- return;- }- } else if (lhs === EMPTY || rhs === EMPTY) {- // We can only proceed if both sides have resolved.- return;- } else {- step = util.right(util.fromRight(lhs)(util.fromRight(rhs)));- head._3 = step;- }- break;- case ALT:- lhs = head._1._3;- rhs = head._2._3;- // We can only proceed if both have resolved or we have a success- if (lhs === EMPTY && util.isLeft(rhs) || rhs === EMPTY && util.isLeft(lhs)) {- return;- }- // If both sides resolve with an error, we should continue with the- // first error- if (lhs !== EMPTY && util.isLeft(lhs) && rhs !== EMPTY && util.isLeft(rhs)) {- fail = step === lhs ? rhs : lhs;- step = null;- head._3 = fail;- } else {- head._3 = step;- tmp = true;- kid = killId++;- // Once a side has resolved, we need to cancel the side that is still- // pending before we can continue.- kills[kid] = kill(early, step === lhs ? head._2 : head._1, function (/* unused */) {- return function () {- delete kills[kid];- if (tmp) {- tmp = false;- } else if (tail === null) {- join(step, null, null);- } else {- join(step, tail._1, tail._2);- }- };- });-- if (tmp) {- tmp = false;- return;- }- }- break;- }-- if (tail === null) {- head = null;- } else {- head = tail._1;- tail = tail._2;- }- }- }-- function resolve(fiber) {- return function (result) {- return function () {- delete fibers[fiber._1];- fiber._3 = result;- join(result, fiber._2._1, fiber._2._2);- };- };- }-- // Walks the applicative tree, substituting non-applicative nodes with- // `FORKED` nodes. In this tree, all applicative nodes use the `_3` slot- // as a mutable slot for memoization. In an unresolved state, the `_3`- // slot is `EMPTY`. In the cases of `ALT` and `APPLY`, we always walk- // the left side first, because both operations are left-associative. As- // we `RETURN` from those branches, we then walk the right side.- function run() {- var status = CONTINUE;- var step = par;- var head = null;- var tail = null;- var tmp, fid;-- loop: while (true) {- tmp = null;- fid = null;-- switch (status) {- case CONTINUE:- switch (step.tag) {- case MAP:- if (head) {- tail = new Aff(CONS, head, tail);- }- head = new Aff(MAP, step._1, EMPTY, EMPTY);- step = step._2;- break;- case APPLY:- if (head) {- tail = new Aff(CONS, head, tail);- }- head = new Aff(APPLY, EMPTY, step._2, EMPTY);- step = step._1;- break;- case ALT:- if (head) {- tail = new Aff(CONS, head, tail);- }- head = new Aff(ALT, EMPTY, step._2, EMPTY);- step = step._1;- break;- default:- // When we hit a leaf value, we suspend the stack in the `FORKED`.- // When the fiber resolves, it can bubble back up the tree.- fid = fiberId++;- status = RETURN;- tmp = step;- step = new Aff(FORKED, fid, new Aff(CONS, head, tail), EMPTY);- tmp = Fiber(util, supervisor, tmp);- tmp.onComplete({- rethrow: false,- handler: resolve(step)- })();- fibers[fid] = tmp;- if (supervisor) {- supervisor.register(tmp);- }- }- break;- case RETURN:- // Terminal case, we are back at the root.- if (head === null) {- break loop;- }- // If we are done with the right side, we need to continue down the- // left. Otherwise we should continue up the stack.- if (head._1 === EMPTY) {- head._1 = step;- status = CONTINUE;- step = head._2;- head._2 = EMPTY;- } else {- head._2 = step;- step = head;- if (tail === null) {- head = null;- } else {- head = tail._1;- tail = tail._2;- }- }- }- }-- // Keep a reference to the tree root so it can be cancelled.- root = step;-- for (fid = 0; fid < fiberId; fid++) {- fibers[fid].run();- }- }-- // Cancels the entire tree. If there are already subtrees being canceled,- // we need to first cancel those joins. We will then add fresh joins for- // all pending branches including those that were in the process of being- // canceled.- function cancel(error, cb) {- interrupt = util.left(error);- var innerKills;- for (var kid in kills) {- if (kills.hasOwnProperty(kid)) {- innerKills = kills[kid];- for (kid in innerKills) {- if (innerKills.hasOwnProperty(kid)) {- innerKills[kid]();- }- }- }- }-- kills = null;- var newKills = kill(error, root, cb);-- return function (killError) {- return new Aff(ASYNC, function (killCb) {- return function () {- for (var kid in newKills) {- if (newKills.hasOwnProperty(kid)) {- newKills[kid]();- }- }- return nonCanceler;- };- });- };- }-- run();-- return function (killError) {- return new Aff(ASYNC, function (killCb) {- return function () {- return cancel(killError, killCb);- };- });- };- }-- function sequential(util, supervisor, par) {- return new Aff(ASYNC, function (cb) {- return function () {- return runPar(util, supervisor, par, cb);- };- });- }-- Aff.EMPTY = EMPTY;- Aff.Pure = AffCtr(PURE);- Aff.Throw = AffCtr(THROW);- Aff.Catch = AffCtr(CATCH);- Aff.Sync = AffCtr(SYNC);- Aff.Async = AffCtr(ASYNC);- Aff.Bind = AffCtr(BIND);- Aff.Bracket = AffCtr(BRACKET);- Aff.Fork = AffCtr(FORK);- Aff.Seq = AffCtr(SEQ);- Aff.ParMap = AffCtr(MAP);- Aff.ParApply = AffCtr(APPLY);- Aff.ParAlt = AffCtr(ALT);- Aff.Fiber = Fiber;- Aff.Supervisor = Supervisor;- Aff.Scheduler = Scheduler;- Aff.nonCanceler = nonCanceler;-- return Aff;- }();-- exports._pure = Aff.Pure;-- exports._throwError = Aff.Throw;-- exports._catchError = function (aff) {- return function (k) {- return Aff.Catch(aff, k);- };- };-- exports._map = function (f) {- return function (aff) {- if (aff.tag === Aff.Pure.tag) {- return Aff.Pure(f(aff._1));- } else {- return Aff.Bind(aff, function (value) {- return Aff.Pure(f(value));- });- }- };- };-- exports._bind = function (aff) {- return function (k) {- return Aff.Bind(aff, k);- };- };-- exports._fork = function (immediate) {- return function (aff) {- return Aff.Fork(immediate, aff);- };- };-- exports._liftEffect = Aff.Sync;-- exports._parAffMap = function (f) {- return function (aff) {- return Aff.ParMap(f, aff);- };- };-- exports._parAffApply = function (aff1) {- return function (aff2) {- return Aff.ParApply(aff1, aff2);- };- };-- exports.makeAff = Aff.Async;-- exports._makeFiber = function (util, aff) {- return function () {- return Aff.Fiber(util, null, aff);- };- }; -- exports._sequential = Aff.Seq;-})(PS["Effect.Aff"] = PS["Effect.Aff"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Unit = PS["Data.Unit"];- var Prelude = PS["Prelude"]; - var MonadThrow = function (Monad0, throwError) {- this.Monad0 = Monad0;- this.throwError = throwError;- };- var MonadError = function (MonadThrow0, catchError) {- this.MonadThrow0 = MonadThrow0;- this.catchError = catchError;- };- var throwError = function (dict) {- return dict.throwError;- }; - var catchError = function (dict) {- return dict.catchError;- };- var $$try = function (dictMonadError) {- return function (a) {- return catchError(dictMonadError)(Data_Functor.map(((((dictMonadError.MonadThrow0()).Monad0()).Bind1()).Apply0()).Functor0())(Data_Either.Right.create)(a))(function ($21) {- return Control_Applicative.pure(((dictMonadError.MonadThrow0()).Monad0()).Applicative0())(Data_Either.Left.create($21));- });- };- };- exports["catchError"] = catchError;- exports["throwError"] = throwError;- exports["MonadThrow"] = MonadThrow;- exports["MonadError"] = MonadError;- exports["try"] = $$try;-})(PS["Control.Monad.Error.Class"] = PS["Control.Monad.Error.Class"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Prelude = PS["Prelude"]; - var MonadState = function (Monad0, state) {- this.Monad0 = Monad0;- this.state = state;- };- var state = function (dict) {- return dict.state;- };- var put = function (dictMonadState) {- return function (s) {- return state(dictMonadState)(function (v) {- return new Data_Tuple.Tuple(Data_Unit.unit, s);- });- };- };- var modify_ = function (dictMonadState) {- return function (f) {- return state(dictMonadState)(function (s) {- return new Data_Tuple.Tuple(Data_Unit.unit, f(s));- });- };- };- var gets = function (dictMonadState) {- return function (f) {- return state(dictMonadState)(function (s) {- return new Data_Tuple.Tuple(f(s), s);- });- };- };- var get = function (dictMonadState) {- return state(dictMonadState)(function (s) {- return new Data_Tuple.Tuple(s, s);- });- };- exports["state"] = state;- exports["MonadState"] = MonadState;- exports["get"] = get;- exports["gets"] = gets;- exports["put"] = put;- exports["modify_"] = modify_;-})(PS["Control.Monad.State.Class"] = PS["Control.Monad.State.Class"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Prelude = PS["Prelude"]; - var MonadTrans = function (lift) {- this.lift = lift;- };- var lift = function (dict) {- return dict.lift;- };- exports["lift"] = lift;- exports["MonadTrans"] = MonadTrans;-})(PS["Control.Monad.Trans.Class"] = PS["Control.Monad.Trans.Class"] || {});-(function(exports) {- "use strict";- var Control_Category = PS["Control.Category"];- var Control_Monad = PS["Control.Monad"];- var Effect = PS["Effect"]; -- // | The `MonadEffect` class captures those monads which support native effects.- // |- // | Instances are provided for `Effect` itself, and the standard monad- // | transformers.- // |- // | `liftEffect` can be used in any appropriate monad transformer stack to lift an- // | action of type `Effect a` into the monad.- // |- var MonadEffect = function (Monad0, liftEffect) {- this.Monad0 = Monad0;- this.liftEffect = liftEffect;- }; - var liftEffect = function (dict) {- return dict.liftEffect;- };- exports["liftEffect"] = liftEffect;- exports["MonadEffect"] = MonadEffect;-})(PS["Effect.Class"] = PS["Effect.Class"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad = PS["Control.Monad"];- var Control_Monad_Cont_Class = PS["Control.Monad.Cont.Class"];- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Reader_Class = PS["Control.Monad.Reader.Class"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Monad_Writer_Class = PS["Control.Monad.Writer.Class"];- var Control_MonadPlus = PS["Control.MonadPlus"];- var Control_MonadZero = PS["Control.MonadZero"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Tuple = PS["Data.Tuple"];- var Effect_Class = PS["Effect.Class"];- var Prelude = PS["Prelude"]; - var ExceptT = function (x) {- return x;- };- var runExceptT = function (v) {- return v;- }; - var mapExceptT = function (f) {- return function (v) {- return f(v);- };- };- var functorExceptT = function (dictFunctor) {- return new Data_Functor.Functor(function (f) {- return mapExceptT(Data_Functor.map(dictFunctor)(Data_Functor.map(Data_Either.functorEither)(f)));- });- };- var monadExceptT = function (dictMonad) {- return new Control_Monad.Monad(function () {- return applicativeExceptT(dictMonad);- }, function () {- return bindExceptT(dictMonad);- });- };- var bindExceptT = function (dictMonad) {- return new Control_Bind.Bind(function () {- return applyExceptT(dictMonad);- }, function (v) {- return function (k) {- return Control_Bind.bind(dictMonad.Bind1())(v)(Data_Either.either(function ($97) {- return Control_Applicative.pure(dictMonad.Applicative0())(Data_Either.Left.create($97));- })(function (a) {- var v1 = k(a);- return v1;- }));- };- });- };- var applyExceptT = function (dictMonad) {- return new Control_Apply.Apply(function () {- return functorExceptT(((dictMonad.Bind1()).Apply0()).Functor0());- }, Control_Monad.ap(monadExceptT(dictMonad)));- };- var applicativeExceptT = function (dictMonad) {- return new Control_Applicative.Applicative(function () {- return applyExceptT(dictMonad);- }, function ($98) {- return ExceptT(Control_Applicative.pure(dictMonad.Applicative0())(Data_Either.Right.create($98)));- });- };- var monadThrowExceptT = function (dictMonad) {- return new Control_Monad_Error_Class.MonadThrow(function () {- return monadExceptT(dictMonad);- }, function ($102) {- return ExceptT(Control_Applicative.pure(dictMonad.Applicative0())(Data_Either.Left.create($102)));- });- };- exports["ExceptT"] = ExceptT;- exports["runExceptT"] = runExceptT;- exports["mapExceptT"] = mapExceptT;- exports["functorExceptT"] = functorExceptT;- exports["applyExceptT"] = applyExceptT;- exports["applicativeExceptT"] = applicativeExceptT;- exports["bindExceptT"] = bindExceptT;- exports["monadExceptT"] = monadExceptT;- exports["monadThrowExceptT"] = monadThrowExceptT;-})(PS["Control.Monad.Except.Trans"] = PS["Control.Monad.Except.Trans"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad = PS["Control.Monad"];- var Control_Monad_Cont_Class = PS["Control.Monad.Cont.Class"];- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Reader_Class = PS["Control.Monad.Reader.Class"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Monad_Writer_Class = PS["Control.Monad.Writer.Class"];- var Control_MonadPlus = PS["Control.MonadPlus"];- var Control_MonadZero = PS["Control.MonadZero"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Tuple = PS["Data.Tuple"];- var Effect_Class = PS["Effect.Class"];- var Prelude = PS["Prelude"]; - var MaybeT = function (x) {- return x;- };- exports["MaybeT"] = MaybeT;-})(PS["Control.Monad.Maybe.Trans"] = PS["Control.Monad.Maybe.Trans"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_Cont_Trans = PS["Control.Monad.Cont.Trans"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Control_Monad_Maybe_Trans = PS["Control.Monad.Maybe.Trans"];- var Control_Monad_Reader_Trans = PS["Control.Monad.Reader.Trans"];- var Control_Monad_Writer_Trans = PS["Control.Monad.Writer.Trans"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Functor_Compose = PS["Data.Functor.Compose"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Unit = PS["Data.Unit"];- var Effect_Class = PS["Effect.Class"];- var Effect_Ref = PS["Effect.Ref"];- var Prelude = PS["Prelude"];- var Parallel = function (Applicative1, Monad0, parallel, sequential) {- this.Applicative1 = Applicative1;- this.Monad0 = Monad0;- this.parallel = parallel;- this.sequential = sequential;- };- var sequential = function (dict) {- return dict.sequential;- };- var parallel = function (dict) {- return dict.parallel;- };- exports["parallel"] = parallel;- exports["sequential"] = sequential;- exports["Parallel"] = Parallel;-})(PS["Control.Parallel.Class"] = PS["Control.Parallel.Class"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alternative = PS["Control.Alternative"];- var Control_Apply = PS["Control.Apply"];- var Control_Category = PS["Control.Category"];- var Control_Parallel_Class = PS["Control.Parallel.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Traversable = PS["Data.Traversable"];- var Prelude = PS["Prelude"]; - var parTraverse_ = function (dictParallel) {- return function (dictFoldable) {- return function (f) {- return function ($17) {- return Control_Parallel_Class.sequential(dictParallel)(Data_Foldable.traverse_(dictParallel.Applicative1())(dictFoldable)(function ($18) {- return Control_Parallel_Class.parallel(dictParallel)(f($18));- })($17));- };- };- };- };- var parSequence_ = function (dictParallel) {- return function (dictFoldable) {- return parTraverse_(dictParallel)(dictFoldable)(Control_Category.identity(Control_Category.categoryFn));- };- };- exports["parTraverse_"] = parTraverse_;- exports["parSequence_"] = parSequence_;-})(PS["Control.Parallel"] = PS["Control.Parallel"] || {});-(function(exports) {- "use strict";-- exports.runFn4 = function (fn) {- return function (a) {- return function (b) {- return function (c) {- return function (d) {- return fn(a, b, c, d);- };- };- };- };- };-})(PS["Data.Function.Uncurried"] = PS["Data.Function.Uncurried"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Function.Uncurried"];- var Data_Unit = PS["Data.Unit"];- exports["runFn4"] = $foreign.runFn4;-})(PS["Data.Function.Uncurried"] = PS["Data.Function.Uncurried"] || {});-(function(exports) {- "use strict";-- exports.error = function (msg) {- return new Error(msg);- };-- exports.throwException = function (e) {- return function () {- throw e;- };- };-})(PS["Effect.Exception"] = PS["Effect.Exception"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Effect.Exception"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Show = PS["Data.Show"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var $$throw = function ($1) {- return $foreign.throwException($foreign.error($1));- };- exports["throw"] = $$throw;- exports["error"] = $foreign.error;- exports["throwException"] = $foreign.throwException;-})(PS["Effect.Exception"] = PS["Effect.Exception"] || {});-(function(exports) {- "use strict";-- exports.unsafePerformEffect = function (f) {- return f();- };-})(PS["Effect.Unsafe"] = PS["Effect.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Effect.Unsafe"];- var Effect = PS["Effect"];- exports["unsafePerformEffect"] = $foreign.unsafePerformEffect;-})(PS["Effect.Unsafe"] = PS["Effect.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Effect.Aff"];- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Lazy = PS["Control.Lazy"];- var Control_Monad = PS["Control.Monad"];- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Parallel = PS["Control.Parallel"];- var Control_Parallel_Class = PS["Control.Parallel.Class"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Functor = PS["Data.Functor"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Time_Duration = PS["Data.Time.Duration"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Class = PS["Effect.Class"];- var Effect_Exception = PS["Effect.Exception"];- var Effect_Unsafe = PS["Effect.Unsafe"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Canceler = function (x) {- return x;- };- var suspendAff = $foreign._fork(false);- var functorParAff = new Data_Functor.Functor($foreign._parAffMap);- var functorAff = new Data_Functor.Functor($foreign._map);- var forkAff = $foreign._fork(true);- var ffiUtil = (function () {- var unsafeFromRight = function (v) {- if (v instanceof Data_Either.Right) {- return v.value0;- };- if (v instanceof Data_Either.Left) {- return Partial_Unsafe.unsafeCrashWith("unsafeFromRight: Left");- };- throw new Error("Failed pattern match at Effect.Aff line 395, column 21 - line 397, column 31: " + [ v.constructor.name ]);- };- var unsafeFromLeft = function (v) {- if (v instanceof Data_Either.Left) {- return v.value0;- };- if (v instanceof Data_Either.Right) {- return Partial_Unsafe.unsafeCrashWith("unsafeFromLeft: Right");- };- throw new Error("Failed pattern match at Effect.Aff line 390, column 20 - line 394, column 3: " + [ v.constructor.name ]);- };- var isLeft = function (v) {- if (v instanceof Data_Either.Left) {- return true;- };- if (v instanceof Data_Either.Right) {- return false;- };- throw new Error("Failed pattern match at Effect.Aff line 385, column 12 - line 387, column 20: " + [ v.constructor.name ]);- };- return {- isLeft: isLeft,- fromLeft: unsafeFromLeft,- fromRight: unsafeFromRight,- left: Data_Either.Left.create,- right: Data_Either.Right.create- };- })();- var makeFiber = function (aff) {- return $foreign._makeFiber(ffiUtil, aff);- };- var launchAff = function (aff) {- return function __do() {- var v = makeFiber(aff)();- v.run();- return v;- };- };- var applyParAff = new Control_Apply.Apply(function () {- return functorParAff;- }, $foreign._parAffApply);- var monadAff = new Control_Monad.Monad(function () {- return applicativeAff;- }, function () {- return bindAff;- });- var bindAff = new Control_Bind.Bind(function () {- return applyAff;- }, $foreign._bind);- var applyAff = new Control_Apply.Apply(function () {- return functorAff;- }, Control_Monad.ap(monadAff));- var applicativeAff = new Control_Applicative.Applicative(function () {- return applyAff;- }, $foreign._pure);- var monadEffectAff = new Effect_Class.MonadEffect(function () {- return monadAff;- }, $foreign._liftEffect);- var effectCanceler = function ($50) {- return Canceler(Data_Function["const"](Effect_Class.liftEffect(monadEffectAff)($50)));- };- var joinFiber = function (v) {- return $foreign.makeAff(function (k) {- return Data_Functor.map(Effect.functorEffect)(effectCanceler)(v.join(k));- });- };- var functorFiber = new Data_Functor.Functor(function (f) {- return function (t) {- return Effect_Unsafe.unsafePerformEffect(makeFiber(Data_Functor.map(functorAff)(f)(joinFiber(t))));- };- });- var killFiber = function (e) {- return function (v) {- return Control_Bind.bind(bindAff)(Effect_Class.liftEffect(monadEffectAff)(v.isSuspended))(function (v1) {- if (v1) {- return Effect_Class.liftEffect(monadEffectAff)(Data_Functor["void"](Effect.functorEffect)(v.kill(e, Data_Function["const"](Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit)))));- };- return $foreign.makeAff(function (k) {- return Data_Functor.map(Effect.functorEffect)(effectCanceler)(v.kill(e, k));- });- });- };- };- var monadThrowAff = new Control_Monad_Error_Class.MonadThrow(function () {- return monadAff;- }, $foreign._throwError);- var monadErrorAff = new Control_Monad_Error_Class.MonadError(function () {- return monadThrowAff;- }, $foreign._catchError); - var runAff = function (k) {- return function (aff) {- return launchAff(Control_Bind.bindFlipped(bindAff)(function ($51) {- return Effect_Class.liftEffect(monadEffectAff)(k($51));- })(Control_Monad_Error_Class["try"](monadErrorAff)(aff)));- };- };- var runAff_ = function (k) {- return function (aff) {- return Data_Functor["void"](Effect.functorEffect)(runAff(k)(aff));- };- };- var parallelAff = new Control_Parallel_Class.Parallel(function () {- return applicativeParAff;- }, function () {- return monadAff;- }, Unsafe_Coerce.unsafeCoerce, $foreign._sequential);- var applicativeParAff = new Control_Applicative.Applicative(function () {- return applyParAff;- }, function ($53) {- return Control_Parallel_Class.parallel(parallelAff)(Control_Applicative.pure(applicativeAff)($53));- });- var monadRecAff = new Control_Monad_Rec_Class.MonadRec(function () {- return monadAff;- }, function (k) {- var go = function (a) {- return Control_Bind.bind(bindAff)(k(a))(function (v) {- if (v instanceof Control_Monad_Rec_Class.Done) {- return Control_Applicative.pure(applicativeAff)(v.value0);- };- if (v instanceof Control_Monad_Rec_Class.Loop) {- return go(v.value0);- };- throw new Error("Failed pattern match at Effect.Aff line 99, column 7 - line 101, column 22: " + [ v.constructor.name ]);- });- };- return go;- });- var nonCanceler = Data_Function["const"](Control_Applicative.pure(applicativeAff)(Data_Unit.unit));- exports["Canceler"] = Canceler;- exports["launchAff"] = launchAff;- exports["runAff"] = runAff;- exports["runAff_"] = runAff_;- exports["forkAff"] = forkAff;- exports["suspendAff"] = suspendAff;- exports["killFiber"] = killFiber;- exports["joinFiber"] = joinFiber;- exports["nonCanceler"] = nonCanceler;- exports["effectCanceler"] = effectCanceler;- exports["functorAff"] = functorAff;- exports["applyAff"] = applyAff;- exports["applicativeAff"] = applicativeAff;- exports["bindAff"] = bindAff;- exports["monadAff"] = monadAff;- exports["monadRecAff"] = monadRecAff;- exports["monadThrowAff"] = monadThrowAff;- exports["monadErrorAff"] = monadErrorAff;- exports["monadEffectAff"] = monadEffectAff;- exports["functorParAff"] = functorParAff;- exports["applyParAff"] = applyParAff;- exports["applicativeParAff"] = applicativeParAff;- exports["parallelAff"] = parallelAff;- exports["functorFiber"] = functorFiber;- exports["makeAff"] = $foreign.makeAff;-})(PS["Effect.Aff"] = PS["Effect.Aff"] || {});-(function(exports) {- "use strict";-- exports._app = function() {- return app;- }-- exports._closest = function(just, nothing, selector, el) {- var node = el.closest(selector);- if(node) {- return just(node);- } else {- return nothing;- }- }-- exports._innerHtml = function(el) {- return el.innerHTML;- }-- exports._setInnerHtml = function(content, el) {- el.innerHTML = content;- return el;- }-- exports._createFormData = function(formElement) {- return new FormData(formElement);- }-- exports._createFormString = function(formElement) {- return new URLSearchParams(new FormData(formElement)).toString()- }-- exports._createFormArray = function(formElement) {- return Array.from(new FormData(formElement));- }-- exports._getDataAttribute = function(name, el) {- return el.dataset[name];- }-- exports._setDataAttribute = function(name, value, el) {- return el.dataset[name] = value;- }-- exports._moment8601 = function(tuple, s) {- var m = moment(s, moment.ISO_8601);- var s1 = m.fromNow();- var s2 = m.format('MMMM D YYYY, h:mm a') + " (" + m.format() + ") ";- return tuple(s1)(s2);- }-- exports._mmoment8601 = function(just, nothing, tuple, s) {- try {- var m = moment(s, moment.ISO_8601);- var s1 = m.fromNow();- var s2 = m.format('MMMM D YYYY, h:mm a') + " (" + m.format() + ") ";- return just(tuple(s1)(s2));- } catch (error) {- return nothing- }- }-- exports._closeWindow = function (window) {- window.close();- };-})(PS["Globals"] = PS["Globals"] || {});-(function(exports) {- "use strict";-- exports["null"] = null;-- exports.nullable = function (a, r, f) {- return a == null ? r : f(a);- };-- exports.notNull = function (x) {- return x;- };-})(PS["Data.Nullable"] = PS["Data.Nullable"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Nullable"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Show = PS["Data.Show"];- var Prelude = PS["Prelude"]; - var toNullable = Data_Maybe.maybe($foreign["null"])($foreign.notNull);- var toMaybe = function (n) {- return $foreign.nullable(n, Data_Maybe.Nothing.value, Data_Maybe.Just.create);- };- exports["toMaybe"] = toMaybe;- exports["toNullable"] = toNullable;-})(PS["Data.Nullable"] = PS["Data.Nullable"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Identity = PS["Data.Identity"];- var Data_Newtype = PS["Data.Newtype"];- var Prelude = PS["Prelude"]; - var runExcept = function ($0) {- return Data_Newtype.unwrap(Data_Identity.newtypeIdentity)(Control_Monad_Except_Trans.runExceptT($0));- };- exports["runExcept"] = runExcept;-})(PS["Control.Monad.Except"] = PS["Control.Monad.Except"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Category = PS["Control.Category"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Data_Unfoldable1 = PS["Data.Unfoldable1"];- var Prelude = PS["Prelude"]; - var NonEmpty = (function () {- function NonEmpty(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- NonEmpty.create = function (value0) {- return function (value1) {- return new NonEmpty(value0, value1);- };- };- return NonEmpty;- })();- var singleton = function (dictPlus) {- return function (a) {- return new NonEmpty(a, Control_Plus.empty(dictPlus));- };- };- var functorNonEmpty = function (dictFunctor) {- return new Data_Functor.Functor(function (f) {- return function (m) {- return new NonEmpty(f(m.value0), Data_Functor.map(dictFunctor)(f)(m.value1));- };- });- };- var foldableNonEmpty = function (dictFoldable) {- return new Data_Foldable.Foldable(function (dictMonoid) {- return function (f) {- return function (v) {- return Data_Semigroup.append(dictMonoid.Semigroup0())(f(v.value0))(Data_Foldable.foldMap(dictFoldable)(dictMonoid)(f)(v.value1));- };- };- }, function (f) {- return function (b) {- return function (v) {- return Data_Foldable.foldl(dictFoldable)(f)(f(b)(v.value0))(v.value1);- };- };- }, function (f) {- return function (b) {- return function (v) {- return f(v.value0)(Data_Foldable.foldr(dictFoldable)(f)(b)(v.value1));- };- };- });- };- exports["NonEmpty"] = NonEmpty;- exports["singleton"] = singleton;- exports["functorNonEmpty"] = functorNonEmpty;- exports["foldableNonEmpty"] = foldableNonEmpty;-})(PS["Data.NonEmpty"] = PS["Data.NonEmpty"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Comonad = PS["Control.Comonad"];- var Control_Extend = PS["Control.Extend"];- var Control_Monad = PS["Control.Monad"];- var Control_MonadPlus = PS["Control.MonadPlus"];- var Control_MonadZero = PS["Control.MonadZero"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Newtype = PS["Data.Newtype"];- var Data_NonEmpty = PS["Data.NonEmpty"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];- var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Data_Unfoldable1 = PS["Data.Unfoldable1"];- var Prelude = PS["Prelude"]; - var Nil = (function () {- function Nil() {-- };- Nil.value = new Nil();- return Nil;- })();- var Cons = (function () {- function Cons(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Cons.create = function (value0) {- return function (value1) {- return new Cons(value0, value1);- };- };- return Cons;- })();- var NonEmptyList = function (x) {- return x;- };- var foldableList = new Data_Foldable.Foldable(function (dictMonoid) {- return function (f) {- return Data_Foldable.foldl(foldableList)(function (acc) {- return function ($155) {- return Data_Semigroup.append(dictMonoid.Semigroup0())(acc)(f($155));- };- })(Data_Monoid.mempty(dictMonoid));- };- }, function (f) {- var go = function ($copy_b) {- return function ($copy_v) {- var $tco_var_b = $copy_b;- var $tco_done = false;- var $tco_result;- function $tco_loop(b, v) {- if (v instanceof Nil) {- $tco_done = true;- return b;- };- if (v instanceof Cons) {- $tco_var_b = f(b)(v.value0);- $copy_v = v.value1;- return;- };- throw new Error("Failed pattern match at Data.List.Types line 81, column 12 - line 83, column 30: " + [ v.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_b, $copy_v);- };- return $tco_result;- };- };- return go;- }, function (f) {- return function (b) {- var rev = Data_Foldable.foldl(foldableList)(Data_Function.flip(Cons.create))(Nil.value);- return function ($156) {- return Data_Foldable.foldl(foldableList)(Data_Function.flip(f))(b)(rev($156));- };- };- });- var foldableNonEmptyList = Data_NonEmpty.foldableNonEmpty(foldableList);- var functorList = new Data_Functor.Functor(function (f) {- return Data_Foldable.foldr(foldableList)(function (x) {- return function (acc) {- return new Cons(f(x), acc);- };- })(Nil.value);- });- var functorNonEmptyList = Data_NonEmpty.functorNonEmpty(functorList);- var semigroupList = new Data_Semigroup.Semigroup(function (xs) {- return function (ys) {- return Data_Foldable.foldr(foldableList)(Cons.create)(ys)(xs);- };- });- var applyList = new Control_Apply.Apply(function () {- return functorList;- }, function (v) {- return function (v1) {- if (v instanceof Nil) {- return Nil.value;- };- if (v instanceof Cons) {- return Data_Semigroup.append(semigroupList)(Data_Functor.map(functorList)(v.value0)(v1))(Control_Apply.apply(applyList)(v.value1)(v1));- };- throw new Error("Failed pattern match at Data.List.Types line 127, column 1 - line 127, column 33: " + [ v.constructor.name, v1.constructor.name ]);- };- });- var applicativeList = new Control_Applicative.Applicative(function () {- return applyList;- }, function (a) {- return new Cons(a, Nil.value);- }); - var altList = new Control_Alt.Alt(function () {- return functorList;- }, Data_Semigroup.append(semigroupList));- var plusList = new Control_Plus.Plus(function () {- return altList;- }, Nil.value);- exports["Nil"] = Nil;- exports["Cons"] = Cons;- exports["NonEmptyList"] = NonEmptyList;- exports["semigroupList"] = semigroupList;- exports["functorList"] = functorList;- exports["foldableList"] = foldableList;- exports["applyList"] = applyList;- exports["applicativeList"] = applicativeList;- exports["altList"] = altList;- exports["plusList"] = plusList;- exports["functorNonEmptyList"] = functorNonEmptyList;- exports["foldableNonEmptyList"] = foldableNonEmptyList;-})(PS["Data.List.Types"] = PS["Data.List.Types"] || {});-(function(exports) {- "use strict";-- exports.unsafeToForeign = function (value) {- return value;- };-- exports.unsafeFromForeign = function (value) {- return value;- };-- exports.typeOf = function (value) {- return typeof value;- };-- exports.tagOf = function (value) {- return Object.prototype.toString.call(value).slice(8, -1);- };-})(PS["Foreign"] = PS["Foreign"] || {});-(function(exports) {- "use strict";-- exports.fromNumberImpl = function (just) {- return function (nothing) {- return function (n) {- /* jshint bitwise: false */- return (n | 0) === n ? just(n) : nothing;- };- };- };-})(PS["Data.Int"] = PS["Data.Int"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Int"];- var Control_Category = PS["Control.Category"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Bounded = PS["Data.Bounded"];- var Data_CommutativeRing = PS["Data.CommutativeRing"];- var Data_DivisionRing = PS["Data.DivisionRing"];- var Data_Eq = PS["Data.Eq"];- var Data_EuclideanRing = PS["Data.EuclideanRing"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Int_Bits = PS["Data.Int.Bits"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Ring = PS["Data.Ring"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Global = PS["Global"];- var $$Math = PS["Math"];- var Prelude = PS["Prelude"]; - var fromNumber = $foreign.fromNumberImpl(Data_Maybe.Just.create)(Data_Maybe.Nothing.value);- exports["fromNumber"] = fromNumber;-})(PS["Data.Int"] = PS["Data.Int"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Lazy = PS["Control.Lazy"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_NonEmpty = PS["Data.NonEmpty"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Data_Unit = PS["Data.Unit"];- var Prelude = PS["Prelude"];- var reverse = (function () {- var go = function ($copy_acc) {- return function ($copy_v) {- var $tco_var_acc = $copy_acc;- var $tco_done = false;- var $tco_result;- function $tco_loop(acc, v) {- if (v instanceof Data_List_Types.Nil) {- $tco_done = true;- return acc;- };- if (v instanceof Data_List_Types.Cons) {- $tco_var_acc = new Data_List_Types.Cons(v.value0, acc);- $copy_v = v.value1;- return;- };- throw new Error("Failed pattern match at Data.List line 368, column 3 - line 368, column 19: " + [ acc.constructor.name, v.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_acc, $copy_v);- };- return $tco_result;- };- };- return go(Data_List_Types.Nil.value);- })();- var $$null = function (v) {- if (v instanceof Data_List_Types.Nil) {- return true;- };- return false;- };- var fromFoldable = function (dictFoldable) {- return Data_Foldable.foldr(dictFoldable)(Data_List_Types.Cons.create)(Data_List_Types.Nil.value);- };- exports["fromFoldable"] = fromFoldable;- exports["null"] = $$null;- exports["reverse"] = reverse;-})(PS["Data.List"] = PS["Data.List"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_NonEmpty = PS["Data.NonEmpty"];- var Data_Ord = PS["Data.Ord"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];- var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"];- var singleton = function ($160) {- return Data_List_Types.NonEmptyList(Data_NonEmpty.singleton(Data_List_Types.plusList)($160));- };- var cons = function (y) {- return function (v) {- return new Data_NonEmpty.NonEmpty(y, new Data_List_Types.Cons(v.value0, v.value1));- };- };- exports["singleton"] = singleton;- exports["cons"] = cons;-})(PS["Data.List.NonEmpty"] = PS["Data.List.NonEmpty"] || {});-(function(exports) {- "use strict";-- exports.singleton = function (c) {- return c;- };-- exports.length = function (s) {- return s.length;- };-- exports.drop = function (n) {- return function (s) {- return s.substring(n);- };- };-})(PS["Data.String.CodeUnits"] = PS["Data.String.CodeUnits"] || {});-(function(exports) {- "use strict";-- exports.charAt = function (i) {- return function (s) {- if (i >= 0 && i < s.length) return s.charAt(i);- throw new Error("Data.String.Unsafe.charAt: Invalid index.");- };- };-})(PS["Data.String.Unsafe"] = PS["Data.String.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.String.Unsafe"];- exports["charAt"] = $foreign.charAt;-})(PS["Data.String.Unsafe"] = PS["Data.String.Unsafe"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.String.CodeUnits"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ring = PS["Data.Ring"];- var Data_Semiring = PS["Data.Semiring"];- var Data_String_Pattern = PS["Data.String.Pattern"];- var Data_String_Unsafe = PS["Data.String.Unsafe"];- var Prelude = PS["Prelude"];- exports["singleton"] = $foreign.singleton;- exports["length"] = $foreign.length;- exports["drop"] = $foreign.drop;-})(PS["Data.String.CodeUnits"] = PS["Data.String.CodeUnits"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Foreign"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Except = PS["Control.Monad.Except"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Either = PS["Data.Either"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Identity = PS["Data.Identity"];- var Data_Int = PS["Data.Int"];- var Data_List_NonEmpty = PS["Data.List.NonEmpty"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_String_CodeUnits = PS["Data.String.CodeUnits"];- var Prelude = PS["Prelude"]; - var ForeignError = (function () {- function ForeignError(value0) {- this.value0 = value0;- };- ForeignError.create = function (value0) {- return new ForeignError(value0);- };- return ForeignError;- })();- var TypeMismatch = (function () {- function TypeMismatch(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- TypeMismatch.create = function (value0) {- return function (value1) {- return new TypeMismatch(value0, value1);- };- };- return TypeMismatch;- })();- var ErrorAtIndex = (function () {- function ErrorAtIndex(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- ErrorAtIndex.create = function (value0) {- return function (value1) {- return new ErrorAtIndex(value0, value1);- };- };- return ErrorAtIndex;- })();- var ErrorAtProperty = (function () {- function ErrorAtProperty(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- ErrorAtProperty.create = function (value0) {- return function (value1) {- return new ErrorAtProperty(value0, value1);- };- };- return ErrorAtProperty;- })();- var renderForeignError = function (v) {- if (v instanceof ForeignError) {- return v.value0;- };- if (v instanceof ErrorAtIndex) {- return "Error at array index " + (Data_Show.show(Data_Show.showInt)(v.value0) + (": " + renderForeignError(v.value1)));- };- if (v instanceof ErrorAtProperty) {- return "Error at property " + (Data_Show.show(Data_Show.showString)(v.value0) + (": " + renderForeignError(v.value1)));- };- if (v instanceof TypeMismatch) {- return "Type mismatch: expected " + (v.value0 + (", found " + v.value1));- };- throw new Error("Failed pattern match at Foreign line 72, column 1 - line 72, column 45: " + [ v.constructor.name ]);- };- var fail = function ($107) {- return Control_Monad_Error_Class.throwError(Control_Monad_Except_Trans.monadThrowExceptT(Data_Identity.monadIdentity))(Data_List_NonEmpty.singleton($107));- };- var unsafeReadTagged = function (tag) {- return function (value) {- if ($foreign.tagOf(value) === tag) {- return Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity))($foreign.unsafeFromForeign(value));- };- if (Data_Boolean.otherwise) {- return fail(new TypeMismatch(tag, $foreign.tagOf(value)));- };- throw new Error("Failed pattern match at Foreign line 106, column 1 - line 106, column 55: " + [ tag.constructor.name, value.constructor.name ]);- };- };- var readBoolean = unsafeReadTagged("Boolean");- var readString = unsafeReadTagged("String");- exports["ForeignError"] = ForeignError;- exports["TypeMismatch"] = TypeMismatch;- exports["ErrorAtIndex"] = ErrorAtIndex;- exports["ErrorAtProperty"] = ErrorAtProperty;- exports["renderForeignError"] = renderForeignError;- exports["unsafeReadTagged"] = unsafeReadTagged;- exports["readString"] = readString;- exports["readBoolean"] = readBoolean;- exports["fail"] = fail;- exports["unsafeToForeign"] = $foreign.unsafeToForeign;- exports["typeOf"] = $foreign.typeOf;-})(PS["Foreign"] = PS["Foreign"] || {});-(function(exports) {- "use strict";-- exports.unsafeReadPropImpl = function (f, s, key, value) {- return value == null ? f : s(value[key]);- };-})(PS["Foreign.Index"] = PS["Foreign.Index"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Foreign.Index"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Identity = PS["Data.Identity"];- var Data_List_NonEmpty = PS["Data.List.NonEmpty"];- var Foreign = PS["Foreign"];- var Prelude = PS["Prelude"];- var unsafeReadProp = function (k) {- return function (value) {- return $foreign.unsafeReadPropImpl(Foreign.fail(new Foreign.TypeMismatch("object", Foreign.typeOf(value))), Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity)), k, value);- };- };- var readProp = unsafeReadProp;- exports["readProp"] = readProp;-})(PS["Foreign.Index"] = PS["Foreign.Index"] || {});-(function(exports) {- "use strict";-- exports.empty = {};-- exports._lookup = function (no, yes, k, m) {- return k in m ? yes(m[k]) : no;- };-- function toArrayWithKey(f) {- return function (m) {- var r = [];- for (var k in m) {- if (hasOwnProperty.call(m, k)) {- r.push(f(k)(m[k]));- }- }- return r;- };- }-})(PS["Foreign.Object"] = PS["Foreign.Object"] || {});-(function(exports) {- "use strict";-- exports["new"] = function () {- return {};- };-})(PS["Foreign.Object.ST"] = PS["Foreign.Object.ST"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Foreign.Object.ST"];- var Control_Monad_ST = PS["Control.Monad.ST"];- var Data_Maybe = PS["Data.Maybe"];- exports["new"] = $foreign["new"];-})(PS["Foreign.Object.ST"] = PS["Foreign.Object.ST"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Foreign.Object"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad_ST = PS["Control.Monad.ST"];- var Control_Monad_ST_Internal = PS["Control.Monad.ST.Internal"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Array = PS["Data.Array"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];- var Data_Function = PS["Data.Function"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Functor = PS["Data.Functor"];- var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Foreign_Object_ST = PS["Foreign.Object.ST"];- var Prelude = PS["Prelude"];- var lookup = Data_Function_Uncurried.runFn4($foreign._lookup)(Data_Maybe.Nothing.value)(Data_Maybe.Just.create);- exports["lookup"] = lookup;- exports["empty"] = $foreign.empty;-})(PS["Foreign.Object"] = PS["Foreign.Object"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Type_Data_Boolean = PS["Type.Data.Boolean"];- var Type_Data_Symbol = PS["Type.Data.Symbol"];- var Type_Equality = PS["Type.Equality"];- var RLProxy = (function () {- function RLProxy() {-- };- RLProxy.value = new RLProxy();- return RLProxy;- })();- exports["RLProxy"] = RLProxy;-})(PS["Type.Row"] = PS["Type.Row"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Eq = PS["Data.Eq"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Symbol = PS["Data.Symbol"];- var Prelude = PS["Prelude"];- var Record_Unsafe = PS["Record.Unsafe"];- var Record_Unsafe_Union = PS["Record.Unsafe.Union"];- var Type_Row = PS["Type.Row"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var get = function (dictIsSymbol) {- return function (dictCons) {- return function (l) {- return function (r) {- return Record_Unsafe.unsafeGet(Data_Symbol.reflectSymbol(dictIsSymbol)(l))(r);- };- };- };- };- exports["get"] = get;-})(PS["Record"] = PS["Record"] || {});-(function(exports) {- "use strict";-- exports.copyRecord = function(rec) {- var copy = {};- for (var key in rec) {- if ({}.hasOwnProperty.call(rec, key)) {- copy[key] = rec[key];- }- }- return copy;- };-- exports.unsafeInsert = function(l) {- return function(a) {- return function(rec) {- rec[l] = a;- return rec;- };- };- };-})(PS["Record.Builder"] = PS["Record.Builder"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Record.Builder"];- var Control_Category = PS["Control.Category"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Symbol = PS["Data.Symbol"];- var Prelude = PS["Prelude"];- var Record_Unsafe_Union = PS["Record.Unsafe.Union"];- var Type_Row = PS["Type.Row"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var semigroupoidBuilder = Control_Semigroupoid.semigroupoidFn;- var insert = function (dictCons) {- return function (dictLacks) {- return function (dictIsSymbol) {- return function (l) {- return function (a) {- return function (r1) {- return $foreign.unsafeInsert(Data_Symbol.reflectSymbol(dictIsSymbol)(l))(a)(r1);- };- };- };- };- };- };- var categoryBuilder = Control_Category.categoryFn;- var build = function (v) {- return function (r1) {- return v($foreign.copyRecord(r1));- };- };- exports["build"] = build;- exports["insert"] = insert;- exports["semigroupoidBuilder"] = semigroupoidBuilder;- exports["categoryBuilder"] = categoryBuilder;-})(PS["Record.Builder"] = PS["Record.Builder"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Simple.JSON"];- var Control_Alt = PS["Control.Alt"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad_Except = PS["Control.Monad.Except"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Either = PS["Data.Either"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Identity = PS["Data.Identity"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Symbol = PS["Data.Symbol"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Variant = PS["Data.Variant"];- var Effect_Exception = PS["Effect.Exception"];- var Effect_Uncurried = PS["Effect.Uncurried"];- var Effect_Unsafe = PS["Effect.Unsafe"];- var Foreign = PS["Foreign"];- var Foreign_Index = PS["Foreign.Index"];- var Foreign_Object = PS["Foreign.Object"];- var Global_Unsafe = PS["Global.Unsafe"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"];- var Record = PS["Record"];- var Record_Builder = PS["Record.Builder"];- var Type_Prelude = PS["Type.Prelude"];- var Type_Row = PS["Type.Row"];- var WriteForeign = function (writeImpl) {- this.writeImpl = writeImpl;- };- var WriteForeignFields = function (writeImplFields) {- this.writeImplFields = writeImplFields;- };- var writeImplFields = function (dict) {- return dict.writeImplFields;- };- var writeImpl = function (dict) {- return dict.writeImpl;- };- var writeJSON = function (dictWriteForeign) {- return function ($71) {- return Global_Unsafe.unsafeStringify(writeImpl(dictWriteForeign)($71));- };- };- var writeForeignString = new WriteForeign(Foreign.unsafeToForeign);- var writeForeignInt = new WriteForeign(Foreign.unsafeToForeign); - var writeForeignBoolean = new WriteForeign(Foreign.unsafeToForeign);- var recordWriteForeign = function (dictRowToList) {- return function (dictWriteForeignFields) {- return new WriteForeign(function (rec) {- var steps = writeImplFields(dictWriteForeignFields)(Type_Row.RLProxy.value)(rec);- return Foreign.unsafeToForeign(Record_Builder.build(steps)({}));- });- };- }; - var nilWriteForeignFields = new WriteForeignFields(function (v) {- return function (v1) {- return Control_Category.identity(Record_Builder.categoryBuilder);- };- });- var consWriteForeignFields = function (dictIsSymbol) {- return function (dictWriteForeign) {- return function (dictWriteForeignFields) {- return function (dictCons) {- return function (dictLacks) {- return function (dictCons1) {- return new WriteForeignFields(function (v) {- return function (rec) {- var rest = writeImplFields(dictWriteForeignFields)(Type_Row.RLProxy.value)(rec);- var value = writeImpl(dictWriteForeign)(Record.get(dictIsSymbol)(dictCons)(Data_Symbol.SProxy.value)(rec));- var result = Control_Semigroupoid.compose(Record_Builder.semigroupoidBuilder)(Record_Builder.insert(dictCons1)(dictLacks)(dictIsSymbol)(Data_Symbol.SProxy.value)(value))(rest);- return result;- };- });- };- };- };- };- };- };- exports["writeJSON"] = writeJSON;- exports["WriteForeign"] = WriteForeign;- exports["writeImpl"] = writeImpl;- exports["WriteForeignFields"] = WriteForeignFields;- exports["writeImplFields"] = writeImplFields;- exports["writeForeignString"] = writeForeignString;- exports["writeForeignInt"] = writeForeignInt;- exports["writeForeignBoolean"] = writeForeignBoolean;- exports["recordWriteForeign"] = recordWriteForeign;- exports["consWriteForeignFields"] = consWriteForeignFields;- exports["nilWriteForeignFields"] = nilWriteForeignFields;-})(PS["Simple.JSON"] = PS["Simple.JSON"] || {});-(function(exports) {- "use strict";- var Data_Symbol = PS["Data.Symbol"];- var Simple_JSON = PS["Simple.JSON"];- var note_wfI = Simple_JSON.recordWriteForeign()(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "created";- }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "id";- }))(Simple_JSON.writeForeignInt)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "length";- }))(Simple_JSON.writeForeignInt)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "text";- }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "title";- }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "updated";- }))(Simple_JSON.writeForeignString)(Simple_JSON.nilWriteForeignFields)()()())()()())()()())()()())()()())()()());- var bookmark_wfI = Simple_JSON.recordWriteForeign()(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "bid";- }))(Simple_JSON.writeForeignInt)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "description";- }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "private";- }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "selected";- }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "tags";- }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "time";- }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "title";- }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "toread";- }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {- return "url";- }))(Simple_JSON.writeForeignString)(Simple_JSON.nilWriteForeignFields)()()())()()())()()())()()())()()())()()())()()())()()())()()());- exports["bookmark_wfI"] = bookmark_wfI;- exports["note_wfI"] = note_wfI;-})(PS["Model"] = PS["Model"] || {});-(function(exports) {- /* global window */- "use strict";-- exports.window = function () {- return window;- };-})(PS["Web.HTML"] = PS["Web.HTML"] || {});-(function(exports) {- "use strict";-- exports._body = function (doc) {- return function () {- return doc.body;- };- };-})(PS["Web.HTML.HTMLDocument"] = PS["Web.HTML.HTMLDocument"] || {});-(function(exports) {- "use strict";-- exports.removeAttribute = function (name) {- return function (element) {- return function () {- element.removeAttribute(name);- return {};- };- };- };-})(PS["Web.DOM.Element"] = PS["Web.DOM.Element"] || {});-(function(exports) {- "use strict"; -- exports._querySelector = function (selector) {- return function (node) {- return function () {- return node.querySelector(selector);- };- };- };-- exports.querySelectorAll = function (selector) {- return function (node) {- return function () {- return node.querySelectorAll(selector);- };- };- };-})(PS["Web.DOM.ParentNode"] = PS["Web.DOM.ParentNode"] || {});-(function(exports) {- "use strict";-- exports.toArray = function (list) {- return function () {- return [].slice.call(list);- };- };-})(PS["Web.DOM.NodeList"] = PS["Web.DOM.NodeList"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.DOM.NodeList"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];- exports["toArray"] = $foreign.toArray;-})(PS["Web.DOM.NodeList"] = PS["Web.DOM.NodeList"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.DOM.ParentNode"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Ord = PS["Data.Ord"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Web_DOM_HTMLCollection = PS["Web.DOM.HTMLCollection"];- var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];- var Web_DOM_NodeList = PS["Web.DOM.NodeList"];- var querySelector = function (qs) {- return function ($3) {- return Data_Functor.map(Effect.functorEffect)(Data_Nullable.toMaybe)($foreign._querySelector(qs)($3));- };- };- exports["querySelector"] = querySelector;- exports["querySelectorAll"] = $foreign.querySelectorAll;-})(PS["Web.DOM.ParentNode"] = PS["Web.DOM.ParentNode"] || {});-(function(exports) {- "use strict";-- exports.eventListener = function (fn) {- return function () {- return function (event) {- return fn(event)();- };- };- };-})(PS["Web.Event.EventTarget"] = PS["Web.Event.EventTarget"] || {});-(function(exports) {- "use strict";-- exports._currentTarget = function (e) {- return e.currentTarget;- };-- exports.preventDefault = function (e) {- return function () {- return e.preventDefault();- };- };-})(PS["Web.Event.Event"] = PS["Web.Event.Event"] || {});-(function(exports) {- "use strict";-- exports.toCharCode = function (c) {- return c.charCodeAt(0);- };-- exports.fromCharCode = function (c) {- return String.fromCharCode(c);- };-})(PS["Data.Enum"] = PS["Data.Enum"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Enum"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_MonadPlus = PS["Control.MonadPlus"];- var Control_MonadZero = PS["Control.MonadZero"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Bounded = PS["Data.Bounded"];- var Data_Either = PS["Data.Either"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Data_Unfoldable1 = PS["Data.Unfoldable1"];- var Data_Unit = PS["Data.Unit"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"];- var Enum = function (Ord0, pred, succ) {- this.Ord0 = Ord0;- this.pred = pred;- this.succ = succ;- };- var BoundedEnum = function (Bounded0, Enum1, cardinality, fromEnum, toEnum) {- this.Bounded0 = Bounded0;- this.Enum1 = Enum1;- this.cardinality = cardinality;- this.fromEnum = fromEnum;- this.toEnum = toEnum;- };- var toEnum = function (dict) {- return dict.toEnum;- };- var succ = function (dict) {- return dict.succ;- }; - var pred = function (dict) {- return dict.pred;- }; - var fromEnum = function (dict) {- return dict.fromEnum;- };- var toEnumWithDefaults = function (dictBoundedEnum) {- return function (low) {- return function (high) {- return function (x) {- var v = toEnum(dictBoundedEnum)(x);- if (v instanceof Data_Maybe.Just) {- return v.value0;- };- if (v instanceof Data_Maybe.Nothing) {- var $51 = x < fromEnum(dictBoundedEnum)(Data_Bounded.bottom(dictBoundedEnum.Bounded0()));- if ($51) {- return low;- };- return high;- };- throw new Error("Failed pattern match at Data.Enum line 158, column 33 - line 160, column 62: " + [ v.constructor.name ]);- };- };- };- };- var defaultSucc = function (toEnum$prime) {- return function (fromEnum$prime) {- return function (a) {- return toEnum$prime(fromEnum$prime(a) + 1 | 0);- };- };- };- var defaultPred = function (toEnum$prime) {- return function (fromEnum$prime) {- return function (a) {- return toEnum$prime(fromEnum$prime(a) - 1 | 0);- };- };- };- var charToEnum = function (v) {- if (v >= Data_Bounded.bottom(Data_Bounded.boundedInt) && v <= Data_Bounded.top(Data_Bounded.boundedInt)) {- return new Data_Maybe.Just($foreign.fromCharCode(v));- };- return Data_Maybe.Nothing.value;- };- var enumChar = new Enum(function () {- return Data_Ord.ordChar;- }, defaultPred(charToEnum)($foreign.toCharCode), defaultSucc(charToEnum)($foreign.toCharCode));- var cardinality = function (dict) {- return dict.cardinality;- }; - var boundedEnumChar = new BoundedEnum(function () {- return Data_Bounded.boundedChar;- }, function () {- return enumChar;- }, $foreign.toCharCode(Data_Bounded.top(Data_Bounded.boundedChar)) - $foreign.toCharCode(Data_Bounded.bottom(Data_Bounded.boundedChar)) | 0, $foreign.toCharCode, charToEnum);- exports["Enum"] = Enum;- exports["succ"] = succ;- exports["pred"] = pred;- exports["BoundedEnum"] = BoundedEnum;- exports["cardinality"] = cardinality;- exports["toEnum"] = toEnum;- exports["fromEnum"] = fromEnum;- exports["toEnumWithDefaults"] = toEnumWithDefaults;- exports["defaultSucc"] = defaultSucc;- exports["defaultPred"] = defaultPred;- exports["enumChar"] = enumChar;- exports["boundedEnumChar"] = boundedEnumChar;-})(PS["Data.Enum"] = PS["Data.Enum"] || {});-(function(exports) {- "use strict";- var $foreign = PS["Web.Event.Event"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_DateTime_Instant = PS["Data.DateTime.Instant"];- var Data_Enum = PS["Data.Enum"];- var Data_Eq = PS["Data.Eq"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Ord = PS["Data.Ord"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Web_Event_EventPhase = PS["Web.Event.EventPhase"];- var Web_Event_Internal_Types = PS["Web.Event.Internal.Types"];-- // | The element that the event listener was added to.- var currentTarget = function ($6) {- return Data_Nullable.toMaybe($foreign._currentTarget($6));- };- exports["currentTarget"] = currentTarget;- exports["preventDefault"] = $foreign.preventDefault;-})(PS["Web.Event.Event"] = PS["Web.Event.Event"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.Event.EventTarget"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Web_Event_Event = PS["Web.Event.Event"];- var Web_Event_Internal_Types = PS["Web.Event.Internal.Types"];- exports["eventListener"] = $foreign.eventListener;-})(PS["Web.Event.EventTarget"] = PS["Web.Event.EventTarget"] || {});-(function(exports) {- "use strict";-- exports._unsafeReadProtoTagged = function (nothing, just, name, value) {- var obj = value;- while (obj != null) {- var proto = Object.getPrototypeOf(obj);- var ctor = proto.constructor.name;- if (ctor === name) {- return just(value);- } else if (ctor === "Object") {- return nothing;- }- obj = proto;- }- return nothing;- };-})(PS["Web.Internal.FFI"] = PS["Web.Internal.FFI"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.Internal.FFI"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Maybe = PS["Data.Maybe"]; - var unsafeReadProtoTagged = function (name) {- return function (value) {- return $foreign._unsafeReadProtoTagged(Data_Maybe.Nothing.value, Data_Maybe.Just.create, name, value);- };- };- exports["unsafeReadProtoTagged"] = unsafeReadProtoTagged;-})(PS["Web.Internal.FFI"] = PS["Web.Internal.FFI"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.DOM.Element"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM_ChildNode = PS["Web.DOM.ChildNode"];- var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];- var Web_DOM_NonDocumentTypeChildNode = PS["Web.DOM.NonDocumentTypeChildNode"];- var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"];- var Web_Internal_FFI = PS["Web.Internal.FFI"]; - var toParentNode = Unsafe_Coerce.unsafeCoerce; - var toNode = Unsafe_Coerce.unsafeCoerce; - var fromNode = Web_Internal_FFI.unsafeReadProtoTagged("Element");- exports["fromNode"] = fromNode;- exports["toNode"] = toNode;- exports["toParentNode"] = toParentNode;- exports["removeAttribute"] = $foreign.removeAttribute;-})(PS["Web.DOM.Element"] = PS["Web.DOM.Element"] || {});-(function(exports) {- "use strict";-- exports._getElementById = function (id) {- return function (node) {- return function () {- return node.getElementById(id);- };- };- };-})(PS["Web.DOM.NonElementParentNode"] = PS["Web.DOM.NonElementParentNode"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.DOM.NonElementParentNode"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Web_DOM_Element = PS["Web.DOM.Element"]; - var getElementById = function (eid) {- return function ($0) {- return Data_Functor.map(Effect.functorEffect)(Data_Nullable.toMaybe)($foreign._getElementById(eid)($0));- };- };- exports["getElementById"] = getElementById;-})(PS["Web.DOM.NonElementParentNode"] = PS["Web.DOM.NonElementParentNode"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.DOM.Document"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM_Comment = PS["Web.DOM.Comment"];- var Web_DOM_DocumentFragment = PS["Web.DOM.DocumentFragment"];- var Web_DOM_DocumentType = PS["Web.DOM.DocumentType"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_DOM_HTMLCollection = PS["Web.DOM.HTMLCollection"];- var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];- var Web_DOM_NonElementParentNode = PS["Web.DOM.NonElementParentNode"];- var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];- var Web_DOM_ProcessingInstruction = PS["Web.DOM.ProcessingInstruction"];- var Web_DOM_Text = PS["Web.DOM.Text"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"];- var Web_Internal_FFI = PS["Web.Internal.FFI"];- var toNonElementParentNode = Unsafe_Coerce.unsafeCoerce;- exports["toNonElementParentNode"] = toNonElementParentNode;-})(PS["Web.DOM.Document"] = PS["Web.DOM.Document"] || {});-(function(exports) {- "use strict";-- exports._read = function (nothing, just, value) {- var tag = Object.prototype.toString.call(value);- if (tag.indexOf("[object HTML") === 0 && tag.indexOf("Element]") === tag.length - 8) {- return just(value);- } else {- return nothing;- }- };-})(PS["Web.HTML.HTMLElement"] = PS["Web.HTML.HTMLElement"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.HTML.HTMLElement"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM = PS["Web.DOM"];- var Web_DOM_DOMTokenList = PS["Web.DOM.DOMTokenList"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];- var Web_DOM_NonDocumentTypeChildNode = PS["Web.DOM.NonDocumentTypeChildNode"];- var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"]; - var toNode = Unsafe_Coerce.unsafeCoerce; - var toElement = Unsafe_Coerce.unsafeCoerce;- var fromElement = function (x) {- return $foreign._read(Data_Maybe.Nothing.value, Data_Maybe.Just.create, x);- };- exports["fromElement"] = fromElement;- exports["toElement"] = toElement;- exports["toNode"] = toNode;-})(PS["Web.HTML.HTMLElement"] = PS["Web.HTML.HTMLElement"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.HTML.HTMLDocument"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM_Document = PS["Web.DOM.Document"];- var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];- var Web_DOM_NonElementParentNode = PS["Web.DOM.NonElementParentNode"];- var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"];- var Web_HTML_HTMLDocument_ReadyState = PS["Web.HTML.HTMLDocument.ReadyState"];- var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];- var Web_Internal_FFI = PS["Web.Internal.FFI"]; - var toParentNode = Unsafe_Coerce.unsafeCoerce; - var toDocument = Unsafe_Coerce.unsafeCoerce; - var body = function ($2) {- return Data_Functor.map(Effect.functorEffect)(Data_Nullable.toMaybe)($foreign._body($2));- };- exports["toDocument"] = toDocument;- exports["toParentNode"] = toParentNode;- exports["body"] = body;-})(PS["Web.HTML.HTMLDocument"] = PS["Web.HTML.HTMLDocument"] || {});-(function(exports) {- "use strict";-- // ------------------------------------------------------------------------------ exports.href = function (location) {- return function () {- return location.href;- };- };-- exports.setHref = function (href) {- return function (location) {- return function () {- location.href = href;- };- };- };-- // ------------------------------------------------------------------------------ exports.search = function (location) {- return function () {- return location.search;- };- };-- // ------------------------------------------------------------------------------ exports.reload = function (location) {- return function () {- location.reload();- };- };-})(PS["Web.HTML.Location"] = PS["Web.HTML.Location"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.HTML.Location"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- exports["setHref"] = $foreign.setHref;- exports["search"] = $foreign.search;- exports["reload"] = $foreign.reload;-})(PS["Web.HTML.Location"] = PS["Web.HTML.Location"] || {});-(function(exports) {- "use strict";-- exports.document = function (window) {- return function () {- return window.document;- };- };-- exports.location = function (window) {- return function () {- return window.location;- };- };-})(PS["Web.HTML.Window"] = PS["Web.HTML.Window"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.HTML.Window"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Ord = PS["Data.Ord"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"];- var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];- var Web_HTML_History = PS["Web.HTML.History"];- var Web_HTML_Location = PS["Web.HTML.Location"];- var Web_HTML_Navigator = PS["Web.HTML.Navigator"];- var Web_Storage_Storage = PS["Web.Storage.Storage"];- exports["document"] = $foreign.document;- exports["location"] = $foreign.location;-})(PS["Web.HTML.Window"] = PS["Web.HTML.Window"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.HTML"];- var Effect = PS["Effect"];- var Web_HTML_HTMLAnchorElement = PS["Web.HTML.HTMLAnchorElement"];- var Web_HTML_HTMLAreaElement = PS["Web.HTML.HTMLAreaElement"];- var Web_HTML_HTMLAudioElement = PS["Web.HTML.HTMLAudioElement"];- var Web_HTML_HTMLBRElement = PS["Web.HTML.HTMLBRElement"];- var Web_HTML_HTMLBaseElement = PS["Web.HTML.HTMLBaseElement"];- var Web_HTML_HTMLBodyElement = PS["Web.HTML.HTMLBodyElement"];- var Web_HTML_HTMLButtonElement = PS["Web.HTML.HTMLButtonElement"];- var Web_HTML_HTMLCanvasElement = PS["Web.HTML.HTMLCanvasElement"];- var Web_HTML_HTMLDListElement = PS["Web.HTML.HTMLDListElement"];- var Web_HTML_HTMLDataElement = PS["Web.HTML.HTMLDataElement"];- var Web_HTML_HTMLDataListElement = PS["Web.HTML.HTMLDataListElement"];- var Web_HTML_HTMLDivElement = PS["Web.HTML.HTMLDivElement"];- var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];- var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];- var Web_HTML_HTMLEmbedElement = PS["Web.HTML.HTMLEmbedElement"];- var Web_HTML_HTMLFieldSetElement = PS["Web.HTML.HTMLFieldSetElement"];- var Web_HTML_HTMLFormElement = PS["Web.HTML.HTMLFormElement"];- var Web_HTML_HTMLHRElement = PS["Web.HTML.HTMLHRElement"];- var Web_HTML_HTMLHeadElement = PS["Web.HTML.HTMLHeadElement"];- var Web_HTML_HTMLHeadingElement = PS["Web.HTML.HTMLHeadingElement"];- var Web_HTML_HTMLIFrameElement = PS["Web.HTML.HTMLIFrameElement"];- var Web_HTML_HTMLImageElement = PS["Web.HTML.HTMLImageElement"];- var Web_HTML_HTMLInputElement = PS["Web.HTML.HTMLInputElement"];- var Web_HTML_HTMLKeygenElement = PS["Web.HTML.HTMLKeygenElement"];- var Web_HTML_HTMLLIElement = PS["Web.HTML.HTMLLIElement"];- var Web_HTML_HTMLLabelElement = PS["Web.HTML.HTMLLabelElement"];- var Web_HTML_HTMLLegendElement = PS["Web.HTML.HTMLLegendElement"];- var Web_HTML_HTMLLinkElement = PS["Web.HTML.HTMLLinkElement"];- var Web_HTML_HTMLMapElement = PS["Web.HTML.HTMLMapElement"];- var Web_HTML_HTMLMediaElement = PS["Web.HTML.HTMLMediaElement"];- var Web_HTML_HTMLMetaElement = PS["Web.HTML.HTMLMetaElement"];- var Web_HTML_HTMLMeterElement = PS["Web.HTML.HTMLMeterElement"];- var Web_HTML_HTMLModElement = PS["Web.HTML.HTMLModElement"];- var Web_HTML_HTMLOListElement = PS["Web.HTML.HTMLOListElement"];- var Web_HTML_HTMLObjectElement = PS["Web.HTML.HTMLObjectElement"];- var Web_HTML_HTMLOptGroupElement = PS["Web.HTML.HTMLOptGroupElement"];- var Web_HTML_HTMLOptionElement = PS["Web.HTML.HTMLOptionElement"];- var Web_HTML_HTMLOutputElement = PS["Web.HTML.HTMLOutputElement"];- var Web_HTML_HTMLParagraphElement = PS["Web.HTML.HTMLParagraphElement"];- var Web_HTML_HTMLParamElement = PS["Web.HTML.HTMLParamElement"];- var Web_HTML_HTMLPreElement = PS["Web.HTML.HTMLPreElement"];- var Web_HTML_HTMLProgressElement = PS["Web.HTML.HTMLProgressElement"];- var Web_HTML_HTMLQuoteElement = PS["Web.HTML.HTMLQuoteElement"];- var Web_HTML_HTMLScriptElement = PS["Web.HTML.HTMLScriptElement"];- var Web_HTML_HTMLSelectElement = PS["Web.HTML.HTMLSelectElement"];- var Web_HTML_HTMLSourceElement = PS["Web.HTML.HTMLSourceElement"];- var Web_HTML_HTMLSpanElement = PS["Web.HTML.HTMLSpanElement"];- var Web_HTML_HTMLStyleElement = PS["Web.HTML.HTMLStyleElement"];- var Web_HTML_HTMLTableCaptionElement = PS["Web.HTML.HTMLTableCaptionElement"];- var Web_HTML_HTMLTableCellElement = PS["Web.HTML.HTMLTableCellElement"];- var Web_HTML_HTMLTableColElement = PS["Web.HTML.HTMLTableColElement"];- var Web_HTML_HTMLTableDataCellElement = PS["Web.HTML.HTMLTableDataCellElement"];- var Web_HTML_HTMLTableElement = PS["Web.HTML.HTMLTableElement"];- var Web_HTML_HTMLTableHeaderCellElement = PS["Web.HTML.HTMLTableHeaderCellElement"];- var Web_HTML_HTMLTableRowElement = PS["Web.HTML.HTMLTableRowElement"];- var Web_HTML_HTMLTableSectionElement = PS["Web.HTML.HTMLTableSectionElement"];- var Web_HTML_HTMLTemplateElement = PS["Web.HTML.HTMLTemplateElement"];- var Web_HTML_HTMLTextAreaElement = PS["Web.HTML.HTMLTextAreaElement"];- var Web_HTML_HTMLTimeElement = PS["Web.HTML.HTMLTimeElement"];- var Web_HTML_HTMLTitleElement = PS["Web.HTML.HTMLTitleElement"];- var Web_HTML_HTMLTrackElement = PS["Web.HTML.HTMLTrackElement"];- var Web_HTML_HTMLUListElement = PS["Web.HTML.HTMLUListElement"];- var Web_HTML_HTMLVideoElement = PS["Web.HTML.HTMLVideoElement"];- var Web_HTML_History = PS["Web.HTML.History"];- var Web_HTML_Location = PS["Web.HTML.Location"];- var Web_HTML_Navigator = PS["Web.HTML.Navigator"];- var Web_HTML_Window = PS["Web.HTML.Window"];- exports["window"] = $foreign.window;-})(PS["Web.HTML"] = PS["Web.HTML"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Globals"];- var Control_Applicative = PS["Control.Applicative"];- var Data_Function = PS["Data.Function"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Tuple = PS["Data.Tuple"];- var Effect = PS["Effect"];- var Model = PS["Model"];- var Prelude = PS["Prelude"];- var Web_DOM = PS["Web.DOM"];- var Web_HTML = PS["Web.HTML"];- var Web_XHR_FormData = PS["Web.XHR.FormData"]; - var setInnerHtml = function (c) {- return function (n) {- return Control_Applicative.pure(Effect.applicativeEffect)($foreign._setInnerHtml(c, n));- };- };- var setDataAttribute = function (k) {- return function (v) {- return function (n) {- return Control_Applicative.pure(Effect.applicativeEffect)($foreign._setDataAttribute(k, v, n));- };- };- };- var moment8601 = function (s) {- return Control_Applicative.pure(Effect.applicativeEffect)($foreign._moment8601(Data_Tuple.Tuple.create, s));- };- var mmoment8601 = function (s) {- return $foreign._mmoment8601(Data_Maybe.Just.create, Data_Maybe.Nothing.value, Data_Tuple.Tuple.create, s);- };- var innerHtml = function (n) {- return Control_Applicative.pure(Effect.applicativeEffect)($foreign._innerHtml(n));- };- var getDataAttribute = function (k) {- return function (n) {- return Control_Applicative.pure(Effect.applicativeEffect)(Data_Nullable.toMaybe($foreign._getDataAttribute(k, n)));- };- };- var createFormString = function (f) {- return $foreign._createFormString(f);- };- var createFormData = function (f) {- return $foreign._createFormData(f);- };- var createFormArray = function (f) {- return $foreign._createFormArray(f);- };- var closest = function (selector) {- return function (node) {- return Control_Applicative.pure(Effect.applicativeEffect)($foreign._closest(Data_Maybe.Just.create, Data_Maybe.Nothing.value, selector, node));- };- };- var closeWindow = function (win) {- return Control_Applicative.pure(Effect.applicativeEffect)($foreign._closeWindow(win));- };- var app$prime = function (v) {- return $foreign._app();- };- exports["app'"] = app$prime;- exports["closest"] = closest;- exports["moment8601"] = moment8601;- exports["mmoment8601"] = mmoment8601;- exports["innerHtml"] = innerHtml;- exports["setInnerHtml"] = setInnerHtml;- exports["createFormData"] = createFormData;- exports["createFormString"] = createFormString;- exports["createFormArray"] = createFormArray;- exports["getDataAttribute"] = getDataAttribute;- exports["setDataAttribute"] = setDataAttribute;- exports["closeWindow"] = closeWindow;- exports["_app"] = $foreign._app;- exports["_closest"] = $foreign._closest;- exports["_moment8601"] = $foreign._moment8601;- exports["_mmoment8601"] = $foreign._mmoment8601;- exports["_innerHtml"] = $foreign._innerHtml;- exports["_setInnerHtml"] = $foreign._setInnerHtml;- exports["_createFormData"] = $foreign._createFormData;- exports["_createFormString"] = $foreign._createFormString;- exports["_createFormArray"] = $foreign._createFormArray;- exports["_getDataAttribute"] = $foreign._getDataAttribute;- exports["_setDataAttribute"] = $foreign._setDataAttribute;- exports["_closeWindow"] = $foreign._closeWindow;-})(PS["Globals"] = PS["Globals"] || {});-(function(exports) {- /* global exports */- /* global XMLHttpRequest */- /* global module */- /* global process */- "use strict";-- exports._ajax = function () {- var platformSpecific = { };- if (typeof module !== "undefined" && module.require && !(typeof process !== "undefined" && process.versions["electron"])) {- // We are on node.js- platformSpecific.newXHR = function () {- var XHR = module.require("xhr2");- return new XHR();- };-- platformSpecific.fixupUrl = function (url) {- var urllib = module.require("url");- var u = urllib.parse(url);- u.protocol = u.protocol || "http:";- u.hostname = u.hostname || "localhost";- return urllib.format(u);- };-- platformSpecific.getResponse = function (xhr) {- return xhr.response;- };- } else {- // We are in the browser- platformSpecific.newXHR = function () {- return new XMLHttpRequest();- };-- platformSpecific.fixupUrl = function (url) {- return url || "/";- };-- platformSpecific.getResponse = function (xhr) {- return xhr.response;- };- }-- return function (mkHeader, options) {- return function (errback, callback) {- var xhr = platformSpecific.newXHR();- var fixedUrl = platformSpecific.fixupUrl(options.url);- xhr.open(options.method || "GET", fixedUrl, true, options.username, options.password);- if (options.headers) {- try {- for (var i = 0, header; (header = options.headers[i]) != null; i++) {- xhr.setRequestHeader(header.field, header.value);- }- } catch (e) {- errback(e);- }- }- xhr.onerror = function () {- errback(new Error("AJAX request failed: " + options.method + " " + options.url));- };- xhr.onload = function () {- callback({- status: xhr.status,- statusText: xhr.statusText,- headers: xhr.getAllResponseHeaders().split("\r\n")- .filter(function (header) {- return header.length > 0;- })- .map(function (header) {- var i = header.indexOf(":");- return mkHeader(header.substring(0, i))(header.substring(i + 2));- }),- response: platformSpecific.getResponse(xhr)- });- };- xhr.responseType = options.responseType;- xhr.withCredentials = options.withCredentials;- xhr.send(options.content);-- return function (error, cancelErrback, cancelCallback) {- try {- xhr.abort();- } catch (e) {- return cancelErrback(e);- }- return cancelCallback();- };- };- };- }();-})(PS["Network.HTTP.Affjax"] = PS["Network.HTTP.Affjax"] || {});-(function(exports) {- "use strict";-- function id(x) {- return x;- } - exports.fromObject = id;-- exports.stringify = function (j) {- return JSON.stringify(j);- };-- var objToString = Object.prototype.toString;-- function isArray(a) {- return objToString.call(a) === "[object Array]";- }-- exports._caseJson = function (isNull, isBool, isNum, isStr, isArr, isObj, j) {- if (j == null) return isNull();- else if (typeof j === "boolean") return isBool(j);- else if (typeof j === "number") return isNum(j);- else if (typeof j === "string") return isStr(j);- else if (objToString.call(j) === "[object Array]")- return isArr(j);- else return isObj(j);- };-})(PS["Data.Argonaut.Core"] = PS["Data.Argonaut.Core"] || {});-(function(exports) {- - // | This module defines a data type and various functions for creating and- // | manipulating JSON values. The README contains additional documentation- // | for this module.- "use strict";- var $foreign = PS["Data.Argonaut.Core"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Foreign_Object = PS["Foreign.Object"];- var Prelude = PS["Prelude"]; - var verbJsonType = function (def) {- return function (f) {- return function (g) {- return g(def)(f);- };- };- };-- // Decoding- var toJsonType = verbJsonType(Data_Maybe.Nothing.value)(Data_Maybe.Just.create);- var jsonEmptyObject = $foreign.fromObject(Foreign_Object.empty);-- // | A simpler version of `caseJson` which accepts a callback for when the- // | `Json` argument was a `Number`, and a default value for all other cases.- var caseJsonNumber = function (d) {- return function (f) {- return function (j) {- return $foreign._caseJson(Data_Function["const"](d), Data_Function["const"](d), f, Data_Function["const"](d), Data_Function["const"](d), Data_Function["const"](d), j);- };- };- }; - var toNumber = toJsonType(caseJsonNumber);- exports["caseJsonNumber"] = caseJsonNumber;- exports["toNumber"] = toNumber;- exports["jsonEmptyObject"] = jsonEmptyObject;- exports["stringify"] = $foreign.stringify;-})(PS["Data.Argonaut.Core"] = PS["Data.Argonaut.Core"] || {});-(function(exports) {- "use strict";-- exports._jsonParser = function (fail, succ, s) {- try {- return succ(JSON.parse(s));- }- catch (e) {- return fail(e.message);- }- };-})(PS["Data.Argonaut.Parser"] = PS["Data.Argonaut.Parser"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.Argonaut.Parser"];- var Data_Argonaut_Core = PS["Data.Argonaut.Core"];- var Data_Either = PS["Data.Either"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"]; - var jsonParser = function (j) {- return $foreign._jsonParser(Data_Either.Left.create, Data_Either.Right.create, j);- };- exports["jsonParser"] = jsonParser;-})(PS["Data.Argonaut.Parser"] = PS["Data.Argonaut.Parser"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Function = PS["Data.Function"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Exception = PS["Effect.Exception"];- var Effect_Uncurried = PS["Effect.Uncurried"];- var Prelude = PS["Prelude"];- var fromEffectFnAff = function (v) {- return Effect_Aff.makeAff(function (k) {- return function __do() {- var v1 = v(function ($4) {- return k(Data_Either.Left.create($4))();- }, function ($5) {- return k(Data_Either.Right.create($5))();- });- return function (e) {- return Effect_Aff.makeAff(function (k2) {- return function __do() {- v1(e, function ($6) {- return k2(Data_Either.Left.create($6))();- }, function ($7) {- return k2(Data_Either.Right.create($7))();- });- return Effect_Aff.nonCanceler;- };- });- };- };- });- };- exports["fromEffectFnAff"] = fromEffectFnAff;-})(PS["Effect.Aff.Compat"] = PS["Effect.Aff.Compat"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Argonaut_Core = PS["Data.Argonaut.Core"];- var Data_ArrayBuffer_Types = PS["Data.ArrayBuffer.Types"];- var Data_FormURLEncoded = PS["Data.FormURLEncoded"];- var Data_Maybe = PS["Data.Maybe"];- var Data_MediaType = PS["Data.MediaType"];- var Data_MediaType_Common = PS["Data.MediaType.Common"];- var Web_DOM_Document = PS["Web.DOM.Document"];- var Web_File_Blob = PS["Web.File.Blob"];- var Web_XHR_FormData = PS["Web.XHR.FormData"]; - var ArrayView = (function () {- function ArrayView(value0) {- this.value0 = value0;- };- ArrayView.create = function (value0) {- return new ArrayView(value0);- };- return ArrayView;- })();- var Blob = (function () {- function Blob(value0) {- this.value0 = value0;- };- Blob.create = function (value0) {- return new Blob(value0);- };- return Blob;- })();- var Document = (function () {- function Document(value0) {- this.value0 = value0;- };- Document.create = function (value0) {- return new Document(value0);- };- return Document;- })();- var $$String = (function () {- function $$String(value0) {- this.value0 = value0;- };- $$String.create = function (value0) {- return new $$String(value0);- };- return $$String;- })();- var FormData = (function () {- function FormData(value0) {- this.value0 = value0;- };- FormData.create = function (value0) {- return new FormData(value0);- };- return FormData;- })();- var FormURLEncoded = (function () {- function FormURLEncoded(value0) {- this.value0 = value0;- };- FormURLEncoded.create = function (value0) {- return new FormURLEncoded(value0);- };- return FormURLEncoded;- })();- var Json = (function () {- function Json(value0) {- this.value0 = value0;- };- Json.create = function (value0) {- return new Json(value0);- };- return Json;- })();- var toMediaType = function (v) {- if (v instanceof FormURLEncoded) {- return new Data_Maybe.Just(Data_MediaType_Common.applicationFormURLEncoded);- };- if (v instanceof Json) {- return new Data_Maybe.Just(Data_MediaType_Common.applicationJSON);- };- return Data_Maybe.Nothing.value;- };- var string = $$String.create;- exports["ArrayView"] = ArrayView;- exports["Blob"] = Blob;- exports["Document"] = Document;- exports["String"] = $$String;- exports["FormData"] = FormData;- exports["FormURLEncoded"] = FormURLEncoded;- exports["Json"] = Json;- exports["string"] = string;- exports["toMediaType"] = toMediaType;-})(PS["Network.HTTP.Affjax.Request"] = PS["Network.HTTP.Affjax.Request"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Category = PS["Control.Category"];- var Data_Argonaut_Core = PS["Data.Argonaut.Core"];- var Data_ArrayBuffer_Types = PS["Data.ArrayBuffer.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_MediaType = PS["Data.MediaType"];- var Data_MediaType_Common = PS["Data.MediaType.Common"];- var Prelude = PS["Prelude"];- var Web_DOM_Document = PS["Web.DOM.Document"];- var Web_File_Blob = PS["Web.File.Blob"]; - var $$ArrayBuffer = (function () {- function $$ArrayBuffer(value0) {- this.value0 = value0;- };- $$ArrayBuffer.create = function (value0) {- return new $$ArrayBuffer(value0);- };- return $$ArrayBuffer;- })();- var Blob = (function () {- function Blob(value0) {- this.value0 = value0;- };- Blob.create = function (value0) {- return new Blob(value0);- };- return Blob;- })();- var Document = (function () {- function Document(value0) {- this.value0 = value0;- };- Document.create = function (value0) {- return new Document(value0);- };- return Document;- })();- var Json = (function () {- function Json(value0) {- this.value0 = value0;- };- Json.create = function (value0) {- return new Json(value0);- };- return Json;- })();- var $$String = (function () {- function $$String(value0) {- this.value0 = value0;- };- $$String.create = function (value0) {- return new $$String(value0);- };- return $$String;- })();- var Ignore = (function () {- function Ignore(value0) {- this.value0 = value0;- };- Ignore.create = function (value0) {- return new Ignore(value0);- };- return Ignore;- })();- var toResponseType = function (v) {- if (v instanceof $$ArrayBuffer) {- return "arraybuffer";- };- if (v instanceof Blob) {- return "blob";- };- if (v instanceof Document) {- return "document";- };- if (v instanceof Json) {- return "text";- };- if (v instanceof $$String) {- return "text";- };- if (v instanceof Ignore) {- return "";- };- throw new Error("Failed pattern match at Network.HTTP.Affjax.Response line 41, column 3 - line 49, column 1: " + [ v.constructor.name ]);- };- var toMediaType = function (v) {- if (v instanceof Json) {- return new Data_Maybe.Just(Data_MediaType_Common.applicationJSON);- };- return Data_Maybe.Nothing.value;- }; - var json = new Json(Control_Category.identity(Control_Category.categoryFn));- var ignore = new Ignore(Control_Category.identity(Control_Category.categoryFn));- exports["ArrayBuffer"] = $$ArrayBuffer;- exports["Blob"] = Blob;- exports["Document"] = Document;- exports["Json"] = Json;- exports["String"] = $$String;- exports["Ignore"] = Ignore;- exports["json"] = json;- exports["ignore"] = ignore;- exports["toResponseType"] = toResponseType;- exports["toMediaType"] = toMediaType;-})(PS["Network.HTTP.Affjax.Response"] = PS["Network.HTTP.Affjax.Response"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Eq = PS["Data.Eq"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_MediaType = PS["Data.MediaType"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Prelude = PS["Prelude"]; - var Accept = (function () {- function Accept(value0) {- this.value0 = value0;- };- Accept.create = function (value0) {- return new Accept(value0);- };- return Accept;- })();- var ContentType = (function () {- function ContentType(value0) {- this.value0 = value0;- };- ContentType.create = function (value0) {- return new ContentType(value0);- };- return ContentType;- })();- var RequestHeader = (function () {- function RequestHeader(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- RequestHeader.create = function (value0) {- return function (value1) {- return new RequestHeader(value0, value1);- };- };- return RequestHeader;- })();- var requestHeaderValue = function (v) {- if (v instanceof Accept) {- return Data_Newtype.unwrap(Data_MediaType.newtypeMediaType)(v.value0);- };- if (v instanceof ContentType) {- return Data_Newtype.unwrap(Data_MediaType.newtypeMediaType)(v.value0);- };- if (v instanceof RequestHeader) {- return v.value1;- };- throw new Error("Failed pattern match at Network.HTTP.RequestHeader line 29, column 1 - line 29, column 46: " + [ v.constructor.name ]);- };- var requestHeaderName = function (v) {- if (v instanceof Accept) {- return "Accept";- };- if (v instanceof ContentType) {- return "Content-Type";- };- if (v instanceof RequestHeader) {- return v.value0;- };- throw new Error("Failed pattern match at Network.HTTP.RequestHeader line 24, column 1 - line 24, column 45: " + [ v.constructor.name ]);- };- exports["Accept"] = Accept;- exports["ContentType"] = ContentType;- exports["RequestHeader"] = RequestHeader;- exports["requestHeaderName"] = requestHeaderName;- exports["requestHeaderValue"] = requestHeaderValue;-})(PS["Network.HTTP.RequestHeader"] = PS["Network.HTTP.RequestHeader"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Eq = PS["Data.Eq"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Prelude = PS["Prelude"]; - var ResponseHeader = (function () {- function ResponseHeader(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- ResponseHeader.create = function (value0) {- return function (value1) {- return new ResponseHeader(value0, value1);- };- };- return ResponseHeader;- })();- var responseHeader = function (field) {- return function (value) {- return new ResponseHeader(field, value);- };- };- exports["responseHeader"] = responseHeader;-})(PS["Network.HTTP.ResponseHeader"] = PS["Network.HTTP.ResponseHeader"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Network.HTTP.Affjax"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Except = PS["Control.Monad.Except"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Control_Parallel = PS["Control.Parallel"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Argonaut_Core = PS["Data.Argonaut.Core"];- var Data_Argonaut_Parser = PS["Data.Argonaut.Parser"];- var Data_Array = PS["Data.Array"];- var Data_Either = PS["Data.Either"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_FormURLEncoded = PS["Data.FormURLEncoded"];- var Data_Function = PS["Data.Function"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Functor = PS["Data.Functor"];- var Data_HTTP_Method = PS["Data.HTTP.Method"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Identity = PS["Data.Identity"];- var Data_Int = PS["Data.Int"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Ord = PS["Data.Ord"];- var Data_Ring = PS["Data.Ring"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Time_Duration = PS["Data.Time.Duration"];- var Data_Unit = PS["Data.Unit"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Aff_Compat = PS["Effect.Aff.Compat"];- var Effect_Class = PS["Effect.Class"];- var Effect_Exception = PS["Effect.Exception"];- var Effect_Ref = PS["Effect.Ref"];- var Foreign = PS["Foreign"];- var $$Math = PS["Math"];- var Network_HTTP_Affjax_Request = PS["Network.HTTP.Affjax.Request"];- var Network_HTTP_Affjax_Response = PS["Network.HTTP.Affjax.Response"];- var Network_HTTP_RequestHeader = PS["Network.HTTP.RequestHeader"];- var Network_HTTP_ResponseHeader = PS["Network.HTTP.ResponseHeader"];- var Network_HTTP_StatusCode = PS["Network.HTTP.StatusCode"];- var Prelude = PS["Prelude"];- var defaultRequest = {- method: new Data_Either.Left(Data_HTTP_Method.GET.value),- url: "/",- headers: [ ],- content: Data_Maybe.Nothing.value,- username: Data_Maybe.Nothing.value,- password: Data_Maybe.Nothing.value,- withCredentials: false- };- var affjax = function (rt) {- return function (req) {- var parseJSON = function (v) {- if (v === "") {- return Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity))(Data_Argonaut_Core.jsonEmptyObject);- };- return Data_Either.either(function ($58) {- return Foreign.fail(Foreign.ForeignError.create($58));- })(Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity)))(Data_Argonaut_Parser.jsonParser(v));- };- var fromResponse$prime = (function () {- if (rt instanceof Network_HTTP_Affjax_Response["ArrayBuffer"]) {- return Foreign.unsafeReadTagged("ArrayBuffer");- };- if (rt instanceof Network_HTTP_Affjax_Response.Blob) {- return Foreign.unsafeReadTagged("Blob");- };- if (rt instanceof Network_HTTP_Affjax_Response.Document) {- return Foreign.unsafeReadTagged("Document");- };- if (rt instanceof Network_HTTP_Affjax_Response.Json) {- return Control_Bind.composeKleisliFlipped(Control_Monad_Except_Trans.bindExceptT(Data_Identity.monadIdentity))(function ($59) {- return rt.value0(parseJSON($59));- })(Foreign.unsafeReadTagged("String"));- };- if (rt instanceof Network_HTTP_Affjax_Response["String"]) {- return Foreign.unsafeReadTagged("String");- };- if (rt instanceof Network_HTTP_Affjax_Response.Ignore) {- return Data_Function["const"](rt.value0(Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity))(Data_Unit.unit)));- };- throw new Error("Failed pattern match at Network.HTTP.Affjax line 261, column 19 - line 267, column 51: " + [ rt.constructor.name ]);- })();- var extractContent = function (v) {- if (v instanceof Network_HTTP_Affjax_Request.ArrayView) {- return v.value0(Foreign.unsafeToForeign);- };- if (v instanceof Network_HTTP_Affjax_Request.Blob) {- return Foreign.unsafeToForeign(v.value0);- };- if (v instanceof Network_HTTP_Affjax_Request.Document) {- return Foreign.unsafeToForeign(v.value0);- };- if (v instanceof Network_HTTP_Affjax_Request["String"]) {- return Foreign.unsafeToForeign(v.value0);- };- if (v instanceof Network_HTTP_Affjax_Request.FormData) {- return Foreign.unsafeToForeign(v.value0);- };- if (v instanceof Network_HTTP_Affjax_Request.FormURLEncoded) {- return Foreign.unsafeToForeign(Data_FormURLEncoded.encode(v.value0));- };- if (v instanceof Network_HTTP_Affjax_Request.Json) {- return Foreign.unsafeToForeign(Data_Argonaut_Core.stringify(v.value0));- };- throw new Error("Failed pattern match at Network.HTTP.Affjax line 235, column 20 - line 242, column 53: " + [ v.constructor.name ]);- };- var addHeader = function (mh) {- return function (hs) {- if (mh instanceof Data_Maybe.Just && !Data_Foldable.any(Data_Foldable.foldableArray)(Data_HeytingAlgebra.heytingAlgebraBoolean)(Data_Function.on(Data_Eq.eq(Data_Eq.eqString))(Network_HTTP_RequestHeader.requestHeaderName)(mh.value0))(hs)) {- return Data_Array.snoc(hs)(mh.value0);- };- return hs;- };- };- var headers = function (reqContent) {- return addHeader(Data_Functor.map(Data_Maybe.functorMaybe)(Network_HTTP_RequestHeader.ContentType.create)(Control_Bind.bindFlipped(Data_Maybe.bindMaybe)(Network_HTTP_Affjax_Request.toMediaType)(reqContent)))(addHeader(Data_Functor.map(Data_Maybe.functorMaybe)(Network_HTTP_RequestHeader.Accept.create)(Network_HTTP_Affjax_Response.toMediaType(rt)))(req.headers));- };- var req$prime = {- method: Data_HTTP_Method.print(req.method),- url: req.url,- headers: Data_Functor.map(Data_Functor.functorArray)(function (h) {- return {- field: Network_HTTP_RequestHeader.requestHeaderName(h),- value: Network_HTTP_RequestHeader.requestHeaderValue(h)- };- })(headers(req.content)),- content: Data_Nullable.toNullable(Data_Functor.map(Data_Maybe.functorMaybe)(extractContent)(req.content)),- responseType: Network_HTTP_Affjax_Response.toResponseType(rt),- username: Data_Nullable.toNullable(req.username),- password: Data_Nullable.toNullable(req.password),- withCredentials: req.withCredentials- };- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Aff_Compat.fromEffectFnAff($foreign._ajax(Network_HTTP_ResponseHeader.responseHeader, req$prime)))(function (v) {- var v1 = Control_Monad_Except.runExcept(fromResponse$prime(v.response));- if (v1 instanceof Data_Either.Left) {- return Control_Monad_Error_Class.throwError(Effect_Aff.monadThrowAff)(Effect_Exception.error(Data_Foldable.intercalate(Data_List_Types.foldableNonEmptyList)(Data_Monoid.monoidString)("\x0a")(Data_Functor.map(Data_List_Types.functorNonEmptyList)(Foreign.renderForeignError)(v1.value0))));- };- if (v1 instanceof Data_Either.Right) {- return Control_Applicative.pure(Effect_Aff.applicativeAff)({- response: v1.value0,- headers: v.headers,- status: v.status,- statusText: v.statusText- });- };- throw new Error("Failed pattern match at Network.HTTP.Affjax line 217, column 3 - line 219, column 49: " + [ v1.constructor.name ]);- });- };- };- exports["defaultRequest"] = defaultRequest;- exports["affjax"] = affjax;-})(PS["Network.HTTP.Affjax"] = PS["Network.HTTP.Affjax"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Bind = PS["Control.Bind"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Argonaut = PS["Data.Argonaut"];- var Data_Array = PS["Data.Array"];- var Data_Either = PS["Data.Either"];- var Data_FormURLEncoded = PS["Data.FormURLEncoded"];- var Data_Functor = PS["Data.Functor"];- var Data_HTTP_Method = PS["Data.HTTP.Method"];- var Data_Maybe = PS["Data.Maybe"];- var Data_MediaType_Common = PS["Data.MediaType.Common"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Class = PS["Effect.Class"];- var Globals = PS["Globals"];- var Model = PS["Model"];- var Network_HTTP_Affjax = PS["Network.HTTP.Affjax"];- var Network_HTTP_Affjax_Request = PS["Network.HTTP.Affjax.Request"];- var Network_HTTP_Affjax_Response = PS["Network.HTTP.Affjax.Response"];- var Network_HTTP_RequestHeader = PS["Network.HTTP.RequestHeader"];- var Prelude = PS["Prelude"];- var Simple_JSON = PS["Simple.JSON"];- var Web_Event_Event = PS["Web.Event.Event"];- var Web_HTML = PS["Web.HTML"];- var Web_HTML_Location = PS["Web.HTML.Location"];- var Web_HTML_Window = PS["Web.HTML.Window"]; - var Star = (function () {- function Star() {-- };- Star.value = new Star();- return Star;- })();- var UnStar = (function () {- function UnStar() {-- };- UnStar.value = new UnStar();- return UnStar;- })();- var showStar = new Data_Show.Show(function (v) {- if (v instanceof Star) {- return "star";- };- if (v instanceof UnStar) {- return "unstar";- };- throw new Error("Failed pattern match at App line 31, column 1 - line 31, column 37: " + [ v.constructor.name ]);- });- var fetchUrl = function (method) {- return function (url) {- return function (headers) {- return function (content) {- return function (rt) {- var app = Globals["app'"](Data_Unit.unit);- return Network_HTTP_Affjax.affjax(rt)({- method: new Data_Either.Left(method),- url: url,- headers: Data_Array.cons(new Network_HTTP_RequestHeader.RequestHeader(app.csrfHeaderName, app.csrfToken))(headers),- content: content,- username: Network_HTTP_Affjax.defaultRequest.username,- password: Network_HTTP_Affjax.defaultRequest.password,- withCredentials: Network_HTTP_Affjax.defaultRequest.withCredentials- });- };- };- };- };- };- var logout = function (u) {- var app = Globals["app'"](u);- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Functor["void"](Effect_Aff.functorAff)(fetchUrl(Data_HTTP_Method.POST.value)(app.authRlogoutR)([ ])(Data_Maybe.Nothing.value)(Network_HTTP_Affjax_Response.ignore)))(function () {- return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Control_Bind.bind(Effect.bindEffect)(Control_Bind.bind(Effect.bindEffect)(Web_HTML.window)(Web_HTML_Window.location))(Web_HTML_Location.reload));- });- };- var logoutE = function (e) {- return Control_Bind.bindFlipped(Effect.bindEffect)(function ($4) {- return Data_Functor["void"](Effect.functorEffect)(Effect_Aff.launchAff(logout($4)));- })(Web_Event_Event.preventDefault(e));- };- var fetchPath = function (method) {- return function (path) {- return function (headers) {- return function (content) {- return function (rt) {- return fetchUrl(method)((Globals["app'"](Data_Unit.unit)).homeR + path)(headers)(content)(rt);- };- };- };- };- };- var fetchUrlEnc = function (method) {- return function (path) {- return function (content) {- return function (rt) {- return fetchPath(method)(path)([ new Network_HTTP_RequestHeader.ContentType(Data_MediaType_Common.applicationFormURLEncoded) ])(Data_Functor.map(Data_Maybe.functorMaybe)(Network_HTTP_Affjax_Request.FormURLEncoded.create)(content))(rt);- };- };- };- };- var markRead = function (bid) {- var path = "bm/" + (Data_Show.show(Data_Show.showInt)(bid) + "/read");- return fetchUrlEnc(Data_HTTP_Method.POST.value)(path)(Data_Maybe.Nothing.value)(Network_HTTP_Affjax_Response.ignore);- };- var toggleStar = function (bid) {- return function (action) {- var path = "bm/" + (Data_Show.show(Data_Show.showInt)(bid) + ("/" + Data_Show.show(showStar)(action)));- return Data_Functor["void"](Effect_Aff.functorAff)(fetchUrlEnc(Data_HTTP_Method.POST.value)(path)(Data_Maybe.Nothing.value)(Network_HTTP_Affjax_Response.ignore));- };- };- var fetchJson = function (dictWriteForeign) {- return function (method) {- return function (path) {- return function (content) {- return function (rt) {- return fetchPath(method)(path)([ new Network_HTTP_RequestHeader.ContentType(Data_MediaType_Common.applicationJSON) ])(Data_Functor.map(Data_Maybe.functorMaybe)(function ($5) {- return Network_HTTP_Affjax_Request.string(Simple_JSON.writeJSON(dictWriteForeign)($5));- })(content))(rt);- };- };- };- };- };- var editNote = function (bm) {- return fetchJson(Model.note_wfI)(Data_HTTP_Method.POST.value)("api/note/add")(new Data_Maybe.Just(bm))(Network_HTTP_Affjax_Response.json);- };- var editBookmark = function (bm) {- return fetchJson(Model.bookmark_wfI)(Data_HTTP_Method.POST.value)("api/add")(new Data_Maybe.Just(bm))(Network_HTTP_Affjax_Response.ignore);- };- var destroyNote = function (nid) {- return fetchUrlEnc(Data_HTTP_Method.DELETE.value)("api/note/" + Data_Show.show(Data_Show.showInt)(nid))(Data_Maybe.Nothing.value)(Network_HTTP_Affjax_Response.ignore);- };- var destroy = function (bid) {- return fetchUrlEnc(Data_HTTP_Method.DELETE.value)("bm/" + Data_Show.show(Data_Show.showInt)(bid))(Data_Maybe.Nothing.value)(Network_HTTP_Affjax_Response.ignore);- };- exports["Star"] = Star;- exports["UnStar"] = UnStar;- exports["toggleStar"] = toggleStar;- exports["destroy"] = destroy;- exports["markRead"] = markRead;- exports["editBookmark"] = editBookmark;- exports["editNote"] = editNote;- exports["destroyNote"] = destroyNote;- exports["logoutE"] = logoutE;- exports["logout"] = logout;- exports["fetchJson"] = fetchJson;- exports["fetchUrlEnc"] = fetchUrlEnc;- exports["fetchPath"] = fetchPath;- exports["fetchUrl"] = fetchUrl;- exports["showStar"] = showStar;-})(PS["App"] = PS["App"] || {});-(function(exports) {- "use strict";- var ButtonButton = (function () {- function ButtonButton() {-- };- ButtonButton.value = new ButtonButton();- return ButtonButton;- })();- var ButtonSubmit = (function () {- function ButtonSubmit() {-- };- ButtonSubmit.value = new ButtonSubmit();- return ButtonSubmit;- })();- var ButtonReset = (function () {- function ButtonReset() {-- };- ButtonReset.value = new ButtonReset();- return ButtonReset;- })();- var renderButtonType = function (v) {- if (v instanceof ButtonButton) {- return "button";- };- if (v instanceof ButtonSubmit) {- return "submit";- };- if (v instanceof ButtonReset) {- return "reset";- };- throw new Error("Failed pattern match at DOM.HTML.Indexed.ButtonType line 9, column 20 - line 12, column 18: " + [ v.constructor.name ]);- };- exports["ButtonButton"] = ButtonButton;- exports["ButtonSubmit"] = ButtonSubmit;- exports["ButtonReset"] = ButtonReset;- exports["renderButtonType"] = renderButtonType;-})(PS["DOM.HTML.Indexed.ButtonType"] = PS["DOM.HTML.Indexed.ButtonType"] || {});-(function(exports) {- "use strict";- var InputButton = (function () {- function InputButton() {-- };- InputButton.value = new InputButton();- return InputButton;- })();- var InputCheckbox = (function () {- function InputCheckbox() {-- };- InputCheckbox.value = new InputCheckbox();- return InputCheckbox;- })();- var InputColor = (function () {- function InputColor() {-- };- InputColor.value = new InputColor();- return InputColor;- })();- var InputDate = (function () {- function InputDate() {-- };- InputDate.value = new InputDate();- return InputDate;- })();- var InputDatetimeLocal = (function () {- function InputDatetimeLocal() {-- };- InputDatetimeLocal.value = new InputDatetimeLocal();- return InputDatetimeLocal;- })();- var InputEmail = (function () {- function InputEmail() {-- };- InputEmail.value = new InputEmail();- return InputEmail;- })();- var InputFile = (function () {- function InputFile() {-- };- InputFile.value = new InputFile();- return InputFile;- })();- var InputHidden = (function () {- function InputHidden() {-- };- InputHidden.value = new InputHidden();- return InputHidden;- })();- var InputImage = (function () {- function InputImage() {-- };- InputImage.value = new InputImage();- return InputImage;- })();- var InputMonth = (function () {- function InputMonth() {-- };- InputMonth.value = new InputMonth();- return InputMonth;- })();- var InputNumber = (function () {- function InputNumber() {-- };- InputNumber.value = new InputNumber();- return InputNumber;- })();- var InputPassword = (function () {- function InputPassword() {-- };- InputPassword.value = new InputPassword();- return InputPassword;- })();- var InputRadio = (function () {- function InputRadio() {-- };- InputRadio.value = new InputRadio();- return InputRadio;- })();- var InputRange = (function () {- function InputRange() {-- };- InputRange.value = new InputRange();- return InputRange;- })();- var InputReset = (function () {- function InputReset() {-- };- InputReset.value = new InputReset();- return InputReset;- })();- var InputSearch = (function () {- function InputSearch() {-- };- InputSearch.value = new InputSearch();- return InputSearch;- })();- var InputSubmit = (function () {- function InputSubmit() {-- };- InputSubmit.value = new InputSubmit();- return InputSubmit;- })();- var InputTel = (function () {- function InputTel() {-- };- InputTel.value = new InputTel();- return InputTel;- })();- var InputText = (function () {- function InputText() {-- };- InputText.value = new InputText();- return InputText;- })();- var InputTime = (function () {- function InputTime() {-- };- InputTime.value = new InputTime();- return InputTime;- })();- var InputUrl = (function () {- function InputUrl() {-- };- InputUrl.value = new InputUrl();- return InputUrl;- })();- var InputWeek = (function () {- function InputWeek() {-- };- InputWeek.value = new InputWeek();- return InputWeek;- })();- var renderInputType = function (v) {- if (v instanceof InputButton) {- return "button";- };- if (v instanceof InputCheckbox) {- return "checkbox";- };- if (v instanceof InputColor) {- return "color";- };- if (v instanceof InputDate) {- return "date";- };- if (v instanceof InputDatetimeLocal) {- return "datetime-local";- };- if (v instanceof InputEmail) {- return "email";- };- if (v instanceof InputFile) {- return "file";- };- if (v instanceof InputHidden) {- return "hidden";- };- if (v instanceof InputImage) {- return "image";- };- if (v instanceof InputMonth) {- return "month";- };- if (v instanceof InputNumber) {- return "number";- };- if (v instanceof InputPassword) {- return "password";- };- if (v instanceof InputRadio) {- return "radio";- };- if (v instanceof InputRange) {- return "range";- };- if (v instanceof InputReset) {- return "reset";- };- if (v instanceof InputSearch) {- return "search";- };- if (v instanceof InputSubmit) {- return "submit";- };- if (v instanceof InputTel) {- return "tel";- };- if (v instanceof InputText) {- return "text";- };- if (v instanceof InputTime) {- return "time";- };- if (v instanceof InputUrl) {- return "url";- };- if (v instanceof InputWeek) {- return "week";- };- throw new Error("Failed pattern match at DOM.HTML.Indexed.InputType line 28, column 19 - line 50, column 16: " + [ v.constructor.name ]);- };- exports["InputButton"] = InputButton;- exports["InputCheckbox"] = InputCheckbox;- exports["InputColor"] = InputColor;- exports["InputDate"] = InputDate;- exports["InputDatetimeLocal"] = InputDatetimeLocal;- exports["InputEmail"] = InputEmail;- exports["InputFile"] = InputFile;- exports["InputHidden"] = InputHidden;- exports["InputImage"] = InputImage;- exports["InputMonth"] = InputMonth;- exports["InputNumber"] = InputNumber;- exports["InputPassword"] = InputPassword;- exports["InputRadio"] = InputRadio;- exports["InputRange"] = InputRange;- exports["InputReset"] = InputReset;- exports["InputSearch"] = InputSearch;- exports["InputSubmit"] = InputSubmit;- exports["InputTel"] = InputTel;- exports["InputText"] = InputText;- exports["InputTime"] = InputTime;- exports["InputUrl"] = InputUrl;- exports["InputWeek"] = InputWeek;- exports["renderInputType"] = renderInputType;-})(PS["DOM.HTML.Indexed.InputType"] = PS["DOM.HTML.Indexed.InputType"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Category = PS["Control.Category"];- var Control_Monad_Cont_Trans = PS["Control.Monad.Cont.Trans"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Control_Monad_List_Trans = PS["Control.Monad.List.Trans"];- var Control_Monad_Maybe_Trans = PS["Control.Monad.Maybe.Trans"];- var Control_Monad_RWS_Trans = PS["Control.Monad.RWS.Trans"];- var Control_Monad_Reader_Trans = PS["Control.Monad.Reader.Trans"];- var Control_Monad_State_Trans = PS["Control.Monad.State.Trans"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Monad_Writer_Trans = PS["Control.Monad.Writer.Trans"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Class = PS["Effect.Class"];- var Prelude = PS["Prelude"]; - var MonadAff = function (MonadEffect0, liftAff) {- this.MonadEffect0 = MonadEffect0;- this.liftAff = liftAff;- };- var monadAffAff = new MonadAff(function () {- return Effect_Aff.monadEffectAff;- }, Control_Category.identity(Control_Category.categoryFn));- var liftAff = function (dict) {- return dict.liftAff;- };- exports["liftAff"] = liftAff;- exports["MonadAff"] = MonadAff;- exports["monadAffAff"] = monadAffAff;-})(PS["Effect.Aff.Class"] = PS["Effect.Aff.Class"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Eq = PS["Data.Eq"];- var Data_Ord = PS["Data.Ord"];- var Prelude = PS["Prelude"]; - var OrdBox = (function () {- function OrdBox(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- OrdBox.create = function (value0) {- return function (value1) {- return function (value2) {- return new OrdBox(value0, value1, value2);- };- };- };- return OrdBox;- })();- var unOrdBox = function (v) {- return v.value2;- };- var mkOrdBox = function (dictOrd) {- return OrdBox.create(Data_Eq.eq(dictOrd.Eq0()))(Data_Ord.compare(dictOrd));- };- var eqOrdBox = new Data_Eq.Eq(function (v) {- return function (v1) {- return v.value0(v.value2)(v1.value2);- };- });- var ordOrdBox = new Data_Ord.Ord(function () {- return eqOrdBox;- }, function (v) {- return function (v1) {- return v.value1(v.value2)(v1.value2);- };- });- exports["mkOrdBox"] = mkOrdBox;- exports["unOrdBox"] = unOrdBox;- exports["eqOrdBox"] = eqOrdBox;- exports["ordOrdBox"] = ordOrdBox;-})(PS["Halogen.Data.OrdBox"] = PS["Halogen.Data.OrdBox"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var On = (function () {- function On() {-- };- On.value = new On();- return On;- })();- var Off = (function () {- function Off() {-- };- Off.value = new Off();- return Off;- })();- var renderOnOff = function (v) {- if (v instanceof On) {- return "on";- };- if (v instanceof Off) {- return "off";- };- throw new Error("Failed pattern match at DOM.HTML.Indexed.OnOff line 8, column 15 - line 10, column 10: " + [ v.constructor.name ]);- };- exports["On"] = On;- exports["Off"] = Off;- exports["renderOnOff"] = renderOnOff;-})(PS["DOM.HTML.Indexed.OnOff"] = PS["DOM.HTML.Indexed.OnOff"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Eq = PS["Data.Eq"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Prelude = PS["Prelude"];- var Web_DOM = PS["Web.DOM"];- var RefUpdate = (function () {- function RefUpdate(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- RefUpdate.create = function (value0) {- return function (value1) {- return function (value2) {- return new RefUpdate(value0, value1, value2);- };- };- };- return RefUpdate;- })();- var Query = (function () {- function Query(value0) {- this.value0 = value0;- };- Query.create = function (value0) {- return new Query(value0);- };- return Query;- })(); - var bifunctorInputF = new Data_Bifunctor.Bifunctor(function (f) {- return function (g) {- return function (v) {- if (v instanceof RefUpdate) {- return new RefUpdate(v.value0, v.value1, f(v.value2));- };- if (v instanceof Query) {- return new Query(g(v.value0));- };- throw new Error("Failed pattern match at Halogen.Query.InputF line 21, column 15 - line 23, column 27: " + [ v.constructor.name ]);- };- };- });- var functorInputF = new Data_Functor.Functor(Data_Bifunctor.rmap(bifunctorInputF));- exports["RefUpdate"] = RefUpdate;- exports["Query"] = Query;- exports["bifunctorInputF"] = bifunctorInputF;- exports["functorInputF"] = functorInputF;-})(PS["Halogen.Query.InputF"] = PS["Halogen.Query.InputF"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Effect = PS["Effect"];- var Effect_Uncurried = PS["Effect.Uncurried"];- var Prelude = PS["Prelude"]; - var Step = (function () {- function Step(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- Step.create = function (value0) {- return function (value1) {- return function (value2) {- return new Step(value0, value1, value2);- };- };- };- return Step;- })();- var step = function (v) {- return v.value1;- };- var halt = function (v) {- return v.value2;- };- var extract = function (v) {- return v.value0;- };- exports["Step"] = Step;- exports["extract"] = extract;- exports["step"] = step;- exports["halt"] = halt;-})(PS["Halogen.VDom.Machine"] = PS["Halogen.VDom.Machine"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Category = PS["Control.Category"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Eq = PS["Data.Eq"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Tuple = PS["Data.Tuple"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var ElemSpec = (function () {- function ElemSpec(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- ElemSpec.create = function (value0) {- return function (value1) {- return function (value2) {- return new ElemSpec(value0, value1, value2);- };- };- };- return ElemSpec;- })();- var Text = (function () {- function Text(value0) {- this.value0 = value0;- };- Text.create = function (value0) {- return new Text(value0);- };- return Text;- })();- var Elem = (function () {- function Elem(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Elem.create = function (value0) {- return function (value1) {- return new Elem(value0, value1);- };- };- return Elem;- })();- var Keyed = (function () {- function Keyed(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Keyed.create = function (value0) {- return function (value1) {- return new Keyed(value0, value1);- };- };- return Keyed;- })();- var Widget = (function () {- function Widget(value0) {- this.value0 = value0;- };- Widget.create = function (value0) {- return new Widget(value0);- };- return Widget;- })();- var Grafted = (function () {- function Grafted(value0) {- this.value0 = value0;- };- Grafted.create = function (value0) {- return new Grafted(value0);- };- return Grafted;- })();- var Graft = (function () {- function Graft(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- Graft.create = function (value0) {- return function (value1) {- return function (value2) {- return new Graft(value0, value1, value2);- };- };- };- return Graft;- })();- var unGraft = function (f) {- return function ($90) {- return f($90);- };- }; - var graft = Unsafe_Coerce.unsafeCoerce;- var functorElemSpec = new Data_Functor.Functor(function (f) {- return function (m) {- return new ElemSpec(m.value0, m.value1, f(m.value2));- };- });- var bifunctorGraft = new Data_Bifunctor.Bifunctor(function (f) {- return function (g) {- return unGraft(function (v) {- return graft(new Graft(function ($92) {- return f(v.value0($92));- }, function ($93) {- return g(v.value1($93));- }, v.value2));- });- };- });- var bifunctorVDom = new Data_Bifunctor.Bifunctor(function (f) {- return function (g) {- return function (v) {- if (v instanceof Text) {- return new Text(v.value0);- };- if (v instanceof Grafted) {- return new Grafted(Data_Bifunctor.bimap(bifunctorGraft)(f)(g)(v.value0));- };- return new Grafted(graft(new Graft(f, g, v)));- };- };- });- var runGraft = unGraft(function (v) {- var go = function (v2) {- if (v2 instanceof Text) {- return new Text(v2.value0);- };- if (v2 instanceof Elem) {- return new Elem(Data_Functor.map(functorElemSpec)(v.value0)(v2.value0), Data_Functor.map(Data_Functor.functorArray)(go)(v2.value1));- };- if (v2 instanceof Keyed) {- return new Keyed(Data_Functor.map(functorElemSpec)(v.value0)(v2.value0), Data_Functor.map(Data_Functor.functorArray)(Data_Functor.map(Data_Tuple.functorTuple)(go))(v2.value1));- };- if (v2 instanceof Widget) {- return new Widget(v.value1(v2.value0));- };- if (v2 instanceof Grafted) {- return new Grafted(Data_Bifunctor.bimap(bifunctorGraft)(v.value0)(v.value1)(v2.value0));- };- throw new Error("Failed pattern match at Halogen.VDom.Types line 74, column 7 - line 74, column 27: " + [ v2.constructor.name ]);- };- return go(v.value2);- });- exports["Text"] = Text;- exports["Elem"] = Elem;- exports["Keyed"] = Keyed;- exports["Widget"] = Widget;- exports["Grafted"] = Grafted;- exports["Graft"] = Graft;- exports["graft"] = graft;- exports["unGraft"] = unGraft;- exports["runGraft"] = runGraft;- exports["ElemSpec"] = ElemSpec;- exports["bifunctorVDom"] = bifunctorVDom;- exports["bifunctorGraft"] = bifunctorGraft;- exports["functorElemSpec"] = functorElemSpec;-})(PS["Halogen.VDom.Types"] = PS["Halogen.VDom.Types"] || {});-(function(exports) {- "use strict";-- exports.unsafeGetAny = function (key, obj) {- return obj[key];- };-- exports.unsafeHasAny = function (key, obj) {- return obj.hasOwnProperty(key);- };-- exports.unsafeSetAny = function (key, val, obj) {- obj[key] = val;- };-- exports.forE = function (a, f) {- var b = [];- for (var i = 0; i < a.length; i++) {- b.push(f(i, a[i]));- }- return b;- };-- exports.forInE = function (o, f) {- var ks = Object.keys(o);- for (var i = 0; i < ks.length; i++) {- var k = ks[i];- f(k, o[k]);- }- };-- exports.diffWithIxE = function (a1, a2, f1, f2, f3) {- var a3 = [];- var l1 = a1.length;- var l2 = a2.length;- var i = 0;- while (1) {- if (i < l1) {- if (i < l2) {- a3.push(f1(i, a1[i], a2[i]));- } else {- f2(i, a1[i]);- }- } else if (i < l2) {- a3.push(f3(i, a2[i]));- } else {- break;- }- i++;- }- return a3;- };-- exports.strMapWithIxE = function (as, fk, f) {- var o = {};- for (var i = 0; i < as.length; i++) {- var a = as[i];- var k = fk(a);- o[k] = f(k, i, a);- }- return o;- };-- exports.diffWithKeyAndIxE = function (o1, as, fk, f1, f2, f3) {- var o2 = {};- for (var i = 0; i < as.length; i++) {- var a = as[i];- var k = fk(a);- if (o1.hasOwnProperty(k)) {- o2[k] = f1(k, i, o1[k], a);- } else {- o2[k] = f3(k, i, a);- }- }- for (var k in o1) {- if (k in o2) {- continue;- }- f2(k, o1[k]);- }- return o2;- };-- exports.refEq = function (a, b) {- return a === b;- };-- exports.createTextNode = function (s, doc) {- return doc.createTextNode(s);- };-- exports.setTextContent = function (s, n) {- n.textContent = s;- };-- exports.createElement = function (ns, name, doc) {- if (ns != null) {- return doc.createElementNS(ns, name);- } else {- return doc.createElement(name)- }- };-- exports.insertChildIx = function (i, a, b) {- var n = b.childNodes.item(i) || null;- if (n !== a) {- b.insertBefore(a, n);- }- };-- exports.removeChild = function (a, b) {- if (b && a.parentNode === b) {- b.removeChild(a);- }- };-- exports.parentNode = function (a) {- return a.parentNode;- };-- exports.setAttribute = function (ns, attr, val, el) {- if (ns != null) {- el.setAttributeNS(ns, attr, val);- } else {- el.setAttribute(attr, val);- }- };-- exports.removeAttribute = function (ns, attr, el) {- if (ns != null) {- el.removeAttributeNS(ns, attr);- } else {- el.removeAttribute(attr);- }- };-- exports.addEventListener = function (ev, listener, el) {- el.addEventListener(ev, listener, false);- };-- exports.removeEventListener = function (ev, listener, el) {- el.removeEventListener(ev, listener, false);- };-- exports.jsUndefined = void 0;-})(PS["Halogen.VDom.Util"] = PS["Halogen.VDom.Util"] || {});-(function(exports) {- "use strict";-- var getEffProp = function (name) {- return function (node) {- return function () {- return node[name];- };- };- }; -- exports._parentNode = getEffProp("parentNode"); -- exports._nextSibling = getEffProp("nextSibling");-- exports.insertBefore = function (node1) {- return function (node2) {- return function (parent) {- return function () {- return parent.insertBefore(node1, node2);- };- };- };- };-- exports.appendChild = function (node) {- return function (parent) {- return function () {- return parent.appendChild(node);- };- };- };-- exports.removeChild = function (node) {- return function (parent) {- return function () {- return parent.removeChild(node);- };- };- };-})(PS["Web.DOM.Node"] = PS["Web.DOM.Node"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Web.DOM.Node"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Enum = PS["Data.Enum"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM_Document = PS["Web.DOM.Document"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];- var Web_DOM_NodeType = PS["Web.DOM.NodeType"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"];- var Web_Internal_FFI = PS["Web.Internal.FFI"];- var parentNode = function ($2) {- return Data_Functor.map(Effect.functorEffect)(Data_Nullable.toMaybe)($foreign._parentNode($2));- };- var nextSibling = function ($6) {- return Data_Functor.map(Effect.functorEffect)(Data_Nullable.toMaybe)($foreign._nextSibling($6));- };- exports["parentNode"] = parentNode;- exports["nextSibling"] = nextSibling;- exports["insertBefore"] = $foreign.insertBefore;- exports["appendChild"] = $foreign.appendChild;- exports["removeChild"] = $foreign.removeChild;-})(PS["Web.DOM.Node"] = PS["Web.DOM.Node"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Halogen.VDom.Util"];- var Control_Applicative = PS["Control.Applicative"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Uncurried = PS["Effect.Uncurried"];- var Foreign_Object = PS["Foreign.Object"];- var Foreign_Object_ST = PS["Foreign.Object.ST"];- var Halogen_VDom_Types = PS["Halogen.VDom.Types"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM_Document = PS["Web.DOM.Document"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_DOM_Node = PS["Web.DOM.Node"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"]; - var unsafeLookup = $foreign.unsafeGetAny;- var unsafeFreeze = Unsafe_Coerce.unsafeCoerce;- var pokeMutMap = $foreign.unsafeSetAny;- var newMutMap = Foreign_Object_ST["new"];- var effectUnit = Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit);- exports["effectUnit"] = effectUnit;- exports["newMutMap"] = newMutMap;- exports["pokeMutMap"] = pokeMutMap;- exports["unsafeFreeze"] = unsafeFreeze;- exports["unsafeLookup"] = unsafeLookup;- exports["unsafeGetAny"] = $foreign.unsafeGetAny;- exports["unsafeHasAny"] = $foreign.unsafeHasAny;- exports["unsafeSetAny"] = $foreign.unsafeSetAny;- exports["forE"] = $foreign.forE;- exports["forInE"] = $foreign.forInE;- exports["diffWithIxE"] = $foreign.diffWithIxE;- exports["diffWithKeyAndIxE"] = $foreign.diffWithKeyAndIxE;- exports["strMapWithIxE"] = $foreign.strMapWithIxE;- exports["refEq"] = $foreign.refEq;- exports["createTextNode"] = $foreign.createTextNode;- exports["setTextContent"] = $foreign.setTextContent;- exports["createElement"] = $foreign.createElement;- exports["insertChildIx"] = $foreign.insertChildIx;- exports["removeChild"] = $foreign.removeChild;- exports["parentNode"] = $foreign.parentNode;- exports["setAttribute"] = $foreign.setAttribute;- exports["removeAttribute"] = $foreign.removeAttribute;- exports["addEventListener"] = $foreign.addEventListener;- exports["removeEventListener"] = $foreign.removeEventListener;- exports["jsUndefined"] = $foreign.jsUndefined;-})(PS["Halogen.VDom.Util"] = PS["Halogen.VDom.Util"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Data_Eq = PS["Data.Eq"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Ref = PS["Effect.Ref"];- var Effect_Uncurried = PS["Effect.Uncurried"];- var Foreign = PS["Foreign"];- var Foreign_Object = PS["Foreign.Object"];- var Halogen_VDom = PS["Halogen.VDom"];- var Halogen_VDom_Machine = PS["Halogen.VDom.Machine"];- var Halogen_VDom_Types = PS["Halogen.VDom.Types"];- var Halogen_VDom_Util = PS["Halogen.VDom.Util"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_Event_Event = PS["Web.Event.Event"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"]; - var Created = (function () {- function Created(value0) {- this.value0 = value0;- };- Created.create = function (value0) {- return new Created(value0);- };- return Created;- })();- var Removed = (function () {- function Removed(value0) {- this.value0 = value0;- };- Removed.create = function (value0) {- return new Removed(value0);- };- return Removed;- })();- var Attribute = (function () {- function Attribute(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- Attribute.create = function (value0) {- return function (value1) {- return function (value2) {- return new Attribute(value0, value1, value2);- };- };- };- return Attribute;- })();- var Property = (function () {- function Property(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Property.create = function (value0) {- return function (value1) {- return new Property(value0, value1);- };- };- return Property;- })();- var Handler = (function () {- function Handler(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Handler.create = function (value0) {- return function (value1) {- return new Handler(value0, value1);- };- };- return Handler;- })();- var Ref = (function () {- function Ref(value0) {- this.value0 = value0;- };- Ref.create = function (value0) {- return new Ref(value0);- };- return Ref;- })();- var unsafeGetProperty = Halogen_VDom_Util.unsafeGetAny;- var setProperty = Halogen_VDom_Util.unsafeSetAny;- var removeProperty = function (key, el) {- var v = Foreign.typeOf(Halogen_VDom_Util.unsafeGetAny(key, el));- if (v === "string") {- return Halogen_VDom_Util.unsafeSetAny(key, "", el);- };- if (key === "rowSpan") {- return Halogen_VDom_Util.unsafeSetAny(key, 1, el);- };- if (key === "colSpan") {- return Halogen_VDom_Util.unsafeSetAny(key, 1, el);- };- return Halogen_VDom_Util.unsafeSetAny(key, Halogen_VDom_Util.jsUndefined, el);- };- var propToStrKey = function (v) {- if (v instanceof Attribute && v.value0 instanceof Data_Maybe.Just) {- return "attr/" + (v.value0.value0 + (":" + v.value1));- };- if (v instanceof Attribute) {- return "attr/:" + v.value1;- };- if (v instanceof Property) {- return "prop/" + v.value0;- };- if (v instanceof Handler) {- return "handler/" + v.value0;- };- if (v instanceof Ref) {- return "ref";- };- throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop line 178, column 16 - line 185, column 1: " + [ v.constructor.name ]);- };- var propFromString = Unsafe_Coerce.unsafeCoerce;- var propFromInt = Unsafe_Coerce.unsafeCoerce;- var propFromBoolean = Unsafe_Coerce.unsafeCoerce;- var functorProp = new Data_Functor.Functor(function (f) {- return function (v) {- if (v instanceof Handler) {- return new Handler(v.value0, Data_Functor.map(Data_Functor.functorFn)(Data_Functor.map(Data_Maybe.functorMaybe)(f))(v.value1));- };- if (v instanceof Ref) {- return new Ref(Data_Functor.map(Data_Functor.functorFn)(Data_Functor.map(Data_Maybe.functorMaybe)(f))(v.value0));- };- return v;- };- });- var buildProp = function (emit) {- return function (el) {- var removeProp = function (prevEvents) {- return function (v, v1) {- if (v1 instanceof Attribute) {- return Halogen_VDom_Util.removeAttribute(Data_Nullable.toNullable(v1.value0), v1.value1, el);- };- if (v1 instanceof Property) {- return removeProperty(v1.value0, el);- };- if (v1 instanceof Handler) {- var handler = Halogen_VDom_Util.unsafeLookup(v1.value0, prevEvents);- return Halogen_VDom_Util.removeEventListener(v1.value0, Data_Tuple.fst(handler), el);- };- if (v1 instanceof Ref) {- return Data_Unit.unit;- };- throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop line 165, column 5 - line 175, column 18: " + [ v1.constructor.name ]);- };- };- var mbEmit = function (v) {- if (v instanceof Data_Maybe.Just) {- return emit(v.value0)();- };- return Data_Unit.unit;- };- var done = function (ps) {- var v = Foreign_Object.lookup("ref")(ps);- if (v instanceof Data_Maybe.Just && v.value0 instanceof Ref) {- return function () {- return mbEmit(v.value0.value0(new Removed(el)));- };- };- return Halogen_VDom_Util.effectUnit;- };- var diffProp = function (prevEvents, events) {- return function (v, v1, v11, v2) {- if (v11 instanceof Attribute && v2 instanceof Attribute) {- var $61 = v11.value2 === v2.value2;- if ($61) {- return v2;- };- Halogen_VDom_Util.setAttribute(Data_Nullable.toNullable(v2.value0), v2.value1, v2.value2, el);- return v2;- };- if (v11 instanceof Property && v2 instanceof Property) {- var v4 = Halogen_VDom_Util.refEq(v11.value1, v2.value1);- if (v4) {- return v2;- };- if (v2.value0 === "value") {- var elVal = unsafeGetProperty("value", el);- var $70 = Halogen_VDom_Util.refEq(elVal, v2.value1);- if ($70) {- return v2;- };- setProperty(v2.value0, v2.value1, el);- return v2;- };- setProperty(v2.value0, v2.value1, el);- return v2;- };- if (v11 instanceof Handler && v2 instanceof Handler) {- var handler = Halogen_VDom_Util.unsafeLookup(v2.value0, prevEvents);- Effect_Ref.write(v2.value1)(Data_Tuple.snd(handler))();- Halogen_VDom_Util.pokeMutMap(v2.value0, handler, events);- return v2;- };- return v2;- };- };- var applyProp = function (events) {- return function (v, v1, v2) {- if (v2 instanceof Attribute) {- Halogen_VDom_Util.setAttribute(Data_Nullable.toNullable(v2.value0), v2.value1, v2.value2, el);- return v2;- };- if (v2 instanceof Property) {- setProperty(v2.value0, v2.value1, el);- return v2;- };- if (v2 instanceof Handler) {- var v3 = Halogen_VDom_Util.unsafeGetAny(v2.value0, events);- if (Halogen_VDom_Util.unsafeHasAny(v2.value0, events)) {- Effect_Ref.write(v2.value1)(Data_Tuple.snd(v3))();- return v2;- };- var v4 = Effect_Ref["new"](v2.value1)();- var v5 = Web_Event_EventTarget.eventListener(function (ev) {- return function __do() {- var v5 = Effect_Ref.read(v4)();- return mbEmit(v5(ev));- };- })();- Halogen_VDom_Util.pokeMutMap(v2.value0, new Data_Tuple.Tuple(v5, v4), events);- Halogen_VDom_Util.addEventListener(v2.value0, v5, el);- return v2;- };- if (v2 instanceof Ref) {- mbEmit(v2.value0(new Created(el)));- return v2;- };- throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop line 109, column 5 - line 131, column 15: " + [ v2.constructor.name ]);- };- };- var patch = function (prevEvents, ps1) {- return function (ps2) {- var v = Halogen_VDom_Util.newMutMap();- var onThis = removeProp(prevEvents);- var onThese = diffProp(prevEvents, v);- var onThat = applyProp(v);- var v1 = Halogen_VDom_Util.diffWithKeyAndIxE(ps1, ps2, propToStrKey, onThese, onThis, onThat);- return new Halogen_VDom_Machine.Step(Data_Unit.unit, patch(Halogen_VDom_Util.unsafeFreeze(v), v1), done(v1));- };- };- var render = function (ps1) {- var v = Halogen_VDom_Util.newMutMap();- var v1 = Halogen_VDom_Util.strMapWithIxE(ps1, propToStrKey, applyProp(v));- return new Halogen_VDom_Machine.Step(Data_Unit.unit, patch(Halogen_VDom_Util.unsafeFreeze(v), v1), done(v1));- };- return render;- };- };- exports["Attribute"] = Attribute;- exports["Property"] = Property;- exports["Handler"] = Handler;- exports["Ref"] = Ref;- exports["Created"] = Created;- exports["Removed"] = Removed;- exports["propFromString"] = propFromString;- exports["propFromBoolean"] = propFromBoolean;- exports["propFromInt"] = propFromInt;- exports["buildProp"] = buildProp;- exports["functorProp"] = functorProp;-})(PS["Halogen.VDom.DOM.Prop"] = PS["Halogen.VDom.DOM.Prop"] || {});-(function(exports) {- "use strict";- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];- var DOM_HTML_Indexed_CrossOriginValue = PS["DOM.HTML.Indexed.CrossOriginValue"];- var DOM_HTML_Indexed_DirValue = PS["DOM.HTML.Indexed.DirValue"];- var DOM_HTML_Indexed_FormMethod = PS["DOM.HTML.Indexed.FormMethod"];- var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];- var DOM_HTML_Indexed_KindValue = PS["DOM.HTML.Indexed.KindValue"];- var DOM_HTML_Indexed_MenuType = PS["DOM.HTML.Indexed.MenuType"];- var DOM_HTML_Indexed_MenuitemType = PS["DOM.HTML.Indexed.MenuitemType"];- var DOM_HTML_Indexed_OnOff = PS["DOM.HTML.Indexed.OnOff"];- var DOM_HTML_Indexed_OrderedListType = PS["DOM.HTML.Indexed.OrderedListType"];- var DOM_HTML_Indexed_PreloadValue = PS["DOM.HTML.Indexed.PreloadValue"];- var DOM_HTML_Indexed_ScopeValue = PS["DOM.HTML.Indexed.ScopeValue"];- var DOM_HTML_Indexed_StepValue = PS["DOM.HTML.Indexed.StepValue"];- var DOM_HTML_Indexed_WrapValue = PS["DOM.HTML.Indexed.WrapValue"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_MediaType = PS["Data.MediaType"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Ord = PS["Data.Ord"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Tuple = PS["Data.Tuple"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Halogen_VDom = PS["Halogen.VDom"];- var Halogen_VDom_DOM_Prop = PS["Halogen.VDom.DOM.Prop"];- var Halogen_VDom_Types = PS["Halogen.VDom.Types"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_Event_Event = PS["Web.Event.Event"];- var HTML = function (x) {- return x;- };-- // | A wrapper for strings which are used as CSS classes.- var ClassName = function (x) {- return x;- };- var IsProp = function (toPropValue) {- this.toPropValue = toPropValue;- }; - var toPropValue = function (dict) {- return dict.toPropValue;- };-- // | Constructs a text node `HTML` value.- var text = function ($27) {- return HTML(Halogen_VDom_Types.Text.create($27));- };- var stringIsProp = new IsProp(Halogen_VDom_DOM_Prop.propFromString);-- // | A smart constructor for widget slots in the HTML.- var slot = function ($29) {- return HTML(Halogen_VDom_Types.Widget.create($29));- };-- // | Create a HTML property.- var prop = function (dictIsProp) {- return function (v) {- return function ($32) {- return Halogen_VDom_DOM_Prop.Property.create(v)(toPropValue(dictIsProp)($32));- };- };- }; - var onOffIsProp = new IsProp(function ($35) {- return Halogen_VDom_DOM_Prop.propFromString(DOM_HTML_Indexed_OnOff.renderOnOff($35));- }); - var newtypeClassName = new Data_Newtype.Newtype(function (n) {- return n;- }, ClassName);- var intIsProp = new IsProp(Halogen_VDom_DOM_Prop.propFromInt);- var inputTypeIsProp = new IsProp(function ($40) {- return Halogen_VDom_DOM_Prop.propFromString(DOM_HTML_Indexed_InputType.renderInputType($40));- });-- // | Create an event handler.- var handler = Halogen_VDom_DOM_Prop.Handler.create;-- // | A smart constructor for HTML elements.- var element = function (ns) {- return function (name) {- return function (props) {- return function (children) {- return new Halogen_VDom_Types.Elem(new Halogen_VDom_Types.ElemSpec(ns, name, props), children);- };- };- };- }; - var buttonTypeIsProp = new IsProp(function ($44) {- return Halogen_VDom_DOM_Prop.propFromString(DOM_HTML_Indexed_ButtonType.renderButtonType($44));- });- var booleanIsProp = new IsProp(Halogen_VDom_DOM_Prop.propFromBoolean);- var bifunctorHTML = new Data_Bifunctor.Bifunctor(function (f) {- return function (g) {- return function (v) {- return Data_Bifunctor.bimap(Halogen_VDom_Types.bifunctorVDom)(Data_Functor.map(Data_Functor.functorArray)(Data_Functor.map(Halogen_VDom_DOM_Prop.functorProp)(Data_Functor.map(Halogen_Query_InputF.functorInputF)(g))))(f)(v);- };- };- }); -- // | Create a HTML attribute.- var attr = function (ns) {- return function (v) {- return Halogen_VDom_DOM_Prop.Attribute.create(ns)(v);- };- };- exports["HTML"] = HTML;- exports["slot"] = slot;- exports["text"] = text;- exports["element"] = element;- exports["prop"] = prop;- exports["attr"] = attr;- exports["handler"] = handler;- exports["IsProp"] = IsProp;- exports["toPropValue"] = toPropValue;- exports["ClassName"] = ClassName;- exports["bifunctorHTML"] = bifunctorHTML;- exports["stringIsProp"] = stringIsProp;- exports["intIsProp"] = intIsProp;- exports["booleanIsProp"] = booleanIsProp;- exports["buttonTypeIsProp"] = buttonTypeIsProp;- exports["inputTypeIsProp"] = inputTypeIsProp;- exports["onOffIsProp"] = onOffIsProp;- exports["newtypeClassName"] = newtypeClassName;-})(PS["Halogen.HTML.Core"] = PS["Halogen.HTML.Core"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Category = PS["Control.Category"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Const = PS["Data.Const"];- var Data_Either = PS["Data.Either"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_NonEmpty = PS["Data.List.NonEmpty"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Newtype = PS["Data.Newtype"];- var Data_NonEmpty = PS["Data.NonEmpty"];- var Data_Ring = PS["Data.Ring"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Tuple = PS["Data.Tuple"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"]; - var Pure = (function () {- function Pure(value0) {- this.value0 = value0;- };- Pure.create = function (value0) {- return new Pure(value0);- };- return Pure;- })();- var Lift = (function () {- function Lift(value0) {- this.value0 = value0;- };- Lift.create = function (value0) {- return new Lift(value0);- };- return Lift;- })();- var Ap = (function () {- function Ap(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Ap.create = function (value0) {- return function (value1) {- return new Ap(value0, value1);- };- };- return Ap;- })();- var mkAp = function (fba) {- return function (fb) {- return new Ap(fba, fb);- };- };- var liftFreeAp = Lift.create;- var goLeft = function ($copy_dictApplicative) {- return function ($copy_fStack) {- return function ($copy_valStack) {- return function ($copy_nat) {- return function ($copy_func) {- return function ($copy_count) {- var $tco_var_dictApplicative = $copy_dictApplicative;- var $tco_var_fStack = $copy_fStack;- var $tco_var_valStack = $copy_valStack;- var $tco_var_nat = $copy_nat;- var $tco_var_func = $copy_func;- var $tco_done = false;- var $tco_result;- function $tco_loop(dictApplicative, fStack, valStack, nat, func, count) {- if (func instanceof Pure) {- $tco_done = true;- return new Data_Tuple.Tuple(new Data_List_Types.Cons({- func: Control_Applicative.pure(dictApplicative)(func.value0),- count: count- }, fStack), valStack);- };- if (func instanceof Lift) {- $tco_done = true;- return new Data_Tuple.Tuple(new Data_List_Types.Cons({- func: nat(func.value0),- count: count- }, fStack), valStack);- };- if (func instanceof Ap) {- $tco_var_dictApplicative = dictApplicative;- $tco_var_fStack = fStack;- $tco_var_valStack = Data_List_NonEmpty.cons(func.value1)(valStack);- $tco_var_nat = nat;- $tco_var_func = func.value0;- $copy_count = count + 1 | 0;- return;- };- throw new Error("Failed pattern match at Control.Applicative.Free line 102, column 41 - line 105, column 81: " + [ func.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_dictApplicative, $tco_var_fStack, $tco_var_valStack, $tco_var_nat, $tco_var_func, $copy_count);- };- return $tco_result;- };- };- };- };- };- };- var goApply = function ($copy_dictApplicative) {- return function ($copy_fStack) {- return function ($copy_vals) {- return function ($copy_gVal) {- var $tco_var_dictApplicative = $copy_dictApplicative;- var $tco_var_fStack = $copy_fStack;- var $tco_var_vals = $copy_vals;- var $tco_done = false;- var $tco_result;- function $tco_loop(dictApplicative, fStack, vals, gVal) {- if (fStack instanceof Data_List_Types.Nil) {- $tco_done = true;- return new Data_Either.Left(gVal);- };- if (fStack instanceof Data_List_Types.Cons) {- var gRes = Control_Apply.apply(dictApplicative.Apply0())(fStack.value0.func)(gVal);- var $14 = fStack.value0.count === 1;- if ($14) {- if (fStack.value1 instanceof Data_List_Types.Nil) {- $tco_done = true;- return new Data_Either.Left(gRes);- };- $tco_var_dictApplicative = dictApplicative;- $tco_var_fStack = fStack.value1;- $tco_var_vals = vals;- $copy_gVal = gRes;- return;- };- if (vals instanceof Data_List_Types.Nil) {- $tco_done = true;- return new Data_Either.Left(gRes);- };- if (vals instanceof Data_List_Types.Cons) {- $tco_done = true;- return Data_Either.Right.create(new Data_Tuple.Tuple(new Data_List_Types.Cons({- func: gRes,- count: fStack.value0.count - 1 | 0- }, fStack.value1), new Data_NonEmpty.NonEmpty(vals.value0, vals.value1)));- };- throw new Error("Failed pattern match at Control.Applicative.Free line 83, column 11 - line 88, column 50: " + [ vals.constructor.name ]);- };- throw new Error("Failed pattern match at Control.Applicative.Free line 72, column 3 - line 88, column 50: " + [ fStack.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_dictApplicative, $tco_var_fStack, $tco_var_vals, $copy_gVal);- };- return $tco_result;- };- };- };- };- var functorFreeAp = new Data_Functor.Functor(function (f) {- return function (x) {- return mkAp(new Pure(f))(x);- };- });- var foldFreeAp = function (dictApplicative) {- return function (nat) {- return function (z) {- var go = function ($copy_v) {- var $tco_done = false;- var $tco_result;- function $tco_loop(v) {- if (v.value1.value0 instanceof Pure) {- var v1 = goApply(dictApplicative)(v.value0)(v.value1.value1)(Control_Applicative.pure(dictApplicative)(v.value1.value0.value0));- if (v1 instanceof Data_Either.Left) {- $tco_done = true;- return v1.value0;- };- if (v1 instanceof Data_Either.Right) {- $copy_v = v1.value0;- return;- };- throw new Error("Failed pattern match at Control.Applicative.Free line 54, column 17 - line 56, column 24: " + [ v1.constructor.name ]);- };- if (v.value1.value0 instanceof Lift) {- var v1 = goApply(dictApplicative)(v.value0)(v.value1.value1)(nat(v.value1.value0.value0));- if (v1 instanceof Data_Either.Left) {- $tco_done = true;- return v1.value0;- };- if (v1 instanceof Data_Either.Right) {- $copy_v = v1.value0;- return;- };- throw new Error("Failed pattern match at Control.Applicative.Free line 57, column 17 - line 59, column 24: " + [ v1.constructor.name ]);- };- if (v.value1.value0 instanceof Ap) {- var nextVals = new Data_NonEmpty.NonEmpty(v.value1.value0.value1, v.value1.value1);- $copy_v = goLeft(dictApplicative)(v.value0)(nextVals)(nat)(v.value1.value0.value0)(1);- return;- };- throw new Error("Failed pattern match at Control.Applicative.Free line 53, column 5 - line 64, column 1: " + [ v.value1.value0.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($copy_v);- };- return $tco_result;- };- return go(new Data_Tuple.Tuple(Data_List_Types.Nil.value, Data_List_NonEmpty.singleton(z)));- };- };- };- var retractFreeAp = function (dictApplicative) {- return foldFreeAp(dictApplicative)(Control_Category.identity(Control_Category.categoryFn));- };- var applyFreeAp = new Control_Apply.Apply(function () {- return functorFreeAp;- }, function (fba) {- return function (fb) {- return mkAp(fba)(fb);- };- });- var applicativeFreeAp = new Control_Applicative.Applicative(function () {- return applyFreeAp;- }, Pure.create);- var hoistFreeAp = function (f) {- return foldFreeAp(applicativeFreeAp)(function ($37) {- return liftFreeAp(f($37));- });- };- exports["liftFreeAp"] = liftFreeAp;- exports["retractFreeAp"] = retractFreeAp;- exports["foldFreeAp"] = foldFreeAp;- exports["hoistFreeAp"] = hoistFreeAp;- exports["functorFreeAp"] = functorFreeAp;- exports["applyFreeAp"] = applyFreeAp;- exports["applicativeFreeAp"] = applicativeFreeAp;-})(PS["Control.Applicative.Free"] = PS["Control.Applicative.Free"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad = PS["Control.Monad"];- var Control_MonadPlus = PS["Control.MonadPlus"];- var Control_MonadZero = PS["Control.MonadZero"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Data_Unfoldable1 = PS["Data.Unfoldable1"];- var Prelude = PS["Prelude"]; - var CatQueue = (function () {- function CatQueue(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- CatQueue.create = function (value0) {- return function (value1) {- return new CatQueue(value0, value1);- };- };- return CatQueue;- })();- var uncons = function ($copy_v) {- var $tco_done = false;- var $tco_result;- function $tco_loop(v) {- if (v.value0 instanceof Data_List_Types.Nil && v.value1 instanceof Data_List_Types.Nil) {- $tco_done = true;- return Data_Maybe.Nothing.value;- };- if (v.value0 instanceof Data_List_Types.Nil) {- $copy_v = new CatQueue(Data_List.reverse(v.value1), Data_List_Types.Nil.value);- return;- };- if (v.value0 instanceof Data_List_Types.Cons) {- $tco_done = true;- return new Data_Maybe.Just(new Data_Tuple.Tuple(v.value0.value0, new CatQueue(v.value0.value1, v.value1)));- };- throw new Error("Failed pattern match at Data.CatQueue line 83, column 1 - line 83, column 63: " + [ v.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($copy_v);- };- return $tco_result;- };- var snoc = function (v) {- return function (a) {- return new CatQueue(v.value0, new Data_List_Types.Cons(a, v.value1));- };- };- var $$null = function (v) {- if (v.value0 instanceof Data_List_Types.Nil && v.value1 instanceof Data_List_Types.Nil) {- return true;- };- return false;- }; - var empty = new CatQueue(Data_List_Types.Nil.value, Data_List_Types.Nil.value);- exports["CatQueue"] = CatQueue;- exports["empty"] = empty;- exports["null"] = $$null;- exports["snoc"] = snoc;- exports["uncons"] = uncons;-})(PS["Data.CatQueue"] = PS["Data.CatQueue"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad = PS["Control.Monad"];- var Control_MonadPlus = PS["Control.MonadPlus"];- var Control_MonadZero = PS["Control.MonadZero"];- var Control_Plus = PS["Control.Plus"];- var Data_CatQueue = PS["Data.CatQueue"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Data_Unfoldable1 = PS["Data.Unfoldable1"];- var Prelude = PS["Prelude"]; - var CatNil = (function () {- function CatNil() {-- };- CatNil.value = new CatNil();- return CatNil;- })();- var CatCons = (function () {- function CatCons(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- CatCons.create = function (value0) {- return function (value1) {- return new CatCons(value0, value1);- };- };- return CatCons;- })();- var link = function (v) {- return function (cat) {- if (v instanceof CatNil) {- return cat;- };- if (v instanceof CatCons) {- return new CatCons(v.value0, Data_CatQueue.snoc(v.value1)(cat));- };- throw new Error("Failed pattern match at Data.CatList line 111, column 1 - line 111, column 54: " + [ v.constructor.name, cat.constructor.name ]);- };- };- var foldr = function (k) {- return function (b) {- return function (q) {- var foldl = function ($copy_v) {- return function ($copy_c) {- return function ($copy_v1) {- var $tco_var_v = $copy_v;- var $tco_var_c = $copy_c;- var $tco_done = false;- var $tco_result;- function $tco_loop(v, c, v1) {- if (v1 instanceof Data_List_Types.Nil) {- $tco_done = true;- return c;- };- if (v1 instanceof Data_List_Types.Cons) {- $tco_var_v = v;- $tco_var_c = v(c)(v1.value0);- $copy_v1 = v1.value1;- return;- };- throw new Error("Failed pattern match at Data.CatList line 126, column 3 - line 126, column 59: " + [ v.constructor.name, c.constructor.name, v1.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_v, $tco_var_c, $copy_v1);- };- return $tco_result;- };- };- };- var go = function ($copy_xs) {- return function ($copy_ys) {- var $tco_var_xs = $copy_xs;- var $tco_done = false;- var $tco_result;- function $tco_loop(xs, ys) {- var v = Data_CatQueue.uncons(xs);- if (v instanceof Data_Maybe.Nothing) {- $tco_done = true;- return foldl(function (x) {- return function (i) {- return i(x);- };- })(b)(ys);- };- if (v instanceof Data_Maybe.Just) {- $tco_var_xs = v.value0.value1;- $copy_ys = new Data_List_Types.Cons(k(v.value0.value0), ys);- return;- };- throw new Error("Failed pattern match at Data.CatList line 122, column 14 - line 124, column 67: " + [ v.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_xs, $copy_ys);- };- return $tco_result;- };- };- return go(q)(Data_List_Types.Nil.value);- };- };- };- var uncons = function (v) {- if (v instanceof CatNil) {- return Data_Maybe.Nothing.value;- };- if (v instanceof CatCons) {- return new Data_Maybe.Just(new Data_Tuple.Tuple(v.value0, (function () {- var $45 = Data_CatQueue["null"](v.value1);- if ($45) {- return CatNil.value;- };- return foldr(link)(CatNil.value)(v.value1);- })()));- };- throw new Error("Failed pattern match at Data.CatList line 102, column 1 - line 102, column 61: " + [ v.constructor.name ]);- };- var empty = CatNil.value;- var append = function (v) {- return function (v1) {- if (v1 instanceof CatNil) {- return v;- };- if (v instanceof CatNil) {- return v1;- };- return link(v)(v1);- };- }; - var semigroupCatList = new Data_Semigroup.Semigroup(append);- var snoc = function (cat) {- return function (a) {- return append(cat)(new CatCons(a, Data_CatQueue.empty));- };- };- exports["CatNil"] = CatNil;- exports["CatCons"] = CatCons;- exports["empty"] = empty;- exports["append"] = append;- exports["snoc"] = snoc;- exports["uncons"] = uncons;- exports["semigroupCatList"] = semigroupCatList;-})(PS["Data.CatList"] = PS["Data.CatList"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad = PS["Control.Monad"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_CatList = PS["Data.CatList"];- var Data_Either = PS["Data.Either"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Tuple = PS["Data.Tuple"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Free = (function () {- function Free(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Free.create = function (value0) {- return function (value1) {- return new Free(value0, value1);- };- };- return Free;- })();- var Return = (function () {- function Return(value0) {- this.value0 = value0;- };- Return.create = function (value0) {- return new Return(value0);- };- return Return;- })();- var Bind = (function () {- function Bind(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Bind.create = function (value0) {- return function (value1) {- return new Bind(value0, value1);- };- };- return Bind;- })();- var toView = function ($copy_v) {- var $tco_done = false;- var $tco_result;- function $tco_loop(v) {- var runExpF = function (v2) {- return v2;- };- var concatF = function (v2) {- return function (r) {- return new Free(v2.value0, Data_Semigroup.append(Data_CatList.semigroupCatList)(v2.value1)(r));- };- };- if (v.value0 instanceof Return) {- var v2 = Data_CatList.uncons(v.value1);- if (v2 instanceof Data_Maybe.Nothing) {- $tco_done = true;- return new Return(v.value0.value0);- };- if (v2 instanceof Data_Maybe.Just) {- $copy_v = concatF(runExpF(v2.value0.value0)(v.value0.value0))(v2.value0.value1);- return;- };- throw new Error("Failed pattern match at Control.Monad.Free line 220, column 7 - line 224, column 64: " + [ v2.constructor.name ]);- };- if (v.value0 instanceof Bind) {- $tco_done = true;- return new Bind(v.value0.value0, function (a) {- return concatF(v.value0.value1(a))(v.value1);- });- };- throw new Error("Failed pattern match at Control.Monad.Free line 218, column 3 - line 226, column 56: " + [ v.value0.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($copy_v);- };- return $tco_result;- };- var fromView = function (f) {- return new Free(f, Data_CatList.empty);- };- var freeMonad = new Control_Monad.Monad(function () {- return freeApplicative;- }, function () {- return freeBind;- });- var freeFunctor = new Data_Functor.Functor(function (k) {- return function (f) {- return Control_Bind.bindFlipped(freeBind)(function ($118) {- return Control_Applicative.pure(freeApplicative)(k($118));- })(f);- };- });- var freeBind = new Control_Bind.Bind(function () {- return freeApply;- }, function (v) {- return function (k) {- return new Free(v.value0, Data_CatList.snoc(v.value1)(k));- };- });- var freeApply = new Control_Apply.Apply(function () {- return freeFunctor;- }, Control_Monad.ap(freeMonad));- var freeApplicative = new Control_Applicative.Applicative(function () {- return freeApply;- }, function ($119) {- return fromView(Return.create($119));- });- var liftF = function (f) {- return fromView(new Bind(f, function ($120) {- return Control_Applicative.pure(freeApplicative)($120);- }));- };- var foldFree = function (dictMonadRec) {- return function (k) {- var go = function (f) {- var v = toView(f);- if (v instanceof Return) {- return Data_Functor.map((((dictMonadRec.Monad0()).Bind1()).Apply0()).Functor0())(Control_Monad_Rec_Class.Done.create)(Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(v.value0));- };- if (v instanceof Bind) {- return Data_Functor.map((((dictMonadRec.Monad0()).Bind1()).Apply0()).Functor0())(function ($127) {- return Control_Monad_Rec_Class.Loop.create(v.value1($127));- })(k(v.value0));- };- throw new Error("Failed pattern match at Control.Monad.Free line 151, column 10 - line 153, column 37: " + [ v.constructor.name ]);- };- return Control_Monad_Rec_Class.tailRecM(dictMonadRec)(go);- };- };- exports["liftF"] = liftF;- exports["foldFree"] = foldFree;- exports["freeFunctor"] = freeFunctor;- exports["freeBind"] = freeBind;- exports["freeApplicative"] = freeApplicative;- exports["freeApply"] = freeApply;- exports["freeMonad"] = freeMonad;-})(PS["Control.Monad.Free"] = PS["Control.Monad.Free"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Unsafe_Coerce = PS["Unsafe.Coerce"]; - var runExists = Unsafe_Coerce.unsafeCoerce;- var mkExists = Unsafe_Coerce.unsafeCoerce;- exports["mkExists"] = mkExists;- exports["runExists"] = runExists;-})(PS["Data.Exists"] = PS["Data.Exists"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Alt = PS["Control.Alt"];- var Control_Alternative = PS["Control.Alternative"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Comonad = PS["Control.Comonad"];- var Control_Extend = PS["Control.Extend"];- var Control_Monad = PS["Control.Monad"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_MonadPlus = PS["Control.MonadPlus"];- var Control_MonadZero = PS["Control.MonadZero"];- var Control_Plus = PS["Control.Plus"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Distributive = PS["Data.Distributive"];- var Data_Eq = PS["Data.Eq"];- var Data_Exists = PS["Data.Exists"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Functor_Invariant = PS["Data.Functor.Invariant"];- var Data_Ord = PS["Data.Ord"];- var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];- var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];- var Data_Traversable = PS["Data.Traversable"];- var Prelude = PS["Prelude"];- var unCoyoneda = function (f) {- return function (v) {- return Data_Exists.runExists(function (v1) {- return f(v1.value0)(v1.value1);- })(v);- };- };- exports["unCoyoneda"] = unCoyoneda;-})(PS["Data.Coyoneda"] = PS["Data.Coyoneda"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad = PS["Control.Monad"];- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Reader_Class = PS["Control.Monad.Reader.Class"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Monad_Writer_Class = PS["Control.Monad.Writer.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Either = PS["Data.Either"];- var Data_Exists = PS["Data.Exists"];- var Data_Functor = PS["Data.Functor"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Unit = PS["Data.Unit"];- var Effect_Class = PS["Effect.Class"];- var Prelude = PS["Prelude"]; - var Bound = (function () {- function Bound(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Bound.create = function (value0) {- return function (value1) {- return new Bound(value0, value1);- };- };- return Bound;- })();- var FreeT = (function () {- function FreeT(value0) {- this.value0 = value0;- };- FreeT.create = function (value0) {- return new FreeT(value0);- };- return FreeT;- })();- var Bind = (function () {- function Bind(value0) {- this.value0 = value0;- };- Bind.create = function (value0) {- return new Bind(value0);- };- return Bind;- })();- var monadTransFreeT = function (dictFunctor) {- return new Control_Monad_Trans_Class.MonadTrans(function (dictMonad) {- return function (ma) {- return new FreeT(function (v) {- return Data_Functor.map(((dictMonad.Bind1()).Apply0()).Functor0())(Data_Either.Left.create)(ma);- });- };- });- };- var freeT = FreeT.create;- var bound = function (m) {- return function (f) {- return new Bind(Data_Exists.mkExists(new Bound(m, f)));- };- };- var functorFreeT = function (dictFunctor) {- return function (dictFunctor1) {- return new Data_Functor.Functor(function (f) {- return function (v) {- if (v instanceof FreeT) {- return new FreeT(function (v1) {- return Data_Functor.map(dictFunctor1)(Data_Bifunctor.bimap(Data_Either.bifunctorEither)(f)(Data_Functor.map(dictFunctor)(Data_Functor.map(functorFreeT(dictFunctor)(dictFunctor1))(f))))(v.value0(Data_Unit.unit));- });- };- if (v instanceof Bind) {- return Data_Exists.runExists(function (v1) {- return bound(v1.value0)(function ($104) {- return Data_Functor.map(functorFreeT(dictFunctor)(dictFunctor1))(f)(v1.value1($104));- });- })(v.value0);- };- throw new Error("Failed pattern match at Control.Monad.Free.Trans line 57, column 1 - line 57, column 71: " + [ f.constructor.name, v.constructor.name ]);- };- });- };- };- var monadFreeT = function (dictFunctor) {- return function (dictMonad) {- return new Control_Monad.Monad(function () {- return applicativeFreeT(dictFunctor)(dictMonad);- }, function () {- return bindFreeT(dictFunctor)(dictMonad);- });- };- };- var bindFreeT = function (dictFunctor) {- return function (dictMonad) {- return new Control_Bind.Bind(function () {- return applyFreeT(dictFunctor)(dictMonad);- }, function (v) {- return function (f) {- if (v instanceof Bind) {- return Data_Exists.runExists(function (v1) {- return bound(v1.value0)(function (x) {- return bound(function (v2) {- return v1.value1(x);- })(f);- });- })(v.value0);- };- return bound(function (v1) {- return v;- })(f);- };- });- };- };- var applyFreeT = function (dictFunctor) {- return function (dictMonad) {- return new Control_Apply.Apply(function () {- return functorFreeT(dictFunctor)(((dictMonad.Bind1()).Apply0()).Functor0());- }, Control_Monad.ap(monadFreeT(dictFunctor)(dictMonad)));- };- };- var applicativeFreeT = function (dictFunctor) {- return function (dictMonad) {- return new Control_Applicative.Applicative(function () {- return applyFreeT(dictFunctor)(dictMonad);- }, function (a) {- return new FreeT(function (v) {- return Control_Applicative.pure(dictMonad.Applicative0())(new Data_Either.Left(a));- });- });- };- };- var liftFreeT = function (dictFunctor) {- return function (dictMonad) {- return function (fa) {- return new FreeT(function (v) {- return Control_Applicative.pure(dictMonad.Applicative0())(new Data_Either.Right(Data_Functor.map(dictFunctor)(Control_Applicative.pure(applicativeFreeT(dictFunctor)(dictMonad)))(fa)));- });- };- };- };- var resume = function (dictFunctor) {- return function (dictMonadRec) {- var go = function (v) {- if (v instanceof FreeT) {- return Data_Functor.map((((dictMonadRec.Monad0()).Bind1()).Apply0()).Functor0())(Control_Monad_Rec_Class.Done.create)(v.value0(Data_Unit.unit));- };- if (v instanceof Bind) {- return Data_Exists.runExists(function (v1) {- var v2 = v1.value0(Data_Unit.unit);- if (v2 instanceof FreeT) {- return Control_Bind.bind((dictMonadRec.Monad0()).Bind1())(v2.value0(Data_Unit.unit))(function (v3) {- if (v3 instanceof Data_Either.Left) {- return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Control_Monad_Rec_Class.Loop(v1.value1(v3.value0)));- };- if (v3 instanceof Data_Either.Right) {- return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Control_Monad_Rec_Class.Done(new Data_Either.Right(Data_Functor.map(dictFunctor)(function (h) {- return Control_Bind.bind(bindFreeT(dictFunctor)(dictMonadRec.Monad0()))(h)(v1.value1);- })(v3.value0))));- };- throw new Error("Failed pattern match at Control.Monad.Free.Trans line 52, column 20 - line 54, column 67: " + [ v3.constructor.name ]);- });- };- if (v2 instanceof Bind) {- return Data_Exists.runExists(function (v3) {- return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Control_Monad_Rec_Class.Loop(Control_Bind.bind(bindFreeT(dictFunctor)(dictMonadRec.Monad0()))(v3.value0(Data_Unit.unit))(function (z) {- return Control_Bind.bind(bindFreeT(dictFunctor)(dictMonadRec.Monad0()))(v3.value1(z))(v1.value1);- })));- })(v2.value0);- };- throw new Error("Failed pattern match at Control.Monad.Free.Trans line 50, column 5 - line 55, column 98: " + [ v2.constructor.name ]);- })(v.value0);- };- throw new Error("Failed pattern match at Control.Monad.Free.Trans line 47, column 3 - line 47, column 75: " + [ v.constructor.name ]);- };- return Control_Monad_Rec_Class.tailRecM(dictMonadRec)(go);- };- };- var runFreeT = function (dictFunctor) {- return function (dictMonadRec) {- return function (interp) {- var go = function (v) {- if (v instanceof Data_Either.Left) {- return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Control_Monad_Rec_Class.Done(v.value0));- };- if (v instanceof Data_Either.Right) {- return Data_Functor.map((((dictMonadRec.Monad0()).Bind1()).Apply0()).Functor0())(Control_Monad_Rec_Class.Loop.create)(interp(v.value0));- };- throw new Error("Failed pattern match at Control.Monad.Free.Trans line 126, column 3 - line 126, column 63: " + [ v.constructor.name ]);- };- return Control_Monad_Rec_Class.tailRecM(dictMonadRec)(Control_Bind.composeKleisliFlipped((dictMonadRec.Monad0()).Bind1())(go)(resume(dictFunctor)(dictMonadRec)));- };- };- };- var monadRecFreeT = function (dictFunctor) {- return function (dictMonad) {- return new Control_Monad_Rec_Class.MonadRec(function () {- return monadFreeT(dictFunctor)(dictMonad);- }, function (f) {- var go = function (s) {- return Control_Bind.bind(bindFreeT(dictFunctor)(dictMonad))(f(s))(function (v) {- if (v instanceof Control_Monad_Rec_Class.Loop) {- return go(v.value0);- };- if (v instanceof Control_Monad_Rec_Class.Done) {- return Control_Applicative.pure(applicativeFreeT(dictFunctor)(dictMonad))(v.value0);- };- throw new Error("Failed pattern match at Control.Monad.Free.Trans line 80, column 15 - line 82, column 25: " + [ v.constructor.name ]);- });- };- return go;- });- };- };- exports["freeT"] = freeT;- exports["liftFreeT"] = liftFreeT;- exports["resume"] = resume;- exports["runFreeT"] = runFreeT;- exports["functorFreeT"] = functorFreeT;- exports["applyFreeT"] = applyFreeT;- exports["applicativeFreeT"] = applicativeFreeT;- exports["bindFreeT"] = bindFreeT;- exports["monadFreeT"] = monadFreeT;- exports["monadTransFreeT"] = monadTransFreeT;- exports["monadRecFreeT"] = monadRecFreeT;-})(PS["Control.Monad.Free.Trans"] = PS["Control.Monad.Free.Trans"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Category = PS["Control.Category"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Newtype = PS["Data.Newtype"];- var Prelude = PS["Prelude"]; - var Profunctor = function (dimap) {- this.dimap = dimap;- };- var profunctorFn = new Profunctor(function (a2b) {- return function (c2d) {- return function (b2c) {- return function ($9) {- return c2d(b2c(a2b($9)));- };- };- };- });- var dimap = function (dict) {- return dict.dimap;- };- var rmap = function (dictProfunctor) {- return function (b2c) {- return dimap(dictProfunctor)(Control_Category.identity(Control_Category.categoryFn))(b2c);- };- };- exports["dimap"] = dimap;- exports["Profunctor"] = Profunctor;- exports["rmap"] = rmap;- exports["profunctorFn"] = profunctorFn;-})(PS["Data.Profunctor"] = PS["Data.Profunctor"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad_Except = PS["Control.Monad.Except"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Control_Monad_Free_Trans = PS["Control.Monad.Free.Trans"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Parallel = PS["Control.Parallel"];- var Control_Parallel_Class = PS["Control.Parallel.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Either = PS["Data.Either"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Identity = PS["Data.Identity"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Profunctor = PS["Data.Profunctor"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Prelude = PS["Prelude"];- var Emit = (function () {- function Emit(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Emit.create = function (value0) {- return function (value1) {- return new Emit(value0, value1);- };- };- return Emit;- })();- var runProcess = function (dictMonadRec) {- return Control_Monad_Free_Trans.runFreeT(Data_Identity.functorIdentity)(dictMonadRec)(function ($186) {- return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(Data_Newtype.unwrap(Data_Identity.newtypeIdentity)($186));- });- };- var profunctorAwait = new Data_Profunctor.Profunctor(function (f) {- return function (g) {- return function (v) {- return Data_Profunctor.dimap(Data_Profunctor.profunctorFn)(f)(g)(v);- };- };- });- var loop = function (dictFunctor) {- return function (dictMonad) {- return function (me) {- return Control_Monad_Rec_Class.tailRecM(Control_Monad_Free_Trans.monadRecFreeT(dictFunctor)(dictMonad))(function (v) {- return Data_Functor.map(Control_Monad_Free_Trans.functorFreeT(dictFunctor)(((dictMonad.Bind1()).Apply0()).Functor0()))(Data_Maybe.maybe(new Control_Monad_Rec_Class.Loop(Data_Unit.unit))(Control_Monad_Rec_Class.Done.create))(me);- })(Data_Unit.unit);- };- };- };- var fuseWithL = function (dictFunctor) {- return function (dictFunctor1) {- return function (dictFunctor2) {- return function (dictMonadRec) {- return function (zap) {- return function (fs) {- return function (gs) {- var go = function (v) {- return Control_Monad_Except_Trans.runExceptT(Control_Bind.bind(Control_Monad_Except_Trans.bindExceptT(dictMonadRec.Monad0()))(Control_Monad_Except_Trans.ExceptT(Control_Monad_Free_Trans.resume(dictFunctor)(dictMonadRec)(v.value0)))(function (v1) {- return Control_Bind.bind(Control_Monad_Except_Trans.bindExceptT(dictMonadRec.Monad0()))(Control_Monad_Except_Trans.ExceptT(Control_Monad_Free_Trans.resume(dictFunctor1)(dictMonadRec)(v.value1)))(function (v2) {- return Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(dictMonadRec.Monad0()))(Data_Functor.map(dictFunctor2)(function (t) {- return Control_Monad_Free_Trans.freeT(function (v3) {- return go(t);- });- })(zap(Data_Tuple.Tuple.create)(v1)(v2)));- });- }));- };- return Control_Monad_Free_Trans.freeT(function (v) {- return go(new Data_Tuple.Tuple(fs, gs));- });- };- };- };- };- };- };- };- var fuseWith = function (dictFunctor) {- return function (dictFunctor1) {- return function (dictFunctor2) {- return function (dictMonadRec) {- return function (dictParallel) {- return function (zap) {- return function (fs) {- return function (gs) {- var go = function (v) {- return Control_Bind.bind((dictMonadRec.Monad0()).Bind1())(Control_Parallel_Class.sequential(dictParallel)(Control_Apply.apply((dictParallel.Applicative1()).Apply0())(Data_Functor.map(((dictParallel.Applicative1()).Apply0()).Functor0())(Control_Apply.lift2(Data_Either.applyEither)(zap(Data_Tuple.Tuple.create)))(Control_Parallel_Class.parallel(dictParallel)(Control_Monad_Free_Trans.resume(dictFunctor)(dictMonadRec)(v.value0))))(Control_Parallel_Class.parallel(dictParallel)(Control_Monad_Free_Trans.resume(dictFunctor1)(dictMonadRec)(v.value1)))))(function (v1) {- if (v1 instanceof Data_Either.Left) {- return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Data_Either.Left(v1.value0));- };- if (v1 instanceof Data_Either.Right) {- return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Data_Either.Right(Data_Functor.map(dictFunctor2)(function (t) {- return Control_Monad_Free_Trans.freeT(function (v2) {- return go(t);- });- })(v1.value0)));- };- throw new Error("Failed pattern match at Control.Coroutine line 79, column 5 - line 81, column 63: " + [ v1.constructor.name ]);- });- };- return Control_Monad_Free_Trans.freeT(function (v) {- return go(new Data_Tuple.Tuple(fs, gs));- });- };- };- };- };- };- };- };- };- var functorAwait = new Data_Functor.Functor(Data_Profunctor.rmap(profunctorAwait));- var bifunctorEmit = new Data_Bifunctor.Bifunctor(function (f) {- return function (g) {- return function (v) {- return new Emit(f(v.value0), g(v.value1));- };- };- });- var functorEmit = new Data_Functor.Functor(Data_Bifunctor.rmap(bifunctorEmit));- var connect = function (dictMonadRec) {- return function (dictParallel) {- return fuseWith(functorEmit)(functorAwait)(Data_Identity.functorIdentity)(dictMonadRec)(dictParallel)(function (f) {- return function (v) {- return function (v1) {- return f(v.value1)(v1(v.value0));- };- };- });- };- };- var emit = function (dictMonad) {- return function (o) {- return Control_Monad_Free_Trans.liftFreeT(functorEmit)(dictMonad)(new Emit(o, Data_Unit.unit));- };- };- var producer = function (dictMonad) {- return function (recv) {- return loop(functorEmit)(dictMonad)(Control_Bind.bind(Control_Monad_Free_Trans.bindFreeT(functorEmit)(dictMonad))(Control_Monad_Trans_Class.lift(Control_Monad_Free_Trans.monadTransFreeT(functorEmit))(dictMonad)(recv))(function (v) {- if (v instanceof Data_Either.Left) {- return Data_Functor.voidLeft(Control_Monad_Free_Trans.functorFreeT(functorEmit)(((dictMonad.Bind1()).Apply0()).Functor0()))(emit(dictMonad)(v.value0))(Data_Maybe.Nothing.value);- };- if (v instanceof Data_Either.Right) {- return Control_Applicative.pure(Control_Monad_Free_Trans.applicativeFreeT(functorEmit)(dictMonad))(new Data_Maybe.Just(v.value0));- };- throw new Error("Failed pattern match at Control.Coroutine line 125, column 3 - line 127, column 29: " + [ v.constructor.name ]);- }));- };- };- var pullFrom = function (dictMonadRec) {- return fuseWithL(functorAwait)(functorEmit)(Data_Identity.functorIdentity)(dictMonadRec)(function (f) {- return function (v) {- return function (v1) {- return Control_Applicative.pure(Data_Identity.applicativeIdentity)(f(v(v1.value0))(v1.value1));- };- };- });- };- var $$await = function (dictMonad) {- return Control_Monad_Free_Trans.liftFreeT(functorAwait)(dictMonad)(Control_Category.identity(Control_Category.categoryFn));- };- exports["loop"] = loop;- exports["runProcess"] = runProcess;- exports["fuseWith"] = fuseWith;- exports["fuseWithL"] = fuseWithL;- exports["Emit"] = Emit;- exports["emit"] = emit;- exports["producer"] = producer;- exports["await"] = $$await;- exports["connect"] = connect;- exports["pullFrom"] = pullFrom;- exports["bifunctorEmit"] = bifunctorEmit;- exports["functorEmit"] = functorEmit;- exports["profunctorAwait"] = profunctorAwait;- exports["functorAwait"] = functorAwait;-})(PS["Control.Coroutine"] = PS["Control.Coroutine"] || {});-(function(exports) {- /* globals exports, setTimeout */- "use strict";-- var AVar = function () {-- function MutableQueue () {- this.head = null;- this.last = null;- this.size = 0;- }-- function MutableCell (queue, value) {- this.queue = queue;- this.value = value;- this.next = null;- this.prev = null;- }-- function AVar (value) {- this.draining = false;- this.error = null;- this.value = value;- this.takes = new MutableQueue();- this.reads = new MutableQueue();- this.puts = new MutableQueue();- }-- var EMPTY = {};-- function runEff(eff) {- try {- eff();- } catch (error) {- setTimeout(function () {- throw error;- }, 0);- }- }-- function putLast (queue, value) {- var cell = new MutableCell(queue, value);- switch (queue.size) {- case 0:- queue.head = cell;- break;- case 1:- cell.prev = queue.head;- queue.head.next = cell;- queue.last = cell;- break;- default:- cell.prev = queue.last;- queue.last.next = cell;- queue.last = cell;- }- queue.size++;- return cell;- }-- function takeLast (queue) {- var cell;- switch (queue.size) {- case 0:- return null;- case 1:- cell = queue.head;- queue.head = null;- break;- case 2:- cell = queue.last;- queue.head.next = null;- queue.last = null;- break;- default:- cell = queue.last;- queue.last = cell.prev;- queue.last.next = null;- }- cell.prev = null;- cell.queue = null;- queue.size--;- return cell.value;- }-- function takeHead (queue) {- var cell;- switch (queue.size) {- case 0:- return null;- case 1:- cell = queue.head;- queue.head = null;- break;- case 2:- cell = queue.head;- queue.last.prev = null;- queue.head = queue.last;- queue.last = null;- break;- default:- cell = queue.head;- queue.head = cell.next;- queue.head.prev = null;- }- cell.next = null;- cell.queue = null;- queue.size--;- return cell.value;- }-- function deleteCell (cell) {- if (cell.queue === null) {- return;- }- if (cell.queue.last === cell) {- takeLast(cell.queue);- return;- }- if (cell.queue.head === cell) {- takeHead(cell.queue);- return;- }- if (cell.prev) {- cell.prev.next = cell.next;- }- if (cell.next) {- cell.next.prev = cell.prev;- }- cell.queue.size--;- cell.queue = null;- cell.value = null;- cell.next = null;- cell.prev = null;- }-- function drainVar (util, avar) {- if (avar.draining) {- return;- }-- var ps = avar.puts;- var ts = avar.takes;- var rs = avar.reads;- var p, r, t, value, rsize;-- avar.draining = true;-- while (1) { // eslint-disable-line no-constant-condition- p = null;- r = null;- t = null;- value = avar.value;- rsize = rs.size;-- if (avar.error !== null) {- value = util.left(avar.error);- while (p = takeHead(ps)) { // eslint-disable-line no-cond-assign- runEff(p.cb(value));- }- while (r = takeHead(rs)) { // eslint-disable-line no-cond-assign- runEff(r(value));- }- while (t = takeHead(ts)) { // eslint-disable-line no-cond-assign- runEff(t(value));- }- break;- }-- // Process the next put. We do not immediately invoke the callback- // because we want to preserve ordering. If there are takes/reads- // we want to run those first.- if (value === EMPTY && (p = takeHead(ps))) {- avar.value = value = p.value;- }-- if (value !== EMPTY) {- // We go ahead and queue up the next take for the same reasons as- // above. Invoking the read callbacks can affect the mutable queue.- t = takeHead(ts);- // We only want to process the reads queued up before running these- // callbacks so we guard on rsize.- while (rsize-- && (r = takeHead(rs))) {- runEff(r(util.right(value)));- }- if (t !== null) {- avar.value = EMPTY;- runEff(t(util.right(value)));- }- }-- if (p !== null) {- runEff(p.cb(util.right(void 0)));- }-- // Callbacks could have queued up more items so we need to guard on the- // actual mutable properties.- if (avar.value === EMPTY && ps.size === 0 || avar.value !== EMPTY && ts.size === 0) {- break;- }- }- avar.draining = false;- }-- AVar.EMPTY = EMPTY;- AVar.putLast = putLast;- AVar.takeLast = takeLast;- AVar.takeHead = takeHead;- AVar.deleteCell = deleteCell;- AVar.drainVar = drainVar;-- return AVar;- }();-- exports.empty = function () {- return new AVar(AVar.EMPTY);- };-- exports._killVar = function (util, error, avar) {- return function () {- if (avar.error === null) {- avar.error = error;- avar.value = AVar.EMPTY;- AVar.drainVar(util, avar);- }- };- };-- exports._putVar = function (util, value, avar, cb) {- return function () {- var cell = AVar.putLast(avar.puts, { cb: cb, value: value });- AVar.drainVar(util, avar);- return function () {- AVar.deleteCell(cell);- };- };- };-- exports._takeVar = function (util, avar, cb) {- return function () {- var cell = AVar.putLast(avar.takes, cb);- AVar.drainVar(util, avar);- return function () {- AVar.deleteCell(cell);- };- };- };-})(PS["Effect.AVar"] = PS["Effect.AVar"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Effect.AVar"];- var Data_Either = PS["Data.Either"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Maybe = PS["Data.Maybe"];- var Effect = PS["Effect"];- var Effect_Exception = PS["Effect.Exception"];- var Prelude = PS["Prelude"]; - var Killed = (function () {- function Killed(value0) {- this.value0 = value0;- };- Killed.create = function (value0) {- return new Killed(value0);- };- return Killed;- })();- var Filled = (function () {- function Filled(value0) {- this.value0 = value0;- };- Filled.create = function (value0) {- return new Filled(value0);- };- return Filled;- })();- var Empty = (function () {- function Empty() {-- };- Empty.value = new Empty();- return Empty;- })();- var ffiUtil = {- left: Data_Either.Left.create,- right: Data_Either.Right.create,- nothing: Data_Maybe.Nothing.value,- just: Data_Maybe.Just.create,- killed: Killed.create,- filled: Filled.create,- empty: Empty.value- };- var kill = function (err) {- return function (avar) {- return $foreign._killVar(ffiUtil, err, avar);- };- };- var put = function (value) {- return function (avar) {- return function (cb) {- return $foreign._putVar(ffiUtil, value, avar, cb);- };- };- };- var take = function (avar) {- return function (cb) {- return $foreign._takeVar(ffiUtil, avar, cb);- };- };- exports["Killed"] = Killed;- exports["Filled"] = Filled;- exports["Empty"] = Empty;- exports["take"] = take;- exports["put"] = put;- exports["kill"] = kill;- exports["empty"] = $foreign.empty;-})(PS["Effect.AVar"] = PS["Effect.AVar"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Maybe = PS["Data.Maybe"];- var Effect = PS["Effect"];- var Effect_AVar = PS["Effect.AVar"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Class = PS["Effect.Class"];- var Effect_Exception = PS["Effect.Exception"];- var Prelude = PS["Prelude"];- var take = function (avar) {- return Effect_Aff.makeAff(function (k) {- return function __do() {- var v = Effect_AVar.take(avar)(k)();- return Effect_Aff.effectCanceler(v);- };- });- };- var put = function (value) {- return function (avar) {- return Effect_Aff.makeAff(function (k) {- return function __do() {- var v = Effect_AVar.put(value)(avar)(k)();- return Effect_Aff.effectCanceler(v);- };- });- };- };- var kill = function (error) {- return function ($11) {- return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_AVar.kill(error)($11));- };- };- var empty = Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_AVar.empty);- exports["empty"] = empty;- exports["take"] = take;- exports["put"] = put;- exports["kill"] = kill;-})(PS["Effect.Aff.AVar"] = PS["Effect.Aff.AVar"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Coroutine = PS["Control.Coroutine"];- var Control_Monad_Free_Trans = PS["Control.Monad.Free.Trans"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Either = PS["Data.Either"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Aff_AVar = PS["Effect.Aff.AVar"];- var Effect_Aff_Class = PS["Effect.Aff.Class"];- var Effect_Class = PS["Effect.Class"];- var Effect_Exception = PS["Effect.Exception"];- var Prelude = PS["Prelude"]; - var Listening = (function () {- function Listening() {-- };- Listening.value = new Listening();- return Listening;- })();- var Done = (function () {- function Done() {-- };- Done.value = new Done();- return Done;- })();- var unEventSource = function (v) {- return v;- };- var eqSubscribeStatus = new Data_Eq.Eq(function (x) {- return function (y) {- if (x instanceof Listening && y instanceof Listening) {- return true;- };- if (x instanceof Done && y instanceof Done) {- return true;- };- return false;- };- });- exports["Listening"] = Listening;- exports["Done"] = Done;- exports["unEventSource"] = unEventSource;- exports["eqSubscribeStatus"] = eqSubscribeStatus;-})(PS["Halogen.Query.EventSource"] = PS["Halogen.Query.EventSource"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Category = PS["Control.Category"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Exception = PS["Effect.Exception"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var unFork = Unsafe_Coerce.unsafeCoerce;- exports["unFork"] = unFork;-})(PS["Halogen.Query.ForkF"] = PS["Halogen.Query.ForkF"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Applicative_Free = PS["Control.Applicative.Free"];- var Control_Apply = PS["Control.Apply"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad = PS["Control.Monad"];- var Control_Monad_Free = PS["Control.Monad.Free"];- var Control_Monad_Reader_Class = PS["Control.Monad.Reader.Class"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Monad_Writer_Class = PS["Control.Monad.Writer.Class"];- var Control_Parallel_Class = PS["Control.Parallel.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Coyoneda = PS["Data.Coyoneda"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Newtype = PS["Data.Newtype"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Effect_Aff_Class = PS["Effect.Aff.Class"];- var Effect_Class = PS["Effect.Class"];- var Effect_Exception = PS["Effect.Exception"];- var Halogen_Query_EventSource = PS["Halogen.Query.EventSource"];- var Halogen_Query_ForkF = PS["Halogen.Query.ForkF"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Prelude = PS["Prelude"];- var Web_DOM = PS["Web.DOM"];- var HalogenM = function (x) {- return x;- };- var State = (function () {- function State(value0) {- this.value0 = value0;- };- State.create = function (value0) {- return new State(value0);- };- return State;- })();- var Subscribe = (function () {- function Subscribe(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Subscribe.create = function (value0) {- return function (value1) {- return new Subscribe(value0, value1);- };- };- return Subscribe;- })();- var Lift = (function () {- function Lift(value0) {- this.value0 = value0;- };- Lift.create = function (value0) {- return new Lift(value0);- };- return Lift;- })();- var Halt = (function () {- function Halt(value0) {- this.value0 = value0;- };- Halt.create = function (value0) {- return new Halt(value0);- };- return Halt;- })();- var GetSlots = (function () {- function GetSlots(value0) {- this.value0 = value0;- };- GetSlots.create = function (value0) {- return new GetSlots(value0);- };- return GetSlots;- })();- var CheckSlot = (function () {- function CheckSlot(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- CheckSlot.create = function (value0) {- return function (value1) {- return new CheckSlot(value0, value1);- };- };- return CheckSlot;- })();- var ChildQuery = (function () {- function ChildQuery(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- ChildQuery.create = function (value0) {- return function (value1) {- return new ChildQuery(value0, value1);- };- };- return ChildQuery;- })();- var Raise = (function () {- function Raise(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- Raise.create = function (value0) {- return function (value1) {- return new Raise(value0, value1);- };- };- return Raise;- })();- var Par = (function () {- function Par(value0) {- this.value0 = value0;- };- Par.create = function (value0) {- return new Par(value0);- };- return Par;- })();- var Fork = (function () {- function Fork(value0) {- this.value0 = value0;- };- Fork.create = function (value0) {- return new Fork(value0);- };- return Fork;- })();- var GetRef = (function () {- function GetRef(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- GetRef.create = function (value0) {- return function (value1) {- return new GetRef(value0, value1);- };- };- return GetRef;- })();- var raise = function (o) {- return HalogenM(Control_Monad_Free.liftF(new Raise(o, Data_Unit.unit)));- };- var functorHalogenM = new Data_Functor.Functor(function (f) {- return function (v) {- return Data_Functor.map(Control_Monad_Free.freeFunctor)(f)(v);- };- });- var applyHalogenM = new Control_Apply.Apply(function () {- return functorHalogenM;- }, function (v) {- return function (v1) {- return Control_Apply.apply(Control_Monad_Free.freeApply)(v)(v1);- };- });- var bindHalogenM = new Control_Bind.Bind(function () {- return applyHalogenM;- }, function (v) {- return function (f) {- return Control_Bind.bind(Control_Monad_Free.freeBind)(v)(function (x) {- var v1 = f(x);- return v1;- });- };- }); - var applicativeHalogenM = new Control_Applicative.Applicative(function () {- return applyHalogenM;- }, function (a) {- return Control_Applicative.pure(Control_Monad_Free.freeApplicative)(a);- });- var monadHalogenM = new Control_Monad.Monad(function () {- return applicativeHalogenM;- }, function () {- return bindHalogenM;- });- var monadEffectHalogenM = function (dictMonadEffect) {- return new Effect_Class.MonadEffect(function () {- return monadHalogenM;- }, function (eff) {- return HalogenM(Control_Monad_Free.liftF(Lift.create(Effect_Class.liftEffect(dictMonadEffect)(eff))));- });- };- var monadAffHalogenM = function (dictMonadAff) {- return new Effect_Aff_Class.MonadAff(function () {- return monadEffectHalogenM(dictMonadAff.MonadEffect0());- }, function (aff) {- return HalogenM(Control_Monad_Free.liftF(Lift.create(Effect_Aff_Class.liftAff(dictMonadAff)(aff))));- });- };- var monadStateHalogenM = new Control_Monad_State_Class.MonadState(function () {- return monadHalogenM;- }, function ($180) {- return HalogenM(Control_Monad_Free.liftF(State.create($180)));- });- exports["State"] = State;- exports["Subscribe"] = Subscribe;- exports["Lift"] = Lift;- exports["Halt"] = Halt;- exports["GetSlots"] = GetSlots;- exports["CheckSlot"] = CheckSlot;- exports["ChildQuery"] = ChildQuery;- exports["Raise"] = Raise;- exports["Par"] = Par;- exports["Fork"] = Fork;- exports["GetRef"] = GetRef;- exports["HalogenM"] = HalogenM;- exports["raise"] = raise;- exports["functorHalogenM"] = functorHalogenM;- exports["applyHalogenM"] = applyHalogenM;- exports["applicativeHalogenM"] = applicativeHalogenM;- exports["bindHalogenM"] = bindHalogenM;- exports["monadHalogenM"] = monadHalogenM;- exports["monadEffectHalogenM"] = monadEffectHalogenM;- exports["monadAffHalogenM"] = monadAffHalogenM;- exports["monadStateHalogenM"] = monadStateHalogenM;-})(PS["Halogen.Query.HalogenM"] = PS["Halogen.Query.HalogenM"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Bifunctor = PS["Data.Bifunctor"];- var Data_Const = PS["Data.Const"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Halogen_Data_OrdBox = PS["Halogen.Data.OrdBox"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"]; - var ComponentSlot = (function () {- function ComponentSlot(value0, value1, value2, value3, value4, value5) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- this.value3 = value3;- this.value4 = value4;- this.value5 = value5;- };- ComponentSlot.create = function (value0) {- return function (value1) {- return function (value2) {- return function (value3) {- return function (value4) {- return function (value5) {- return new ComponentSlot(value0, value1, value2, value3, value4, value5);- };- };- };- };- };- };- return ComponentSlot;- })();- var unComponentSlot = function (f) {- return function (cs) {- return f(cs.value0)(cs.value1)(cs.value2)(cs.value3)(cs.value4)(cs.value5);- };- };- var unComponent = Unsafe_Coerce.unsafeCoerce;- var mkComponentSlot = ComponentSlot.create;- var mkComponent = Unsafe_Coerce.unsafeCoerce;- var parentComponent = function (dictOrd) {- return function (spec) {- return mkComponent({- initialState: spec.initialState,- render: spec.render,- "eval": spec["eval"],- receiver: spec.receiver,- initializer: Data_Maybe.Nothing.value,- finalizer: Data_Maybe.Nothing.value,- mkOrdBox: Halogen_Data_OrdBox.mkOrdBox(dictOrd)- });- };- };- var lifecycleComponent = function (dictBifunctor) {- return function (spec) {- return mkComponent({- initialState: spec.initialState,- render: spec.render,- "eval": spec["eval"],- receiver: spec.receiver,- initializer: spec.initializer,- finalizer: spec.finalizer,- mkOrdBox: Halogen_Data_OrdBox.mkOrdBox(Data_Ord.ordVoid)- });- };- }; - var component = function (dictBifunctor) {- return function (spec) {- return lifecycleComponent(dictBifunctor)({- initialState: spec.initialState,- render: spec.render,- "eval": spec["eval"],- receiver: spec.receiver,- initializer: Data_Maybe.Nothing.value,- finalizer: Data_Maybe.Nothing.value- });- };- };- exports["mkComponent"] = mkComponent;- exports["unComponent"] = unComponent;- exports["component"] = component;- exports["lifecycleComponent"] = lifecycleComponent;- exports["parentComponent"] = parentComponent;- exports["mkComponentSlot"] = mkComponentSlot;- exports["unComponentSlot"] = unComponentSlot;-})(PS["Halogen.Component"] = PS["Halogen.Component"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var DOM_HTML_Indexed = PS["DOM.HTML.Indexed"];- var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];- var DOM_HTML_Indexed_FormMethod = PS["DOM.HTML.Indexed.FormMethod"];- var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];- var DOM_HTML_Indexed_MenuType = PS["DOM.HTML.Indexed.MenuType"];- var DOM_HTML_Indexed_MenuitemType = PS["DOM.HTML.Indexed.MenuitemType"];- var DOM_HTML_Indexed_OnOff = PS["DOM.HTML.Indexed.OnOff"];- var DOM_HTML_Indexed_OrderedListType = PS["DOM.HTML.Indexed.OrderedListType"];- var DOM_HTML_Indexed_PreloadValue = PS["DOM.HTML.Indexed.PreloadValue"];- var DOM_HTML_Indexed_StepValue = PS["DOM.HTML.Indexed.StepValue"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_MediaType = PS["Data.MediaType"];- var Data_Newtype = PS["Data.Newtype"];- var Data_String = PS["Data.String"];- var Data_String_Common = PS["Data.String.Common"];- var Data_Unit = PS["Data.Unit"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Halogen_VDom_DOM_Prop = PS["Halogen.VDom.DOM.Prop"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var prop = function (dictIsProp) {- return Halogen_HTML_Core.prop(dictIsProp);- }; - var required = prop(Halogen_HTML_Core.booleanIsProp)("required");- var rows = prop(Halogen_HTML_Core.intIsProp)("rows"); - var target = prop(Halogen_HTML_Core.stringIsProp)("target");- var title = prop(Halogen_HTML_Core.stringIsProp)("title");- var type_ = function (dictIsProp) {- return prop(dictIsProp)("type");- };- var value = prop(Halogen_HTML_Core.stringIsProp)("value");- var name = prop(Halogen_HTML_Core.stringIsProp)("name"); - var id_ = prop(Halogen_HTML_Core.stringIsProp)("id");- var href = prop(Halogen_HTML_Core.stringIsProp)("href");- var $$for = prop(Halogen_HTML_Core.stringIsProp)("htmlFor");- var class_ = function ($13) {- return prop(Halogen_HTML_Core.stringIsProp)("className")(Data_Newtype.unwrap(Halogen_HTML_Core.newtypeClassName)($13));- };- var checked = prop(Halogen_HTML_Core.booleanIsProp)("checked"); - var autofocus = prop(Halogen_HTML_Core.booleanIsProp)("autofocus");- var autocomplete = function ($14) {- return prop(Halogen_HTML_Core.onOffIsProp)("autocomplete")((function (b) {- if (b) {- return DOM_HTML_Indexed_OnOff.On.value;- };- return DOM_HTML_Indexed_OnOff.Off.value;- })($14));- };- var attr = Halogen_HTML_Core.attr(Data_Maybe.Nothing.value);- exports["prop"] = prop;- exports["attr"] = attr;- exports["class_"] = class_;- exports["rows"] = rows;- exports["for"] = $$for;- exports["href"] = href;- exports["id_"] = id_;- exports["name"] = name;- exports["target"] = target;- exports["title"] = title;- exports["type_"] = type_;- exports["value"] = value;- exports["required"] = required;- exports["checked"] = checked;- exports["autocomplete"] = autocomplete;- exports["autofocus"] = autofocus;-})(PS["Halogen.HTML.Properties"] = PS["Halogen.HTML.Properties"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var DOM_HTML_Indexed = PS["DOM.HTML.Indexed"];- var Data_Function = PS["Data.Function"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Tuple = PS["Data.Tuple"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Halogen_VDom = PS["Halogen.VDom"];- var Halogen_VDom_Types = PS["Halogen.VDom.Types"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var element = Halogen_HTML_Core.element(Data_Maybe.Nothing.value);- var form = element("form");- var input = function (props) {- return element("input")(props)([ ]);- }; - var label = element("label");- var p = element("p");- var p_ = p([ ]);- var span = element("span");- var table = element("table");- var tbody = element("tbody");- var tbody_ = tbody([ ]);- var td = element("td");- var td_ = td([ ]);- var textarea = function (es) {- return element("textarea")(es)([ ]);- }; - var tr = element("tr");- var tr_ = tr([ ]);- var div = element("div");- var div_ = div([ ]);- var button = element("button");- var br = function (props) {- return element("br")(props)([ ]);- };- var br_ = br([ ]); - var a = element("a");- exports["element"] = element;- exports["a"] = a;- exports["br"] = br;- exports["br_"] = br_;- exports["button"] = button;- exports["div"] = div;- exports["div_"] = div_;- exports["form"] = form;- exports["input"] = input;- exports["label"] = label;- exports["p"] = p;- exports["p_"] = p_;- exports["span"] = span;- exports["table"] = table;- exports["tbody"] = tbody;- exports["tbody_"] = tbody_;- exports["td"] = td;- exports["td_"] = td_;- exports["textarea"] = textarea;- exports["tr"] = tr;- exports["tr_"] = tr_;-})(PS["Halogen.HTML.Elements"] = PS["Halogen.HTML.Elements"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Halogen_Component = PS["Halogen.Component"];- var Halogen_Component_ChildPath = PS["Halogen.Component.ChildPath"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];- var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var slot = function (p) {- return function (component) {- return function (input) {- return function (outputQuery) {- var f = Halogen_Component.unComponent(function (v) {- return v.receiver;- })(component);- return Halogen_HTML_Core.slot(Halogen_Component.mkComponentSlot(p)(component)(input)(f)(outputQuery)(Data_Maybe.Just.create));- };- };- };- };- exports["slot"] = slot;-})(PS["Halogen.HTML"] = PS["Halogen.HTML"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Apply = PS["Control.Apply"];- var Control_Category = PS["Control.Category"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_List = PS["Data.List"];- var Data_List_Lazy = PS["Data.List.Lazy"];- var Data_List_Lazy_Types = PS["Data.List.Lazy.Types"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Traversable = PS["Data.Traversable"];- var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"]; - var Leaf = (function () {- function Leaf() {-- };- Leaf.value = new Leaf();- return Leaf;- })();- var Two = (function () {- function Two(value0, value1, value2, value3) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- this.value3 = value3;- };- Two.create = function (value0) {- return function (value1) {- return function (value2) {- return function (value3) {- return new Two(value0, value1, value2, value3);- };- };- };- };- return Two;- })();- var Three = (function () {- function Three(value0, value1, value2, value3, value4, value5, value6) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- this.value3 = value3;- this.value4 = value4;- this.value5 = value5;- this.value6 = value6;- };- Three.create = function (value0) {- return function (value1) {- return function (value2) {- return function (value3) {- return function (value4) {- return function (value5) {- return function (value6) {- return new Three(value0, value1, value2, value3, value4, value5, value6);- };- };- };- };- };- };- };- return Three;- })();- var TwoLeft = (function () {- function TwoLeft(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- TwoLeft.create = function (value0) {- return function (value1) {- return function (value2) {- return new TwoLeft(value0, value1, value2);- };- };- };- return TwoLeft;- })();- var TwoRight = (function () {- function TwoRight(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- TwoRight.create = function (value0) {- return function (value1) {- return function (value2) {- return new TwoRight(value0, value1, value2);- };- };- };- return TwoRight;- })();- var ThreeLeft = (function () {- function ThreeLeft(value0, value1, value2, value3, value4, value5) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- this.value3 = value3;- this.value4 = value4;- this.value5 = value5;- };- ThreeLeft.create = function (value0) {- return function (value1) {- return function (value2) {- return function (value3) {- return function (value4) {- return function (value5) {- return new ThreeLeft(value0, value1, value2, value3, value4, value5);- };- };- };- };- };- };- return ThreeLeft;- })();- var ThreeMiddle = (function () {- function ThreeMiddle(value0, value1, value2, value3, value4, value5) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- this.value3 = value3;- this.value4 = value4;- this.value5 = value5;- };- ThreeMiddle.create = function (value0) {- return function (value1) {- return function (value2) {- return function (value3) {- return function (value4) {- return function (value5) {- return new ThreeMiddle(value0, value1, value2, value3, value4, value5);- };- };- };- };- };- };- return ThreeMiddle;- })();- var ThreeRight = (function () {- function ThreeRight(value0, value1, value2, value3, value4, value5) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- this.value3 = value3;- this.value4 = value4;- this.value5 = value5;- };- ThreeRight.create = function (value0) {- return function (value1) {- return function (value2) {- return function (value3) {- return function (value4) {- return function (value5) {- return new ThreeRight(value0, value1, value2, value3, value4, value5);- };- };- };- };- };- };- return ThreeRight;- })();- var KickUp = (function () {- function KickUp(value0, value1, value2, value3) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- this.value3 = value3;- };- KickUp.create = function (value0) {- return function (value1) {- return function (value2) {- return function (value3) {- return new KickUp(value0, value1, value2, value3);- };- };- };- };- return KickUp;- })();- var values = function (v) {- if (v instanceof Leaf) {- return Data_List_Types.Nil.value;- };- if (v instanceof Two) {- return Data_Semigroup.append(Data_List_Types.semigroupList)(values(v.value0))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value2))(values(v.value3)));- };- if (v instanceof Three) {- return Data_Semigroup.append(Data_List_Types.semigroupList)(values(v.value0))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value2))(Data_Semigroup.append(Data_List_Types.semigroupList)(values(v.value3))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value5))(values(v.value6)))));- };- throw new Error("Failed pattern match at Data.Map.Internal line 594, column 1 - line 594, column 40: " + [ v.constructor.name ]);- };- var lookup = function (dictOrd) {- return function (k) {- var comp = Data_Ord.compare(dictOrd);- var go = function ($copy_v) {- var $tco_done = false;- var $tco_result;- function $tco_loop(v) {- if (v instanceof Leaf) {- $tco_done = true;- return Data_Maybe.Nothing.value;- };- if (v instanceof Two) {- var v2 = comp(k)(v.value1);- if (v2 instanceof Data_Ordering.EQ) {- $tco_done = true;- return new Data_Maybe.Just(v.value2);- };- if (v2 instanceof Data_Ordering.LT) {- $copy_v = v.value0;- return;- };- $copy_v = v.value3;- return;- };- if (v instanceof Three) {- var v3 = comp(k)(v.value1);- if (v3 instanceof Data_Ordering.EQ) {- $tco_done = true;- return new Data_Maybe.Just(v.value2);- };- var v4 = comp(k)(v.value4);- if (v4 instanceof Data_Ordering.EQ) {- $tco_done = true;- return new Data_Maybe.Just(v.value5);- };- if (v3 instanceof Data_Ordering.LT) {- $copy_v = v.value0;- return;- };- if (v4 instanceof Data_Ordering.GT) {- $copy_v = v.value6;- return;- };- $copy_v = v.value3;- return;- };- throw new Error("Failed pattern match at Data.Map.Internal line 193, column 5 - line 193, column 22: " + [ v.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($copy_v);- };- return $tco_result;- };- return go;- };- };- var member = function (dictOrd) {- return function (k) {- return function (m) {- return Data_Maybe.isJust(lookup(dictOrd)(k)(m));- };- };- };- var keys = function (v) {- if (v instanceof Leaf) {- return Data_List_Types.Nil.value;- };- if (v instanceof Two) {- return Data_Semigroup.append(Data_List_Types.semigroupList)(keys(v.value0))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value1))(keys(v.value3)));- };- if (v instanceof Three) {- return Data_Semigroup.append(Data_List_Types.semigroupList)(keys(v.value0))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value1))(Data_Semigroup.append(Data_List_Types.semigroupList)(keys(v.value3))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value4))(keys(v.value6)))));- };- throw new Error("Failed pattern match at Data.Map.Internal line 588, column 1 - line 588, column 38: " + [ v.constructor.name ]);- };- var functorMap = new Data_Functor.Functor(function (v) {- return function (v1) {- if (v1 instanceof Leaf) {- return Leaf.value;- };- if (v1 instanceof Two) {- return new Two(Data_Functor.map(functorMap)(v)(v1.value0), v1.value1, v(v1.value2), Data_Functor.map(functorMap)(v)(v1.value3));- };- if (v1 instanceof Three) {- return new Three(Data_Functor.map(functorMap)(v)(v1.value0), v1.value1, v(v1.value2), Data_Functor.map(functorMap)(v)(v1.value3), v1.value4, v(v1.value5), Data_Functor.map(functorMap)(v)(v1.value6));- };- throw new Error("Failed pattern match at Data.Map.Internal line 89, column 1 - line 89, column 39: " + [ v.constructor.name, v1.constructor.name ]);- };- });- var fromZipper = function ($copy_dictOrd) {- return function ($copy_v) {- return function ($copy_tree) {- var $tco_var_dictOrd = $copy_dictOrd;- var $tco_var_v = $copy_v;- var $tco_done = false;- var $tco_result;- function $tco_loop(dictOrd, v, tree) {- if (v instanceof Data_List_Types.Nil) {- $tco_done = true;- return tree;- };- if (v instanceof Data_List_Types.Cons) {- if (v.value0 instanceof TwoLeft) {- $tco_var_dictOrd = dictOrd;- $tco_var_v = v.value1;- $copy_tree = new Two(tree, v.value0.value0, v.value0.value1, v.value0.value2);- return;- };- if (v.value0 instanceof TwoRight) {- $tco_var_dictOrd = dictOrd;- $tco_var_v = v.value1;- $copy_tree = new Two(v.value0.value0, v.value0.value1, v.value0.value2, tree);- return;- };- if (v.value0 instanceof ThreeLeft) {- $tco_var_dictOrd = dictOrd;- $tco_var_v = v.value1;- $copy_tree = new Three(tree, v.value0.value0, v.value0.value1, v.value0.value2, v.value0.value3, v.value0.value4, v.value0.value5);- return;- };- if (v.value0 instanceof ThreeMiddle) {- $tco_var_dictOrd = dictOrd;- $tco_var_v = v.value1;- $copy_tree = new Three(v.value0.value0, v.value0.value1, v.value0.value2, tree, v.value0.value3, v.value0.value4, v.value0.value5);- return;- };- if (v.value0 instanceof ThreeRight) {- $tco_var_dictOrd = dictOrd;- $tco_var_v = v.value1;- $copy_tree = new Three(v.value0.value0, v.value0.value1, v.value0.value2, v.value0.value3, v.value0.value4, v.value0.value5, tree);- return;- };- throw new Error("Failed pattern match at Data.Map.Internal line 411, column 3 - line 416, column 88: " + [ v.value0.constructor.name ]);- };- throw new Error("Failed pattern match at Data.Map.Internal line 408, column 1 - line 408, column 80: " + [ v.constructor.name, tree.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_dictOrd, $tco_var_v, $copy_tree);- };- return $tco_result;- };- };- };- var insert = function (dictOrd) {- return function (k) {- return function (v) {- var up = function ($copy_v1) {- return function ($copy_v2) {- var $tco_var_v1 = $copy_v1;- var $tco_done = false;- var $tco_result;- function $tco_loop(v1, v2) {- if (v1 instanceof Data_List_Types.Nil) {- $tco_done = true;- return new Two(v2.value0, v2.value1, v2.value2, v2.value3);- };- if (v1 instanceof Data_List_Types.Cons) {- if (v1.value0 instanceof TwoLeft) {- $tco_done = true;- return fromZipper(dictOrd)(v1.value1)(new Three(v2.value0, v2.value1, v2.value2, v2.value3, v1.value0.value0, v1.value0.value1, v1.value0.value2));- };- if (v1.value0 instanceof TwoRight) {- $tco_done = true;- return fromZipper(dictOrd)(v1.value1)(new Three(v1.value0.value0, v1.value0.value1, v1.value0.value2, v2.value0, v2.value1, v2.value2, v2.value3));- };- if (v1.value0 instanceof ThreeLeft) {- $tco_var_v1 = v1.value1;- $copy_v2 = new KickUp(new Two(v2.value0, v2.value1, v2.value2, v2.value3), v1.value0.value0, v1.value0.value1, new Two(v1.value0.value2, v1.value0.value3, v1.value0.value4, v1.value0.value5));- return;- };- if (v1.value0 instanceof ThreeMiddle) {- $tco_var_v1 = v1.value1;- $copy_v2 = new KickUp(new Two(v1.value0.value0, v1.value0.value1, v1.value0.value2, v2.value0), v2.value1, v2.value2, new Two(v2.value3, v1.value0.value3, v1.value0.value4, v1.value0.value5));- return;- };- if (v1.value0 instanceof ThreeRight) {- $tco_var_v1 = v1.value1;- $copy_v2 = new KickUp(new Two(v1.value0.value0, v1.value0.value1, v1.value0.value2, v1.value0.value3), v1.value0.value4, v1.value0.value5, new Two(v2.value0, v2.value1, v2.value2, v2.value3));- return;- };- throw new Error("Failed pattern match at Data.Map.Internal line 447, column 5 - line 452, column 108: " + [ v1.value0.constructor.name, v2.constructor.name ]);- };- throw new Error("Failed pattern match at Data.Map.Internal line 444, column 3 - line 444, column 56: " + [ v1.constructor.name, v2.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_v1, $copy_v2);- };- return $tco_result;- };- };- var comp = Data_Ord.compare(dictOrd);- var down = function ($copy_ctx) {- return function ($copy_v1) {- var $tco_var_ctx = $copy_ctx;- var $tco_done = false;- var $tco_result;- function $tco_loop(ctx, v1) {- if (v1 instanceof Leaf) {- $tco_done = true;- return up(ctx)(new KickUp(Leaf.value, k, v, Leaf.value));- };- if (v1 instanceof Two) {- var v2 = comp(k)(v1.value1);- if (v2 instanceof Data_Ordering.EQ) {- $tco_done = true;- return fromZipper(dictOrd)(ctx)(new Two(v1.value0, k, v, v1.value3));- };- if (v2 instanceof Data_Ordering.LT) {- $tco_var_ctx = new Data_List_Types.Cons(new TwoLeft(v1.value1, v1.value2, v1.value3), ctx);- $copy_v1 = v1.value0;- return;- };- $tco_var_ctx = new Data_List_Types.Cons(new TwoRight(v1.value0, v1.value1, v1.value2), ctx);- $copy_v1 = v1.value3;- return;- };- if (v1 instanceof Three) {- var v3 = comp(k)(v1.value1);- if (v3 instanceof Data_Ordering.EQ) {- $tco_done = true;- return fromZipper(dictOrd)(ctx)(new Three(v1.value0, k, v, v1.value3, v1.value4, v1.value5, v1.value6));- };- var v4 = comp(k)(v1.value4);- if (v4 instanceof Data_Ordering.EQ) {- $tco_done = true;- return fromZipper(dictOrd)(ctx)(new Three(v1.value0, v1.value1, v1.value2, v1.value3, k, v, v1.value6));- };- if (v3 instanceof Data_Ordering.LT) {- $tco_var_ctx = new Data_List_Types.Cons(new ThreeLeft(v1.value1, v1.value2, v1.value3, v1.value4, v1.value5, v1.value6), ctx);- $copy_v1 = v1.value0;- return;- };- if (v3 instanceof Data_Ordering.GT && v4 instanceof Data_Ordering.LT) {- $tco_var_ctx = new Data_List_Types.Cons(new ThreeMiddle(v1.value0, v1.value1, v1.value2, v1.value4, v1.value5, v1.value6), ctx);- $copy_v1 = v1.value3;- return;- };- $tco_var_ctx = new Data_List_Types.Cons(new ThreeRight(v1.value0, v1.value1, v1.value2, v1.value3, v1.value4, v1.value5), ctx);- $copy_v1 = v1.value6;- return;- };- throw new Error("Failed pattern match at Data.Map.Internal line 427, column 3 - line 427, column 55: " + [ ctx.constructor.name, v1.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_ctx, $copy_v1);- };- return $tco_result;- };- };- return down(Data_List_Types.Nil.value);- };- };- };- var pop = function (dictOrd) {- return function (k) {- var up = function (ctxs) {- return function (tree) {- if (ctxs instanceof Data_List_Types.Nil) {- return tree;- };- if (ctxs instanceof Data_List_Types.Cons) {- var $__unused = function (dictPartial1) {- return function ($dollar55) {- return $dollar55;- };- };- return $__unused()((function () {- if (ctxs.value0 instanceof TwoLeft && (ctxs.value0.value2 instanceof Leaf && tree instanceof Leaf)) {- return fromZipper(dictOrd)(ctxs.value1)(new Two(Leaf.value, ctxs.value0.value0, ctxs.value0.value1, Leaf.value));- };- if (ctxs.value0 instanceof TwoRight && (ctxs.value0.value0 instanceof Leaf && tree instanceof Leaf)) {- return fromZipper(dictOrd)(ctxs.value1)(new Two(Leaf.value, ctxs.value0.value1, ctxs.value0.value2, Leaf.value));- };- if (ctxs.value0 instanceof TwoLeft && ctxs.value0.value2 instanceof Two) {- return up(ctxs.value1)(new Three(tree, ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2.value0, ctxs.value0.value2.value1, ctxs.value0.value2.value2, ctxs.value0.value2.value3));- };- if (ctxs.value0 instanceof TwoRight && ctxs.value0.value0 instanceof Two) {- return up(ctxs.value1)(new Three(ctxs.value0.value0.value0, ctxs.value0.value0.value1, ctxs.value0.value0.value2, ctxs.value0.value0.value3, ctxs.value0.value1, ctxs.value0.value2, tree));- };- if (ctxs.value0 instanceof TwoLeft && ctxs.value0.value2 instanceof Three) {- return fromZipper(dictOrd)(ctxs.value1)(new Two(new Two(tree, ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2.value0), ctxs.value0.value2.value1, ctxs.value0.value2.value2, new Two(ctxs.value0.value2.value3, ctxs.value0.value2.value4, ctxs.value0.value2.value5, ctxs.value0.value2.value6)));- };- if (ctxs.value0 instanceof TwoRight && ctxs.value0.value0 instanceof Three) {- return fromZipper(dictOrd)(ctxs.value1)(new Two(new Two(ctxs.value0.value0.value0, ctxs.value0.value0.value1, ctxs.value0.value0.value2, ctxs.value0.value0.value3), ctxs.value0.value0.value4, ctxs.value0.value0.value5, new Two(ctxs.value0.value0.value6, ctxs.value0.value1, ctxs.value0.value2, tree)));- };- if (ctxs.value0 instanceof ThreeLeft && (ctxs.value0.value2 instanceof Leaf && (ctxs.value0.value5 instanceof Leaf && tree instanceof Leaf))) {- return fromZipper(dictOrd)(ctxs.value1)(new Three(Leaf.value, ctxs.value0.value0, ctxs.value0.value1, Leaf.value, ctxs.value0.value3, ctxs.value0.value4, Leaf.value));- };- if (ctxs.value0 instanceof ThreeMiddle && (ctxs.value0.value0 instanceof Leaf && (ctxs.value0.value5 instanceof Leaf && tree instanceof Leaf))) {- return fromZipper(dictOrd)(ctxs.value1)(new Three(Leaf.value, ctxs.value0.value1, ctxs.value0.value2, Leaf.value, ctxs.value0.value3, ctxs.value0.value4, Leaf.value));- };- if (ctxs.value0 instanceof ThreeRight && (ctxs.value0.value0 instanceof Leaf && (ctxs.value0.value3 instanceof Leaf && tree instanceof Leaf))) {- return fromZipper(dictOrd)(ctxs.value1)(new Three(Leaf.value, ctxs.value0.value1, ctxs.value0.value2, Leaf.value, ctxs.value0.value4, ctxs.value0.value5, Leaf.value));- };- if (ctxs.value0 instanceof ThreeLeft && ctxs.value0.value2 instanceof Two) {- return fromZipper(dictOrd)(ctxs.value1)(new Two(new Three(tree, ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2.value0, ctxs.value0.value2.value1, ctxs.value0.value2.value2, ctxs.value0.value2.value3), ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5));- };- if (ctxs.value0 instanceof ThreeMiddle && ctxs.value0.value0 instanceof Two) {- return fromZipper(dictOrd)(ctxs.value1)(new Two(new Three(ctxs.value0.value0.value0, ctxs.value0.value0.value1, ctxs.value0.value0.value2, ctxs.value0.value0.value3, ctxs.value0.value1, ctxs.value0.value2, tree), ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5));- };- if (ctxs.value0 instanceof ThreeMiddle && ctxs.value0.value5 instanceof Two) {- return fromZipper(dictOrd)(ctxs.value1)(new Two(ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2, new Three(tree, ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5.value0, ctxs.value0.value5.value1, ctxs.value0.value5.value2, ctxs.value0.value5.value3)));- };- if (ctxs.value0 instanceof ThreeRight && ctxs.value0.value3 instanceof Two) {- return fromZipper(dictOrd)(ctxs.value1)(new Two(ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2, new Three(ctxs.value0.value3.value0, ctxs.value0.value3.value1, ctxs.value0.value3.value2, ctxs.value0.value3.value3, ctxs.value0.value4, ctxs.value0.value5, tree)));- };- if (ctxs.value0 instanceof ThreeLeft && ctxs.value0.value2 instanceof Three) {- return fromZipper(dictOrd)(ctxs.value1)(new Three(new Two(tree, ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2.value0), ctxs.value0.value2.value1, ctxs.value0.value2.value2, new Two(ctxs.value0.value2.value3, ctxs.value0.value2.value4, ctxs.value0.value2.value5, ctxs.value0.value2.value6), ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5));- };- if (ctxs.value0 instanceof ThreeMiddle && ctxs.value0.value0 instanceof Three) {- return fromZipper(dictOrd)(ctxs.value1)(new Three(new Two(ctxs.value0.value0.value0, ctxs.value0.value0.value1, ctxs.value0.value0.value2, ctxs.value0.value0.value3), ctxs.value0.value0.value4, ctxs.value0.value0.value5, new Two(ctxs.value0.value0.value6, ctxs.value0.value1, ctxs.value0.value2, tree), ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5));- };- if (ctxs.value0 instanceof ThreeMiddle && ctxs.value0.value5 instanceof Three) {- return fromZipper(dictOrd)(ctxs.value1)(new Three(ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2, new Two(tree, ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5.value0), ctxs.value0.value5.value1, ctxs.value0.value5.value2, new Two(ctxs.value0.value5.value3, ctxs.value0.value5.value4, ctxs.value0.value5.value5, ctxs.value0.value5.value6)));- };- if (ctxs.value0 instanceof ThreeRight && ctxs.value0.value3 instanceof Three) {- return fromZipper(dictOrd)(ctxs.value1)(new Three(ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2, new Two(ctxs.value0.value3.value0, ctxs.value0.value3.value1, ctxs.value0.value3.value2, ctxs.value0.value3.value3), ctxs.value0.value3.value4, ctxs.value0.value3.value5, new Two(ctxs.value0.value3.value6, ctxs.value0.value4, ctxs.value0.value5, tree)));- };- throw new Error("Failed pattern match at Data.Map.Internal line 497, column 9 - line 514, column 136: " + [ ctxs.value0.constructor.name, tree.constructor.name ]);- })());- };- throw new Error("Failed pattern match at Data.Map.Internal line 494, column 5 - line 514, column 136: " + [ ctxs.constructor.name ]);- };- };- var removeMaxNode = function (ctx) {- return function (m) {- var $__unused = function (dictPartial1) {- return function ($dollar57) {- return $dollar57;- };- };- return $__unused()((function () {- if (m instanceof Two && (m.value0 instanceof Leaf && m.value3 instanceof Leaf)) {- return up(ctx)(Leaf.value);- };- if (m instanceof Two) {- return removeMaxNode(new Data_List_Types.Cons(new TwoRight(m.value0, m.value1, m.value2), ctx))(m.value3);- };- if (m instanceof Three && (m.value0 instanceof Leaf && (m.value3 instanceof Leaf && m.value6 instanceof Leaf))) {- return up(new Data_List_Types.Cons(new TwoRight(Leaf.value, m.value1, m.value2), ctx))(Leaf.value);- };- if (m instanceof Three) {- return removeMaxNode(new Data_List_Types.Cons(new ThreeRight(m.value0, m.value1, m.value2, m.value3, m.value4, m.value5), ctx))(m.value6);- };- throw new Error("Failed pattern match at Data.Map.Internal line 526, column 5 - line 530, column 107: " + [ m.constructor.name ]);- })());- };- };- var maxNode = function (m) {- var $__unused = function (dictPartial1) {- return function ($dollar59) {- return $dollar59;- };- };- return $__unused()((function () {- if (m instanceof Two && m.value3 instanceof Leaf) {- return {- key: m.value1,- value: m.value2- };- };- if (m instanceof Two) {- return maxNode(m.value3);- };- if (m instanceof Three && m.value6 instanceof Leaf) {- return {- key: m.value4,- value: m.value5- };- };- if (m instanceof Three) {- return maxNode(m.value6);- };- throw new Error("Failed pattern match at Data.Map.Internal line 517, column 33 - line 521, column 45: " + [ m.constructor.name ]);- })());- };- var comp = Data_Ord.compare(dictOrd);- var down = function ($copy_ctx) {- return function ($copy_m) {- var $tco_var_ctx = $copy_ctx;- var $tco_done = false;- var $tco_result;- function $tco_loop(ctx, m) {- if (m instanceof Leaf) {- $tco_done = true;- return Data_Maybe.Nothing.value;- };- if (m instanceof Two) {- var v = comp(k)(m.value1);- if (m.value3 instanceof Leaf && v instanceof Data_Ordering.EQ) {- $tco_done = true;- return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value2, up(ctx)(Leaf.value)));- };- if (v instanceof Data_Ordering.EQ) {- var max = maxNode(m.value0);- $tco_done = true;- return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value2, removeMaxNode(new Data_List_Types.Cons(new TwoLeft(max.key, max.value, m.value3), ctx))(m.value0)));- };- if (v instanceof Data_Ordering.LT) {- $tco_var_ctx = new Data_List_Types.Cons(new TwoLeft(m.value1, m.value2, m.value3), ctx);- $copy_m = m.value0;- return;- };- $tco_var_ctx = new Data_List_Types.Cons(new TwoRight(m.value0, m.value1, m.value2), ctx);- $copy_m = m.value3;- return;- };- if (m instanceof Three) {- var leaves = (function () {- if (m.value0 instanceof Leaf && (m.value3 instanceof Leaf && m.value6 instanceof Leaf)) {- return true;- };- return false;- })();- var v = comp(k)(m.value4);- var v3 = comp(k)(m.value1);- if (leaves && v3 instanceof Data_Ordering.EQ) {- $tco_done = true;- return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value2, fromZipper(dictOrd)(ctx)(new Two(Leaf.value, m.value4, m.value5, Leaf.value))));- };- if (leaves && v instanceof Data_Ordering.EQ) {- $tco_done = true;- return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value5, fromZipper(dictOrd)(ctx)(new Two(Leaf.value, m.value1, m.value2, Leaf.value))));- };- if (v3 instanceof Data_Ordering.EQ) {- var max = maxNode(m.value0);- $tco_done = true;- return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value2, removeMaxNode(new Data_List_Types.Cons(new ThreeLeft(max.key, max.value, m.value3, m.value4, m.value5, m.value6), ctx))(m.value0)));- };- if (v instanceof Data_Ordering.EQ) {- var max = maxNode(m.value3);- $tco_done = true;- return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value5, removeMaxNode(new Data_List_Types.Cons(new ThreeMiddle(m.value0, m.value1, m.value2, max.key, max.value, m.value6), ctx))(m.value3)));- };- if (v3 instanceof Data_Ordering.LT) {- $tco_var_ctx = new Data_List_Types.Cons(new ThreeLeft(m.value1, m.value2, m.value3, m.value4, m.value5, m.value6), ctx);- $copy_m = m.value0;- return;- };- if (v3 instanceof Data_Ordering.GT && v instanceof Data_Ordering.LT) {- $tco_var_ctx = new Data_List_Types.Cons(new ThreeMiddle(m.value0, m.value1, m.value2, m.value4, m.value5, m.value6), ctx);- $copy_m = m.value3;- return;- };- $tco_var_ctx = new Data_List_Types.Cons(new ThreeRight(m.value0, m.value1, m.value2, m.value3, m.value4, m.value5), ctx);- $copy_m = m.value6;- return;- };- throw new Error("Failed pattern match at Data.Map.Internal line 467, column 34 - line 490, column 80: " + [ m.constructor.name ]);- };- while (!$tco_done) {- $tco_result = $tco_loop($tco_var_ctx, $copy_m);- };- return $tco_result;- };- };- return down(Data_List_Types.Nil.value);- };- };- var foldableMap = new Data_Foldable.Foldable(function (dictMonoid) {- return function (f) {- return function (m) {- return Data_Foldable.foldMap(Data_List_Types.foldableList)(dictMonoid)(f)(values(m));- };- };- }, function (f) {- return function (z) {- return function (m) {- return Data_Foldable.foldl(Data_List_Types.foldableList)(f)(z)(values(m));- };- };- }, function (f) {- return function (z) {- return function (m) {- return Data_Foldable.foldr(Data_List_Types.foldableList)(f)(z)(values(m));- };- };- });- var empty = Leaf.value;- var $$delete = function (dictOrd) {- return function (k) {- return function (m) {- return Data_Maybe.maybe(m)(Data_Tuple.snd)(pop(dictOrd)(k)(m));- };- };- }; - var alter = function (dictOrd) {- return function (f) {- return function (k) {- return function (m) {- var v = f(lookup(dictOrd)(k)(m));- if (v instanceof Data_Maybe.Nothing) {- return $$delete(dictOrd)(k)(m);- };- if (v instanceof Data_Maybe.Just) {- return insert(dictOrd)(k)(v.value0)(m);- };- throw new Error("Failed pattern match at Data.Map.Internal line 535, column 15 - line 537, column 25: " + [ v.constructor.name ]);- };- };- };- };- exports["empty"] = empty;- exports["insert"] = insert;- exports["lookup"] = lookup;- exports["delete"] = $$delete;- exports["pop"] = pop;- exports["member"] = member;- exports["alter"] = alter;- exports["keys"] = keys;- exports["values"] = values;- exports["functorMap"] = functorMap;- exports["foldableMap"] = foldableMap;-})(PS["Data.Map.Internal"] = PS["Data.Map.Internal"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Monad_ST = PS["Control.Monad.ST"];- var Control_Monad_ST_Internal = PS["Control.Monad.ST.Internal"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Array = PS["Data.Array"];- var Data_Array_ST = PS["Data.Array.ST"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Map_Internal = PS["Data.Map.Internal"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Ordering = PS["Data.Ordering"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Data_Unit = PS["Data.Unit"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"];- var toList = function (v) {- return Data_Map_Internal.keys(v);- };- var foldableSet = new Data_Foldable.Foldable(function (dictMonoid) {- return function (f) {- return function ($59) {- return Data_Foldable.foldMap(Data_List_Types.foldableList)(dictMonoid)(f)(toList($59));- };- };- }, function (f) {- return function (x) {- return function ($60) {- return Data_Foldable.foldl(Data_List_Types.foldableList)(f)(x)(toList($60));- };- };- }, function (f) {- return function (x) {- return function ($61) {- return Data_Foldable.foldr(Data_List_Types.foldableList)(f)(x)(toList($61));- };- };- });- exports["foldableSet"] = foldableSet;-})(PS["Data.Set"] = PS["Data.Set"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Functor = PS["Data.Functor"];- var Data_Map_Internal = PS["Data.Map.Internal"];- var Data_Set = PS["Data.Set"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"]; - var keys = function ($0) {- return Data_Functor["void"](Data_Map_Internal.functorMap)($0);- };- exports["keys"] = keys;-})(PS["Data.Map"] = PS["Data.Map"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Parallel = PS["Control.Parallel"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Map = PS["Data.Map"];- var Data_Map_Internal = PS["Data.Map.Internal"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Effect_Aff_Class = PS["Effect.Aff.Class"];- var Effect_Class = PS["Effect.Class"];- var Halogen_Component_ChildPath = PS["Halogen.Component.ChildPath"];- var Halogen_Query_EventSource = PS["Halogen.Query.EventSource"];- var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Prelude = PS["Prelude"];- var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];- var action = function (act) {- return act(Data_Unit.unit);- };- exports["action"] = action;-})(PS["Halogen.Query"] = PS["Halogen.Query"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Web_Event_Event = PS["Web.Event.Event"];- var change = "change";- exports["change"] = change;-})(PS["Web.HTML.Event.EventTypes"] = PS["Web.HTML.Event.EventTypes"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Web_Event_Event = PS["Web.Event.Event"];- var click = "click";- exports["click"] = click;-})(PS["Web.UIEvent.MouseEvent.EventTypes"] = PS["Web.UIEvent.MouseEvent.EventTypes"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Bind = PS["Control.Bind"];- var Control_Monad_Except = PS["Control.Monad.Except"];- var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Identity = PS["Data.Identity"];- var Data_Maybe = PS["Data.Maybe"];- var Foreign = PS["Foreign"];- var Foreign_Index = PS["Foreign.Index"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];- var Halogen_Query = PS["Halogen.Query"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_Clipboard_ClipboardEvent = PS["Web.Clipboard.ClipboardEvent"];- var Web_Clipboard_ClipboardEvent_EventTypes = PS["Web.Clipboard.ClipboardEvent.EventTypes"];- var Web_Event_Event = PS["Web.Event.Event"];- var Web_HTML_Event_DragEvent = PS["Web.HTML.Event.DragEvent"];- var Web_HTML_Event_DragEvent_EventTypes = PS["Web.HTML.Event.DragEvent.EventTypes"];- var Web_HTML_Event_EventTypes = PS["Web.HTML.Event.EventTypes"];- var Web_TouchEvent_TouchEvent = PS["Web.TouchEvent.TouchEvent"];- var Web_UIEvent_FocusEvent = PS["Web.UIEvent.FocusEvent"];- var Web_UIEvent_FocusEvent_EventTypes = PS["Web.UIEvent.FocusEvent.EventTypes"];- var Web_UIEvent_KeyboardEvent = PS["Web.UIEvent.KeyboardEvent"];- var Web_UIEvent_KeyboardEvent_EventTypes = PS["Web.UIEvent.KeyboardEvent.EventTypes"];- var Web_UIEvent_MouseEvent = PS["Web.UIEvent.MouseEvent"];- var Web_UIEvent_MouseEvent_EventTypes = PS["Web.UIEvent.MouseEvent.EventTypes"];- var Web_UIEvent_WheelEvent = PS["Web.UIEvent.WheelEvent"];- var Web_UIEvent_WheelEvent_EventTypes = PS["Web.UIEvent.WheelEvent.EventTypes"];- var mouseHandler = Unsafe_Coerce.unsafeCoerce;- var input_ = function (f) {- return function (v) {- return Data_Maybe.Just.create(Halogen_Query.action(f));- };- };- var input = function (f) {- return function (x) {- return Data_Maybe.Just.create(Halogen_Query.action(f(x)));- };- };- var handler = function (et) {- return function ($1) {- return Halogen_HTML_Core.handler(et)(Data_Functor.map(Data_Functor.functorFn)(Data_Functor.map(Data_Maybe.functorMaybe)(Halogen_Query_InputF.Query.create))($1));- };- }; - var onClick = function ($2) {- return handler(Web_UIEvent_MouseEvent_EventTypes.click)(mouseHandler($2));- }; - var onSubmit = handler("submit");- var addForeignPropHandler = function (key) {- return function (prop) {- return function (reader) {- return function (f) {- var go = function (a) {- return Control_Bind.composeKleisliFlipped(Control_Monad_Except_Trans.bindExceptT(Data_Identity.monadIdentity))(reader)(Foreign_Index.readProp(prop))(Foreign.unsafeToForeign(a));- };- return handler(key)(Control_Bind.composeKleisli(Data_Maybe.bindMaybe)(Web_Event_Event.currentTarget)(function (e) {- return Data_Either.either(Data_Function["const"](Data_Maybe.Nothing.value))(f)(Control_Monad_Except.runExcept(go(e)));- }));- };- };- };- };- var onChecked = addForeignPropHandler(Web_HTML_Event_EventTypes.change)("checked")(Foreign.readBoolean); - var onValueChange = addForeignPropHandler(Web_HTML_Event_EventTypes.change)("value")(Foreign.readString);- exports["input"] = input;- exports["input_"] = input_;- exports["handler"] = handler;- exports["onSubmit"] = onSubmit;- exports["onClick"] = onClick;- exports["onValueChange"] = onValueChange;- exports["onChecked"] = onChecked;-})(PS["Halogen.HTML.Events"] = PS["Halogen.HTML.Events"] || {});-(function(exports) {- "use strict";- /* global Symbol */-- var hasArrayFrom = typeof Array.from === "function";- var hasStringIterator =- typeof Symbol !== "undefined" &&- Symbol != null &&- typeof Symbol.iterator !== "undefined" &&- typeof String.prototype[Symbol.iterator] === "function";- var hasFromCodePoint = typeof String.prototype.fromCodePoint === "function";- var hasCodePointAt = typeof String.prototype.codePointAt === "function";-- exports._unsafeCodePointAt0 = function (fallback) {- return hasCodePointAt- ? function (str) { return str.codePointAt(0); }- : fallback;- };-- exports._singleton = function (fallback) {- return hasFromCodePoint ? String.fromCodePoint : fallback;- };-- exports._take = function (fallback) {- return function (n) {- if (hasStringIterator) {- return function (str) {- var accum = "";- var iter = str[Symbol.iterator]();- for (var i = 0; i < n; ++i) {- var o = iter.next();- if (o.done) return accum;- accum += o.value;- }- return accum;- };- }- return fallback(n);- };- };-- exports._toCodePointArray = function (fallback) {- return function (unsafeCodePointAt0) {- if (hasArrayFrom) {- return function (str) {- return Array.from(str, unsafeCodePointAt0);- };- }- return fallback;- };- };-})(PS["Data.String.CodePoints"] = PS["Data.String.CodePoints"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Data.String.CodePoints"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Array = PS["Data.Array"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Bounded = PS["Data.Bounded"];- var Data_Enum = PS["Data.Enum"];- var Data_Eq = PS["Data.Eq"];- var Data_EuclideanRing = PS["Data.EuclideanRing"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Int = PS["Data.Int"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Ring = PS["Data.Ring"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Show = PS["Data.Show"];- var Data_String_CodeUnits = PS["Data.String.CodeUnits"];- var Data_String_Common = PS["Data.String.Common"];- var Data_String_Pattern = PS["Data.String.Pattern"];- var Data_String_Unsafe = PS["Data.String.Unsafe"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unfoldable = PS["Data.Unfoldable"];- var Prelude = PS["Prelude"];- var unsurrogate = function (lead) {- return function (trail) {- return (((lead - 55296 | 0) * 1024 | 0) + (trail - 56320 | 0) | 0) + 65536 | 0;- };- }; - var isTrail = function (cu) {- return 56320 <= cu && cu <= 57343;- };- var isLead = function (cu) {- return 55296 <= cu && cu <= 56319;- };- var uncons = function (s) {- var v = Data_String_CodeUnits.length(s);- if (v === 0) {- return Data_Maybe.Nothing.value;- };- if (v === 1) {- return new Data_Maybe.Just({- head: Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(0)(s)),- tail: ""- });- };- var cu1 = Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(1)(s));- var cu0 = Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(0)(s));- var $21 = isLead(cu0) && isTrail(cu1);- if ($21) {- return new Data_Maybe.Just({- head: unsurrogate(cu0)(cu1),- tail: Data_String_CodeUnits.drop(2)(s)- });- };- return new Data_Maybe.Just({- head: cu0,- tail: Data_String_CodeUnits.drop(1)(s)- });- };- var unconsButWithTuple = function (s) {- return Data_Functor.map(Data_Maybe.functorMaybe)(function (v) {- return new Data_Tuple.Tuple(v.head, v.tail);- })(uncons(s));- };- var toCodePointArrayFallback = function (s) {- return Data_Unfoldable.unfoldr(Data_Unfoldable.unfoldableArray)(unconsButWithTuple)(s);- };- var unsafeCodePointAt0Fallback = function (s) {- var cu1 = Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(1)(s));- var cu0 = Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(0)(s));- var $25 = isLead(cu0) && isTrail(cu1);- if ($25) {- return unsurrogate(cu0)(cu1);- };- return cu0;- };- var unsafeCodePointAt0 = $foreign._unsafeCodePointAt0(unsafeCodePointAt0Fallback);- var toCodePointArray = $foreign._toCodePointArray(toCodePointArrayFallback)(unsafeCodePointAt0);- var length = function ($51) {- return Data_Array.length(toCodePointArray($51));- };- var fromCharCode = function ($52) {- return Data_String_CodeUnits.singleton(Data_Enum.toEnumWithDefaults(Data_Enum.boundedEnumChar)(Data_Bounded.bottom(Data_Bounded.boundedChar))(Data_Bounded.top(Data_Bounded.boundedChar))($52));- };- var singletonFallback = function (v) {- if (v <= 65535) {- return fromCharCode(v);- };- var lead = Data_EuclideanRing.div(Data_EuclideanRing.euclideanRingInt)(v - 65536 | 0)(1024) + 55296 | 0;- var trail = Data_EuclideanRing.mod(Data_EuclideanRing.euclideanRingInt)(v - 65536 | 0)(1024) + 56320 | 0;- return fromCharCode(lead) + fromCharCode(trail);- }; - var singleton = $foreign._singleton(singletonFallback);- var takeFallback = function (n) {- return function (v) {- if (n < 1) {- return "";- };- var v1 = uncons(v);- if (v1 instanceof Data_Maybe.Just) {- return singleton(v1.value0.head) + takeFallback(n - 1 | 0)(v1.value0.tail);- };- return v;- };- };- var take = $foreign._take(takeFallback);- var drop = function (n) {- return function (s) {- return Data_String_CodeUnits.drop(Data_String_CodeUnits.length(take(n)(s)))(s);- };- };- exports["singleton"] = singleton;- exports["toCodePointArray"] = toCodePointArray;- exports["uncons"] = uncons;- exports["length"] = length;- exports["take"] = take;- exports["drop"] = drop;-})(PS["Data.String.CodePoints"] = PS["Data.String.CodePoints"] || {});-(function(exports) {- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_Maybe_Trans = PS["Control.Monad.Maybe.Trans"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Array = PS["Data.Array"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_String = PS["Data.String"];- var Data_String_CodePoints = PS["Data.String.CodePoints"];- var Data_String_Common = PS["Data.String.Common"];- var Data_String_Pattern = PS["Data.String.Pattern"];- var Data_Tuple = PS["Data.Tuple"];- var Effect = PS["Effect"];- var Global_Unsafe = PS["Global.Unsafe"];- var Halogen_HTML = PS["Halogen.HTML"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];- var Partial_Unsafe = PS["Partial.Unsafe"];- var Prelude = PS["Prelude"];- var Web_DOM = PS["Web.DOM"];- var Web_DOM_Document = PS["Web.DOM.Document"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_DOM_NodeList = PS["Web.DOM.NodeList"];- var Web_DOM_NonElementParentNode = PS["Web.DOM.NonElementParentNode"];- var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];- var Web_HTML = PS["Web.HTML"];- var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];- var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];- var Web_HTML_Location = PS["Web.HTML.Location"];- var Web_HTML_Window = PS["Web.HTML.Window"]; -- // Halogen- var class_ = function ($54) {- return Halogen_HTML_Properties.class_(Halogen_HTML_Core.ClassName($54));- };- var attr = function (a) {- return Halogen_HTML_Properties.attr(a);- };- var _querySelectorAll = function (s) {- return function (n) {- return Control_Bind.bindFlipped(Effect.bindEffect)(Web_DOM_NodeList.toArray)(Web_DOM_ParentNode.querySelectorAll(s)(Web_DOM_Element.toParentNode(n)));- };- };- var _querySelector = function (s) {- return function (n) {- return Web_DOM_ParentNode.querySelector(s)(Web_DOM_Element.toParentNode(n));- };- };- var _queryBoth$prime$prime = function (v) {- return function (v1) {- return function (f) {- return function __do() {- var v2 = _querySelectorAll(v.value0)(v.value1)();- var v3 = _querySelectorAll(v1.value0)(v1.value1)();- return f(v2)(v3)();- };- };- };- };- var _queryBoth$prime = function (v) {- return function (v1) {- return function (f) {- return function __do() {- var v2 = _querySelector(v.value0)(v.value1)();- var v3 = _querySelectorAll(v1.value0)(v1.value1)();- return Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(v2)(function (a) {- return f(a)(v3);- })();- };- };- };- };-- // Util- var _queryBoth = function (v) {- return function (v1) {- return function (f) {- return function __do() {- var v2 = _querySelector(v.value0)(v.value1)();- var v3 = _querySelector(v1.value0)(v1.value1)();- return Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(v2)(function (a) {- return Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(v3)(function (b) {- return f(a)(b);- });- })();- };- };- };- };- var _parseQueryString = function (srh) {- var decode = function ($55) {- return Global_Unsafe.unsafeDecodeURIComponent(Data_String_Common.replaceAll("+")(" ")($55));- };- var go = function (kv) {- var v = Data_String_Common.split("=")(kv);- if (v.length === 1) {- return new Data_Maybe.Just(new Data_Tuple.Tuple(decode(v[0]), Data_Maybe.Nothing.value));- };- if (v.length === 2) {- return new Data_Maybe.Just(new Data_Tuple.Tuple(decode(v[0]), new Data_Maybe.Just(decode(v[1]))));- };- return Data_Maybe.Nothing.value;- };- var qs = (function () {- var srh$prime = Data_String_CodePoints.take(1)(srh);- var $51 = srh$prime === "#" || srh$prime === "?";- if ($51) {- return Data_String_CodePoints.drop(1)(srh);- };- return srh;- })();- return Data_Array.mapMaybe(go)(Data_Array.filter(function (v) {- return v !== "";- })(Data_String_Common.split("&")(qs)));- };- var _mt_pure = function ($56) {- return Control_Monad_Maybe_Trans.MaybeT(Control_Applicative.pure(Effect.applicativeEffect)($56));- };- var _mt = Control_Monad_Maybe_Trans.MaybeT;- var _lookupQueryStringValue = function (qs) {- return function (k) {- return Control_Bind.join(Data_Maybe.bindMaybe)(Data_Functor.map(Data_Maybe.functorMaybe)(Data_Tuple.snd)(Data_Foldable.find(Data_Foldable.foldableArray)(function ($57) {- return (function (v) {- return v === k;- })(Data_Tuple.fst($57));- })(qs)));- };- };- var _loc = Control_Bind.bindFlipped(Effect.bindEffect)(Web_HTML_Window.location)(Web_HTML.window);- var _getElementById = function (s) {- return function ($58) {- return Web_DOM_NonElementParentNode.getElementById(s)(Web_DOM_Document.toNonElementParentNode(Web_HTML_HTMLDocument.toDocument($58)));- };- };- var _fromNode = function (e) {- return Data_Maybe.fromJust()(Web_DOM_Element.fromNode(e));- };- var _fromElement = function (e) {- return Data_Maybe.fromJust()(Web_HTML_HTMLElement.fromElement(e));- };- var _doc = Control_Bind.bindFlipped(Effect.bindEffect)(Web_HTML_Window.document)(Web_HTML.window);- var _curQuerystring = function __do() {- var v = _loc();- var v1 = Web_HTML_Location.search(v)();- return _parseQueryString(v1);- };- var _body = Control_Bind.bindFlipped(Effect.bindEffect)(function ($59) {- return Control_Applicative.pure(Effect.applicativeEffect)(Data_Maybe.fromJust()($59));- })(Control_Bind.bindFlipped(Effect.bindEffect)(Web_HTML_HTMLDocument.body)(_doc));- exports["class_"] = class_;- exports["attr"] = attr;- exports["_queryBoth"] = _queryBoth;- exports["_queryBoth'"] = _queryBoth$prime;- exports["_queryBoth''"] = _queryBoth$prime$prime;- exports["_querySelector"] = _querySelector;- exports["_querySelectorAll"] = _querySelectorAll;- exports["_fromNode"] = _fromNode;- exports["_fromElement"] = _fromElement;- exports["_getElementById"] = _getElementById;- exports["_doc"] = _doc;- exports["_loc"] = _loc;- exports["_curQuerystring"] = _curQuerystring;- exports["_parseQueryString"] = _parseQueryString;- exports["_lookupQueryStringValue"] = _lookupQueryStringValue;- exports["_body"] = _body;- exports["_mt"] = _mt;- exports["_mt_pure"] = _mt_pure;-})(PS["Util"] = PS["Util"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var App = PS["App"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];- var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];- var Data_Array = PS["Data.Array"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_String = PS["Data.String"];- var Data_String_Common = PS["Data.String.Common"];- var Data_String_Pattern = PS["Data.String.Pattern"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Aff_Class = PS["Effect.Aff.Class"];- var Effect_Class = PS["Effect.Class"];- var Globals = PS["Globals"];- var Halogen = PS["Halogen"];- var Halogen_Component = PS["Halogen.Component"];- var Halogen_HTML = PS["Halogen.HTML"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];- var Halogen_HTML_Events = PS["Halogen.HTML.Events"];- var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];- var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];- var Model = PS["Model"];- var Prelude = PS["Prelude"];- var Util = PS["Util"];- var Web_Event_Event = PS["Web.Event.Event"];- var Web_HTML = PS["Web.HTML"];- var Web_HTML_Location = PS["Web.HTML.Location"]; - var Eurl = (function () {- function Eurl(value0) {- this.value0 = value0;- };- Eurl.create = function (value0) {- return new Eurl(value0);- };- return Eurl;- })();- var Etitle = (function () {- function Etitle(value0) {- this.value0 = value0;- };- Etitle.create = function (value0) {- return new Etitle(value0);- };- return Etitle;- })();- var Edescription = (function () {- function Edescription(value0) {- this.value0 = value0;- };- Edescription.create = function (value0) {- return new Edescription(value0);- };- return Edescription;- })();- var Etags = (function () {- function Etags(value0) {- this.value0 = value0;- };- Etags.create = function (value0) {- return new Etags(value0);- };- return Etags;- })();- var Eprivate = (function () {- function Eprivate(value0) {- this.value0 = value0;- };- Eprivate.create = function (value0) {- return new Eprivate(value0);- };- return Eprivate;- })();- var Etoread = (function () {- function Etoread(value0) {- this.value0 = value0;- };- Etoread.create = function (value0) {- return new Etoread(value0);- };- return Etoread;- })();- var BEditField = (function () {- function BEditField(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- BEditField.create = function (value0) {- return function (value1) {- return new BEditField(value0, value1);- };- };- return BEditField;- })();- var BEditSubmit = (function () {- function BEditSubmit(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- BEditSubmit.create = function (value0) {- return function (value1) {- return new BEditSubmit(value0, value1);- };- };- return BEditSubmit;- })();- var BDeleteAsk = (function () {- function BDeleteAsk(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- BDeleteAsk.create = function (value0) {- return function (value1) {- return new BDeleteAsk(value0, value1);- };- };- return BDeleteAsk;- })();- var BDestroy = (function () {- function BDestroy(value0) {- this.value0 = value0;- };- BDestroy.create = function (value0) {- return new BDestroy(value0);- };- return BDestroy;- })();- var addbmark = function (b$prime) {- var render = function (v) {- var toTextarea = function ($59) {- return Data_Array.drop(1)(Data_Foldable.foldMap(Data_Foldable.foldableArray)(Data_Monoid.monoidArray)(function (x) {- return [ Halogen_HTML_Elements.br_, Halogen_HTML_Core.text(x) ];- })(Data_String_Common.split("\x0a")($59)));- };- var mmoment = Globals.mmoment8601(v.bm.time);- var editField = function (f) {- return function ($60) {- return Halogen_HTML_Events.input(BEditField.create)(f($60));- };- };- var display_exists = Halogen_HTML_Elements.div([ Util.class_("alert") ])([ Halogen_HTML_Core.text("previously saved\xa0"), Halogen_HTML_Elements.span([ Util.class_("link f7 dib gray pr3"), Halogen_HTML_Properties.title(Data_Maybe.maybe(v.bm.time)(Data_Tuple.snd)(mmoment)) ])([ Halogen_HTML_Core.text(Data_Maybe.maybe("\xa0")(Data_Tuple.fst)(mmoment)) ]), Halogen_HTML_Elements.div([ Util.class_("edit_links dib ml1") ])([ Halogen_HTML_Elements.div([ Util.class_("delete_link di") ])([ Halogen_HTML_Elements.button(Data_Semigroup.append(Data_Semigroup.semigroupArray)([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDeleteAsk.create(true))), Util.class_("delete") ])(Data_Monoid.guard(Data_Monoid.monoidArray)(v.deleteAsk)([ Util.attr("hidden")("hidden") ])))([ Halogen_HTML_Core.text("delete") ]), Halogen_HTML_Elements.span(Data_Semigroup.append(Data_Semigroup.semigroupArray)([ Util.class_("confirm red") ])(Data_Monoid.guard(Data_Monoid.monoidArray)(!v.deleteAsk)([ Util.attr("hidden")("hidden") ])))([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDeleteAsk.create(false))) ])([ Halogen_HTML_Core.text("cancel\xa0/\xa0") ]), Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDestroy.create)), Util.class_("red") ])([ Halogen_HTML_Core.text("destroy") ]) ]) ]) ]) ]);- var display_edit = Halogen_HTML_Elements.form([ Halogen_HTML_Events.onSubmit(Halogen_HTML_Events.input(BEditSubmit.create)) ])([ Halogen_HTML_Elements.table([ Util.class_("w-100") ])([ Halogen_HTML_Elements.tbody_([ Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td([ Util.class_("w1") ])([ ]), Halogen_HTML_Elements.td_(Data_Monoid.guard(Data_Monoid.monoidArray)(v.bm.bid > 0)([ display_exists ])) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("url") ])([ Halogen_HTML_Core.text("URL") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputUrl.value), Halogen_HTML_Properties.id_("url"), Util.class_("w-100 mv1"), Halogen_HTML_Properties.required(true), Halogen_HTML_Properties.name("url"), Halogen_HTML_Properties.autofocus(Data_String_Common["null"](v.bm.url)), Halogen_HTML_Properties.value(v.edit_bm.url), Halogen_HTML_Events.onValueChange(editField(Eurl.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("title") ])([ Halogen_HTML_Core.text("title") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Halogen_HTML_Properties.id_("title"), Util.class_("w-100 mv1"), Halogen_HTML_Properties.name("title"), Halogen_HTML_Properties.value(v.edit_bm.title), Halogen_HTML_Events.onValueChange(editField(Etitle.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("description") ])([ Halogen_HTML_Core.text("description") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.textarea([ Util.class_("w-100 mt1 mid-gray"), Halogen_HTML_Properties.id_("description"), Halogen_HTML_Properties.name("description"), Halogen_HTML_Properties.rows(4), Halogen_HTML_Properties.value(v.edit_bm.description), Halogen_HTML_Events.onValueChange(editField(Edescription.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("tags") ])([ Halogen_HTML_Core.text("tags") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Halogen_HTML_Properties.id_("tags"), Util.class_("w-100 mv1"), Halogen_HTML_Properties.name("tags"), Halogen_HTML_Properties.autocomplete(false), Util.attr("autocapitalize")("off"), Halogen_HTML_Properties.autofocus(!Data_String_Common["null"](v.bm.url)), Halogen_HTML_Properties.value(v.edit_bm.tags), Halogen_HTML_Events.onValueChange(editField(Etags.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("private") ])([ Halogen_HTML_Core.text("private") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Halogen_HTML_Properties.id_("private"), Util.class_("private pointer"), Halogen_HTML_Properties.name("private"), Halogen_HTML_Properties.checked(v["edit_bm"]["private"]), Halogen_HTML_Events.onChecked(editField(Eprivate.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("toread") ])([ Halogen_HTML_Core.text("read later") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Halogen_HTML_Properties.id_("toread"), Util.class_("toread pointer"), Halogen_HTML_Properties.name("toread"), Halogen_HTML_Properties.checked(v.edit_bm.toread), Halogen_HTML_Events.onChecked(editField(Etoread.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputSubmit.value), Util.class_("ph3 pv2 input-reset ba b--navy bg-transparent pointer f6 dib mt1 dim"), Halogen_HTML_Properties.value((function () {- var $21 = v.bm.bid > 0;- if ($21) {- return "update bookmark";- };- return "add bookmark";- })()) ]) ]) ]) ]) ]) ]);- var display_destroyed = Halogen_HTML_Elements.p([ Util.class_("red") ])([ Halogen_HTML_Core.text("you killed this bookmark") ]);- return Halogen_HTML_Elements.div_([ (function () {- var $22 = !v.destroyed;- if ($22) {- return display_edit;- };- return display_destroyed;- })() ]);- };- var mkState = function (b) {- return {- bm: b,- edit_bm: b,- deleteAsk: false,- destroyed: false- };- };- var $$eval = function (v) {- if (v instanceof BDeleteAsk) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {- var $26 = {};- for (var $27 in v1) {- if ({}.hasOwnProperty.call(v1, $27)) {- $26[$27] = v1[$27];- };- };- $26.deleteAsk = v.value0;- return $26;- }))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- };- if (v instanceof BDestroy) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.gets(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {- return v1.bm.bid;- }))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.destroy(v1))))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v2) {- var $32 = {};- for (var $33 in v2) {- if ({}.hasOwnProperty.call(v2, $33)) {- $32[$33] = v2[$33];- };- };- $32.destroyed = true;- return $32;- }))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);- });- });- });- };- if (v instanceof BEditField) {- var modifyEdit = function (dictMonadState) {- return function (g) {- return Control_Monad_State_Class.modify_(dictMonadState)(function (s) {- var $36 = {};- for (var $37 in s) {- if ({}.hasOwnProperty.call(s, $37)) {- $36[$37] = s[$37];- };- };- $36.edit_bm = g(s.edit_bm);- return $36;- });- };- };- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(modifyEdit(Halogen_Query_HalogenM.monadStateHalogenM)((function () {- if (v.value0 instanceof Eurl) {- return function (v1) {- return {- url: v.value0.value0,- title: v1.title,- description: v1.description,- tags: v1.tags,- "private": v1["private"],- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Etitle) {- return function (v1) {- return {- url: v1.url,- title: v.value0.value0,- description: v1.description,- tags: v1.tags,- "private": v1["private"],- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Edescription) {- return function (v1) {- return {- url: v1.url,- title: v1.title,- description: v.value0.value0,- tags: v1.tags,- "private": v1["private"],- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Etags) {- return function (v1) {- return {- url: v1.url,- title: v1.title,- description: v1.description,- tags: v.value0.value0,- "private": v1["private"],- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Eprivate) {- return function (v1) {- return {- url: v1.url,- title: v1.title,- description: v1.description,- tags: v1.tags,- "private": v.value0.value0,- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Etoread) {- return function (v1) {- return {- url: v1.url,- title: v1.title,- description: v1.description,- tags: v1.tags,- "private": v1["private"],- toread: v.value0.value0,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- throw new Error("Failed pattern match at Component.Add line 156, column 18 - line 162, column 36: " + [ v.value0.constructor.name ]);- })()))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- };- if (v instanceof BEditSubmit) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_Event_Event.preventDefault(v.value0)))(function () {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.editBookmark(v1.edit_bm))))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.put(Halogen_Query_HalogenM.monadStateHalogenM)((function () {- var $49 = {};- for (var $50 in v1) {- if ({}.hasOwnProperty.call(v1, $50)) {- $49[$50] = v1[$50];- };- };- $49.bm = v1.edit_bm;- return $49;- })()))(function () {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Util._loc))(function (v2) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_HTML.window))(function (v3) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Util._curQuerystring))(function (v4) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)((function () {- var v5 = Util._lookupQueryStringValue(v4)("next");- if (v5 instanceof Data_Maybe.Just) {- return Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_HTML_Location.setHref(v5.value0)(v2));- };- return Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Globals.closeWindow(v3));- })())(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- });- });- });- });- });- });- });- };- throw new Error("Failed pattern match at Component.Add line 146, column 3 - line 146, column 58: " + [ v.constructor.name ]);- };- var app = Globals["app'"](Data_Unit.unit);- return Halogen_Component.component(Halogen_HTML_Core.bifunctorHTML)({- initialState: Data_Function["const"](mkState(b$prime)),- render: render,- "eval": $$eval,- receiver: Data_Function["const"](Data_Maybe.Nothing.value)- });- };- exports["BEditField"] = BEditField;- exports["BEditSubmit"] = BEditSubmit;- exports["BDeleteAsk"] = BDeleteAsk;- exports["BDestroy"] = BDestroy;- exports["Eurl"] = Eurl;- exports["Etitle"] = Etitle;- exports["Edescription"] = Edescription;- exports["Etags"] = Etags;- exports["Eprivate"] = Eprivate;- exports["Etoread"] = Etoread;- exports["addbmark"] = addbmark;-})(PS["Component.Add"] = PS["Component.Add"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var App = PS["App"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];- var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];- var Data_Array = PS["Data.Array"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_String = PS["Data.String"];- var Data_String_CodePoints = PS["Data.String.CodePoints"];- var Data_String_Common = PS["Data.String.Common"];- var Data_String_Pattern = PS["Data.String.Pattern"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Aff_Class = PS["Effect.Aff.Class"];- var Effect_Class = PS["Effect.Class"];- var Globals = PS["Globals"];- var Halogen = PS["Halogen"];- var Halogen_Component = PS["Halogen.Component"];- var Halogen_HTML = PS["Halogen.HTML"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];- var Halogen_HTML_Events = PS["Halogen.HTML.Events"];- var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];- var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];- var Model = PS["Model"];- var Prelude = PS["Prelude"];- var Util = PS["Util"];- var Web_Event_Event = PS["Web.Event.Event"]; - var Eurl = (function () {- function Eurl(value0) {- this.value0 = value0;- };- Eurl.create = function (value0) {- return new Eurl(value0);- };- return Eurl;- })();- var Etitle = (function () {- function Etitle(value0) {- this.value0 = value0;- };- Etitle.create = function (value0) {- return new Etitle(value0);- };- return Etitle;- })();- var Edescription = (function () {- function Edescription(value0) {- this.value0 = value0;- };- Edescription.create = function (value0) {- return new Edescription(value0);- };- return Edescription;- })();- var Etags = (function () {- function Etags(value0) {- this.value0 = value0;- };- Etags.create = function (value0) {- return new Etags(value0);- };- return Etags;- })();- var Eprivate = (function () {- function Eprivate(value0) {- this.value0 = value0;- };- Eprivate.create = function (value0) {- return new Eprivate(value0);- };- return Eprivate;- })();- var Etoread = (function () {- function Etoread(value0) {- this.value0 = value0;- };- Etoread.create = function (value0) {- return new Etoread(value0);- };- return Etoread;- })();- var BStar = (function () {- function BStar(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- BStar.create = function (value0) {- return function (value1) {- return new BStar(value0, value1);- };- };- return BStar;- })();- var BDeleteAsk = (function () {- function BDeleteAsk(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- BDeleteAsk.create = function (value0) {- return function (value1) {- return new BDeleteAsk(value0, value1);- };- };- return BDeleteAsk;- })();- var BDestroy = (function () {- function BDestroy(value0) {- this.value0 = value0;- };- BDestroy.create = function (value0) {- return new BDestroy(value0);- };- return BDestroy;- })();- var BEdit = (function () {- function BEdit(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- BEdit.create = function (value0) {- return function (value1) {- return new BEdit(value0, value1);- };- };- return BEdit;- })();- var BEditField = (function () {- function BEditField(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- BEditField.create = function (value0) {- return function (value1) {- return new BEditField(value0, value1);- };- };- return BEditField;- })();- var BEditSubmit = (function () {- function BEditSubmit(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- BEditSubmit.create = function (value0) {- return function (value1) {- return new BEditSubmit(value0, value1);- };- };- return BEditSubmit;- })();- var BMarkRead = (function () {- function BMarkRead(value0) {- this.value0 = value0;- };- BMarkRead.create = function (value0) {- return new BMarkRead(value0);- };- return BMarkRead;- })();- var BNotifyRemove = (function () {- function BNotifyRemove() {-- };- BNotifyRemove.value = new BNotifyRemove();- return BNotifyRemove;- })();- var bmark = function (b$prime) {- var onEvent = function (v) {- if (v instanceof BStar) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.toggleStar(v1.bm.bid)((function () {- if (v.value0) {- return App.Star.value;- };- return App.UnStar.value;- })())))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.put(Halogen_Query_HalogenM.monadStateHalogenM)((function () {- var $33 = {};- for (var $34 in v1) {- if ({}.hasOwnProperty.call(v1, $34)) {- $33[$34] = v1[$34];- };- };- $33.bm = (function () {- var $27 = {};- for (var $28 in v1.bm) {- if ({}.hasOwnProperty.call(v1.bm, $28)) {- $27[$28] = v1["bm"][$28];- };- };- $27.selected = v.value0;- return $27;- })();- $33.edit_bm = (function () {- var $30 = {};- for (var $31 in v1.edit_bm) {- if ({}.hasOwnProperty.call(v1.edit_bm, $31)) {- $30[$31] = v1["edit_bm"][$31];- };- };- $30.selected = v.value0;- return $30;- })();- return $33;- })()))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- });- });- };- if (v instanceof BDeleteAsk) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {- var $38 = {};- for (var $39 in v1) {- if ({}.hasOwnProperty.call(v1, $39)) {- $38[$39] = v1[$39];- };- };- $38.deleteAsk = v.value0;- return $38;- }))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- };- if (v instanceof BDestroy) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.gets(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {- return v1.bm.bid;- }))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.destroy(v1))))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Halogen_Query_HalogenM.raise(BNotifyRemove.value))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);- });- });- });- };- if (v instanceof BMarkRead) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.markRead(v1.bm.bid))))(function () {- var newState = (function () {- var $49 = {};- for (var $50 in v1) {- if ({}.hasOwnProperty.call(v1, $50)) {- $49[$50] = v1[$50];- };- };- $49.bm = (function () {- var $46 = {};- for (var $47 in v1.bm) {- if ({}.hasOwnProperty.call(v1.bm, $47)) {- $46[$47] = v1["bm"][$47];- };- };- $46.toread = false;- return $46;- })();- return $49;- })();- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.put(Halogen_Query_HalogenM.monadStateHalogenM)(newState))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);- });- });- });- };- if (v instanceof BEdit) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {- var newState = (function () {- var $54 = {};- for (var $55 in v1) {- if ({}.hasOwnProperty.call(v1, $55)) {- $54[$55] = v1[$55];- };- };- $54.edit = v.value0;- $54.edit_bm = v1.bm;- return $54;- })();- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.put(Halogen_Query_HalogenM.monadStateHalogenM)(newState))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- });- };- if (v instanceof BEditField) {- var modifyEdit = function (dictMonadState) {- return function (g) {- return Control_Monad_State_Class.modify_(dictMonadState)(function (s) {- var $59 = {};- for (var $60 in s) {- if ({}.hasOwnProperty.call(s, $60)) {- $59[$60] = s[$60];- };- };- $59.edit_bm = g(s.edit_bm);- return $59;- });- };- };- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(modifyEdit(Halogen_Query_HalogenM.monadStateHalogenM)((function () {- if (v.value0 instanceof Eurl) {- return function (v1) {- return {- url: v.value0.value0,- title: v1.title,- description: v1.description,- tags: v1.tags,- "private": v1["private"],- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Etitle) {- return function (v1) {- return {- url: v1.url,- title: v.value0.value0,- description: v1.description,- tags: v1.tags,- "private": v1["private"],- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Edescription) {- return function (v1) {- return {- url: v1.url,- title: v1.title,- description: v.value0.value0,- tags: v1.tags,- "private": v1["private"],- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Etags) {- return function (v1) {- return {- url: v1.url,- title: v1.title,- description: v1.description,- tags: v.value0.value0,- "private": v1["private"],- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Eprivate) {- return function (v1) {- return {- url: v1.url,- title: v1.title,- description: v1.description,- tags: v1.tags,- "private": v.value0.value0,- toread: v1.toread,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- if (v.value0 instanceof Etoread) {- return function (v1) {- return {- url: v1.url,- title: v1.title,- description: v1.description,- tags: v1.tags,- "private": v1["private"],- toread: v.value0.value0,- bid: v1.bid,- selected: v1.selected,- time: v1.time- };- };- };- throw new Error("Failed pattern match at Component.BMark line 229, column 18 - line 235, column 36: " + [ v.value0.constructor.name ]);- })()))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- };- if (v instanceof BEditSubmit) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_Event_Event.preventDefault(v.value0)))(function () {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.editBookmark(v1.edit_bm))))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.put(Halogen_Query_HalogenM.monadStateHalogenM)((function () {- var $72 = {};- for (var $73 in v1) {- if ({}.hasOwnProperty.call(v1, $73)) {- $72[$73] = v1[$73];- };- };- $72.edit = false;- $72.bm = v1.edit_bm;- return $72;- })()))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- });- });- });- };- throw new Error("Failed pattern match at Component.BMark line 191, column 3 - line 191, column 65: " + [ v.constructor.name ]);- };- var mkState = function (b) {- return {- bm: b,- edit_bm: b,- deleteAsk: false,- edit: false- };- };- var app = Globals["app'"](Data_Unit.unit);- var render = function (v) {- var toTextarea = function (input) {- return Data_Array.drop(1)(Data_Foldable.foldMap(Data_Foldable.foldableArray)(Data_Monoid.monoidArray)(function (x) {- return [ Halogen_HTML_Elements.br_, Halogen_HTML_Core.text(x) ];- })(Data_String_Common.split("\x0a")(input)));- };- var star = Data_Monoid.guard(Data_Monoid.monoidArray)(app.dat.isowner)([ Halogen_HTML_Elements.div([ Util.class_("star fl pointer" + Data_Monoid.guard(Data_Monoid.monoidString)(v.bm.selected)(" selected")) ])([ Halogen_HTML_Elements.button([ Util.class_("moon-gray"), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BStar.create(!v.bm.selected))) ])([ Halogen_HTML_Core.text("\u272d") ]) ]) ]);- var mmoment = Globals.mmoment8601(v.bm.time);- var links = Data_Monoid.guard(Data_Monoid.monoidArray)(app.dat.isowner)([ Halogen_HTML_Elements.div([ Util.class_("edit_links di") ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BEdit.create(true))), Util.class_("edit light-silver hover-blue") ])([ Halogen_HTML_Core.text("edit\xa0\xa0") ]), Halogen_HTML_Elements.div([ Util.class_("delete_link di") ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDeleteAsk.create(true))), Util.class_("delete light-silver hover-blue" + Data_Monoid.guard(Data_Monoid.monoidString)(v.deleteAsk)(" dn")) ])([ Halogen_HTML_Core.text("delete") ]), Halogen_HTML_Elements.span([ Util.class_("confirm red" + Data_Monoid.guard(Data_Monoid.monoidString)(!v.deleteAsk)(" dn")) ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDeleteAsk.create(false))) ])([ Halogen_HTML_Core.text("cancel\xa0/\xa0") ]), Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDestroy.create)), Util.class_("red") ])([ Halogen_HTML_Core.text("destroy") ]) ]) ]) ]), Halogen_HTML_Elements.div([ Util.class_("read di") ])(Data_Monoid.guard(Data_Monoid.monoidArray)(v.bm.toread)([ Halogen_HTML_Core.text("\xa0\xa0"), Halogen_HTML_Elements.button([ Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BMarkRead.create)), Util.class_("mark_read") ])([ Halogen_HTML_Core.text("mark as read") ]) ])) ]);- var linkToFilterTag = function (tag) {- return app.userR + ("/t:" + tag);- };- var linkToFilterSingle = function (bid) {- return app.userR + ("/b:" + Data_Show.show(Data_Show.showInt)(bid));- };- var editField = function (f) {- return function ($82) {- return Halogen_HTML_Events.input(BEditField.create)(f($82));- };- };- var display_edit = [ Halogen_HTML_Elements.div([ Util.class_("edit_bookmark_form pa2 bg-white") ])([ Halogen_HTML_Elements.form([ Halogen_HTML_Events.onSubmit(Halogen_HTML_Events.input(BEditSubmit.create)) ])([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputUrl.value), Util.class_("url w-100 mt2 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.required(true), Halogen_HTML_Properties.name("url"), Halogen_HTML_Properties.value(v.edit_bm.url), Halogen_HTML_Events.onValueChange(editField(Eurl.create)) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Util.class_("title w-100 mt2 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("title"), Halogen_HTML_Properties.value(v.edit_bm.title), Halogen_HTML_Events.onValueChange(editField(Etitle.create)) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.p([ Util.class_("mt2 mb1") ])([ Halogen_HTML_Core.text(" description:") ]), Halogen_HTML_Elements.textarea([ Util.class_("description w-100 mt2 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("description"), Halogen_HTML_Properties.rows(5), Halogen_HTML_Properties.value(v.edit_bm.description), Halogen_HTML_Events.onValueChange(editField(Edescription.create)) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div([ Halogen_HTML_Properties.id_("tags_input_box") ])([ Halogen_HTML_Elements.p_([ Halogen_HTML_Elements.div_([ Halogen_HTML_Core.text(" tags:") ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Util.class_("tags w-100 mt2 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("tags"), Halogen_HTML_Properties.autocomplete(false), Util.attr("autocapitalize")("off"), Halogen_HTML_Properties.value(v.edit_bm.tags), Halogen_HTML_Events.onValueChange(editField(Etags.create)) ]), Halogen_HTML_Elements.br_ ]) ]), Halogen_HTML_Elements.div([ Util.class_("edit_form_checkboxes mv3") ])([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Util.class_("private pointer"), Halogen_HTML_Properties.id_("edit_private"), Halogen_HTML_Properties.name("private"), Halogen_HTML_Properties.checked(v["edit_bm"]["private"]), Halogen_HTML_Events.onChecked(editField(Eprivate.create)) ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("edit_private"), Util.class_("mr2") ])([ Halogen_HTML_Core.text("private") ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Util.class_("toread pointer"), Halogen_HTML_Properties.id_("edit_toread"), Halogen_HTML_Properties.name("toread"), Halogen_HTML_Properties.checked(v.edit_bm.toread), Halogen_HTML_Events.onChecked(editField(Etoread.create)) ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("edit_toread") ])([ Halogen_HTML_Core.text("toread") ]), Halogen_HTML_Elements.br_ ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputSubmit.value), Util.class_("mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"), Halogen_HTML_Properties.value("save") ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputReset.value), Util.class_("pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"), Halogen_HTML_Properties.value("cancel"), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BEdit.create(false))) ]) ]) ]) ];- var display = [ Halogen_HTML_Elements.div([ Util.class_("display") ])(Data_Semigroup.append(Data_Semigroup.semigroupArray)([ Halogen_HTML_Elements.a([ Halogen_HTML_Properties.href(v.bm.url), Halogen_HTML_Properties.target("_blank"), Util.class_("link f5 lh-title" + Data_Monoid.guard(Data_Monoid.monoidString)(v.bm.toread)(" unread")) ])([ Halogen_HTML_Core.text((function () {- var $78 = Data_String_Common["null"](v.bm.title);- if ($78) {- return "[no title]";- };- return v.bm.title;- })()) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.a([ Halogen_HTML_Properties.href(v.bm.url), Util.class_("link f7 gray hover-blue") ])([ Halogen_HTML_Core.text(v.bm.url) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div([ Util.class_("description mt1 mid-gray") ])(toTextarea(v.bm.description)), Halogen_HTML_Elements.div([ Util.class_("tags") ])(Data_Monoid.guard(Data_Monoid.monoidFn(Data_Monoid.monoidFn(Data_Monoid.monoidArray)))(!Data_String_Common["null"](v.bm.tags))(Data_Functor.map(Data_Functor.functorArray))(function (tag) {- return Halogen_HTML_Elements.a([ Util.class_("link tag mr1" + Data_Monoid.guard(Data_Monoid.monoidString)(Data_String_CodePoints.take(1)(tag) === ".")(" private")), Halogen_HTML_Properties.href(linkToFilterTag(tag)) ])([ Halogen_HTML_Core.text(tag) ]);- })(Data_String_Common.split(" ")(v.bm.tags))), Halogen_HTML_Elements.a([ Util.class_("link f7 dib gray w4"), Halogen_HTML_Properties.title(Data_Maybe.maybe(v.bm.time)(Data_Tuple.snd)(mmoment)), Halogen_HTML_Properties.href(linkToFilterSingle(v.bm.bid)) ])([ Halogen_HTML_Core.text(Data_Maybe.maybe("\xa0")(Data_Tuple.fst)(mmoment)) ]) ])(links)) ];- return Halogen_HTML_Elements.div([ Halogen_HTML_Properties.id_(Data_Show.show(Data_Show.showInt)(v.bm.bid)), Util.class_("bookmark w-100 mw7 pa1 mb3" + Data_Monoid.guard(Data_Monoid.monoidString)(v["bm"]["private"])(" private")) ])(Data_Semigroup.append(Data_Semigroup.semigroupArray)(star)((function () {- if (v.edit) {- return display_edit;- };- return display;- })()));- };- return Halogen_Component.component(Halogen_HTML_Core.bifunctorHTML)({- initialState: Data_Function["const"](mkState(b$prime)),- render: render,- "eval": onEvent,- receiver: Data_Function["const"](Data_Maybe.Nothing.value)- });- };- exports["BStar"] = BStar;- exports["BDeleteAsk"] = BDeleteAsk;- exports["BDestroy"] = BDestroy;- exports["BEdit"] = BEdit;- exports["BEditField"] = BEditField;- exports["BEditSubmit"] = BEditSubmit;- exports["BMarkRead"] = BMarkRead;- exports["Eurl"] = Eurl;- exports["Etitle"] = Etitle;- exports["Edescription"] = Edescription;- exports["Etags"] = Etags;- exports["Eprivate"] = Eprivate;- exports["Etoread"] = Etoread;- exports["BNotifyRemove"] = BNotifyRemove;- exports["bmark"] = bmark;-})(PS["Component.BMark"] = PS["Component.BMark"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Component_BMark = PS["Component.BMark"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Data_Array = PS["Data.Array"];- var Data_Eq = PS["Data.Eq"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Unit = PS["Data.Unit"];- var Effect_Aff = PS["Effect.Aff"];- var Halogen = PS["Halogen"];- var Halogen_Component = PS["Halogen.Component"];- var Halogen_HTML = PS["Halogen.HTML"];- var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];- var Halogen_HTML_Events = PS["Halogen.HTML.Events"];- var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];- var Model = PS["Model"];- var Prelude = PS["Prelude"]; - var HandleBMessage = (function () {- function HandleBMessage(value0, value1, value2) {- this.value0 = value0;- this.value1 = value1;- this.value2 = value2;- };- HandleBMessage.create = function (value0) {- return function (value1) {- return function (value2) {- return new HandleBMessage(value0, value1, value2);- };- };- };- return HandleBMessage;- })();- var blist = function (st) {- var render = function (bms) {- var renderBookmark = function (b) {- return Halogen_HTML.slot(b.bid)(Component_BMark.bmark(b))(Data_Unit.unit)(Halogen_HTML_Events.input(HandleBMessage.create(b.bid)));- };- return Halogen_HTML_Elements.div_(Data_Functor.map(Data_Functor.functorArray)(renderBookmark)(bms));- };- var $$eval = function (v) {- var removeBookmark = function (bookmarkId) {- return Data_Array.filter(function (b) {- return b.bid !== bookmarkId;- });- };- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(removeBookmark(v.value0)))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value2);- });- };- return Halogen_Component.parentComponent(Data_Ord.ordInt)({- initialState: Data_Function["const"](st),- render: render,- "eval": $$eval,- receiver: Data_Function["const"](Data_Maybe.Nothing.value)- });- };- exports["HandleBMessage"] = HandleBMessage;- exports["blist"] = blist;-})(PS["Component.BList"] = PS["Component.BList"] || {});-(function(exports) {- "use strict";- var App = PS["App"];- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_State_Class = PS["Control.Monad.State.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];- var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];- var Data_Argonaut = PS["Data.Argonaut"];- var Data_Argonaut_Core = PS["Data.Argonaut.Core"];- var Data_Array = PS["Data.Array"];- var Data_Either = PS["Data.Either"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Int = PS["Data.Int"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Monoid = PS["Data.Monoid"];- var Data_Ord = PS["Data.Ord"];- var Data_Semigroup = PS["Data.Semigroup"];- var Data_Show = PS["Data.Show"];- var Data_String = PS["Data.String"];- var Data_String_CodePoints = PS["Data.String.CodePoints"];- var Data_String_Common = PS["Data.String.Common"];- var Data_String_Pattern = PS["Data.String.Pattern"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Aff_Class = PS["Effect.Aff.Class"];- var Effect_Class = PS["Effect.Class"];- var Effect_Exception = PS["Effect.Exception"];- var Globals = PS["Globals"];- var Halogen = PS["Halogen"];- var Halogen_Component = PS["Halogen.Component"];- var Halogen_HTML = PS["Halogen.HTML"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];- var Halogen_HTML_Events = PS["Halogen.HTML.Events"];- var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];- var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];- var Model = PS["Model"];- var Prelude = PS["Prelude"];- var Util = PS["Util"];- var Web_Event_Event = PS["Web.Event.Event"];- var Web_HTML = PS["Web.HTML"];- var Web_HTML_Location = PS["Web.HTML.Location"];-- // | FormField Edits- var Etitle = (function () {- function Etitle(value0) {- this.value0 = value0;- };- Etitle.create = function (value0) {- return new Etitle(value0);- };- return Etitle;- })();-- // | FormField Edits- var Etext = (function () {- function Etext(value0) {- this.value0 = value0;- };- Etext.create = function (value0) {- return new Etext(value0);- };- return Etext;- })();- var NNop = (function () {- function NNop(value0) {- this.value0 = value0;- };- NNop.create = function (value0) {- return new NNop(value0);- };- return NNop;- })();- var NEditField = (function () {- function NEditField(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- NEditField.create = function (value0) {- return function (value1) {- return new NEditField(value0, value1);- };- };- return NEditField;- })();- var NEditSubmit = (function () {- function NEditSubmit(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- NEditSubmit.create = function (value0) {- return function (value1) {- return new NEditSubmit(value0, value1);- };- };- return NEditSubmit;- })();- var NEdit = (function () {- function NEdit(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- NEdit.create = function (value0) {- return function (value1) {- return new NEdit(value0, value1);- };- };- return NEdit;- })();- var NDeleteAsk = (function () {- function NDeleteAsk(value0, value1) {- this.value0 = value0;- this.value1 = value1;- };- NDeleteAsk.create = function (value0) {- return function (value1) {- return new NDeleteAsk(value0, value1);- };- };- return NDeleteAsk;- })();- var NDestroy = (function () {- function NDestroy(value0) {- this.value0 = value0;- };- NDestroy.create = function (value0) {- return new NDestroy(value0);- };- return NDestroy;- })();- var nnote = function (st$prime) {- var render = function (v) {- var toTextarea = function (input) {- return Data_Array.drop(1)(Data_Foldable.foldMap(Data_Foldable.foldableArray)(Data_Monoid.monoidArray)(function (x) {- return [ Halogen_HTML_Elements.br_, Halogen_HTML_Core.text(x) ];- })(Data_String_Common.split("\x0a")(input)));- };- var mmoment = function (n) {- return Globals.mmoment8601(n.created);- };- var renderNote = Halogen_HTML_Elements.div([ Halogen_HTML_Properties.id_(Data_Show.show(Data_Show.showInt)(v.note.id)), Util.class_("note w-100 mw7 pa1 mb2") ])(Data_Semigroup.append(Data_Semigroup.semigroupArray)([ Halogen_HTML_Elements.div([ Util.class_("display") ])([ Halogen_HTML_Elements.div([ Util.class_("link f5 lh-title") ])([ Halogen_HTML_Core.text((function () {- var $18 = Data_String_Common["null"](v.note.title);- if ($18) {- return "[no title]";- };- return v.note.title;- })()) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div([ Util.class_("description mt1 mid-gray") ])(toTextarea(v.note.text)), Halogen_HTML_Elements.div([ Util.class_("link f7 dib gray w4"), Halogen_HTML_Properties.title(Data_Maybe.maybe(v.note.created)(Data_Tuple.snd)(mmoment(v.note))) ])([ Halogen_HTML_Core.text(Data_Maybe.maybe("\xa0")(Data_Tuple.fst)(mmoment(v.note))) ]) ]) ])([ Halogen_HTML_Elements.div([ Util.class_("edit_links db mt3") ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NEdit.create(true))), Util.class_("edit light-silver hover-blue") ])([ Halogen_HTML_Core.text("edit\xa0\xa0") ]), Halogen_HTML_Elements.div([ Util.class_("delete_link di") ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NDeleteAsk.create(true))), Util.class_("delete light-silver hover-blue" + Data_Monoid.guard(Data_Monoid.monoidString)(v.deleteAsk)(" dn")) ])([ Halogen_HTML_Core.text("delete") ]), Halogen_HTML_Elements.span([ Util.class_("confirm red" + Data_Monoid.guard(Data_Monoid.monoidString)(!v.deleteAsk)(" dn")) ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NDeleteAsk.create(false))) ])([ Halogen_HTML_Core.text("cancel\xa0/\xa0") ]), Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NDestroy.create)), Util.class_("red") ])([ Halogen_HTML_Core.text("destroy") ]) ]) ]) ]) ]));- var editField = function (f) {- return function ($61) {- return Halogen_HTML_Events.input(NEditField.create)(f($61));- };- };- var renderNote_edit = Halogen_HTML_Elements.form([ Halogen_HTML_Events.onSubmit(Halogen_HTML_Events.input(NEditSubmit.create)) ])([ Halogen_HTML_Elements.p([ Util.class_("mt2 mb1") ])([ Halogen_HTML_Core.text("Title:") ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Util.class_("title w-100 mt2 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("title"), Halogen_HTML_Properties.value(v.edit_note.title), Halogen_HTML_Events.onValueChange(editField(Etitle.create)) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.p([ Util.class_("mt2 mb1") ])([ Halogen_HTML_Core.text("Description:") ]), Halogen_HTML_Elements.textarea([ Util.class_("description w-100 mt2 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("text"), Halogen_HTML_Properties.rows(30), Halogen_HTML_Properties.value(v.edit_note.text), Halogen_HTML_Events.onValueChange(editField(Etext.create)) ]), Halogen_HTML_Elements.div([ Util.class_("edit_form_checkboxes mv3") ])([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputSubmit.value), Util.class_("mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"), Halogen_HTML_Properties.value("save") ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputReset.value), Util.class_("pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"), Halogen_HTML_Properties.value("cancel"), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NEdit.create(false))) ]) ]) ]);- var display_destroyed = Halogen_HTML_Elements.p([ Util.class_("red") ])([ Halogen_HTML_Core.text("you killed this note") ]);- if (v.destroyed) {- return display_destroyed;- };- if (v.edit) {- return renderNote_edit;- };- return renderNote;- };- - // | Handle UI Events- var onEvent = function (v) {- if (v instanceof NNop) {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);- };- if (v instanceof NEditField) {- var modifyEdit = function (dictMonadState) {- return function (g) {- return Control_Monad_State_Class.modify_(dictMonadState)(function (s) {- var $25 = {};- for (var $26 in s) {- if ({}.hasOwnProperty.call(s, $26)) {- $25[$26] = s[$26];- };- };- $25.edit_note = g(s.edit_note);- return $25;- });- };- };- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(modifyEdit(Halogen_Query_HalogenM.monadStateHalogenM)((function () {- if (v.value0 instanceof Etitle) {- return function (v1) {- return {- id: v1.id,- title: v.value0.value0,- text: v1.text,- length: v1.length,- created: v1.created,- updated: v1.updated- };- };- };- if (v.value0 instanceof Etext) {- return function (v1) {- return {- id: v1.id,- title: v1.title,- text: v.value0.value0,- length: v1.length,- created: v1.created,- updated: v1.updated- };- };- };- throw new Error("Failed pattern match at Component.NList line 210, column 18 - line 212, column 32: " + [ v.value0.constructor.name ]);- })()))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- };- if (v instanceof NDeleteAsk) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {- var $33 = {};- for (var $34 in v1) {- if ({}.hasOwnProperty.call(v1, $34)) {- $33[$34] = v1[$34];- };- };- $33.deleteAsk = v.value0;- return $33;- }))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- };- if (v instanceof NDestroy) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.destroyNote(v1.note.id))))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.put(Halogen_Query_HalogenM.monadStateHalogenM)((function () {- var $39 = {};- for (var $40 in v1) {- if ({}.hasOwnProperty.call(v1, $40)) {- $39[$40] = v1[$40];- };- };- $39.destroyed = true;- return $39;- })()))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);- });- });- });- };- if (v instanceof NEdit) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {- var newState = (function () {- var $44 = {};- for (var $45 in v1) {- if ({}.hasOwnProperty.call(v1, $45)) {- $44[$45] = v1[$45];- };- };- $44.edit = v.value0;- $44.edit_note = v1.note;- return $44;- })();- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.put(Halogen_Query_HalogenM.monadStateHalogenM)(newState))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- });- };- if (v instanceof NEditSubmit) {- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_Event_Event.preventDefault(v.value0)))(function () {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {- return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.editNote(v1.edit_note)))(function (v2) {- var nt$prime = Data_Maybe.fromMaybe(v1.edit_note)(Control_Bind.bind(Data_Maybe.bindMaybe)(Control_Bind.bind(Data_Maybe.bindMaybe)(Data_Argonaut_Core.toNumber(v2.response))(Data_Int.fromNumber))(function (n) {- return new Data_Maybe.Just({- id: n,- created: v1.edit_note.created,- length: v1.edit_note.length,- text: v1.edit_note.text,- title: v1.edit_note.title,- updated: v1.edit_note.updated- });- }));- return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.put(Halogen_Query_HalogenM.monadStateHalogenM)((function () {- var $51 = {};- for (var $52 in v1) {- if ({}.hasOwnProperty.call(v1, $52)) {- $51[$52] = v1[$52];- };- };- $51.edit = false;- $51.note = nt$prime;- $51.edit_note = nt$prime;- return $51;- })()))(function () {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);- });- });- });- });- };- throw new Error("Failed pattern match at Component.NList line 205, column 3 - line 205, column 61: " + [ v.constructor.name ]);- };- - // | Initialize Component State- var mkState = function (note$prime) {- return {- note: note$prime,- edit_note: note$prime,- deleteAsk: false,- edit: note$prime.id <= 0,- destroyed: false- };- };- var app = Globals["app'"](Data_Unit.unit);- return Halogen_Component.component(Halogen_HTML_Core.bifunctorHTML)({- initialState: Data_Function["const"](mkState(st$prime)),- render: render,- "eval": onEvent,- receiver: Data_Function["const"](Data_Maybe.Nothing.value)- });- };- var nlist = function (st$prime) {- var toTextarea = function (input) {- return Data_Array.drop(1)(Data_Foldable.foldMap(Data_Foldable.foldableArray)(Data_Monoid.monoidArray)(function (x) {- return [ Halogen_HTML_Elements.br_, Halogen_HTML_Core.text(x) ];- })(Data_String_Common.split("\x0a")(input)));- };- - // | Handle UI Events- var onEvent = function (v) {- return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);- };- var mmoment = function (bm) {- return Globals.mmoment8601(bm.created);- };- - // | Initialize Component State- var mkState = function (notes$prime) {- return {- notes: notes$prime,- cur: Data_Maybe.Nothing.value,- deleteAsk: false,- edit: false- };- };- var app = Globals["app'"](Data_Unit.unit);- var linkToFilterSingle = function (nid) {- return app.userR + ("/notes/" + Data_Show.show(Data_Show.showInt)(nid));- };- var render = function (v) {- var renderNote = function (bm) {- return Halogen_HTML_Elements.div([ Halogen_HTML_Properties.id_(Data_Show.show(Data_Show.showInt)(bm.id)), Util.class_("note w-100 mw7 pa1 mb2") ])([ Halogen_HTML_Elements.div([ Util.class_("display") ])([ Halogen_HTML_Elements.a([ Halogen_HTML_Properties.href(linkToFilterSingle(bm.id)), Halogen_HTML_Properties.target("_blank"), Util.class_("link f5 lh-title") ])([ Halogen_HTML_Core.text((function () {- var $59 = Data_String_Common["null"](bm.title);- if ($59) {- return "[no title]";- };- return bm.title;- })()) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div([ Util.class_("description mt1 mid-gray") ])(toTextarea(Data_String_CodePoints.take(200)(bm.text))), Halogen_HTML_Elements.a([ Util.class_("link f7 dib gray w4"), Halogen_HTML_Properties.title(Data_Maybe.maybe(bm.created)(Data_Tuple.snd)(mmoment(bm))), Halogen_HTML_Properties.href(linkToFilterSingle(bm.id)) ])([ Halogen_HTML_Core.text(Data_Maybe.maybe("\xa0")(Data_Tuple.fst)(mmoment(bm))) ]) ]) ]);- };- return Halogen_HTML_Elements.div_(Data_Functor.map(Data_Functor.functorArray)(renderNote)(v.notes));- };- return Halogen_Component.component(Halogen_HTML_Core.bifunctorHTML)({- initialState: Data_Function["const"](mkState(st$prime)),- render: render,- "eval": onEvent,- receiver: Data_Function["const"](Data_Maybe.Nothing.value)- });- };- exports["nlist"] = nlist;- exports["NNop"] = NNop;- exports["NEditField"] = NEditField;- exports["NEditSubmit"] = NEditSubmit;- exports["NEdit"] = NEdit;- exports["NDeleteAsk"] = NDeleteAsk;- exports["NDestroy"] = NDestroy;- exports["Etitle"] = Etitle;- exports["Etext"] = Etext;- exports["nnote"] = nnote;-})(PS["Component.NList"] = PS["Component.NList"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Reader_Trans = PS["Control.Monad.Reader.Trans"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Effect_Aff = PS["Effect.Aff"];- var Prelude = PS["Prelude"];- var MonadFork = function (Functor1, Monad0, fork, join, suspend) {- this.Functor1 = Functor1;- this.Monad0 = Monad0;- this.fork = fork;- this.join = join;- this.suspend = suspend;- };- var suspend = function (dict) {- return dict.suspend;- };- var monadForkAff = new MonadFork(function () {- return Effect_Aff.functorFiber;- }, function () {- return Effect_Aff.monadAff;- }, Effect_Aff.forkAff, Effect_Aff.joinFiber, Effect_Aff.suspendAff);- var join = function (dict) {- return dict.join;- };- var fork = function (dict) {- return dict.fork;- };- exports["fork"] = fork;- exports["join"] = join;- exports["suspend"] = suspend;- exports["MonadFork"] = MonadFork;- exports["monadForkAff"] = monadForkAff;-})(PS["Control.Monad.Fork.Class"] = PS["Control.Monad.Fork.Class"] || {});-(function(exports) {- "use strict";-- exports.warn = function (s) {- return function () {- console.warn(s);- return {};- };- };-})(PS["Effect.Console"] = PS["Effect.Console"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Effect.Console"];- var Data_Show = PS["Data.Show"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- exports["warn"] = $foreign.warn;-})(PS["Effect.Console"] = PS["Effect.Console"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Map = PS["Data.Map"];- var Data_Map_Internal = PS["Data.Map.Internal"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Traversable = PS["Data.Traversable"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Ref = PS["Effect.Ref"];- var Halogen_Component = PS["Halogen.Component"];- var Halogen_Data_OrdBox = PS["Halogen.Data.OrdBox"];- var Prelude = PS["Prelude"];- var Unsafe_Coerce = PS["Unsafe.Coerce"];- var Web_DOM = PS["Web.DOM"];- var unRenderStateX = Unsafe_Coerce.unsafeCoerce;- var unDriverStateX = Unsafe_Coerce.unsafeCoerce;- var renderStateX_ = function (dictApplicative) {- return function (f) {- return unDriverStateX(function (st) {- return Data_Foldable.traverse_(dictApplicative)(Data_Foldable.foldableMaybe)(f)(st.rendering);- });- };- };- var mkRenderStateX = function (v) {- return Unsafe_Coerce.unsafeCoerce;- };- var renderStateX = function (dictFunctor) {- return function (f) {- return unDriverStateX(function (st) {- return mkRenderStateX(st.prjQuery)(f(st.rendering));- });- };- };- var mkDriverStateXRef = Unsafe_Coerce.unsafeCoerce;- var initDriverState = function (component) {- return function (input) {- return function (handler) {- return function (prjQuery) {- return function (lchs) {- return function __do() {- var v = Effect_Ref["new"]({})();- var v1 = Effect_Ref["new"](Data_Map_Internal.empty)();- var v2 = Effect_Ref["new"](Data_Map_Internal.empty)();- var v3 = Effect_Ref["new"](Data_Functor.voidLeft(Data_Maybe.functorMaybe)(component.initializer)(Data_List_Types.Nil.value))();- var v4 = Effect_Ref["new"](new Data_Maybe.Just(Data_List_Types.Nil.value))();- var v5 = Effect_Ref["new"](Data_Maybe.Nothing.value)();- var v6 = Effect_Ref["new"](0)();- var v7 = Effect_Ref["new"](new Data_Maybe.Just(Data_Map_Internal.empty))();- var ds = {- component: component,- state: component.initialState(input),- refs: Data_Map_Internal.empty,- children: Data_Map_Internal.empty,- childrenIn: v1,- childrenOut: v2,- selfRef: v,- handler: handler,- pendingQueries: v3,- pendingOuts: v4,- pendingHandlers: v5,- rendering: Data_Maybe.Nothing.value,- prjQuery: prjQuery,- fresh: v6,- subscriptions: v7,- lifecycleHandlers: lchs- };- Effect_Ref.write(ds)(v)();- return mkDriverStateXRef(v);- };- };- };- };- };- };- exports["unDriverStateX"] = unDriverStateX;- exports["mkDriverStateXRef"] = mkDriverStateXRef;- exports["renderStateX"] = renderStateX;- exports["renderStateX_"] = renderStateX_;- exports["unRenderStateX"] = unRenderStateX;- exports["initDriverState"] = initDriverState;-})(PS["Halogen.Aff.Driver.State"] = PS["Halogen.Aff.Driver.State"] || {});-(function(exports) {- "use strict";-- exports.reallyUnsafeRefEq = function (a) {- return function (b) {- return a === b;- };- };-})(PS["Unsafe.Reference"] = PS["Unsafe.Reference"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var $foreign = PS["Unsafe.Reference"]; - var unsafeRefEq = $foreign.reallyUnsafeRefEq;- exports["unsafeRefEq"] = unsafeRefEq;-})(PS["Unsafe.Reference"] = PS["Unsafe.Reference"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Applicative_Free = PS["Control.Applicative.Free"];- var Control_Bind = PS["Control.Bind"];- var Control_Coroutine = PS["Control.Coroutine"];- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Monad_Fork_Class = PS["Control.Monad.Fork.Class"];- var Control_Monad_Free = PS["Control.Monad.Free"];- var Control_Monad_Free_Trans = PS["Control.Monad.Free.Trans"];- var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];- var Control_Parallel = PS["Control.Parallel"];- var Control_Parallel_Class = PS["Control.Parallel.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Boolean = PS["Data.Boolean"];- var Data_Coyoneda = PS["Data.Coyoneda"];- var Data_Eq = PS["Data.Eq"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Map = PS["Data.Map"];- var Data_Map_Internal = PS["Data.Map.Internal"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Set = PS["Data.Set"];- var Data_Tuple = PS["Data.Tuple"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Class = PS["Effect.Class"];- var Effect_Exception = PS["Effect.Exception"];- var Effect_Ref = PS["Effect.Ref"];- var Halogen_Aff_Driver_State = PS["Halogen.Aff.Driver.State"];- var Halogen_Data_OrdBox = PS["Halogen.Data.OrdBox"];- var Halogen_Query_EventSource = PS["Halogen.Query.EventSource"];- var Halogen_Query_ForkF = PS["Halogen.Query.ForkF"];- var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Prelude = PS["Prelude"];- var Unsafe_Reference = PS["Unsafe.Reference"]; - var queuingHandler = function (handler) {- return function (ref) {- return function (message) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v) {- if (v instanceof Data_Maybe.Nothing) {- return handler(message);- };- if (v instanceof Data_Maybe.Just) {- return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.write(new Data_Maybe.Just(new Data_List_Types.Cons(handler(message), v.value0)))(ref));- };- throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 171, column 3 - line 175, column 59: " + [ v.constructor.name ]);- });- };- };- };- var handleLifecycle = function (lchs) {- return function (f) {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.write({- initializers: Data_List_Types.Nil.value,- finalizers: Data_List_Types.Nil.value- })(lchs)))(function () {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(f))(function (v) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(lchs)))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_List_Types.foldableList)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))(v1.finalizers))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Control_Parallel.parSequence_(Effect_Aff.parallelAff)(Data_List_Types.foldableList)(v1.initializers))(function () {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v);- });- });- });- });- });- };- };- var $$eval = function (render) {- return function (r) {- var go = function (ref) {- return function (v) {- if (v instanceof Halogen_Query_HalogenM.State) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {- var v2 = v.value0(v1.state);- if (Unsafe_Reference.unsafeRefEq(v1.state)(v2.value1)) {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v2.value0);- };- if (Data_Boolean.otherwise) {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.write({- component: v1.component,- state: v2.value1,- refs: v1.refs,- children: v1.children,- childrenIn: v1.childrenIn,- childrenOut: v1.childrenOut,- selfRef: v1.selfRef,- handler: v1.handler,- pendingQueries: v1.pendingQueries,- pendingOuts: v1.pendingOuts,- pendingHandlers: v1.pendingHandlers,- rendering: v1.rendering,- prjQuery: v1.prjQuery,- fresh: v1.fresh,- subscriptions: v1.subscriptions,- lifecycleHandlers: v1.lifecycleHandlers- })(ref)))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(handleLifecycle(v1.lifecycleHandlers)(render(v1.lifecycleHandlers)(ref)))(function () {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v2.value0);- });- });- };- throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 76, column 7 - line 82, column 21: " + [ v2.constructor.name ]);- });- };- if (v instanceof Halogen_Query_HalogenM.Subscribe) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {- return Control_Bind.bind(Effect_Aff.bindAff)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff)(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Query_EventSource.unEventSource(v.value0))(function (v2) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref["modify'"](function (i) {- return {- state: i + 1 | 0,- value: i- };- })(v1.fresh)))(function (v3) {- var done$prime = Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(v1.subscriptions)))(function (v4) {- return Control_Applicative.when(Effect_Aff.applicativeAff)(Data_Maybe.maybe(false)(Data_Map_Internal.member(Data_Ord.ordInt)(v3))(v4))(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.modify_(Data_Functor.map(Data_Maybe.functorMaybe)(Data_Map_Internal["delete"](Data_Ord.ordInt)(v3)))(v1.subscriptions)));- });- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.modify_(Data_Functor.map(Data_Maybe.functorMaybe)(Data_Map_Internal.insert(Data_Ord.ordInt)(v3)(done$prime)))(v1.subscriptions)))(function () {- var consumer = Control_Bind.bind(Control_Monad_Free_Trans.bindFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Control_Coroutine["await"](Effect_Aff.monadAff))(function (v4) {- return Control_Bind.bind(Control_Monad_Free_Trans.bindFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Control_Monad_Trans_Class.lift(Control_Monad_Free_Trans.monadTransFreeT(Control_Coroutine.functorAwait))(Effect_Aff.monadAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(v1.subscriptions))))(function (v5) {- return Control_Applicative.when(Control_Monad_Free_Trans.applicativeFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Data_Maybe.isJust(v5))(Control_Bind.bind(Control_Monad_Free_Trans.bindFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Control_Monad_Trans_Class.lift(Control_Monad_Free_Trans.monadTransFreeT(Control_Coroutine.functorAwait))(Effect_Aff.monadAff)(evalF(ref)(v4)))(function (v6) {- return Control_Applicative.when(Control_Monad_Free_Trans.applicativeFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Data_Eq.eq(Halogen_Query_EventSource.eqSubscribeStatus)(v6)(Halogen_Query_EventSource.Listening.value))(consumer);- }));- });- });- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Control_Coroutine.runProcess(Effect_Aff.monadRecAff)(Control_Coroutine.pullFrom(Effect_Aff.monadRecAff)(consumer)(v2.producer)))(function () {- return done$prime;- });- });- });- })))(function (v2) {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value1);- });- });- };- if (v instanceof Halogen_Query_HalogenM.Lift) {- return v.value0;- };- if (v instanceof Halogen_Query_HalogenM.Halt) {- return Control_Monad_Error_Class.throwError(Effect_Aff.monadThrowAff)(Effect_Exception.error(v.value0));- };- if (v instanceof Halogen_Query_HalogenM.GetSlots) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value0(Data_Functor.map(Data_List_Types.functorList)(Halogen_Data_OrdBox.unOrdBox)(Data_List.fromFoldable(Data_Set.foldableSet)(Data_Map.keys(v1.children)))));- });- };- if (v instanceof Halogen_Query_HalogenM.CheckSlot) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value1(Data_Map_Internal.member(Halogen_Data_OrdBox.ordOrdBox)(v1.component.mkOrdBox(v.value0))(v1.children)));- });- };- if (v instanceof Halogen_Query_HalogenM.ChildQuery) {- return evalChildQuery(ref)(v.value0)(v.value1);- };- if (v instanceof Halogen_Query_HalogenM.Raise) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(queuingHandler(v1.handler)(v1.pendingOuts)(v.value0))(function () {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value1);- });- });- };- if (v instanceof Halogen_Query_HalogenM.Par) {- return Control_Parallel_Class.sequential(Effect_Aff.parallelAff)(Control_Applicative_Free.retractFreeAp(Effect_Aff.applicativeParAff)(Control_Applicative_Free.hoistFreeAp(function ($103) {- return Control_Parallel_Class.parallel(Effect_Aff.parallelAff)(evalM(ref)($103));- })(v.value0)));- };- if (v instanceof Halogen_Query_HalogenM.Fork) {- return Halogen_Query_ForkF.unFork(function (v1) {- return Control_Bind.bind(Effect_Aff.bindAff)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff)(evalM(ref)(v1.value0)))(function (v2) {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v1.value1(Data_Function.flip(Effect_Aff.killFiber)(v2)));- });- })(v.value0);- };- if (v instanceof Halogen_Query_HalogenM.GetRef) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value1(Data_Map_Internal.lookup(Data_Ord.ordString)(v.value0)(v1.refs)));- });- };- throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 73, column 12 - line 128, column 33: " + [ v.constructor.name ]);- };- };- var evalM = function (ref) {- return function (v) {- return Control_Monad_Free.foldFree(Effect_Aff.monadRecAff)(go(ref))(v);- };- };- var evalF = function (ref) {- return function (q) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v) {- var v1 = v["component"]["eval"](q);- return Control_Monad_Free.foldFree(Effect_Aff.monadRecAff)(go(ref))(v1);- });- };- };- var evalChildQuery = function (ref) {- return function (p) {- return Data_Coyoneda.unCoyoneda(function (k) {- return function (q) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v) {- var v1 = Data_Map_Internal.lookup(Halogen_Data_OrdBox.ordOrdBox)(v.component.mkOrdBox(p))(v.children);- if (v1 instanceof Data_Maybe.Just) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(v1.value0)))(function (v2) {- return Halogen_Aff_Driver_State.unDriverStateX(function (ds) {- var v3 = ds.prjQuery(q);- if (v3 instanceof Data_Maybe.Just) {- return Data_Functor.map(Effect_Aff.functorAff)(k)(evalF(ds.selfRef)(v3.value0));- };- if (v3 instanceof Data_Maybe.Nothing) {- return Control_Monad_Error_Class.throwError(Effect_Aff.monadThrowAff)(Effect_Exception.error("Query projection failed for child query"));- };- throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 141, column 32 - line 143, column 82: " + [ v3.constructor.name ]);- })(v2);- });- };- if (v1 instanceof Data_Maybe.Nothing) {- return Control_Monad_Error_Class.throwError(Effect_Aff.monadThrowAff)(Effect_Exception.error("Slot lookup failed for child query"));- };- throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 138, column 5 - line 144, column 73: " + [ v1.constructor.name ]);- });- };- });- };- };- return function (v) {- if (v instanceof Halogen_Query_InputF.RefUpdate) {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.modify_(function (v1) {- return {- component: v1.component,- state: v1.state,- refs: Data_Map_Internal.alter(Data_Ord.ordString)(Data_Function["const"](v.value1))(v.value0)(v1.refs),- children: v1.children,- childrenIn: v1.childrenIn,- childrenOut: v1.childrenOut,- selfRef: v1.selfRef,- handler: v1.handler,- pendingQueries: v1.pendingQueries,- pendingOuts: v1.pendingOuts,- pendingHandlers: v1.pendingHandlers,- rendering: v1.rendering,- prjQuery: v1.prjQuery,- fresh: v1.fresh,- subscriptions: v1.subscriptions,- lifecycleHandlers: v1.lifecycleHandlers- };- })(r)))(function () {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value2);- });- };- if (v instanceof Halogen_Query_InputF.Query) {- return evalF(r)(v.value0);- };- throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 59, column 3 - line 64, column 25: " + [ v.constructor.name ]);- };- };- };- exports["handleLifecycle"] = handleLifecycle;- exports["eval"] = $$eval;- exports["queuingHandler"] = queuingHandler;-})(PS["Halogen.Aff.Driver.Eval"] = PS["Halogen.Aff.Driver.Eval"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Coroutine = PS["Control.Coroutine"];- var Control_Monad_Fork_Class = PS["Control.Monad.Fork.Class"];- var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];- var Control_Parallel = PS["Control.Parallel"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_List = PS["Data.List"];- var Data_List_Types = PS["Data.List.Types"];- var Data_Map = PS["Data.Map"];- var Data_Map_Internal = PS["Data.Map.Internal"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Ord = PS["Data.Ord"];- var Data_Semiring = PS["Data.Semiring"];- var Data_Traversable = PS["Data.Traversable"];- var Data_Tuple = PS["Data.Tuple"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Aff_AVar = PS["Effect.Aff.AVar"];- var Effect_Class = PS["Effect.Class"];- var Effect_Console = PS["Effect.Console"];- var Effect_Exception = PS["Effect.Exception"];- var Effect_Ref = PS["Effect.Ref"];- var Halogen = PS["Halogen"];- var Halogen_Aff_Driver_Eval = PS["Halogen.Aff.Driver.Eval"];- var Halogen_Aff_Driver_State = PS["Halogen.Aff.Driver.State"];- var Halogen_Component = PS["Halogen.Component"];- var Halogen_Data_OrdBox = PS["Halogen.Data.OrdBox"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Prelude = PS["Prelude"]; - var newLifecycleHandlers = Effect_Ref["new"]({- initializers: Data_List_Types.Nil.value,- finalizers: Data_List_Types.Nil.value- });- var handleAff = Effect_Aff.runAff_(Data_Either.either(Effect_Exception.throwException)(Data_Function["const"](Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit))));- var runUI = function (renderSpec) {- return function (component) {- return function (i) {- var subscribe = function (fresh) {- return function (ref) {- return function (consumer) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Aff_AVar.empty)(function (v) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(function __do() {- var v1 = Effect_Ref.read(fresh)();- Effect_Ref.modify_(function (v2) {- return v2 + 1 | 0;- })(fresh)();- Effect_Ref.modify_(Data_Map_Internal.insert(Data_Ord.ordInt)(v1)(v))(ref)();- return v1;- }))(function (v1) {- var producer = Control_Coroutine.producer(Effect_Aff.monadAff)(Data_Functor.map(Effect_Aff.functorAff)(Data_Either.Left.create)(Effect_Aff_AVar.take(v)));- return Data_Functor["void"](Effect_Aff.functorAff)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff)(Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Control_Coroutine.runProcess(Effect_Aff.monadRecAff)(Control_Coroutine.connect(Effect_Aff.monadRecAff)(Effect_Aff.parallelAff)(producer)(consumer)))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.modify_(Data_Map_Internal["delete"](Data_Ord.ordInt)(v1))(ref)))(function () {- return Effect_Aff_AVar.kill(Effect_Exception.error("ended"))(v);- });- })));- });- });- };- };- };- var rootHandler = function (ref) {- return function (message) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v) {- return Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Map_Internal.foldableMap)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))(Data_Functor.map(Data_Map_Internal.functorMap)(Effect_Aff_AVar.put(message))(v));- });- };- };- var handlePending = function (ref) {- return function __do() {- var v = Effect_Ref.read(ref)();- Effect_Ref.write(Data_Maybe.Nothing.value)(ref)();- return Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(v)(function ($63) {- return handleAff(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_List_Types.foldableList)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))(Data_List.reverse($63)));- })();- };- };- var cleanupSubscriptions = function (v) {- return function __do() {- Control_Bind.bindFlipped(Effect.bindEffect)(Data_Foldable.traverse_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(function ($64) {- return handleAff(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Map_Internal.foldableMap)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))($64));- }))(Effect_Ref.read(v.subscriptions))();- return Effect_Ref.write(Data_Maybe.Nothing.value)(v.subscriptions)();- };- };- var squashChildInitializers = function (lchs) {- return function (preInits) {- return Halogen_Aff_Driver_State.unDriverStateX(function (st) {- var parentInitializer = Data_Functor.map(Data_Maybe.functorMaybe)(function ($65) {- return evalF(st.selfRef)(Halogen_Query_InputF.Query.create($65));- })(st.component.initializer);- return Effect_Ref.modify_(function (handlers) {- return {- initializers: new Data_List_Types.Cons(Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Control_Parallel.parSequence_(Effect_Aff.parallelAff)(Data_List_Types.foldableList)(Data_List.reverse(handlers.initializers)))(function () {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Foldable.sequence_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(parentInitializer))(function () {- return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(function __do() {- handlePending(st.pendingQueries)();- return handlePending(st.pendingOuts)();- });- });- }), preInits),- finalizers: handlers.finalizers- };- })(lchs);- });- };- };- var runComponent = function (lchs) {- return function (handler) {- return function (j) {- return function (prjQuery) {- return Halogen_Component.unComponent(function (c) {- return function __do() {- var v = newLifecycleHandlers();- var v1 = Halogen_Aff_Driver_State.initDriverState(c)(j)(handler)(prjQuery)(v)();- var v2 = Effect_Ref.read(lchs)();- Effect_Ref.write({- initializers: Data_List_Types.Nil.value,- finalizers: v2.finalizers- })(lchs)();- Control_Bind.bindFlipped(Effect.bindEffect)(Halogen_Aff_Driver_State.unDriverStateX(function ($66) {- return render(lchs)((function (v3) {- return v3.selfRef;- })($66));- }))(Effect_Ref.read(v1))();- Control_Bind.bindFlipped(Effect.bindEffect)(squashChildInitializers(lchs)(v2.initializers))(Effect_Ref.read(v1))();- return v1;- };- });- };- };- };- };- var renderChild = function (lchs) {- return function (handler) {- return function (mkOrdBox) {- return function (childrenInRef) {- return function (childrenOutRef) {- return Halogen_Component.unComponentSlot(function (p) {- return function (ctor) {- return function (input) {- return function (inputQuery) {- return function (outputQuery) {- return function (prjQuery) {- var ordP = mkOrdBox(p);- return function __do() {- var v = Effect_Ref.read(childrenInRef)();- var v1 = (function () {- var v1 = Data_Map_Internal.pop(Halogen_Data_OrdBox.ordOrdBox)(ordP)(v);- if (v1 instanceof Data_Maybe.Just) {- Effect_Ref.write(v1.value0.value1)(childrenInRef)();- Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(inputQuery(input))(function (q) {- return function __do() {- var v2 = Effect_Ref.read(v1.value0.value0)();- return Halogen_Aff_Driver_State.unDriverStateX(function (st) {- return Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(st.prjQuery(q))(function ($67) {- return handleAff(evalF(st.selfRef)(Halogen_Query_InputF.Query.create($67)));- });- })(v2)();- };- })();- return v1.value0.value0;- };- if (v1 instanceof Data_Maybe.Nothing) {- return runComponent(lchs)(function ($68) {- return Data_Maybe.maybe(Control_Applicative.pure(Effect_Aff.applicativeAff)(Data_Unit.unit))(handler)(outputQuery($68));- })(input)(prjQuery)(ctor)();- };- throw new Error("Failed pattern match at Halogen.Aff.Driver line 258, column 14 - line 266, column 92: " + [ v1.constructor.name ]);- })();- var v2 = Data_Functor.map(Effect.functorEffect)(Data_Map_Internal.member(Halogen_Data_OrdBox.ordOrdBox)(ordP))(Effect_Ref.read(childrenOutRef))();- Control_Applicative.when(Effect.applicativeEffect)(v2)(Effect_Console.warn("Halogen: Duplicate slot address was detected during rendering, unexpected results may occur"))();- Effect_Ref.modify_(Data_Map_Internal.insert(Halogen_Data_OrdBox.ordOrdBox)(ordP)(v1))(childrenOutRef)();- return Control_Bind.bind(Effect.bindEffect)(Effect_Ref.read(v1))(Halogen_Aff_Driver_State.renderStateX(Effect.functorEffect)(function (v3) {- if (v3 instanceof Data_Maybe.Nothing) {- return Effect_Exception["throw"]("Halogen internal error: child was not initialized in renderChild");- };- if (v3 instanceof Data_Maybe.Just) {- return Control_Applicative.pure(Effect.applicativeEffect)(renderSpec.renderChild(v3.value0));- };- throw new Error("Failed pattern match at Halogen.Aff.Driver line 271, column 37 - line 273, column 50: " + [ v3.constructor.name ]);- }))();- };- };- };- };- };- };- });- };- };- };- };- };- var render = function (lchs) {- return function ($$var) {- return function __do() {- var v = Effect_Ref.read($$var)();- var v1 = Data_Functor.map(Effect.functorEffect)(Data_Maybe.isNothing)(Effect_Ref.read(v.pendingHandlers))();- Control_Applicative.when(Effect.applicativeEffect)(v1)(Effect_Ref.write(new Data_Maybe.Just(Data_List_Types.Nil.value))(v.pendingHandlers))();- Effect_Ref.write(Data_Map_Internal.empty)(v.childrenOut)();- Effect_Ref.write(v.children)(v.childrenIn)();- var handler = Halogen_Aff_Driver_Eval.queuingHandler(function ($69) {- return Data_Functor["void"](Effect_Aff.functorAff)(evalF(v.selfRef)($69));- })(v.pendingHandlers);- var childHandler = Halogen_Aff_Driver_Eval.queuingHandler(function ($70) {- return handler(Halogen_Query_InputF.Query.create($70));- })(v.pendingQueries);- var v2 = renderSpec.render(function ($71) {- return handleAff(handler($71));- })(renderChild(lchs)(childHandler)(v.component.mkOrdBox)(v.childrenIn)(v.childrenOut))(v.component.render(v.state))(v.rendering)();- var v3 = Effect_Ref.read(v.childrenOut)();- Control_Bind.bind(Effect.bindEffect)(Effect_Ref.read(v.childrenIn))(Data_Foldable.traverse_(Effect.applicativeEffect)(Data_Map_Internal.foldableMap)(function (childVar) {- return function __do() {- var v4 = Effect_Ref.read(childVar)();- Halogen_Aff_Driver_State.renderStateX_(Effect.applicativeEffect)(renderSpec.removeChild)(v4)();- return finalize(lchs)(v4)();- };- }))();- Effect_Ref.modify_(function (v4) {- return {- rendering: new Data_Maybe.Just(v2),- children: v3,- component: v4.component,- state: v4.state,- refs: v4.refs,- childrenIn: v4.childrenIn,- childrenOut: v4.childrenOut,- selfRef: v4.selfRef,- handler: v4.handler,- pendingQueries: v4.pendingQueries,- pendingOuts: v4.pendingOuts,- pendingHandlers: v4.pendingHandlers,- prjQuery: v4.prjQuery,- fresh: v4.fresh,- subscriptions: v4.subscriptions,- lifecycleHandlers: v4.lifecycleHandlers- };- })(v.selfRef)();- return Control_Applicative.when(Effect.applicativeEffect)(v1)(Data_Function.flip(Control_Monad_Rec_Class.tailRecM(Control_Monad_Rec_Class.monadRecEffect))(Data_Unit.unit)(function (v4) {- return function __do() {- var v5 = Effect_Ref.read(v.pendingHandlers)();- Effect_Ref.write(new Data_Maybe.Just(Data_List_Types.Nil.value))(v.pendingHandlers)();- Data_Foldable.traverse_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(function ($72) {- return handleAff(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_List_Types.foldableList)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))(Data_List.reverse($72)));- })(v5)();- var v6 = Effect_Ref.read(v.pendingHandlers)();- var $57 = Data_Maybe.maybe(false)(Data_List["null"])(v6);- if ($57) {- return Data_Functor.voidLeft(Effect.functorEffect)(Effect_Ref.write(Data_Maybe.Nothing.value)(v.pendingHandlers))(new Control_Monad_Rec_Class.Done(Data_Unit.unit))();- };- return new Control_Monad_Rec_Class.Loop(Data_Unit.unit);- };- }))();- };- };- };- var finalize = function (lchs) {- return Halogen_Aff_Driver_State.unDriverStateX(function (st) {- return function __do() {- cleanupSubscriptions(st)();- Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(Data_Functor.map(Data_Maybe.functorMaybe)(function ($73) {- return evalF(st.selfRef)(Halogen_Query_InputF.Query.create($73));- })(st.component.finalizer))(function (f) {- return Effect_Ref.modify_(function (handlers) {- return {- initializers: handlers.initializers,- finalizers: new Data_List_Types.Cons(f, handlers.finalizers)- };- })(lchs);- })();- return Data_Foldable.for_(Effect.applicativeEffect)(Data_Map_Internal.foldableMap)(st.children)(Control_Bind.composeKleisliFlipped(Effect.bindEffect)(finalize(lchs))(Effect_Ref.read))();- };- });- };- var evalF = function (ref) {- return Halogen_Aff_Driver_Eval["eval"](render)(ref);- };- var evalDriver = function (ref) {- return function (prjQuery) {- return function (q) {- var v = prjQuery(q);- if (v instanceof Data_Maybe.Just) {- return evalF(ref)(new Halogen_Query_InputF.Query(v.value0));- };- if (v instanceof Data_Maybe.Nothing) {- return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Exception.throwException(Effect_Exception.error("Halogen internal error: query projection failed in runUI'")));- };- throw new Error("Failed pattern match at Halogen.Aff.Driver line 136, column 5 - line 138, column 113: " + [ v.constructor.name ]);- };- };- };- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(newLifecycleHandlers))(function (v) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref["new"](0)))(function (v1) {- return Halogen_Aff_Driver_Eval.handleLifecycle(v)(function __do() {- var v2 = Effect_Ref["new"](Data_Map_Internal.empty)();- return Control_Bind.bind(Effect.bindEffect)(Control_Bind.bind(Effect.bindEffect)(runComponent(v)(rootHandler(v2))(i)(Data_Maybe.Just.create)(component))(Effect_Ref.read))(Halogen_Aff_Driver_State.unDriverStateX(function (st) {- return Control_Applicative.pure(Effect.applicativeEffect)({- query: evalDriver(st.selfRef)(st.prjQuery),- subscribe: subscribe(v1)(v2)- });- }))();- });- });- });- };- };- };- exports["runUI"] = runUI;-})(PS["Halogen.Aff.Driver"] = PS["Halogen.Aff.Driver"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];- var Control_Semigroupoid = PS["Control.Semigroupoid"];- var Data_Either = PS["Data.Either"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Class = PS["Effect.Class"];- var Effect_Exception = PS["Effect.Exception"];- var Prelude = PS["Prelude"];- var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];- var Web_Event_EventTarget = PS["Web.Event.EventTarget"];- var Web_HTML = PS["Web.HTML"];- var Web_HTML_Event_EventTypes = PS["Web.HTML.Event.EventTypes"];- var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];- var Web_HTML_HTMLDocument_ReadyState = PS["Web.HTML.HTMLDocument.ReadyState"];- var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];- var Web_HTML_Window = PS["Web.HTML.Window"]; - var selectElement = function (query) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Control_Bind.bindFlipped(Effect.bindEffect)(Control_Bind.composeKleisliFlipped(Effect.bindEffect)(function ($12) {- return Web_DOM_ParentNode.querySelector(query)(Web_HTML_HTMLDocument.toParentNode($12));- })(Web_HTML_Window.document))(Web_HTML.window)))(function (v) {- return Control_Applicative.pure(Effect_Aff.applicativeAff)(Control_Bind.bindFlipped(Data_Maybe.bindMaybe)(Web_HTML_HTMLElement.fromElement)(v));- });- };- var runHalogenAff = Effect_Aff.runAff_(Data_Either.either(Effect_Exception.throwException)(Data_Function["const"](Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit))));- exports["selectElement"] = selectElement;- exports["runHalogenAff"] = runHalogenAff;-})(PS["Halogen.Aff.Util"] = PS["Halogen.Aff.Util"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Data_Array = PS["Data.Array"];- var Data_Eq = PS["Data.Eq"];- var Data_Function_Uncurried = PS["Data.Function.Uncurried"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Nullable = PS["Data.Nullable"];- var Data_Tuple = PS["Data.Tuple"];- var Effect = PS["Effect"];- var Effect_Uncurried = PS["Effect.Uncurried"];- var Halogen_VDom_Machine = PS["Halogen.VDom.Machine"];- var Halogen_VDom_Types = PS["Halogen.VDom.Types"];- var Halogen_VDom_Util = PS["Halogen.VDom.Util"];- var Prelude = PS["Prelude"];- var Web_DOM_Document = PS["Web.DOM.Document"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_DOM_Node = PS["Web.DOM.Node"];- var eqElemSpec = function (a, b) {- if (a.value1 === b.value1) {- if (a.value0 instanceof Data_Maybe.Just && (b.value0 instanceof Data_Maybe.Just && a.value0.value0 === b.value0.value0)) {- return true;- };- if (a.value0 instanceof Data_Maybe.Nothing && b.value0 instanceof Data_Maybe.Nothing) {- return true;- };- return false;- };- return false;- };- var buildWidget = (function () {- var patch = function (build, v) {- return function (v1) {- if (v1 instanceof Halogen_VDom_Types.Grafted) {- return patch(build, v)(Halogen_VDom_Types.runGraft(v1.value0));- };- if (v1 instanceof Halogen_VDom_Types.Widget) {- var v2 = v.value1(v1.value0);- return new Halogen_VDom_Machine.Step(v2.value0, patch(build, v2), v2.value2);- };- v.value2();- return build(v1);- };- };- var render = function (v, build, w) {- var v1 = v.buildWidget(v)(w);- return new Halogen_VDom_Machine.Step(v1.value0, patch(build, v1), v1.value2);- };- return render;- })();- var buildText = (function () {- var patch = function (build, halt, node, s1) {- return function (v) {- if (v instanceof Halogen_VDom_Types.Grafted) {- return patch(build, halt, node, s1)(Halogen_VDom_Types.runGraft(v.value0));- };- if (v instanceof Halogen_VDom_Types.Text) {- var res = new Halogen_VDom_Machine.Step(node, patch(build, halt, node, v.value0), halt);- var $84 = s1 === v.value0;- if ($84) {- return res;- };- Halogen_VDom_Util.setTextContent(v.value0, node);- return res;- };- halt();- return build(v);- };- };- var done = function (node) {- return function __do() {- var v = Halogen_VDom_Util.parentNode(node);- return Halogen_VDom_Util.removeChild(node, v);- };- };- var render = function (v, build, s) {- var v1 = Halogen_VDom_Util.createTextNode(s, v.document);- var halt = done(v1);- return new Halogen_VDom_Machine.Step(v1, patch(build, halt, v1, s), halt);- };- return render;- })();- var buildKeyed = (function () {- var done = function (node, attrs, steps) {- return function __do() {- var v = Halogen_VDom_Util.parentNode(node);- Halogen_VDom_Util.removeChild(node, v);- Halogen_VDom_Util.forInE(steps, function (v1, v2) {- return v2.value2();- });- return Halogen_VDom_Machine.halt(attrs)();- };- };- var patch = function (build, halt, node, attrs, v, ch1, len1) {- return function (v1) {- if (v1 instanceof Halogen_VDom_Types.Grafted) {- return patch(build, halt, node, attrs, v, ch1, len1)(Halogen_VDom_Types.runGraft(v1.value0));- };- if (v1 instanceof Halogen_VDom_Types.Keyed && eqElemSpec(v, v1.value0)) {- var v2 = Data_Array.length(v1.value1);- if (len1 === 0 && v2 === 0) {- var v4 = Halogen_VDom_Machine.step(attrs)(v1.value0.value2);- var halt$prime = done(node, v4, ch1);- return new Halogen_VDom_Machine.Step(node, patch(build, halt$prime, node, v4, v1.value0, ch1, 0), halt$prime);- };- var onThis = function (v4, v5) {- return v5.value2();- };- var onThese = function (v4, ix$prime, v5, v6) {- var v7 = v5.value1(v6.value1);- Halogen_VDom_Util.insertChildIx(ix$prime, v7.value0, node);- return v7;- };- var onThat = function (v4, ix, v5) {- var v6 = build(v5.value1);- Halogen_VDom_Util.insertChildIx(ix, v6.value0, node);- return v6;- };- var v4 = Halogen_VDom_Util.diffWithKeyAndIxE(ch1, v1.value1, Data_Tuple.fst, onThese, onThis, onThat);- var v5 = Halogen_VDom_Machine.step(attrs)(v1.value0.value2);- var halt$prime = done(node, v5, v4);- return new Halogen_VDom_Machine.Step(node, patch(build, halt$prime, node, v5, v1.value0, v4, v2), halt$prime);- };- halt();- return build(v1);- };- };- var render = function (v, build, v1, ch1) {- var v2 = Halogen_VDom_Util.createElement(Data_Nullable.toNullable(v1.value0), v1.value1, v.document);- var node = Web_DOM_Element.toNode(v2);- var onChild = function (k, ix, v3) {- var v4 = build(v3.value1);- Halogen_VDom_Util.insertChildIx(ix, v4.value0, node);- return v4;- };- var v3 = Halogen_VDom_Util.strMapWithIxE(ch1, Data_Tuple.fst, onChild);- var v4 = v.buildAttributes(v2)(v1.value2);- var halt = done(node, v4, v3);- return new Halogen_VDom_Machine.Step(node, patch(build, halt, node, v4, v1, v3, Data_Array.length(ch1)), halt);- };- return render;- })();- var buildElem = (function () {- var done = function (node, attrs, steps) {- return function __do() {- var v = Halogen_VDom_Util.parentNode(node);- Halogen_VDom_Util.removeChild(node, v);- Effect.foreachE(steps)(Halogen_VDom_Machine.halt)();- return Halogen_VDom_Machine.halt(attrs)();- };- };- var patch = function (build, halt, node, attrs, v, ch1) {- return function (v1) {- if (v1 instanceof Halogen_VDom_Types.Grafted) {- return patch(build, halt, node, attrs, v, ch1)(Halogen_VDom_Types.runGraft(v1.value0));- };- if (v1 instanceof Halogen_VDom_Types.Elem && eqElemSpec(v, v1.value0)) {- var v2 = Data_Array.length(v1.value1);- var v3 = Data_Array.length(ch1);- if (v3 === 0 && v2 === 0) {- var v4 = Halogen_VDom_Machine.step(attrs)(v1.value0.value2);- var halt$prime = done(node, v4, ch1);- return new Halogen_VDom_Machine.Step(node, patch(build, halt$prime, node, v4, v1.value0, ch1), halt$prime);- };- var onThis = function (ix, v4) {- return v4.value2();- };- var onThese = function (ix, v4, vdom) {- var v5 = v4.value1(vdom);- Halogen_VDom_Util.insertChildIx(ix, v5.value0, node);- return v5;- };- var onThat = function (ix, vdom) {- var v4 = build(vdom);- Halogen_VDom_Util.insertChildIx(ix, v4.value0, node);- return v4;- };- var v4 = Halogen_VDom_Util.diffWithIxE(ch1, v1.value1, onThese, onThis, onThat);- var v5 = Halogen_VDom_Machine.step(attrs)(v1.value0.value2);- var halt$prime = done(node, v5, v4);- return new Halogen_VDom_Machine.Step(node, patch(build, halt$prime, node, v5, v1.value0, v4), halt$prime);- };- halt();- return build(v1);- };- };- var render = function (v, build, v1, ch1) {- var v2 = Halogen_VDom_Util.createElement(Data_Nullable.toNullable(v1.value0), v1.value1, v.document);- var node = Web_DOM_Element.toNode(v2);- var onChild = function (ix, child) {- var v3 = build(child);- Halogen_VDom_Util.insertChildIx(ix, v3.value0, node);- return v3;- };- var v3 = Halogen_VDom_Util.forE(ch1, onChild);- var v4 = v.buildAttributes(v2)(v1.value2);- var halt = done(node, v4, v3);- return new Halogen_VDom_Machine.Step(node, patch(build, halt, node, v4, v1, v3), halt);- };- return render;- })();- var buildVDom = function (spec) {- var build = function (v) {- if (v instanceof Halogen_VDom_Types.Text) {- return buildText(spec, build, v.value0);- };- if (v instanceof Halogen_VDom_Types.Elem) {- return buildElem(spec, build, v.value0, v.value1);- };- if (v instanceof Halogen_VDom_Types.Keyed) {- return buildKeyed(spec, build, v.value0, v.value1);- };- if (v instanceof Halogen_VDom_Types.Widget) {- return buildWidget(spec, build, v.value0);- };- if (v instanceof Halogen_VDom_Types.Grafted) {- return build(Halogen_VDom_Types.runGraft(v.value0));- };- throw new Error("Failed pattern match at Halogen.VDom.DOM line 58, column 27 - line 63, column 52: " + [ v.constructor.name ]);- };- return build;- };- exports["buildVDom"] = buildVDom;- exports["buildText"] = buildText;- exports["buildElem"] = buildElem;- exports["buildKeyed"] = buildKeyed;- exports["buildWidget"] = buildWidget;-})(PS["Halogen.VDom.DOM"] = PS["Halogen.VDom.DOM"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Control_Bind = PS["Control.Bind"];- var Control_Category = PS["Control.Category"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];- var Data_Maybe = PS["Data.Maybe"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Class = PS["Effect.Class"];- var Effect_Ref = PS["Effect.Ref"];- var Effect_Uncurried = PS["Effect.Uncurried"];- var Halogen_Aff_Driver = PS["Halogen.Aff.Driver"];- var Halogen_Aff_Driver_State = PS["Halogen.Aff.Driver.State"];- var Halogen_Component = PS["Halogen.Component"];- var Halogen_HTML_Core = PS["Halogen.HTML.Core"];- var Halogen_Query_InputF = PS["Halogen.Query.InputF"];- var Halogen_VDom = PS["Halogen.VDom"];- var Halogen_VDom_DOM = PS["Halogen.VDom.DOM"];- var Halogen_VDom_DOM_Prop = PS["Halogen.VDom.DOM.Prop"];- var Halogen_VDom_Machine = PS["Halogen.VDom.Machine"];- var Prelude = PS["Prelude"];- var Unsafe_Reference = PS["Unsafe.Reference"];- var Web_DOM_Document = PS["Web.DOM.Document"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_DOM_Node = PS["Web.DOM.Node"];- var Web_HTML = PS["Web.HTML"];- var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];- var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];- var Web_HTML_Window = PS["Web.HTML.Window"];- var substInParent = function (v) {- return function (v1) {- return function (v2) {- if (v1 instanceof Data_Maybe.Just && v2 instanceof Data_Maybe.Just) {- return Data_Functor["void"](Effect.functorEffect)(Web_DOM_Node.insertBefore(v)(v1.value0)(v2.value0));- };- if (v1 instanceof Data_Maybe.Nothing && v2 instanceof Data_Maybe.Just) {- return Data_Functor["void"](Effect.functorEffect)(Web_DOM_Node.appendChild(v)(v2.value0));- };- return Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit);- };- };- };- var removeChild = function (v) {- return function __do() {- var v1 = Web_DOM_Node.parentNode(v.node)();- return Data_Foldable.traverse_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(function (pn) {- return Web_DOM_Node.removeChild(v.node)(pn);- })(v1)();- };- };- var mkSpec = function (handler) {- return function (renderChildRef) {- return function (document) {- var getNode = Halogen_Aff_Driver_State.unRenderStateX(function (v) {- return v.node;- });- var done = Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit);- var patch = function (slot) {- var v = Effect_Ref.read(renderChildRef)();- var v1 = v(slot)();- var node = getNode(v1);- return new Halogen_VDom_Machine.Step(node, patch, done);- };- var buildWidget = function (spec) {- return function (slot) {- var v = Effect_Ref.read(renderChildRef)();- var v1 = v(slot)();- var node = getNode(v1);- return new Halogen_VDom_Machine.Step(node, patch, done);- };- };- var buildAttributes = Halogen_VDom_DOM_Prop.buildProp(handler);- return {- buildWidget: buildWidget,- buildAttributes: buildAttributes,- document: document- };- };- };- };- var renderSpec = function (document) {- return function (container) {- var render = function (handler) {- return function (child) {- return function (v) {- return function (v1) {- if (v1 instanceof Data_Maybe.Nothing) {- return function __do() {- var v2 = Effect_Ref["new"](child)();- var spec = mkSpec(handler)(v2)(document);- var v3 = Halogen_VDom_DOM.buildVDom(spec)(v);- var node = Halogen_VDom_Machine.extract(v3);- Data_Functor["void"](Effect.functorEffect)(Web_DOM_Node.appendChild(node)(Web_HTML_HTMLElement.toNode(container)))();- return {- machine: v3,- node: node,- renderChildRef: v2- };- };- };- if (v1 instanceof Data_Maybe.Just) {- return function __do() {- Effect_Ref.write(child)(v1.value0.renderChildRef)();- var v2 = Web_DOM_Node.parentNode(v1.value0.node)();- var v3 = Web_DOM_Node.nextSibling(v1.value0.node)();- var v4 = Halogen_VDom_Machine.step(v1.value0.machine)(v);- var newNode = Halogen_VDom_Machine.extract(v4);- Control_Applicative.when(Effect.applicativeEffect)(Data_HeytingAlgebra.not(Data_HeytingAlgebra.heytingAlgebraFunction(Data_HeytingAlgebra.heytingAlgebraFunction(Data_HeytingAlgebra.heytingAlgebraBoolean)))(Unsafe_Reference.unsafeRefEq)(v1.value0.node)(newNode))(substInParent(newNode)(v3)(v2))();- return {- machine: v4,- node: newNode,- renderChildRef: v1.value0.renderChildRef- };- };- };- throw new Error("Failed pattern match at Halogen.VDom.Driver line 118, column 5 - line 134, column 80: " + [ v1.constructor.name ]);- };- };- };- };- return {- render: render,- renderChild: Control_Category.identity(Control_Category.categoryFn),- removeChild: removeChild- };- };- };- var runUI = function (component) {- return function (i) {- return function (element) {- return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Data_Functor.map(Effect.functorEffect)(Web_HTML_HTMLDocument.toDocument)(Control_Bind.bindFlipped(Effect.bindEffect)(Web_HTML_Window.document)(Web_HTML.window))))(function (v) {- return Halogen_Aff_Driver.runUI(renderSpec(v)(element))(component)(i);- });- };- };- };- exports["runUI"] = runUI;-})(PS["Halogen.VDom.Driver"] = PS["Halogen.VDom.Driver"] || {});-(function(exports) {- "use strict";- var Control_Applicative = PS["Control.Applicative"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Prelude = PS["Prelude"]; - var main = Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit);- exports["main"] = main;-})(PS["Main"] = PS["Main"] || {});-(function(exports) {- // Generated by purs version 0.12.0- "use strict";- var Component_Add = PS["Component.Add"];- var Component_BList = PS["Component.BList"];- var Component_NList = PS["Component.NList"];- var Control_Bind = PS["Control.Bind"];- var Data_Foldable = PS["Data.Foldable"];- var Data_Function = PS["Data.Function"];- var Data_Functor = PS["Data.Functor"];- var Data_Unit = PS["Data.Unit"];- var Effect = PS["Effect"];- var Effect_Aff = PS["Effect.Aff"];- var Effect_Class = PS["Effect.Class"];- var Halogen_Aff = PS["Halogen.Aff"];- var Halogen_Aff_Util = PS["Halogen.Aff.Util"];- var Halogen_VDom_Driver = PS["Halogen.VDom.Driver"];- var Model = PS["Model"];- var Prelude = PS["Prelude"];- var Web_DOM_Element = PS["Web.DOM.Element"];- var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];- var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"]; - var showFooter = Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(".user_footer"))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {- return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Web_DOM_Element.removeAttribute("hidden")(Web_HTML_HTMLElement.toElement(el)));- }));- var renderNotes = function (renderElSelector) {- return function (notes) {- return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Functor["void"](Effect_Aff.functorAff)(Halogen_VDom_Driver.runUI(Component_NList.nlist(notes))(Data_Unit.unit)(el)))(function () {- return showFooter;- });- })));- };- };- var renderNote = function (renderElSelector) {- return function (note) {- return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {- return Data_Functor["void"](Effect_Aff.functorAff)(Halogen_VDom_Driver.runUI(Component_NList.nnote(note))(Data_Unit.unit)(el));- })));- };- };- var renderBookmarks = function (renderElSelector) {- return function (bmarks) {- return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {- return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Functor["void"](Effect_Aff.functorAff)(Halogen_VDom_Driver.runUI(Component_BList.blist(bmarks))(Data_Unit.unit)(el)))(function () {- return showFooter;- });- })));- };- };- var renderAddForm = function (renderElSelector) {- return function (bmark) {- return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {- return Halogen_VDom_Driver.runUI(Component_Add.addbmark(bmark))(Data_Unit.unit)(el);- })));- };- };- exports["renderBookmarks"] = renderBookmarks;- exports["renderAddForm"] = renderAddForm;- exports["renderNotes"] = renderNotes;- exports["renderNote"] = renderNote;- exports["showFooter"] = showFooter;-})(PS["User"] = PS["User"] || {});+// Generated by purs bundle 0.12.2+var PS = {};+(function(exports) {+ /* global exports */+ /* global XMLHttpRequest */+ /* global module */+ /* global process */+ "use strict";++ exports._ajax = function () {+ var platformSpecific = { };+ if (typeof module !== "undefined" && module.require && !(typeof process !== "undefined" && process.versions["electron"])) {+ // We are on node.js+ platformSpecific.newXHR = function () {+ var XHR = module.require("xhr2");+ return new XHR();+ };++ platformSpecific.fixupUrl = function (url) {+ var urllib = module.require("url");+ var u = urllib.parse(url);+ u.protocol = u.protocol || "http:";+ u.hostname = u.hostname || "localhost";+ return urllib.format(u);+ };++ platformSpecific.getResponse = function (xhr) {+ return xhr.response;+ };+ } else {+ // We are in the browser+ platformSpecific.newXHR = function () {+ return new XMLHttpRequest();+ };++ platformSpecific.fixupUrl = function (url) {+ return url || "/";+ };++ platformSpecific.getResponse = function (xhr) {+ return xhr.response;+ };+ }++ return function (mkHeader, options) {+ return function (errback, callback) {+ var xhr = platformSpecific.newXHR();+ var fixedUrl = platformSpecific.fixupUrl(options.url);+ xhr.open(options.method || "GET", fixedUrl, true, options.username, options.password);+ if (options.headers) {+ try {+ for (var i = 0, header; (header = options.headers[i]) != null; i++) {+ xhr.setRequestHeader(header.field, header.value);+ }+ } catch (e) {+ errback(e);+ }+ }+ xhr.onerror = function () {+ errback(new Error("AJAX request failed: " + options.method + " " + options.url));+ };+ xhr.onload = function () {+ callback({+ status: xhr.status,+ statusText: xhr.statusText,+ headers: xhr.getAllResponseHeaders().split("\r\n")+ .filter(function (header) {+ return header.length > 0;+ })+ .map(function (header) {+ var i = header.indexOf(":");+ return mkHeader(header.substring(0, i))(header.substring(i + 2));+ }),+ body: platformSpecific.getResponse(xhr)+ });+ };+ xhr.responseType = options.responseType;+ xhr.withCredentials = options.withCredentials;+ xhr.send(options.content);++ return function (error, cancelErrback, cancelCallback) {+ try {+ xhr.abort();+ } catch (e) {+ return cancelErrback(e);+ }+ return cancelCallback();+ };+ };+ };+ }();+})(PS["Affjax"] = PS["Affjax"] || {});+(function(exports) {+ "use strict";++ function id(x) {+ return x;+ } + exports.fromObject = id;++ exports.stringify = function (j) {+ return JSON.stringify(j);+ }; ++ function isArray(a) {+ return objToString.call(a) === "[object Array]";+ }+})(PS["Data.Argonaut.Core"] = PS["Data.Argonaut.Core"] || {});+(function(exports) {+ "use strict";++ exports.refEq = function (r1) {+ return function (r2) {+ return r1 === r2;+ };+ };+})(PS["Data.Eq"] = PS["Data.Eq"] || {});+(function(exports) {+ "use strict";++ exports.boolConj = function (b1) {+ return function (b2) {+ return b1 && b2;+ };+ };++ exports.boolDisj = function (b1) {+ return function (b2) {+ return b1 || b2;+ };+ };++ exports.boolNot = function (b) {+ return !b;+ };+})(PS["Data.HeytingAlgebra"] = PS["Data.HeytingAlgebra"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Symbol"]; + var SProxy = (function () {+ function SProxy() {++ };+ SProxy.value = new SProxy();+ return SProxy;+ })();+ var IsSymbol = function (reflectSymbol) {+ this.reflectSymbol = reflectSymbol;+ };+ var reflectSymbol = function (dict) {+ return dict.reflectSymbol;+ };+ exports["IsSymbol"] = IsSymbol;+ exports["reflectSymbol"] = reflectSymbol;+ exports["SProxy"] = SProxy;+})(PS["Data.Symbol"] = PS["Data.Symbol"] || {});+(function(exports) {+ "use strict";++ exports.unit = {};+})(PS["Data.Unit"] = PS["Data.Unit"] || {});+(function(exports) {+ "use strict";++ exports.showIntImpl = function (n) {+ return n.toString();+ };+})(PS["Data.Show"] = PS["Data.Show"] || {});+(function(exports) {+ "use strict";++ exports.unsafeGet = function (label) {+ return function (rec) {+ return rec[label];+ };+ };+})(PS["Record.Unsafe"] = PS["Record.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Record.Unsafe"];+ exports["unsafeGet"] = $foreign.unsafeGet;+})(PS["Record.Unsafe"] = PS["Record.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Show"];+ var Data_Symbol = PS["Data.Symbol"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Type_Data_RowList = PS["Type.Data.RowList"]; + var Show = function (show) {+ this.show = show;+ }; + var showInt = new Show($foreign.showIntImpl);+ var show = function (dict) {+ return dict.show;+ };+ exports["Show"] = Show;+ exports["show"] = show;+ exports["showInt"] = showInt;+})(PS["Data.Show"] = PS["Data.Show"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Unit"];+ var Data_Show = PS["Data.Show"];+ exports["unit"] = $foreign.unit;+})(PS["Data.Unit"] = PS["Data.Unit"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.HeytingAlgebra"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Unit = PS["Data.Unit"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Type_Data_Row = PS["Type.Data.Row"];+ var Type_Data_RowList = PS["Type.Data.RowList"]; + var HeytingAlgebra = function (conj, disj, ff, implies, not, tt) {+ this.conj = conj;+ this.disj = disj;+ this.ff = ff;+ this.implies = implies;+ this.not = not;+ this.tt = tt;+ };+ var tt = function (dict) {+ return dict.tt;+ };+ var not = function (dict) {+ return dict.not;+ };+ var implies = function (dict) {+ return dict.implies;+ };+ var ff = function (dict) {+ return dict.ff;+ };+ var disj = function (dict) {+ return dict.disj;+ };+ var heytingAlgebraBoolean = new HeytingAlgebra($foreign.boolConj, $foreign.boolDisj, false, function (a) {+ return function (b) {+ return disj(heytingAlgebraBoolean)(not(heytingAlgebraBoolean)(a))(b);+ };+ }, $foreign.boolNot, true);+ var conj = function (dict) {+ return dict.conj;+ };+ var heytingAlgebraFunction = function (dictHeytingAlgebra) {+ return new HeytingAlgebra(function (f) {+ return function (g) {+ return function (a) {+ return conj(dictHeytingAlgebra)(f(a))(g(a));+ };+ };+ }, function (f) {+ return function (g) {+ return function (a) {+ return disj(dictHeytingAlgebra)(f(a))(g(a));+ };+ };+ }, function (v) {+ return ff(dictHeytingAlgebra);+ }, function (f) {+ return function (g) {+ return function (a) {+ return implies(dictHeytingAlgebra)(f(a))(g(a));+ };+ };+ }, function (f) {+ return function (a) {+ return not(dictHeytingAlgebra)(f(a));+ };+ }, function (v) {+ return tt(dictHeytingAlgebra);+ });+ };+ exports["HeytingAlgebra"] = HeytingAlgebra;+ exports["tt"] = tt;+ exports["ff"] = ff;+ exports["implies"] = implies;+ exports["conj"] = conj;+ exports["disj"] = disj;+ exports["not"] = not;+ exports["heytingAlgebraBoolean"] = heytingAlgebraBoolean;+ exports["heytingAlgebraFunction"] = heytingAlgebraFunction;+})(PS["Data.HeytingAlgebra"] = PS["Data.HeytingAlgebra"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Show = PS["Data.Show"];+ var absurd = function (a) {+ var spin = function ($copy_v) {+ var $tco_result;+ function $tco_loop(v) {+ $copy_v = v;+ return;+ };+ while (!false) {+ $tco_result = $tco_loop($copy_v);+ };+ return $tco_result;+ };+ return spin(a);+ };+ exports["absurd"] = absurd;+})(PS["Data.Void"] = PS["Data.Void"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Eq"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Unit = PS["Data.Unit"];+ var Data_Void = PS["Data.Void"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Type_Data_RowList = PS["Type.Data.RowList"]; + var Eq = function (eq) {+ this.eq = eq;+ };+ var eqVoid = new Eq(function (v) {+ return function (v1) {+ return true;+ };+ });+ var eqUnit = new Eq(function (v) {+ return function (v1) {+ return true;+ };+ });+ var eqString = new Eq($foreign.refEq);+ var eqInt = new Eq($foreign.refEq);+ var eqChar = new Eq($foreign.refEq);+ var eq = function (dict) {+ return dict.eq;+ };+ exports["Eq"] = Eq;+ exports["eq"] = eq;+ exports["eqInt"] = eqInt;+ exports["eqChar"] = eqChar;+ exports["eqString"] = eqString;+ exports["eqUnit"] = eqUnit;+ exports["eqVoid"] = eqVoid;+})(PS["Data.Eq"] = PS["Data.Eq"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Semigroupoid = function (compose) {+ this.compose = compose;+ };+ var semigroupoidFn = new Semigroupoid(function (f) {+ return function (g) {+ return function (x) {+ return f(g(x));+ };+ };+ });+ var compose = function (dict) {+ return dict.compose;+ };+ exports["compose"] = compose;+ exports["Semigroupoid"] = Semigroupoid;+ exports["semigroupoidFn"] = semigroupoidFn;+})(PS["Control.Semigroupoid"] = PS["Control.Semigroupoid"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Semigroupoid = PS["Control.Semigroupoid"]; + var Category = function (Semigroupoid0, identity) {+ this.Semigroupoid0 = Semigroupoid0;+ this.identity = identity;+ };+ var identity = function (dict) {+ return dict.identity;+ };+ var categoryFn = new Category(function () {+ return Control_Semigroupoid.semigroupoidFn;+ }, function (x) {+ return x;+ });+ exports["Category"] = Category;+ exports["identity"] = identity;+ exports["categoryFn"] = categoryFn;+})(PS["Control.Category"] = PS["Control.Category"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var otherwise = true;+ exports["otherwise"] = otherwise;+})(PS["Data.Boolean"] = PS["Data.Boolean"] || {});+(function(exports) {+ "use strict";++ exports.unsafeCompareImpl = function (lt) {+ return function (eq) {+ return function (gt) {+ return function (x) {+ return function (y) {+ return x < y ? lt : x === y ? eq : gt;+ };+ };+ };+ };+ };+})(PS["Data.Ord.Unsafe"] = PS["Data.Ord.Unsafe"] || {});+(function(exports) {+ "use strict";++ exports.concatString = function (s1) {+ return function (s2) {+ return s1 + s2;+ };+ };++ exports.concatArray = function (xs) {+ return function (ys) {+ if (xs.length === 0) return ys;+ if (ys.length === 0) return xs;+ return xs.concat(ys);+ };+ };+})(PS["Data.Semigroup"] = PS["Data.Semigroup"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Semigroup"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Unit = PS["Data.Unit"];+ var Data_Void = PS["Data.Void"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Type_Data_RowList = PS["Type.Data.RowList"]; + var Semigroup = function (append) {+ this.append = append;+ }; + var semigroupString = new Semigroup($foreign.concatString);+ var semigroupArray = new Semigroup($foreign.concatArray);+ var append = function (dict) {+ return dict.append;+ };+ var semigroupFn = function (dictSemigroup) {+ return new Semigroup(function (f) {+ return function (g) {+ return function (x) {+ return append(dictSemigroup)(f(x))(g(x));+ };+ };+ });+ };+ exports["Semigroup"] = Semigroup;+ exports["append"] = append;+ exports["semigroupString"] = semigroupString;+ exports["semigroupFn"] = semigroupFn;+ exports["semigroupArray"] = semigroupArray;+})(PS["Data.Semigroup"] = PS["Data.Semigroup"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Eq = PS["Data.Eq"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"]; + var LT = (function () {+ function LT() {++ };+ LT.value = new LT();+ return LT;+ })();+ var GT = (function () {+ function GT() {++ };+ GT.value = new GT();+ return GT;+ })();+ var EQ = (function () {+ function EQ() {++ };+ EQ.value = new EQ();+ return EQ;+ })();+ exports["LT"] = LT;+ exports["GT"] = GT;+ exports["EQ"] = EQ;+})(PS["Data.Ordering"] = PS["Data.Ordering"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Ord.Unsafe"];+ var Data_Ordering = PS["Data.Ordering"]; + var unsafeCompare = $foreign.unsafeCompareImpl(Data_Ordering.LT.value)(Data_Ordering.EQ.value)(Data_Ordering.GT.value);+ exports["unsafeCompare"] = unsafeCompare;+})(PS["Data.Ord.Unsafe"] = PS["Data.Ord.Unsafe"] || {});+(function(exports) {+ "use strict";++ exports.intSub = function (x) {+ return function (y) {+ /* jshint bitwise: false */+ return x - y | 0;+ };+ };+})(PS["Data.Ring"] = PS["Data.Ring"] || {});+(function(exports) {+ "use strict";++ exports.intAdd = function (x) {+ return function (y) {+ /* jshint bitwise: false */+ return x + y | 0;+ };+ };++ exports.intMul = function (x) {+ return function (y) {+ /* jshint bitwise: false */+ return x * y | 0;+ };+ };+})(PS["Data.Semiring"] = PS["Data.Semiring"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Semiring"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Unit = PS["Data.Unit"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Type_Data_Row = PS["Type.Data.Row"];+ var Type_Data_RowList = PS["Type.Data.RowList"]; + var Semiring = function (add, mul, one, zero) {+ this.add = add;+ this.mul = mul;+ this.one = one;+ this.zero = zero;+ };+ var zero = function (dict) {+ return dict.zero;+ }; + var semiringInt = new Semiring($foreign.intAdd, $foreign.intMul, 1, 0);+ var one = function (dict) {+ return dict.one;+ };+ var mul = function (dict) {+ return dict.mul;+ };+ var add = function (dict) {+ return dict.add;+ };+ exports["Semiring"] = Semiring;+ exports["add"] = add;+ exports["zero"] = zero;+ exports["mul"] = mul;+ exports["one"] = one;+ exports["semiringInt"] = semiringInt;+})(PS["Data.Semiring"] = PS["Data.Semiring"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Ring"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Unit = PS["Data.Unit"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Type_Data_RowList = PS["Type.Data.RowList"]; + var Ring = function (Semiring0, sub) {+ this.Semiring0 = Semiring0;+ this.sub = sub;+ };+ var sub = function (dict) {+ return dict.sub;+ }; + var ringInt = new Ring(function () {+ return Data_Semiring.semiringInt;+ }, $foreign.intSub);+ exports["Ring"] = Ring;+ exports["sub"] = sub;+ exports["ringInt"] = ringInt;+})(PS["Data.Ring"] = PS["Data.Ring"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Ord"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Ord_Unsafe = PS["Data.Ord.Unsafe"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Unit = PS["Data.Unit"];+ var Data_Void = PS["Data.Void"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Type_Data_RowList = PS["Type.Data.RowList"]; + var Ord = function (Eq0, compare) {+ this.Eq0 = Eq0;+ this.compare = compare;+ };+ var ordVoid = new Ord(function () {+ return Data_Eq.eqVoid;+ }, function (v) {+ return function (v1) {+ return Data_Ordering.EQ.value;+ };+ });+ var ordUnit = new Ord(function () {+ return Data_Eq.eqUnit;+ }, function (v) {+ return function (v1) {+ return Data_Ordering.EQ.value;+ };+ });+ var ordString = new Ord(function () {+ return Data_Eq.eqString;+ }, Data_Ord_Unsafe.unsafeCompare);+ var ordInt = new Ord(function () {+ return Data_Eq.eqInt;+ }, Data_Ord_Unsafe.unsafeCompare);+ var ordChar = new Ord(function () {+ return Data_Eq.eqChar;+ }, Data_Ord_Unsafe.unsafeCompare);+ var compare = function (dict) {+ return dict.compare;+ };+ exports["Ord"] = Ord;+ exports["compare"] = compare;+ exports["ordInt"] = ordInt;+ exports["ordString"] = ordString;+ exports["ordChar"] = ordChar;+ exports["ordUnit"] = ordUnit;+ exports["ordVoid"] = ordVoid;+})(PS["Data.Ord"] = PS["Data.Ord"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ring = PS["Data.Ring"]; + var on = function (f) {+ return function (g) {+ return function (x) {+ return function (y) {+ return f(g(x))(g(y));+ };+ };+ };+ };+ var flip = function (f) {+ return function (b) {+ return function (a) {+ return f(a)(b);+ };+ };+ };+ var $$const = function (a) {+ return function (v) {+ return a;+ };+ };+ exports["flip"] = flip;+ exports["const"] = $$const;+ exports["on"] = on;+})(PS["Data.Function"] = PS["Data.Function"] || {});+(function(exports) {+ "use strict";++ exports.runFn4 = function (fn) {+ return function (a) {+ return function (b) {+ return function (c) {+ return function (d) {+ return fn(a, b, c, d);+ };+ };+ };+ };+ };+})(PS["Data.Function.Uncurried"] = PS["Data.Function.Uncurried"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Function.Uncurried"];+ var Data_Unit = PS["Data.Unit"];+ exports["runFn4"] = $foreign.runFn4;+})(PS["Data.Function.Uncurried"] = PS["Data.Function.Uncurried"] || {});+(function(exports) {+ "use strict";++ exports.arrayMap = function (f) {+ return function (arr) {+ var l = arr.length;+ var result = new Array(l);+ for (var i = 0; i < l; i++) {+ result[i] = f(arr[i]);+ }+ return result;+ };+ };+})(PS["Data.Functor"] = PS["Data.Functor"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Functor"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Function = PS["Data.Function"];+ var Data_Unit = PS["Data.Unit"]; + var Functor = function (map) {+ this.map = map;+ };+ var map = function (dict) {+ return dict.map;+ };+ var $$void = function (dictFunctor) {+ return map(dictFunctor)(Data_Function["const"](Data_Unit.unit));+ };+ var voidLeft = function (dictFunctor) {+ return function (f) {+ return function (x) {+ return map(dictFunctor)(Data_Function["const"](x))(f);+ };+ };+ };+ var functorFn = new Functor(Control_Semigroupoid.compose(Control_Semigroupoid.semigroupoidFn));+ var functorArray = new Functor($foreign.arrayMap);+ exports["Functor"] = Functor;+ exports["map"] = map;+ exports["void"] = $$void;+ exports["voidLeft"] = voidLeft;+ exports["functorFn"] = functorFn;+ exports["functorArray"] = functorArray;+})(PS["Data.Functor"] = PS["Data.Functor"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Functor = PS["Data.Functor"];+ var Data_Semigroup = PS["Data.Semigroup"]; + var Alt = function (Functor0, alt) {+ this.Functor0 = Functor0;+ this.alt = alt;+ }; + var alt = function (dict) {+ return dict.alt;+ };+ exports["Alt"] = Alt;+ exports["alt"] = alt;+})(PS["Control.Alt"] = PS["Control.Alt"] || {});+(function(exports) {+ "use strict";++ exports.arrayApply = function (fs) {+ return function (xs) {+ var l = fs.length;+ var k = xs.length;+ var result = new Array(l*k);+ var n = 0;+ for (var i = 0; i < l; i++) {+ var f = fs[i];+ for (var j = 0; j < k; j++) {+ result[n++] = f(xs[j]);+ }+ }+ return result;+ };+ };+})(PS["Control.Apply"] = PS["Control.Apply"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Control.Apply"];+ var Control_Category = PS["Control.Category"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"]; + var Apply = function (Functor0, apply) {+ this.Functor0 = Functor0;+ this.apply = apply;+ }; + var applyArray = new Apply(function () {+ return Data_Functor.functorArray;+ }, $foreign.arrayApply);+ var apply = function (dict) {+ return dict.apply;+ };+ var applySecond = function (dictApply) {+ return function (a) {+ return function (b) {+ return apply(dictApply)(Data_Functor.map(dictApply.Functor0())(Data_Function["const"](Control_Category.identity(Control_Category.categoryFn)))(a))(b);+ };+ };+ };+ var lift2 = function (dictApply) {+ return function (f) {+ return function (a) {+ return function (b) {+ return apply(dictApply)(Data_Functor.map(dictApply.Functor0())(f)(a))(b);+ };+ };+ };+ };+ exports["Apply"] = Apply;+ exports["apply"] = apply;+ exports["applySecond"] = applySecond;+ exports["lift2"] = lift2;+ exports["applyArray"] = applyArray;+})(PS["Control.Apply"] = PS["Control.Apply"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Apply = PS["Control.Apply"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Unit = PS["Data.Unit"]; + var Applicative = function (Apply0, pure) {+ this.Apply0 = Apply0;+ this.pure = pure;+ };+ var pure = function (dict) {+ return dict.pure;+ };+ var when = function (dictApplicative) {+ return function (v) {+ return function (v1) {+ if (v) {+ return v1;+ };+ if (!v) {+ return pure(dictApplicative)(Data_Unit.unit);+ };+ throw new Error("Failed pattern match at Control.Applicative (line 57, column 1 - line 57, column 63): " + [ v.constructor.name, v1.constructor.name ]);+ };+ };+ };+ var liftA1 = function (dictApplicative) {+ return function (f) {+ return function (a) {+ return Control_Apply.apply(dictApplicative.Apply0())(pure(dictApplicative)(f))(a);+ };+ };+ };+ exports["Applicative"] = Applicative;+ exports["pure"] = pure;+ exports["liftA1"] = liftA1;+ exports["when"] = when;+})(PS["Control.Applicative"] = PS["Control.Applicative"] || {});+(function(exports) {+ "use strict";++ exports.arrayBind = function (arr) {+ return function (f) {+ var result = [];+ for (var i = 0, l = arr.length; i < l; i++) {+ Array.prototype.push.apply(result, f(arr[i]));+ }+ return result;+ };+ };+})(PS["Control.Bind"] = PS["Control.Bind"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Control.Bind"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Category = PS["Control.Category"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Unit = PS["Data.Unit"]; + var Bind = function (Apply0, bind) {+ this.Apply0 = Apply0;+ this.bind = bind;+ };+ var Discard = function (discard) {+ this.discard = discard;+ };+ var discard = function (dict) {+ return dict.discard;+ }; + var bindArray = new Bind(function () {+ return Control_Apply.applyArray;+ }, $foreign.arrayBind);+ var bind = function (dict) {+ return dict.bind;+ };+ var bindFlipped = function (dictBind) {+ return Data_Function.flip(bind(dictBind));+ };+ var composeKleisliFlipped = function (dictBind) {+ return function (f) {+ return function (g) {+ return function (a) {+ return bindFlipped(dictBind)(f)(g(a));+ };+ };+ };+ };+ var composeKleisli = function (dictBind) {+ return function (f) {+ return function (g) {+ return function (a) {+ return bind(dictBind)(f(a))(g);+ };+ };+ };+ };+ var discardUnit = new Discard(function (dictBind) {+ return bind(dictBind);+ });+ var join = function (dictBind) {+ return function (m) {+ return bind(dictBind)(m)(Control_Category.identity(Control_Category.categoryFn));+ };+ };+ exports["Bind"] = Bind;+ exports["bind"] = bind;+ exports["bindFlipped"] = bindFlipped;+ exports["Discard"] = Discard;+ exports["discard"] = discard;+ exports["join"] = join;+ exports["composeKleisli"] = composeKleisli;+ exports["composeKleisliFlipped"] = composeKleisliFlipped;+ exports["bindArray"] = bindArray;+ exports["discardUnit"] = discardUnit;+})(PS["Control.Bind"] = PS["Control.Bind"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Unit = PS["Data.Unit"]; + var Monad = function (Applicative0, Bind1) {+ this.Applicative0 = Applicative0;+ this.Bind1 = Bind1;+ };+ var ap = function (dictMonad) {+ return function (f) {+ return function (a) {+ return Control_Bind.bind(dictMonad.Bind1())(f)(function (v) {+ return Control_Bind.bind(dictMonad.Bind1())(a)(function (v1) {+ return Control_Applicative.pure(dictMonad.Applicative0())(v(v1));+ });+ });+ };+ };+ };+ exports["Monad"] = Monad;+ exports["ap"] = ap;+})(PS["Control.Monad"] = PS["Control.Monad"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Data_Functor = PS["Data.Functor"]; + var Plus = function (Alt0, empty) {+ this.Alt0 = Alt0;+ this.empty = empty;+ }; + var empty = function (dict) {+ return dict.empty;+ };+ exports["Plus"] = Plus;+ exports["empty"] = empty;+})(PS["Control.Plus"] = PS["Control.Plus"] || {});+(function(exports) {+ "use strict";++ exports.topInt = 2147483647;+ exports.bottomInt = -2147483648;++ exports.topChar = String.fromCharCode(65535);+ exports.bottomChar = String.fromCharCode(0);+})(PS["Data.Bounded"] = PS["Data.Bounded"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Bounded"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Unit = PS["Data.Unit"]; + var Bounded = function (Ord0, bottom, top) {+ this.Ord0 = Ord0;+ this.bottom = bottom;+ this.top = top;+ };+ var top = function (dict) {+ return dict.top;+ }; + var boundedInt = new Bounded(function () {+ return Data_Ord.ordInt;+ }, $foreign.bottomInt, $foreign.topInt);+ var boundedChar = new Bounded(function () {+ return Data_Ord.ordChar;+ }, $foreign.bottomChar, $foreign.topChar);+ var bottom = function (dict) {+ return dict.bottom;+ };+ exports["Bounded"] = Bounded;+ exports["bottom"] = bottom;+ exports["top"] = top;+ exports["boundedInt"] = boundedInt;+ exports["boundedChar"] = boundedChar;+})(PS["Data.Bounded"] = PS["Data.Bounded"] || {});+(function(exports) {+ "use strict";++ exports.intDegree = function (x) {+ return Math.min(Math.abs(x), 2147483647);+ };++ // See the Euclidean definition in+ // https://en.m.wikipedia.org/wiki/Modulo_operation.+ exports.intDiv = function (x) {+ return function (y) {+ if (y === 0) return 0;+ return y > 0 ? Math.floor(x / y) : -Math.floor(x / -y);+ };+ };++ exports.intMod = function (x) {+ return function (y) {+ if (y === 0) return 0;+ var yy = Math.abs(y);+ return ((x % yy) + yy) % yy;+ };+ };+})(PS["Data.EuclideanRing"] = PS["Data.EuclideanRing"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Ring = PS["Data.Ring"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Unit = PS["Data.Unit"]; + var CommutativeRing = function (Ring0) {+ this.Ring0 = Ring0;+ }; + var commutativeRingInt = new CommutativeRing(function () {+ return Data_Ring.ringInt;+ });+ exports["CommutativeRing"] = CommutativeRing;+ exports["commutativeRingInt"] = commutativeRingInt;+})(PS["Data.CommutativeRing"] = PS["Data.CommutativeRing"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.EuclideanRing"];+ var Data_BooleanAlgebra = PS["Data.BooleanAlgebra"];+ var Data_CommutativeRing = PS["Data.CommutativeRing"];+ var Data_Eq = PS["Data.Eq"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semiring = PS["Data.Semiring"]; + var EuclideanRing = function (CommutativeRing0, degree, div, mod) {+ this.CommutativeRing0 = CommutativeRing0;+ this.degree = degree;+ this.div = div;+ this.mod = mod;+ };+ var mod = function (dict) {+ return dict.mod;+ }; + var euclideanRingInt = new EuclideanRing(function () {+ return Data_CommutativeRing.commutativeRingInt;+ }, $foreign.intDegree, $foreign.intDiv, $foreign.intMod);+ var div = function (dict) {+ return dict.div;+ };+ var degree = function (dict) {+ return dict.degree;+ };+ exports["EuclideanRing"] = EuclideanRing;+ exports["degree"] = degree;+ exports["div"] = div;+ exports["mod"] = mod;+ exports["euclideanRingInt"] = euclideanRingInt;+})(PS["Data.EuclideanRing"] = PS["Data.EuclideanRing"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Eq = PS["Data.Eq"];+ var Data_EuclideanRing = PS["Data.EuclideanRing"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Unit = PS["Data.Unit"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Type_Data_RowList = PS["Type.Data.RowList"]; + var Monoid = function (Semigroup0, mempty) {+ this.Semigroup0 = Semigroup0;+ this.mempty = mempty;+ }; + var monoidString = new Monoid(function () {+ return Data_Semigroup.semigroupString;+ }, ""); + var monoidArray = new Monoid(function () {+ return Data_Semigroup.semigroupArray;+ }, [ ]);+ var mempty = function (dict) {+ return dict.mempty;+ };+ var monoidFn = function (dictMonoid) {+ return new Monoid(function () {+ return Data_Semigroup.semigroupFn(dictMonoid.Semigroup0());+ }, function (v) {+ return mempty(dictMonoid);+ });+ };+ var guard = function (dictMonoid) {+ return function (v) {+ return function (v1) {+ if (v) {+ return v1;+ };+ if (!v) {+ return mempty(dictMonoid);+ };+ throw new Error("Failed pattern match at Data.Monoid (line 74, column 1 - line 74, column 49): " + [ v.constructor.name, v1.constructor.name ]);+ };+ };+ };+ exports["Monoid"] = Monoid;+ exports["mempty"] = mempty;+ exports["guard"] = guard;+ exports["monoidFn"] = monoidFn;+ exports["monoidString"] = monoidString;+ exports["monoidArray"] = monoidArray;+})(PS["Data.Monoid"] = PS["Data.Monoid"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Extend = PS["Control.Extend"];+ var Control_Monad = PS["Control.Monad"];+ var Control_MonadZero = PS["Control.MonadZero"];+ var Control_Plus = PS["Control.Plus"];+ var Data_Bounded = PS["Data.Bounded"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Functor_Invariant = PS["Data.Functor.Invariant"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"]; + var Nothing = (function () {+ function Nothing() {++ };+ Nothing.value = new Nothing();+ return Nothing;+ })();+ var Just = (function () {+ function Just(value0) {+ this.value0 = value0;+ };+ Just.create = function (value0) {+ return new Just(value0);+ };+ return Just;+ })();+ var maybe = function (v) {+ return function (v1) {+ return function (v2) {+ if (v2 instanceof Nothing) {+ return v;+ };+ if (v2 instanceof Just) {+ return v1(v2.value0);+ };+ throw new Error("Failed pattern match at Data.Maybe (line 217, column 1 - line 217, column 51): " + [ v.constructor.name, v1.constructor.name, v2.constructor.name ]);+ };+ };+ };+ var isNothing = maybe(true)(Data_Function["const"](false));+ var isJust = maybe(false)(Data_Function["const"](true));+ var functorMaybe = new Data_Functor.Functor(function (v) {+ return function (v1) {+ if (v1 instanceof Just) {+ return new Just(v(v1.value0));+ };+ return Nothing.value;+ };+ });+ var fromMaybe = function (a) {+ return maybe(a)(Control_Category.identity(Control_Category.categoryFn));+ };+ var fromJust = function (dictPartial) {+ return function (v) {+ if (v instanceof Just) {+ return v.value0;+ };+ throw new Error("Failed pattern match at Data.Maybe (line 268, column 1 - line 268, column 46): " + [ v.constructor.name ]);+ };+ };+ var applyMaybe = new Control_Apply.Apply(function () {+ return functorMaybe;+ }, function (v) {+ return function (v1) {+ if (v instanceof Just) {+ return Data_Functor.map(functorMaybe)(v.value0)(v1);+ };+ if (v instanceof Nothing) {+ return Nothing.value;+ };+ throw new Error("Failed pattern match at Data.Maybe (line 67, column 1 - line 67, column 35): " + [ v.constructor.name, v1.constructor.name ]);+ };+ });+ var bindMaybe = new Control_Bind.Bind(function () {+ return applyMaybe;+ }, function (v) {+ return function (v1) {+ if (v instanceof Just) {+ return v1(v.value0);+ };+ if (v instanceof Nothing) {+ return Nothing.value;+ };+ throw new Error("Failed pattern match at Data.Maybe (line 125, column 1 - line 125, column 33): " + [ v.constructor.name, v1.constructor.name ]);+ };+ });+ exports["Nothing"] = Nothing;+ exports["Just"] = Just;+ exports["maybe"] = maybe;+ exports["fromMaybe"] = fromMaybe;+ exports["isJust"] = isJust;+ exports["isNothing"] = isNothing;+ exports["fromJust"] = fromJust;+ exports["functorMaybe"] = functorMaybe;+ exports["applyMaybe"] = applyMaybe;+ exports["bindMaybe"] = bindMaybe;+})(PS["Data.Maybe"] = PS["Data.Maybe"] || {});+(function(exports) {+ "use strict";++ exports.empty = {};++ exports._lookup = function (no, yes, k, m) {+ return k in m ? yes(m[k]) : no;+ };++ function toArrayWithKey(f) {+ return function (m) {+ var r = [];+ for (var k in m) {+ if (hasOwnProperty.call(m, k)) {+ r.push(f(k)(m[k]));+ }+ }+ return r;+ };+ }+})(PS["Foreign.Object"] = PS["Foreign.Object"] || {});+(function(exports) {+ "use strict";++ //------------------------------------------------------------------------------+ // Array size ------------------------------------------------------------------+ //------------------------------------------------------------------------------++ exports.length = function (xs) {+ return xs.length;+ };++ //------------------------------------------------------------------------------+ // Extending arrays ------------------------------------------------------------+ //------------------------------------------------------------------------------++ exports.cons = function (e) {+ return function (l) {+ return [e].concat(l);+ };+ };++ exports.snoc = function (l) {+ return function (e) {+ var l1 = l.slice();+ l1.push(e);+ return l1;+ };+ };++ exports.concat = function (xss) {+ if (xss.length <= 10000) {+ // This method is faster, but it crashes on big arrays.+ // So we use it when can and fallback to simple variant otherwise.+ return Array.prototype.concat.apply([], xss);+ }++ var result = [];+ for (var i = 0, l = xss.length; i < l; i++) {+ var xs = xss[i];+ for (var j = 0, m = xs.length; j < m; j++) {+ result.push(xs[j]);+ }+ }+ return result;+ };++ exports.filter = function (f) {+ return function (xs) {+ return xs.filter(f);+ };+ };++ //------------------------------------------------------------------------------+ // Subarrays -------------------------------------------------------------------+ //------------------------------------------------------------------------------++ exports.slice = function (s) {+ return function (e) {+ return function (l) {+ return l.slice(s, e);+ };+ };+ };++ exports.drop = function (n) {+ return function (l) {+ return n < 1 ? l : l.slice(n);+ };+ };+})(PS["Data.Array"] = PS["Data.Array"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"]; + var Bifunctor = function (bimap) {+ this.bimap = bimap;+ };+ var bimap = function (dict) {+ return dict.bimap;+ };+ var rmap = function (dictBifunctor) {+ return bimap(dictBifunctor)(Control_Category.identity(Control_Category.categoryFn));+ };+ exports["bimap"] = bimap;+ exports["Bifunctor"] = Bifunctor;+ exports["rmap"] = rmap;+})(PS["Data.Bifunctor"] = PS["Data.Bifunctor"] || {});+(function(exports) {+ "use strict";++ exports.foldrArray = function (f) {+ return function (init) {+ return function (xs) {+ var acc = init;+ var len = xs.length;+ for (var i = len - 1; i >= 0; i--) {+ acc = f(xs[i])(acc);+ }+ return acc;+ };+ };+ };++ exports.foldlArray = function (f) {+ return function (init) {+ return function (xs) {+ var acc = init;+ var len = xs.length;+ for (var i = 0; i < len; i++) {+ acc = f(acc)(xs[i]);+ }+ return acc;+ };+ };+ };+})(PS["Data.Foldable"] = PS["Data.Foldable"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad = PS["Control.Monad"];+ var Data_Bounded = PS["Data.Bounded"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Prelude = PS["Prelude"]; + var Disj = function (x) {+ return x;+ };+ var semigroupDisj = function (dictHeytingAlgebra) {+ return new Data_Semigroup.Semigroup(function (v) {+ return function (v1) {+ return Data_HeytingAlgebra.disj(dictHeytingAlgebra)(v)(v1);+ };+ });+ };+ var monoidDisj = function (dictHeytingAlgebra) {+ return new Data_Monoid.Monoid(function () {+ return semigroupDisj(dictHeytingAlgebra);+ }, Data_HeytingAlgebra.ff(dictHeytingAlgebra));+ };+ exports["Disj"] = Disj;+ exports["semigroupDisj"] = semigroupDisj;+ exports["monoidDisj"] = monoidDisj;+})(PS["Data.Monoid.Disj"] = PS["Data.Monoid.Disj"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Monoid_Additive = PS["Data.Monoid.Additive"];+ var Data_Monoid_Conj = PS["Data.Monoid.Conj"];+ var Data_Monoid_Disj = PS["Data.Monoid.Disj"];+ var Data_Monoid_Dual = PS["Data.Monoid.Dual"];+ var Data_Monoid_Endo = PS["Data.Monoid.Endo"];+ var Data_Monoid_Multiplicative = PS["Data.Monoid.Multiplicative"];+ var Data_Semigroup_First = PS["Data.Semigroup.First"];+ var Data_Semigroup_Last = PS["Data.Semigroup.Last"];+ var Prelude = PS["Prelude"]; + var Newtype = function (unwrap, wrap) {+ this.unwrap = unwrap;+ this.wrap = wrap;+ };+ var wrap = function (dict) {+ return dict.wrap;+ };+ var unwrap = function (dict) {+ return dict.unwrap;+ }; + var newtypeDisj = new Newtype(function (v) {+ return v;+ }, Data_Monoid_Disj.Disj);+ var alaF = function (dictFunctor) {+ return function (dictFunctor1) {+ return function (dictNewtype) {+ return function (dictNewtype1) {+ return function (v) {+ return function (f) {+ return function ($80) {+ return Data_Functor.map(dictFunctor1)(unwrap(dictNewtype1))(f(Data_Functor.map(dictFunctor)(wrap(dictNewtype))($80)));+ };+ };+ };+ };+ };+ };+ };+ exports["unwrap"] = unwrap;+ exports["wrap"] = wrap;+ exports["Newtype"] = Newtype;+ exports["alaF"] = alaF;+ exports["newtypeDisj"] = newtypeDisj;+})(PS["Data.Newtype"] = PS["Data.Newtype"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Foldable"];+ var Control_Alt = PS["Control.Alt"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Plus = PS["Control.Plus"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Maybe_First = PS["Data.Maybe.First"];+ var Data_Maybe_Last = PS["Data.Maybe.Last"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Monoid_Additive = PS["Data.Monoid.Additive"];+ var Data_Monoid_Conj = PS["Data.Monoid.Conj"];+ var Data_Monoid_Disj = PS["Data.Monoid.Disj"];+ var Data_Monoid_Dual = PS["Data.Monoid.Dual"];+ var Data_Monoid_Endo = PS["Data.Monoid.Endo"];+ var Data_Monoid_Multiplicative = PS["Data.Monoid.Multiplicative"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"]; + var Foldable = function (foldMap, foldl, foldr) {+ this.foldMap = foldMap;+ this.foldl = foldl;+ this.foldr = foldr;+ };+ var foldr = function (dict) {+ return dict.foldr;+ };+ var traverse_ = function (dictApplicative) {+ return function (dictFoldable) {+ return function (f) {+ return foldr(dictFoldable)(function ($195) {+ return Control_Apply.applySecond(dictApplicative.Apply0())(f($195));+ })(Control_Applicative.pure(dictApplicative)(Data_Unit.unit));+ };+ };+ };+ var for_ = function (dictApplicative) {+ return function (dictFoldable) {+ return Data_Function.flip(traverse_(dictApplicative)(dictFoldable));+ };+ };+ var sequence_ = function (dictApplicative) {+ return function (dictFoldable) {+ return traverse_(dictApplicative)(dictFoldable)(Control_Category.identity(Control_Category.categoryFn));+ };+ };+ var foldl = function (dict) {+ return dict.foldl;+ }; + var foldableMaybe = new Foldable(function (dictMonoid) {+ return function (f) {+ return function (v) {+ if (v instanceof Data_Maybe.Nothing) {+ return Data_Monoid.mempty(dictMonoid);+ };+ if (v instanceof Data_Maybe.Just) {+ return f(v.value0);+ };+ throw new Error("Failed pattern match at Data.Foldable (line 129, column 1 - line 129, column 41): " + [ f.constructor.name, v.constructor.name ]);+ };+ };+ }, function (v) {+ return function (z) {+ return function (v1) {+ if (v1 instanceof Data_Maybe.Nothing) {+ return z;+ };+ if (v1 instanceof Data_Maybe.Just) {+ return v(z)(v1.value0);+ };+ throw new Error("Failed pattern match at Data.Foldable (line 129, column 1 - line 129, column 41): " + [ v.constructor.name, z.constructor.name, v1.constructor.name ]);+ };+ };+ }, function (v) {+ return function (z) {+ return function (v1) {+ if (v1 instanceof Data_Maybe.Nothing) {+ return z;+ };+ if (v1 instanceof Data_Maybe.Just) {+ return v(v1.value0)(z);+ };+ throw new Error("Failed pattern match at Data.Foldable (line 129, column 1 - line 129, column 41): " + [ v.constructor.name, z.constructor.name, v1.constructor.name ]);+ };+ };+ });+ var foldMapDefaultR = function (dictFoldable) {+ return function (dictMonoid) {+ return function (f) {+ return foldr(dictFoldable)(function (x) {+ return function (acc) {+ return Data_Semigroup.append(dictMonoid.Semigroup0())(f(x))(acc);+ };+ })(Data_Monoid.mempty(dictMonoid));+ };+ };+ };+ var foldableArray = new Foldable(function (dictMonoid) {+ return foldMapDefaultR(foldableArray)(dictMonoid);+ }, $foreign.foldlArray, $foreign.foldrArray);+ var foldMap = function (dict) {+ return dict.foldMap;+ };+ var find = function (dictFoldable) {+ return function (p) {+ var go = function (v) {+ return function (v1) {+ if (v instanceof Data_Maybe.Nothing && p(v1)) {+ return new Data_Maybe.Just(v1);+ };+ return v;+ };+ };+ return foldl(dictFoldable)(go)(Data_Maybe.Nothing.value);+ };+ };+ var any = function (dictFoldable) {+ return function (dictHeytingAlgebra) {+ return Data_Newtype.alaF(Data_Functor.functorFn)(Data_Functor.functorFn)(Data_Newtype.newtypeDisj)(Data_Newtype.newtypeDisj)(Data_Monoid_Disj.Disj)(foldMap(dictFoldable)(Data_Monoid_Disj.monoidDisj(dictHeytingAlgebra)));+ };+ };+ exports["Foldable"] = Foldable;+ exports["foldr"] = foldr;+ exports["foldl"] = foldl;+ exports["foldMap"] = foldMap;+ exports["foldMapDefaultR"] = foldMapDefaultR;+ exports["traverse_"] = traverse_;+ exports["for_"] = for_;+ exports["sequence_"] = sequence_;+ exports["any"] = any;+ exports["find"] = find;+ exports["foldableArray"] = foldableArray;+ exports["foldableMaybe"] = foldableMaybe;+})(PS["Data.Foldable"] = PS["Data.Foldable"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Extend = PS["Control.Extend"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifoldable = PS["Data.Bifoldable"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Bitraversable = PS["Data.Bitraversable"];+ var Data_Bounded = PS["Data.Bounded"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Functor_Invariant = PS["Data.Functor.Invariant"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"]; + var Left = (function () {+ function Left(value0) {+ this.value0 = value0;+ };+ Left.create = function (value0) {+ return new Left(value0);+ };+ return Left;+ })();+ var Right = (function () {+ function Right(value0) {+ this.value0 = value0;+ };+ Right.create = function (value0) {+ return new Right(value0);+ };+ return Right;+ })();+ var functorEither = new Data_Functor.Functor(function (f) {+ return function (m) {+ if (m instanceof Left) {+ return new Left(m.value0);+ };+ if (m instanceof Right) {+ return new Right(f(m.value0));+ };+ throw new Error("Failed pattern match at Data.Either (line 38, column 8 - line 38, column 52): " + [ m.constructor.name ]);+ };+ });+ var either = function (v) {+ return function (v1) {+ return function (v2) {+ if (v2 instanceof Left) {+ return v(v2.value0);+ };+ if (v2 instanceof Right) {+ return v1(v2.value0);+ };+ throw new Error("Failed pattern match at Data.Either (line 238, column 1 - line 238, column 64): " + [ v.constructor.name, v1.constructor.name, v2.constructor.name ]);+ };+ };+ };+ var bifunctorEither = new Data_Bifunctor.Bifunctor(function (v) {+ return function (v1) {+ return function (v2) {+ if (v2 instanceof Left) {+ return new Left(v(v2.value0));+ };+ if (v2 instanceof Right) {+ return new Right(v1(v2.value0));+ };+ throw new Error("Failed pattern match at Data.Either (line 46, column 1 - line 46, column 45): " + [ v.constructor.name, v1.constructor.name, v2.constructor.name ]);+ };+ };+ });+ var applyEither = new Control_Apply.Apply(function () {+ return functorEither;+ }, function (v) {+ return function (v1) {+ if (v instanceof Left) {+ return new Left(v.value0);+ };+ if (v instanceof Right) {+ return Data_Functor.map(functorEither)(v.value0)(v1);+ };+ throw new Error("Failed pattern match at Data.Either (line 82, column 1 - line 82, column 41): " + [ v.constructor.name, v1.constructor.name ]);+ };+ });+ exports["Left"] = Left;+ exports["Right"] = Right;+ exports["either"] = either;+ exports["functorEither"] = functorEither;+ exports["bifunctorEither"] = bifunctorEither;+ exports["applyEither"] = applyEither;+})(PS["Data.Either"] = PS["Data.Either"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Comonad = PS["Control.Comonad"];+ var Control_Extend = PS["Control.Extend"];+ var Control_Lazy = PS["Control.Lazy"];+ var Control_Monad = PS["Control.Monad"];+ var Data_BooleanAlgebra = PS["Data.BooleanAlgebra"];+ var Data_Bounded = PS["Data.Bounded"];+ var Data_CommutativeRing = PS["Data.CommutativeRing"];+ var Data_Eq = PS["Data.Eq"];+ var Data_EuclideanRing = PS["Data.EuclideanRing"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Functor_Invariant = PS["Data.Functor.Invariant"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];+ var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"]; + var Identity = function (x) {+ return x;+ };+ var newtypeIdentity = new Data_Newtype.Newtype(function (n) {+ return n;+ }, Identity);+ var functorIdentity = new Data_Functor.Functor(function (f) {+ return function (m) {+ return f(m);+ };+ });+ var applyIdentity = new Control_Apply.Apply(function () {+ return functorIdentity;+ }, function (v) {+ return function (v1) {+ return v(v1);+ };+ });+ var bindIdentity = new Control_Bind.Bind(function () {+ return applyIdentity;+ }, function (v) {+ return function (f) {+ return f(v);+ };+ });+ var applicativeIdentity = new Control_Applicative.Applicative(function () {+ return applyIdentity;+ }, Identity);+ var monadIdentity = new Control_Monad.Monad(function () {+ return applicativeIdentity;+ }, function () {+ return bindIdentity;+ });+ exports["Identity"] = Identity;+ exports["newtypeIdentity"] = newtypeIdentity;+ exports["functorIdentity"] = functorIdentity;+ exports["applyIdentity"] = applyIdentity;+ exports["applicativeIdentity"] = applicativeIdentity;+ exports["bindIdentity"] = bindIdentity;+ exports["monadIdentity"] = monadIdentity;+})(PS["Data.Identity"] = PS["Data.Identity"] || {});+(function(exports) {+ "use strict";++ exports.pureE = function (a) {+ return function () {+ return a;+ };+ };++ exports.bindE = function (a) {+ return function (f) {+ return function () {+ return f(a())();+ };+ };+ };++ exports.foreachE = function (as) {+ return function (f) {+ return function () {+ for (var i = 0, l = as.length; i < l; i++) {+ f(as[i])();+ }+ };+ };+ };+})(PS["Effect"] = PS["Effect"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Effect"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad = PS["Control.Monad"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Prelude = PS["Prelude"]; + var monadEffect = new Control_Monad.Monad(function () {+ return applicativeEffect;+ }, function () {+ return bindEffect;+ });+ var bindEffect = new Control_Bind.Bind(function () {+ return applyEffect;+ }, $foreign.bindE);+ var applyEffect = new Control_Apply.Apply(function () {+ return functorEffect;+ }, Control_Monad.ap(monadEffect));+ var applicativeEffect = new Control_Applicative.Applicative(function () {+ return applyEffect;+ }, $foreign.pureE);+ var functorEffect = new Data_Functor.Functor(Control_Applicative.liftA1(applicativeEffect));+ exports["functorEffect"] = functorEffect;+ exports["applyEffect"] = applyEffect;+ exports["applicativeEffect"] = applicativeEffect;+ exports["bindEffect"] = bindEffect;+ exports["monadEffect"] = monadEffect;+ exports["foreachE"] = $foreign.foreachE;+})(PS["Effect"] = PS["Effect"] || {});+(function(exports) {+ "use strict";++ exports.new = function (val) {+ return function () {+ return { value: val };+ };+ };++ exports.read = function (ref) {+ return function () {+ return ref.value;+ };+ };++ exports["modify'"] = function (f) {+ return function (ref) {+ return function () {+ var t = f(ref.value);+ ref.value = t.state;+ return t.value;+ };+ };+ };++ exports.write = function (val) {+ return function (ref) {+ return function () {+ ref.value = val;+ return {};+ };+ };+ };+})(PS["Effect.Ref"] = PS["Effect.Ref"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Effect.Ref"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"]; + var modify = function (f) {+ return $foreign["modify'"](function (s) {+ var s$prime = f(s);+ return {+ state: s$prime,+ value: s$prime+ };+ });+ };+ var modify_ = function (f) {+ return function (s) {+ return Data_Functor["void"](Effect.functorEffect)(modify(f)(s));+ };+ };+ exports["modify"] = modify;+ exports["modify_"] = modify_;+ exports["new"] = $foreign["new"];+ exports["read"] = $foreign.read;+ exports["modify'"] = $foreign["modify'"];+ exports["write"] = $foreign.write;+})(PS["Effect.Ref"] = PS["Effect.Ref"] || {});+(function(exports) {+ "use strict";++ // module Partial.Unsafe++ exports.unsafePartial = function (f) {+ return f();+ };+})(PS["Partial.Unsafe"] = PS["Partial.Unsafe"] || {});+(function(exports) {+ "use strict";++ // module Partial++ exports.crashWith = function () {+ return function (msg) {+ throw new Error(msg);+ };+ };+})(PS["Partial"] = PS["Partial"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Partial"];+ exports["crashWith"] = $foreign.crashWith;+})(PS["Partial"] = PS["Partial"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Partial.Unsafe"];+ var Partial = PS["Partial"];+ var unsafeCrashWith = function (msg) {+ return $foreign.unsafePartial(function (dictPartial) {+ return Partial.crashWith(dictPartial)(msg);+ });+ };+ exports["unsafeCrashWith"] = unsafeCrashWith;+})(PS["Partial.Unsafe"] = PS["Partial.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Either = PS["Data.Either"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Identity = PS["Data.Identity"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Ref = PS["Effect.Ref"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"]; + var Loop = (function () {+ function Loop(value0) {+ this.value0 = value0;+ };+ Loop.create = function (value0) {+ return new Loop(value0);+ };+ return Loop;+ })();+ var Done = (function () {+ function Done(value0) {+ this.value0 = value0;+ };+ Done.create = function (value0) {+ return new Done(value0);+ };+ return Done;+ })();+ var MonadRec = function (Monad0, tailRecM) {+ this.Monad0 = Monad0;+ this.tailRecM = tailRecM;+ };+ var tailRecM = function (dict) {+ return dict.tailRecM;+ }; + var monadRecEffect = new MonadRec(function () {+ return Effect.monadEffect;+ }, function (f) {+ return function (a) {+ var fromDone = function (v) {+ if (v instanceof Done) {+ return v.value0;+ };+ throw new Error("Failed pattern match at Control.Monad.Rec.Class (line 111, column 30 - line 111, column 44): " + [ v.constructor.name ]);+ };+ return function __do() {+ var v = Control_Bind.bindFlipped(Effect.bindEffect)(Effect_Ref["new"])(f(a))();+ (function () {+ while (!(function __do() {+ var v1 = Effect_Ref.read(v)();+ if (v1 instanceof Loop) {+ var v2 = f(v1.value0)();+ var v3 = Effect_Ref.write(v2)(v)();+ return false;+ };+ if (v1 instanceof Done) {+ return true;+ };+ throw new Error("Failed pattern match at Control.Monad.Rec.Class (line 102, column 22 - line 107, column 28): " + [ v1.constructor.name ]);+ })()) {++ };+ return {};+ })();+ return Data_Functor.map(Effect.functorEffect)(fromDone)(Effect_Ref.read(v))();+ };+ };+ });+ exports["Loop"] = Loop;+ exports["Done"] = Done;+ exports["MonadRec"] = MonadRec;+ exports["tailRecM"] = tailRecM;+ exports["monadRecEffect"] = monadRecEffect;+})(PS["Control.Monad.Rec.Class"] = PS["Control.Monad.Rec.Class"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Biapplicative = PS["Control.Biapplicative"];+ var Control_Biapply = PS["Control.Biapply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Comonad = PS["Control.Comonad"];+ var Control_Extend = PS["Control.Extend"];+ var Control_Lazy = PS["Control.Lazy"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifoldable = PS["Data.Bifoldable"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Bitraversable = PS["Data.Bitraversable"];+ var Data_BooleanAlgebra = PS["Data.BooleanAlgebra"];+ var Data_Bounded = PS["Data.Bounded"];+ var Data_CommutativeRing = PS["Data.CommutativeRing"];+ var Data_Distributive = PS["Data.Distributive"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Functor_Invariant = PS["Data.Functor.Invariant"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Maybe_First = PS["Data.Maybe.First"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];+ var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"];+ var Type_Equality = PS["Type.Equality"]; + var Tuple = (function () {+ function Tuple(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Tuple.create = function (value0) {+ return function (value1) {+ return new Tuple(value0, value1);+ };+ };+ return Tuple;+ })();+ var snd = function (v) {+ return v.value1;+ };+ var functorTuple = new Data_Functor.Functor(function (f) {+ return function (m) {+ return new Tuple(m.value0, f(m.value1));+ };+ }); + var fst = function (v) {+ return v.value0;+ };+ exports["Tuple"] = Tuple;+ exports["fst"] = fst;+ exports["snd"] = snd;+ exports["functorTuple"] = functorTuple;+})(PS["Data.Tuple"] = PS["Data.Tuple"] || {});+(function(exports) {+ "use strict";++ exports.unfoldrArrayImpl = function (isNothing) {+ return function (fromJust) {+ return function (fst) {+ return function (snd) {+ return function (f) {+ return function (b) {+ var result = [];+ var value = b;+ while (true) { // eslint-disable-line no-constant-condition+ var maybe = f(value);+ if (isNothing(maybe)) return result;+ var tuple = fromJust(maybe);+ result.push(fst(tuple));+ value = snd(tuple);+ }+ };+ };+ };+ };+ };+ };+})(PS["Data.Unfoldable"] = PS["Data.Unfoldable"] || {});+(function(exports) {+ "use strict";++ exports.unfoldr1ArrayImpl = function (isNothing) {+ return function (fromJust) {+ return function (fst) {+ return function (snd) {+ return function (f) {+ return function (b) {+ var result = [];+ var value = b;+ while (true) { // eslint-disable-line no-constant-condition+ var tuple = f(value);+ result.push(fst(tuple));+ var maybe = snd(tuple);+ if (isNothing(maybe)) return result;+ value = fromJust(maybe);+ }+ };+ };+ };+ };+ };+ };+})(PS["Data.Unfoldable1"] = PS["Data.Unfoldable1"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Unfoldable1"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Tuple = PS["Data.Tuple"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"]; + var Unfoldable1 = function (unfoldr1) {+ this.unfoldr1 = unfoldr1;+ };+ var unfoldr1 = function (dict) {+ return dict.unfoldr1;+ };+ var unfoldable1Array = new Unfoldable1($foreign.unfoldr1ArrayImpl(Data_Maybe.isNothing)(Data_Maybe.fromJust())(Data_Tuple.fst)(Data_Tuple.snd));+ exports["Unfoldable1"] = Unfoldable1;+ exports["unfoldr1"] = unfoldr1;+ exports["unfoldable1Array"] = unfoldable1Array;+})(PS["Data.Unfoldable1"] = PS["Data.Unfoldable1"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Unfoldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable1 = PS["Data.Unfoldable1"];+ var Data_Unit = PS["Data.Unit"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"]; + var Unfoldable = function (Unfoldable10, unfoldr) {+ this.Unfoldable10 = Unfoldable10;+ this.unfoldr = unfoldr;+ };+ var unfoldr = function (dict) {+ return dict.unfoldr;+ };+ var unfoldableArray = new Unfoldable(function () {+ return Data_Unfoldable1.unfoldable1Array;+ }, $foreign.unfoldrArrayImpl(Data_Maybe.isNothing)(Data_Maybe.fromJust())(Data_Tuple.fst)(Data_Tuple.snd));+ exports["Unfoldable"] = Unfoldable;+ exports["unfoldr"] = unfoldr;+ exports["unfoldableArray"] = unfoldableArray;+})(PS["Data.Unfoldable"] = PS["Data.Unfoldable"] || {});+(function(exports) {+ "use strict";++ // module Unsafe.Coerce++ exports.unsafeCoerce = function (x) {+ return x;+ };+})(PS["Unsafe.Coerce"] = PS["Unsafe.Coerce"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Unsafe.Coerce"];+ exports["unsafeCoerce"] = $foreign.unsafeCoerce;+})(PS["Unsafe.Coerce"] = PS["Unsafe.Coerce"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Array"];+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Lazy = PS["Control.Lazy"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Monad_ST = PS["Control.Monad.ST"];+ var Control_Monad_ST_Internal = PS["Control.Monad.ST.Internal"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Array_NonEmpty_Internal = PS["Data.Array.NonEmpty.Internal"];+ var Data_Array_ST = PS["Data.Array.ST"];+ var Data_Array_ST_Iterator = PS["Data.Array.ST.Iterator"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var singleton = function (a) {+ return [ a ];+ };+ var concatMap = Data_Function.flip(Control_Bind.bind(Control_Bind.bindArray));+ var mapMaybe = function (f) {+ return concatMap(function ($114) {+ return Data_Maybe.maybe([ ])(singleton)(f($114));+ });+ };+ exports["singleton"] = singleton;+ exports["concatMap"] = concatMap;+ exports["mapMaybe"] = mapMaybe;+ exports["length"] = $foreign.length;+ exports["cons"] = $foreign.cons;+ exports["snoc"] = $foreign.snoc;+ exports["filter"] = $foreign.filter;+ exports["drop"] = $foreign.drop;+})(PS["Data.Array"] = PS["Data.Array"] || {});+(function(exports) {+ "use strict";++ exports["new"] = function () {+ return {};+ };+})(PS["Foreign.Object.ST"] = PS["Foreign.Object.ST"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Foreign.Object.ST"];+ var Control_Monad_ST = PS["Control.Monad.ST"];+ var Data_Maybe = PS["Data.Maybe"];+ exports["new"] = $foreign["new"];+})(PS["Foreign.Object.ST"] = PS["Foreign.Object.ST"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Foreign.Object"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Monad_ST = PS["Control.Monad.ST"];+ var Control_Monad_ST_Internal = PS["Control.Monad.ST.Internal"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Array = PS["Data.Array"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];+ var Data_Function = PS["Data.Function"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Functor = PS["Data.Functor"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Foreign_Object_ST = PS["Foreign.Object.ST"];+ var Prelude = PS["Prelude"];+ var Type_Row_Homogeneous = PS["Type.Row.Homogeneous"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var lookup = Data_Function_Uncurried.runFn4($foreign["_lookup"])(Data_Maybe.Nothing.value)(Data_Maybe.Just.create);+ exports["lookup"] = lookup;+ exports["empty"] = $foreign.empty;+})(PS["Foreign.Object"] = PS["Foreign.Object"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Argonaut.Core"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Foreign_Object = PS["Foreign.Object"];+ var Prelude = PS["Prelude"]; + var jsonEmptyObject = $foreign.fromObject(Foreign_Object.empty);+ exports["jsonEmptyObject"] = jsonEmptyObject;+ exports["stringify"] = $foreign.stringify;+})(PS["Data.Argonaut.Core"] = PS["Data.Argonaut.Core"] || {});+(function(exports) {+ "use strict";++ exports.replace = function (s1) {+ return function (s2) {+ return function (s3) {+ return s3.replace(s1, s2);+ };+ };+ };++ exports.replaceAll = function (s1) {+ return function (s2) {+ return function (s3) {+ return s3.replace(new RegExp(s1.replace(/[-\/\\^$*+?.()|[\]{}]/g, "\\$&"), "g"), s2); // eslint-disable-line no-useless-escape+ };+ };+ };++ exports.split = function (sep) {+ return function (s) {+ return s.split(sep);+ };+ };++ exports.joinWith = function (s) {+ return function (xs) {+ return xs.join(s);+ };+ };+})(PS["Data.String.Common"] = PS["Data.String.Common"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.String.Common"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_String_Pattern = PS["Data.String.Pattern"];+ var Prelude = PS["Prelude"]; + var $$null = function (s) {+ return s === "";+ };+ exports["null"] = $$null;+ exports["replaceAll"] = $foreign.replaceAll;+ exports["split"] = $foreign.split;+ exports["joinWith"] = $foreign.joinWith;+})(PS["Data.String.Common"] = PS["Data.String.Common"] || {});+(function(exports) {+ /* globals exports, JSON */+ "use strict";++ exports.unsafeStringify = function (x) {+ return JSON.stringify(x);+ }; + exports.unsafeDecodeURIComponent = decodeURIComponent;+ exports.unsafeEncodeURIComponent = encodeURIComponent;+})(PS["Global.Unsafe"] = PS["Global.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Global.Unsafe"];+ exports["unsafeStringify"] = $foreign.unsafeStringify;+ exports["unsafeDecodeURIComponent"] = $foreign.unsafeDecodeURIComponent;+ exports["unsafeEncodeURIComponent"] = $foreign.unsafeEncodeURIComponent;+})(PS["Global.Unsafe"] = PS["Global.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_String = PS["Data.String"];+ var Data_String_Common = PS["Data.String.Common"];+ var Data_Tuple = PS["Data.Tuple"];+ var Global_Unsafe = PS["Global.Unsafe"];+ var Prelude = PS["Prelude"];+ var toArray = function (v) {+ return v;+ }; + var encode = (function () {+ var encodePart = function (v) {+ if (v.value1 instanceof Data_Maybe.Nothing) {+ return Global_Unsafe.unsafeEncodeURIComponent(v.value0);+ };+ if (v.value1 instanceof Data_Maybe.Just) {+ return Global_Unsafe.unsafeEncodeURIComponent(v.value0) + ("=" + Global_Unsafe.unsafeEncodeURIComponent(v.value1.value0));+ };+ throw new Error("Failed pattern match at Data.FormURLEncoded (line 35, column 18 - line 37, column 89): " + [ v.constructor.name ]);+ };+ return function ($14) {+ return Data_String_Common.joinWith("&")(Data_Functor.map(Data_Functor.functorArray)(encodePart)(toArray($14)));+ };+ })();+ exports["toArray"] = toArray;+ exports["encode"] = encode;+})(PS["Data.FormURLEncoded"] = PS["Data.FormURLEncoded"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Eq = PS["Data.Eq"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Prelude = PS["Prelude"]; + var MediaType = function (x) {+ return x;+ }; + var newtypeMediaType = new Data_Newtype.Newtype(function (n) {+ return n;+ }, MediaType);+ exports["MediaType"] = MediaType;+ exports["newtypeMediaType"] = newtypeMediaType;+})(PS["Data.MediaType"] = PS["Data.MediaType"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_MediaType = PS["Data.MediaType"]; + var applicationJSON = "application/json";+ var applicationFormURLEncoded = "application/x-www-form-urlencoded";+ exports["applicationFormURLEncoded"] = applicationFormURLEncoded;+ exports["applicationJSON"] = applicationJSON;+})(PS["Data.MediaType.Common"] = PS["Data.MediaType.Common"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Argonaut_Core = PS["Data.Argonaut.Core"];+ var Data_ArrayBuffer_Types = PS["Data.ArrayBuffer.Types"];+ var Data_FormURLEncoded = PS["Data.FormURLEncoded"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_MediaType = PS["Data.MediaType"];+ var Data_MediaType_Common = PS["Data.MediaType.Common"];+ var Web_DOM_Document = PS["Web.DOM.Document"];+ var Web_File_Blob = PS["Web.File.Blob"];+ var Web_XHR_FormData = PS["Web.XHR.FormData"]; + var ArrayView = (function () {+ function ArrayView(value0) {+ this.value0 = value0;+ };+ ArrayView.create = function (value0) {+ return new ArrayView(value0);+ };+ return ArrayView;+ })();+ var Blob = (function () {+ function Blob(value0) {+ this.value0 = value0;+ };+ Blob.create = function (value0) {+ return new Blob(value0);+ };+ return Blob;+ })();+ var Document = (function () {+ function Document(value0) {+ this.value0 = value0;+ };+ Document.create = function (value0) {+ return new Document(value0);+ };+ return Document;+ })();+ var $$String = (function () {+ function $$String(value0) {+ this.value0 = value0;+ };+ $$String.create = function (value0) {+ return new $$String(value0);+ };+ return $$String;+ })();+ var FormData = (function () {+ function FormData(value0) {+ this.value0 = value0;+ };+ FormData.create = function (value0) {+ return new FormData(value0);+ };+ return FormData;+ })();+ var FormURLEncoded = (function () {+ function FormURLEncoded(value0) {+ this.value0 = value0;+ };+ FormURLEncoded.create = function (value0) {+ return new FormURLEncoded(value0);+ };+ return FormURLEncoded;+ })();+ var Json = (function () {+ function Json(value0) {+ this.value0 = value0;+ };+ Json.create = function (value0) {+ return new Json(value0);+ };+ return Json;+ })();+ var toMediaType = function (v) {+ if (v instanceof FormURLEncoded) {+ return new Data_Maybe.Just(Data_MediaType_Common.applicationFormURLEncoded);+ };+ if (v instanceof Json) {+ return new Data_Maybe.Just(Data_MediaType_Common.applicationJSON);+ };+ return Data_Maybe.Nothing.value;+ };+ var string = $$String.create;+ exports["ArrayView"] = ArrayView;+ exports["Blob"] = Blob;+ exports["Document"] = Document;+ exports["String"] = $$String;+ exports["FormData"] = FormData;+ exports["FormURLEncoded"] = FormURLEncoded;+ exports["Json"] = Json;+ exports["string"] = string;+ exports["toMediaType"] = toMediaType;+})(PS["Affjax.RequestBody"] = PS["Affjax.RequestBody"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Eq = PS["Data.Eq"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_MediaType = PS["Data.MediaType"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Prelude = PS["Prelude"]; + var Accept = (function () {+ function Accept(value0) {+ this.value0 = value0;+ };+ Accept.create = function (value0) {+ return new Accept(value0);+ };+ return Accept;+ })();+ var ContentType = (function () {+ function ContentType(value0) {+ this.value0 = value0;+ };+ ContentType.create = function (value0) {+ return new ContentType(value0);+ };+ return ContentType;+ })();+ var RequestHeader = (function () {+ function RequestHeader(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ RequestHeader.create = function (value0) {+ return function (value1) {+ return new RequestHeader(value0, value1);+ };+ };+ return RequestHeader;+ })();+ var requestHeaderValue = function (v) {+ if (v instanceof Accept) {+ return Data_Newtype.unwrap(Data_MediaType.newtypeMediaType)(v.value0);+ };+ if (v instanceof ContentType) {+ return Data_Newtype.unwrap(Data_MediaType.newtypeMediaType)(v.value0);+ };+ if (v instanceof RequestHeader) {+ return v.value1;+ };+ throw new Error("Failed pattern match at Affjax.RequestHeader (line 29, column 1 - line 29, column 46): " + [ v.constructor.name ]);+ };+ var requestHeaderName = function (v) {+ if (v instanceof Accept) {+ return "Accept";+ };+ if (v instanceof ContentType) {+ return "Content-Type";+ };+ if (v instanceof RequestHeader) {+ return v.value0;+ };+ throw new Error("Failed pattern match at Affjax.RequestHeader (line 24, column 1 - line 24, column 45): " + [ v.constructor.name ]);+ };+ exports["Accept"] = Accept;+ exports["ContentType"] = ContentType;+ exports["RequestHeader"] = RequestHeader;+ exports["requestHeaderName"] = requestHeaderName;+ exports["requestHeaderValue"] = requestHeaderValue;+})(PS["Affjax.RequestHeader"] = PS["Affjax.RequestHeader"] || {});+(function(exports) {+ "use strict";++ exports.unsafeToForeign = function (value) {+ return value;+ };++ exports.unsafeFromForeign = function (value) {+ return value;+ };++ exports.typeOf = function (value) {+ return typeof value;+ };++ exports.tagOf = function (value) {+ return Object.prototype.toString.call(value).slice(8, -1);+ };+})(PS["Foreign"] = PS["Foreign"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"]; + var MonadThrow = function (Monad0, throwError) {+ this.Monad0 = Monad0;+ this.throwError = throwError;+ };+ var MonadError = function (MonadThrow0, catchError) {+ this.MonadThrow0 = MonadThrow0;+ this.catchError = catchError;+ };+ var throwError = function (dict) {+ return dict.throwError;+ }; + var catchError = function (dict) {+ return dict.catchError;+ };+ var $$try = function (dictMonadError) {+ return function (a) {+ return catchError(dictMonadError)(Data_Functor.map(((((dictMonadError.MonadThrow0()).Monad0()).Bind1()).Apply0()).Functor0())(Data_Either.Right.create)(a))(function ($21) {+ return Control_Applicative.pure(((dictMonadError.MonadThrow0()).Monad0()).Applicative0())(Data_Either.Left.create($21));+ });+ };+ };+ exports["catchError"] = catchError;+ exports["throwError"] = throwError;+ exports["MonadThrow"] = MonadThrow;+ exports["MonadError"] = MonadError;+ exports["try"] = $$try;+})(PS["Control.Monad.Error.Class"] = PS["Control.Monad.Error.Class"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"]; + var MonadState = function (Monad0, state) {+ this.Monad0 = Monad0;+ this.state = state;+ };+ var state = function (dict) {+ return dict.state;+ };+ var modify_ = function (dictMonadState) {+ return function (f) {+ return state(dictMonadState)(function (s) {+ return new Data_Tuple.Tuple(Data_Unit.unit, f(s));+ });+ };+ };+ var modify = function (dictMonadState) {+ return function (f) {+ return state(dictMonadState)(function (s) {+ var s$prime = f(s);+ return new Data_Tuple.Tuple(s$prime, s$prime);+ });+ };+ };+ var gets = function (dictMonadState) {+ return function (f) {+ return state(dictMonadState)(function (s) {+ return new Data_Tuple.Tuple(f(s), s);+ });+ };+ };+ var get = function (dictMonadState) {+ return state(dictMonadState)(function (s) {+ return new Data_Tuple.Tuple(s, s);+ });+ };+ exports["state"] = state;+ exports["MonadState"] = MonadState;+ exports["get"] = get;+ exports["gets"] = gets;+ exports["modify"] = modify;+ exports["modify_"] = modify_;+})(PS["Control.Monad.State.Class"] = PS["Control.Monad.State.Class"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Prelude = PS["Prelude"]; + var MonadTrans = function (lift) {+ this.lift = lift;+ };+ var lift = function (dict) {+ return dict.lift;+ };+ exports["lift"] = lift;+ exports["MonadTrans"] = MonadTrans;+})(PS["Control.Monad.Trans.Class"] = PS["Control.Monad.Trans.Class"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Control_Monad = PS["Control.Monad"];+ var Effect = PS["Effect"]; + var MonadEffect = function (Monad0, liftEffect) {+ this.Monad0 = Monad0;+ this.liftEffect = liftEffect;+ }; + var liftEffect = function (dict) {+ return dict.liftEffect;+ };+ exports["liftEffect"] = liftEffect;+ exports["MonadEffect"] = MonadEffect;+})(PS["Effect.Class"] = PS["Effect.Class"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Monad_Cont_Class = PS["Control.Monad.Cont.Class"];+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Monad_Reader_Class = PS["Control.Monad.Reader.Class"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Monad_Writer_Class = PS["Control.Monad.Writer.Class"];+ var Control_MonadPlus = PS["Control.MonadPlus"];+ var Control_MonadZero = PS["Control.MonadZero"];+ var Control_Plus = PS["Control.Plus"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Tuple = PS["Data.Tuple"];+ var Effect_Class = PS["Effect.Class"];+ var Prelude = PS["Prelude"]; + var ExceptT = function (x) {+ return x;+ };+ var runExceptT = function (v) {+ return v;+ }; + var mapExceptT = function (f) {+ return function (v) {+ return f(v);+ };+ };+ var functorExceptT = function (dictFunctor) {+ return new Data_Functor.Functor(function (f) {+ return mapExceptT(Data_Functor.map(dictFunctor)(Data_Functor.map(Data_Either.functorEither)(f)));+ });+ };+ var monadExceptT = function (dictMonad) {+ return new Control_Monad.Monad(function () {+ return applicativeExceptT(dictMonad);+ }, function () {+ return bindExceptT(dictMonad);+ });+ };+ var bindExceptT = function (dictMonad) {+ return new Control_Bind.Bind(function () {+ return applyExceptT(dictMonad);+ }, function (v) {+ return function (k) {+ return Control_Bind.bind(dictMonad.Bind1())(v)(Data_Either.either(function ($97) {+ return Control_Applicative.pure(dictMonad.Applicative0())(Data_Either.Left.create($97));+ })(function (a) {+ var v1 = k(a);+ return v1;+ }));+ };+ });+ };+ var applyExceptT = function (dictMonad) {+ return new Control_Apply.Apply(function () {+ return functorExceptT(((dictMonad.Bind1()).Apply0()).Functor0());+ }, Control_Monad.ap(monadExceptT(dictMonad)));+ };+ var applicativeExceptT = function (dictMonad) {+ return new Control_Applicative.Applicative(function () {+ return applyExceptT(dictMonad);+ }, function ($98) {+ return ExceptT(Control_Applicative.pure(dictMonad.Applicative0())(Data_Either.Right.create($98)));+ });+ };+ var monadThrowExceptT = function (dictMonad) {+ return new Control_Monad_Error_Class.MonadThrow(function () {+ return monadExceptT(dictMonad);+ }, function ($102) {+ return ExceptT(Control_Applicative.pure(dictMonad.Applicative0())(Data_Either.Left.create($102)));+ });+ };+ exports["ExceptT"] = ExceptT;+ exports["runExceptT"] = runExceptT;+ exports["mapExceptT"] = mapExceptT;+ exports["functorExceptT"] = functorExceptT;+ exports["applyExceptT"] = applyExceptT;+ exports["applicativeExceptT"] = applicativeExceptT;+ exports["bindExceptT"] = bindExceptT;+ exports["monadExceptT"] = monadExceptT;+ exports["monadThrowExceptT"] = monadThrowExceptT;+})(PS["Control.Monad.Except.Trans"] = PS["Control.Monad.Except.Trans"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Identity = PS["Data.Identity"];+ var Data_Newtype = PS["Data.Newtype"];+ var Prelude = PS["Prelude"]; + var runExcept = function ($0) {+ return Data_Newtype.unwrap(Data_Identity.newtypeIdentity)(Control_Monad_Except_Trans.runExceptT($0));+ };+ exports["runExcept"] = runExcept;+})(PS["Control.Monad.Except"] = PS["Control.Monad.Except"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Category = PS["Control.Category"];+ var Control_Plus = PS["Control.Plus"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Data_Unfoldable1 = PS["Data.Unfoldable1"];+ var Prelude = PS["Prelude"]; + var NonEmpty = (function () {+ function NonEmpty(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ NonEmpty.create = function (value0) {+ return function (value1) {+ return new NonEmpty(value0, value1);+ };+ };+ return NonEmpty;+ })();+ var singleton = function (dictPlus) {+ return function (a) {+ return new NonEmpty(a, Control_Plus.empty(dictPlus));+ };+ };+ exports["NonEmpty"] = NonEmpty;+ exports["singleton"] = singleton;+})(PS["Data.NonEmpty"] = PS["Data.NonEmpty"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Comonad = PS["Control.Comonad"];+ var Control_Extend = PS["Control.Extend"];+ var Control_Monad = PS["Control.Monad"];+ var Control_MonadPlus = PS["Control.MonadPlus"];+ var Control_MonadZero = PS["Control.MonadZero"];+ var Control_Plus = PS["Control.Plus"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_NonEmpty = PS["Data.NonEmpty"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];+ var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Data_Unfoldable1 = PS["Data.Unfoldable1"];+ var Prelude = PS["Prelude"]; + var Nil = (function () {+ function Nil() {++ };+ Nil.value = new Nil();+ return Nil;+ })();+ var Cons = (function () {+ function Cons(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Cons.create = function (value0) {+ return function (value1) {+ return new Cons(value0, value1);+ };+ };+ return Cons;+ })();+ var NonEmptyList = function (x) {+ return x;+ };+ var foldableList = new Data_Foldable.Foldable(function (dictMonoid) {+ return function (f) {+ return Data_Foldable.foldl(foldableList)(function (acc) {+ return function ($174) {+ return Data_Semigroup.append(dictMonoid.Semigroup0())(acc)(f($174));+ };+ })(Data_Monoid.mempty(dictMonoid));+ };+ }, function (f) {+ var go = function ($copy_b) {+ return function ($copy_v) {+ var $tco_var_b = $copy_b;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(b, v) {+ if (v instanceof Nil) {+ $tco_done = true;+ return b;+ };+ if (v instanceof Cons) {+ $tco_var_b = f(b)(v.value0);+ $copy_v = v.value1;+ return;+ };+ throw new Error("Failed pattern match at Data.List.Types (line 81, column 12 - line 83, column 30): " + [ v.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_b, $copy_v);+ };+ return $tco_result;+ };+ };+ return go;+ }, function (f) {+ return function (b) {+ var rev = Data_Foldable.foldl(foldableList)(Data_Function.flip(Cons.create))(Nil.value);+ return function ($175) {+ return Data_Foldable.foldl(foldableList)(Data_Function.flip(f))(b)(rev($175));+ };+ };+ });+ var functorList = new Data_Functor.Functor(function (f) {+ return Data_Foldable.foldr(foldableList)(function (x) {+ return function (acc) {+ return new Cons(f(x), acc);+ };+ })(Nil.value);+ });+ var semigroupList = new Data_Semigroup.Semigroup(function (xs) {+ return function (ys) {+ return Data_Foldable.foldr(foldableList)(Cons.create)(ys)(xs);+ };+ });+ var applyList = new Control_Apply.Apply(function () {+ return functorList;+ }, function (v) {+ return function (v1) {+ if (v instanceof Nil) {+ return Nil.value;+ };+ if (v instanceof Cons) {+ return Data_Semigroup.append(semigroupList)(Data_Functor.map(functorList)(v.value0)(v1))(Control_Apply.apply(applyList)(v.value1)(v1));+ };+ throw new Error("Failed pattern match at Data.List.Types (line 127, column 1 - line 127, column 33): " + [ v.constructor.name, v1.constructor.name ]);+ };+ });+ var applicativeList = new Control_Applicative.Applicative(function () {+ return applyList;+ }, function (a) {+ return new Cons(a, Nil.value);+ }); + var altList = new Control_Alt.Alt(function () {+ return functorList;+ }, Data_Semigroup.append(semigroupList));+ var plusList = new Control_Plus.Plus(function () {+ return altList;+ }, Nil.value);+ exports["Nil"] = Nil;+ exports["Cons"] = Cons;+ exports["NonEmptyList"] = NonEmptyList;+ exports["semigroupList"] = semigroupList;+ exports["functorList"] = functorList;+ exports["foldableList"] = foldableList;+ exports["applyList"] = applyList;+ exports["applicativeList"] = applicativeList;+ exports["altList"] = altList;+ exports["plusList"] = plusList;+})(PS["Data.List.Types"] = PS["Data.List.Types"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Lazy = PS["Control.Lazy"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_NonEmpty = PS["Data.NonEmpty"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"];+ var reverse = (function () {+ var go = function ($copy_acc) {+ return function ($copy_v) {+ var $tco_var_acc = $copy_acc;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(acc, v) {+ if (v instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return acc;+ };+ if (v instanceof Data_List_Types.Cons) {+ $tco_var_acc = new Data_List_Types.Cons(v.value0, acc);+ $copy_v = v.value1;+ return;+ };+ throw new Error("Failed pattern match at Data.List (line 368, column 3 - line 368, column 19): " + [ acc.constructor.name, v.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_acc, $copy_v);+ };+ return $tco_result;+ };+ };+ return go(Data_List_Types.Nil.value);+ })();+ var $$null = function (v) {+ if (v instanceof Data_List_Types.Nil) {+ return true;+ };+ return false;+ };+ var fromFoldable = function (dictFoldable) {+ return Data_Foldable.foldr(dictFoldable)(Data_List_Types.Cons.create)(Data_List_Types.Nil.value);+ };+ exports["fromFoldable"] = fromFoldable;+ exports["null"] = $$null;+ exports["reverse"] = reverse;+})(PS["Data.List"] = PS["Data.List"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_NonEmpty = PS["Data.NonEmpty"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];+ var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"];+ var singleton = function ($165) {+ return Data_List_Types.NonEmptyList(Data_NonEmpty.singleton(Data_List_Types.plusList)($165));+ };+ var head = function (v) {+ return v.value0;+ };+ var cons = function (y) {+ return function (v) {+ return new Data_NonEmpty.NonEmpty(y, new Data_List_Types.Cons(v.value0, v.value1));+ };+ };+ exports["singleton"] = singleton;+ exports["cons"] = cons;+ exports["head"] = head;+})(PS["Data.List.NonEmpty"] = PS["Data.List.NonEmpty"] || {});+(function(exports) {+ "use strict";++ exports.singleton = function (c) {+ return c;+ };++ exports.length = function (s) {+ return s.length;+ };++ exports.drop = function (n) {+ return function (s) {+ return s.substring(n);+ };+ };+})(PS["Data.String.CodeUnits"] = PS["Data.String.CodeUnits"] || {});+(function(exports) {+ "use strict";++ exports.charAt = function (i) {+ return function (s) {+ if (i >= 0 && i < s.length) return s.charAt(i);+ throw new Error("Data.String.Unsafe.charAt: Invalid index.");+ };+ };+})(PS["Data.String.Unsafe"] = PS["Data.String.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.String.Unsafe"];+ exports["charAt"] = $foreign.charAt;+})(PS["Data.String.Unsafe"] = PS["Data.String.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.String.CodeUnits"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_String_Pattern = PS["Data.String.Pattern"];+ var Data_String_Unsafe = PS["Data.String.Unsafe"];+ var Prelude = PS["Prelude"];+ exports["singleton"] = $foreign.singleton;+ exports["length"] = $foreign.length;+ exports["drop"] = $foreign.drop;+})(PS["Data.String.CodeUnits"] = PS["Data.String.CodeUnits"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Foreign"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Monad_Except = PS["Control.Monad.Except"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Identity = PS["Data.Identity"];+ var Data_Int = PS["Data.Int"];+ var Data_List_NonEmpty = PS["Data.List.NonEmpty"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_String_CodeUnits = PS["Data.String.CodeUnits"];+ var Prelude = PS["Prelude"]; + var ForeignError = (function () {+ function ForeignError(value0) {+ this.value0 = value0;+ };+ ForeignError.create = function (value0) {+ return new ForeignError(value0);+ };+ return ForeignError;+ })();+ var TypeMismatch = (function () {+ function TypeMismatch(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ TypeMismatch.create = function (value0) {+ return function (value1) {+ return new TypeMismatch(value0, value1);+ };+ };+ return TypeMismatch;+ })();+ var fail = function ($107) {+ return Control_Monad_Error_Class.throwError(Control_Monad_Except_Trans.monadThrowExceptT(Data_Identity.monadIdentity))(Data_List_NonEmpty.singleton($107));+ };+ var unsafeReadTagged = function (tag) {+ return function (value) {+ if ($foreign.tagOf(value) === tag) {+ return Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity))($foreign.unsafeFromForeign(value));+ };+ if (Data_Boolean.otherwise) {+ return fail(new TypeMismatch(tag, $foreign.tagOf(value)));+ };+ throw new Error("Failed pattern match at Foreign (line 106, column 1 - line 106, column 55): " + [ tag.constructor.name, value.constructor.name ]);+ };+ };+ var readBoolean = unsafeReadTagged("Boolean");+ var readString = unsafeReadTagged("String");+ exports["ForeignError"] = ForeignError;+ exports["TypeMismatch"] = TypeMismatch;+ exports["unsafeReadTagged"] = unsafeReadTagged;+ exports["readString"] = readString;+ exports["readBoolean"] = readBoolean;+ exports["fail"] = fail;+ exports["unsafeToForeign"] = $foreign.unsafeToForeign;+ exports["typeOf"] = $foreign.typeOf;+})(PS["Foreign"] = PS["Foreign"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Data_Argonaut_Core = PS["Data.Argonaut.Core"];+ var Data_ArrayBuffer_Types = PS["Data.ArrayBuffer.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_MediaType = PS["Data.MediaType"];+ var Data_MediaType_Common = PS["Data.MediaType.Common"];+ var Foreign = PS["Foreign"];+ var Prelude = PS["Prelude"];+ var Web_DOM_Document = PS["Web.DOM.Document"];+ var Web_File_Blob = PS["Web.File.Blob"]; + var ResponseFormatError = (function () {+ function ResponseFormatError(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ ResponseFormatError.create = function (value0) {+ return function (value1) {+ return new ResponseFormatError(value0, value1);+ };+ };+ return ResponseFormatError;+ })();+ var $$ArrayBuffer = (function () {+ function $$ArrayBuffer(value0) {+ this.value0 = value0;+ };+ $$ArrayBuffer.create = function (value0) {+ return new $$ArrayBuffer(value0);+ };+ return $$ArrayBuffer;+ })();+ var Blob = (function () {+ function Blob(value0) {+ this.value0 = value0;+ };+ Blob.create = function (value0) {+ return new Blob(value0);+ };+ return Blob;+ })();+ var Document = (function () {+ function Document(value0) {+ this.value0 = value0;+ };+ Document.create = function (value0) {+ return new Document(value0);+ };+ return Document;+ })();+ var Json = (function () {+ function Json(value0) {+ this.value0 = value0;+ };+ Json.create = function (value0) {+ return new Json(value0);+ };+ return Json;+ })();+ var $$String = (function () {+ function $$String(value0) {+ this.value0 = value0;+ };+ $$String.create = function (value0) {+ return new $$String(value0);+ };+ return $$String;+ })();+ var Ignore = (function () {+ function Ignore(value0) {+ this.value0 = value0;+ };+ Ignore.create = function (value0) {+ return new Ignore(value0);+ };+ return Ignore;+ })();+ var toResponseType = function (v) {+ if (v instanceof $$ArrayBuffer) {+ return "arraybuffer";+ };+ if (v instanceof Blob) {+ return "blob";+ };+ if (v instanceof Document) {+ return "document";+ };+ if (v instanceof Json) {+ return "text";+ };+ if (v instanceof $$String) {+ return "text";+ };+ if (v instanceof Ignore) {+ return "";+ };+ throw new Error("Failed pattern match at Affjax.ResponseFormat (line 46, column 3 - line 54, column 1): " + [ v.constructor.name ]);+ };+ var toMediaType = function (v) {+ if (v instanceof Json) {+ return new Data_Maybe.Just(Data_MediaType_Common.applicationJSON);+ };+ return Data_Maybe.Nothing.value;+ };+ var json = new Json(Control_Category.identity(Control_Category.categoryFn));+ var ignore = new Ignore(Control_Category.identity(Control_Category.categoryFn));+ exports["ArrayBuffer"] = $$ArrayBuffer;+ exports["Blob"] = Blob;+ exports["Document"] = Document;+ exports["Json"] = Json;+ exports["String"] = $$String;+ exports["Ignore"] = Ignore;+ exports["json"] = json;+ exports["ignore"] = ignore;+ exports["toResponseType"] = toResponseType;+ exports["toMediaType"] = toMediaType;+ exports["ResponseFormatError"] = ResponseFormatError;+})(PS["Affjax.ResponseFormat"] = PS["Affjax.ResponseFormat"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Eq = PS["Data.Eq"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Prelude = PS["Prelude"]; + var ResponseHeader = (function () {+ function ResponseHeader(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ ResponseHeader.create = function (value0) {+ return function (value1) {+ return new ResponseHeader(value0, value1);+ };+ };+ return ResponseHeader;+ })();+ var responseHeader = function (field) {+ return function (value) {+ return new ResponseHeader(field, value);+ };+ };+ exports["responseHeader"] = responseHeader;+})(PS["Affjax.ResponseHeader"] = PS["Affjax.ResponseHeader"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_Cont_Trans = PS["Control.Monad.Cont.Trans"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Control_Monad_Maybe_Trans = PS["Control.Monad.Maybe.Trans"];+ var Control_Monad_Reader_Trans = PS["Control.Monad.Reader.Trans"];+ var Control_Monad_Writer_Trans = PS["Control.Monad.Writer.Trans"];+ var Control_Plus = PS["Control.Plus"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Functor_Compose = PS["Data.Functor.Compose"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Ref = PS["Effect.Ref"];+ var Prelude = PS["Prelude"];+ var Parallel = function (Applicative1, Monad0, parallel, sequential) {+ this.Applicative1 = Applicative1;+ this.Monad0 = Monad0;+ this.parallel = parallel;+ this.sequential = sequential;+ };+ var sequential = function (dict) {+ return dict.sequential;+ };+ var parallel = function (dict) {+ return dict.parallel;+ };+ exports["parallel"] = parallel;+ exports["sequential"] = sequential;+ exports["Parallel"] = Parallel;+})(PS["Control.Parallel.Class"] = PS["Control.Parallel.Class"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Category = PS["Control.Category"];+ var Control_Parallel_Class = PS["Control.Parallel.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Traversable = PS["Data.Traversable"];+ var Prelude = PS["Prelude"]; + var parTraverse_ = function (dictParallel) {+ return function (dictFoldable) {+ return function (f) {+ return function ($17) {+ return Control_Parallel_Class.sequential(dictParallel)(Data_Foldable.traverse_(dictParallel.Applicative1())(dictFoldable)(function ($18) {+ return Control_Parallel_Class.parallel(dictParallel)(f($18));+ })($17));+ };+ };+ };+ };+ var parSequence_ = function (dictParallel) {+ return function (dictFoldable) {+ return parTraverse_(dictParallel)(dictFoldable)(Control_Category.identity(Control_Category.categoryFn));+ };+ };+ exports["parTraverse_"] = parTraverse_;+ exports["parSequence_"] = parSequence_;+})(PS["Control.Parallel"] = PS["Control.Parallel"] || {});+(function(exports) {+ "use strict";++ exports._jsonParser = function (fail, succ, s) {+ try {+ return succ(JSON.parse(s));+ }+ catch (e) {+ return fail(e.message);+ }+ };+})(PS["Data.Argonaut.Parser"] = PS["Data.Argonaut.Parser"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Argonaut.Parser"];+ var Data_Argonaut_Core = PS["Data.Argonaut.Core"];+ var Data_Either = PS["Data.Either"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"]; + var jsonParser = function (j) {+ return $foreign["_jsonParser"](Data_Either.Left.create, Data_Either.Right.create, j);+ };+ exports["jsonParser"] = jsonParser;+})(PS["Data.Argonaut.Parser"] = PS["Data.Argonaut.Parser"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_String = PS["Data.String"];+ var Data_String_Common = PS["Data.String.Common"];+ var Prelude = PS["Prelude"]; + var OPTIONS = (function () {+ function OPTIONS() {++ };+ OPTIONS.value = new OPTIONS();+ return OPTIONS;+ })();+ var GET = (function () {+ function GET() {++ };+ GET.value = new GET();+ return GET;+ })();+ var HEAD = (function () {+ function HEAD() {++ };+ HEAD.value = new HEAD();+ return HEAD;+ })();+ var POST = (function () {+ function POST() {++ };+ POST.value = new POST();+ return POST;+ })();+ var PUT = (function () {+ function PUT() {++ };+ PUT.value = new PUT();+ return PUT;+ })();+ var DELETE = (function () {+ function DELETE() {++ };+ DELETE.value = new DELETE();+ return DELETE;+ })();+ var TRACE = (function () {+ function TRACE() {++ };+ TRACE.value = new TRACE();+ return TRACE;+ })();+ var CONNECT = (function () {+ function CONNECT() {++ };+ CONNECT.value = new CONNECT();+ return CONNECT;+ })();+ var PROPFIND = (function () {+ function PROPFIND() {++ };+ PROPFIND.value = new PROPFIND();+ return PROPFIND;+ })();+ var PROPPATCH = (function () {+ function PROPPATCH() {++ };+ PROPPATCH.value = new PROPPATCH();+ return PROPPATCH;+ })();+ var MKCOL = (function () {+ function MKCOL() {++ };+ MKCOL.value = new MKCOL();+ return MKCOL;+ })();+ var COPY = (function () {+ function COPY() {++ };+ COPY.value = new COPY();+ return COPY;+ })();+ var MOVE = (function () {+ function MOVE() {++ };+ MOVE.value = new MOVE();+ return MOVE;+ })();+ var LOCK = (function () {+ function LOCK() {++ };+ LOCK.value = new LOCK();+ return LOCK;+ })();+ var UNLOCK = (function () {+ function UNLOCK() {++ };+ UNLOCK.value = new UNLOCK();+ return UNLOCK;+ })();+ var PATCH = (function () {+ function PATCH() {++ };+ PATCH.value = new PATCH();+ return PATCH;+ })();+ var unCustomMethod = function (v) {+ return v;+ };+ var showMethod = new Data_Show.Show(function (v) {+ if (v instanceof OPTIONS) {+ return "OPTIONS";+ };+ if (v instanceof GET) {+ return "GET";+ };+ if (v instanceof HEAD) {+ return "HEAD";+ };+ if (v instanceof POST) {+ return "POST";+ };+ if (v instanceof PUT) {+ return "PUT";+ };+ if (v instanceof DELETE) {+ return "DELETE";+ };+ if (v instanceof TRACE) {+ return "TRACE";+ };+ if (v instanceof CONNECT) {+ return "CONNECT";+ };+ if (v instanceof PROPFIND) {+ return "PROPFIND";+ };+ if (v instanceof PROPPATCH) {+ return "PROPPATCH";+ };+ if (v instanceof MKCOL) {+ return "MKCOL";+ };+ if (v instanceof COPY) {+ return "COPY";+ };+ if (v instanceof MOVE) {+ return "MOVE";+ };+ if (v instanceof LOCK) {+ return "LOCK";+ };+ if (v instanceof UNLOCK) {+ return "UNLOCK";+ };+ if (v instanceof PATCH) {+ return "PATCH";+ };+ throw new Error("Failed pattern match at Data.HTTP.Method (line 40, column 1 - line 40, column 35): " + [ v.constructor.name ]);+ });+ var print = Data_Either.either(Data_Show.show(showMethod))(unCustomMethod);+ exports["OPTIONS"] = OPTIONS;+ exports["GET"] = GET;+ exports["HEAD"] = HEAD;+ exports["POST"] = POST;+ exports["PUT"] = PUT;+ exports["DELETE"] = DELETE;+ exports["TRACE"] = TRACE;+ exports["CONNECT"] = CONNECT;+ exports["PROPFIND"] = PROPFIND;+ exports["PROPPATCH"] = PROPPATCH;+ exports["MKCOL"] = MKCOL;+ exports["COPY"] = COPY;+ exports["MOVE"] = MOVE;+ exports["LOCK"] = LOCK;+ exports["UNLOCK"] = UNLOCK;+ exports["PATCH"] = PATCH;+ exports["unCustomMethod"] = unCustomMethod;+ exports["print"] = print;+ exports["showMethod"] = showMethod;+})(PS["Data.HTTP.Method"] = PS["Data.HTTP.Method"] || {});+(function(exports) {+ "use strict";++ exports["null"] = null;++ exports.nullable = function (a, r, f) {+ return a == null ? r : f(a);+ };++ exports.notNull = function (x) {+ return x;+ };+})(PS["Data.Nullable"] = PS["Data.Nullable"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Nullable"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Show = PS["Data.Show"];+ var Prelude = PS["Prelude"]; + var toNullable = Data_Maybe.maybe($foreign["null"])($foreign.notNull);+ var toMaybe = function (n) {+ return $foreign.nullable(n, Data_Maybe.Nothing.value, Data_Maybe.Just.create);+ };+ exports["toMaybe"] = toMaybe;+ exports["toNullable"] = toNullable;+})(PS["Data.Nullable"] = PS["Data.Nullable"] || {});+(function(exports) {+ /* globals setImmediate, clearImmediate, setTimeout, clearTimeout */+ /* jshint -W083, -W098, -W003 */+ "use strict";++ var Aff = function () {+ // A unique value for empty.+ var EMPTY = {};++ /*++ An awkward approximation. We elide evidence we would otherwise need in PS for+ efficiency sake.++ data Aff eff a+ = Pure a+ | Throw Error+ | Catch (Aff eff a) (Error -> Aff eff a)+ | Sync (Eff eff a)+ | Async ((Either Error a -> Eff eff Unit) -> Eff eff (Canceler eff))+ | forall b. Bind (Aff eff b) (b -> Aff eff a)+ | forall b. Bracket (Aff eff b) (BracketConditions eff b) (b -> Aff eff a)+ | forall b. Fork Boolean (Aff eff b) ?(Fiber eff b -> a)+ | Sequential (ParAff aff a)++ */ + var PURE = "Pure";+ var THROW = "Throw";+ var CATCH = "Catch";+ var SYNC = "Sync";+ var ASYNC = "Async";+ var BIND = "Bind";+ var BRACKET = "Bracket";+ var FORK = "Fork";+ var SEQ = "Sequential";++ /*++ data ParAff eff a+ = forall b. Map (b -> a) (ParAff eff b)+ | forall b. Apply (ParAff eff (b -> a)) (ParAff eff b)+ | Alt (ParAff eff a) (ParAff eff a)+ | ?Par (Aff eff a)++ */ + var MAP = "Map";+ var APPLY = "Apply";+ var ALT = "Alt";++ // Various constructors used in interpretation+ var CONS = "Cons"; // Cons-list, for stacks+ var RESUME = "Resume"; // Continue indiscriminately+ var RELEASE = "Release"; // Continue with bracket finalizers+ var FINALIZER = "Finalizer"; // A non-interruptible effect+ var FINALIZED = "Finalized"; // Marker for finalization+ var FORKED = "Forked"; // Reference to a forked fiber, with resumption stack+ var FIBER = "Fiber"; // Actual fiber reference+ var THUNK = "Thunk"; // Primed effect, ready to invoke++ function Aff(tag, _1, _2, _3) {+ this.tag = tag;+ this._1 = _1;+ this._2 = _2;+ this._3 = _3;+ }++ function AffCtr(tag) {+ var fn = function (_1, _2, _3) {+ return new Aff(tag, _1, _2, _3);+ };+ fn.tag = tag;+ return fn;+ }++ function nonCanceler(error) {+ return new Aff(PURE, void 0);+ }++ function runEff(eff) {+ try {+ eff();+ } catch (error) {+ setTimeout(function () {+ throw error;+ }, 0);+ }+ }++ function runSync(left, right, eff) {+ try {+ return right(eff());+ } catch (error) {+ return left(error);+ }+ }++ function runAsync(left, eff, k) {+ try {+ return eff(k)();+ } catch (error) {+ k(left(error))();+ return nonCanceler;+ }+ }++ var Scheduler = function () {+ var limit = 1024;+ var size = 0;+ var ix = 0;+ var queue = new Array(limit);+ var draining = false;++ function drain() {+ var thunk;+ draining = true;+ while (size !== 0) {+ size--;+ thunk = queue[ix];+ queue[ix] = void 0;+ ix = (ix + 1) % limit;+ thunk();+ }+ draining = false;+ }++ return {+ isDraining: function () {+ return draining;+ },+ enqueue: function (cb) {+ var i, tmp;+ if (size === limit) {+ tmp = draining;+ drain();+ draining = tmp;+ }++ queue[(ix + size) % limit] = cb;+ size++;++ if (!draining) {+ drain();+ }+ }+ };+ }();++ function Supervisor(util) {+ var fibers = {};+ var fiberId = 0;+ var count = 0;++ return {+ register: function (fiber) {+ var fid = fiberId++;+ fiber.onComplete({+ rethrow: true,+ handler: function (result) {+ return function () {+ count--;+ delete fibers[fid];+ };+ }+ });+ fibers[fid] = fiber;+ count++;+ },+ isEmpty: function () {+ return count === 0;+ },+ killAll: function (killError, cb) {+ return function () {+ var killCount = 0;+ var kills = {};++ function kill(fid) {+ kills[fid] = fibers[fid].kill(killError, function (result) {+ return function () {+ delete kills[fid];+ killCount--;+ if (util.isLeft(result) && util.fromLeft(result)) {+ setTimeout(function () {+ throw util.fromLeft(result);+ }, 0);+ }+ if (killCount === 0) {+ cb();+ }+ };+ })();+ }++ for (var k in fibers) {+ if (fibers.hasOwnProperty(k)) {+ killCount++;+ kill(k);+ }+ }++ fibers = {};+ fiberId = 0;+ count = 0;++ return function (error) {+ return new Aff(SYNC, function () {+ for (var k in kills) {+ if (kills.hasOwnProperty(k)) {+ kills[k]();+ }+ }+ });+ };+ };+ }+ };+ }++ // Fiber state machine+ var SUSPENDED = 0; // Suspended, pending a join.+ var CONTINUE = 1; // Interpret the next instruction.+ var STEP_BIND = 2; // Apply the next bind.+ var STEP_RESULT = 3; // Handle potential failure from a result.+ var PENDING = 4; // An async effect is running.+ var RETURN = 5; // The current stack has returned.+ var COMPLETED = 6; // The entire fiber has completed.++ function Fiber(util, supervisor, aff) {+ // Monotonically increasing tick, increased on each asynchronous turn.+ var runTick = 0;++ // The current branch of the state machine.+ var status = SUSPENDED;++ // The current point of interest for the state machine branch.+ var step = aff; // Successful step+ var fail = null; // Failure step+ var interrupt = null; // Asynchronous interrupt++ // Stack of continuations for the current fiber.+ var bhead = null;+ var btail = null;++ // Stack of attempts and finalizers for error recovery. Every `Cons` is also+ // tagged with current `interrupt` state. We use this to track which items+ // should be ignored or evaluated as a result of a kill.+ var attempts = null;++ // A special state is needed for Bracket, because it cannot be killed. When+ // we enter a bracket acquisition or finalizer, we increment the counter,+ // and then decrement once complete.+ var bracketCount = 0;++ // Each join gets a new id so they can be revoked.+ var joinId = 0;+ var joins = null;+ var rethrow = true;++ // Each invocation of `run` requires a tick. When an asynchronous effect is+ // resolved, we must check that the local tick coincides with the fiber+ // tick before resuming. This prevents multiple async continuations from+ // accidentally resuming the same fiber. A common example may be invoking+ // the provided callback in `makeAff` more than once, but it may also be an+ // async effect resuming after the fiber was already cancelled.+ function run(localRunTick) {+ var tmp, result, attempt;+ while (true) {+ tmp = null;+ result = null;+ attempt = null;++ switch (status) {+ case STEP_BIND:+ status = CONTINUE;+ step = bhead(step);+ if (btail === null) {+ bhead = null;+ } else {+ bhead = btail._1;+ btail = btail._2;+ }+ break;++ case STEP_RESULT:+ if (util.isLeft(step)) {+ status = RETURN;+ fail = step;+ step = null;+ } else if (bhead === null) {+ status = RETURN;+ } else {+ status = STEP_BIND;+ step = util.fromRight(step);+ }+ break;++ case CONTINUE:+ switch (step.tag) {+ case BIND:+ if (bhead) {+ btail = new Aff(CONS, bhead, btail);+ }+ bhead = step._2;+ status = CONTINUE;+ step = step._1;+ break;++ case PURE:+ if (bhead === null) {+ status = RETURN;+ step = util.right(step._1);+ } else {+ status = STEP_BIND;+ step = step._1;+ }+ break;++ case SYNC:+ status = STEP_RESULT;+ step = runSync(util.left, util.right, step._1);+ break;++ case ASYNC:+ status = PENDING;+ step = runAsync(util.left, step._1, function (result) {+ return function () {+ if (runTick !== localRunTick) {+ return;+ }+ runTick++;+ Scheduler.enqueue(function () {+ // It's possible to interrupt the fiber between enqueuing and+ // resuming, so we need to check that the runTick is still+ // valid.+ if (runTick !== localRunTick + 1) {+ return;+ }+ status = STEP_RESULT;+ step = result;+ run(runTick);+ });+ };+ });+ return;++ case THROW:+ status = RETURN;+ fail = util.left(step._1);+ step = null;+ break;++ // Enqueue the Catch so that we can call the error handler later on+ // in case of an exception.+ case CATCH:+ if (bhead === null) {+ attempts = new Aff(CONS, step, attempts, interrupt);+ } else {+ attempts = new Aff(CONS, step, new Aff(CONS, new Aff(RESUME, bhead, btail), attempts, interrupt), interrupt);+ }+ bhead = null;+ btail = null;+ status = CONTINUE;+ step = step._1;+ break;++ // Enqueue the Bracket so that we can call the appropriate handlers+ // after resource acquisition.+ case BRACKET:+ bracketCount++;+ if (bhead === null) {+ attempts = new Aff(CONS, step, attempts, interrupt);+ } else {+ attempts = new Aff(CONS, step, new Aff(CONS, new Aff(RESUME, bhead, btail), attempts, interrupt), interrupt);+ }+ bhead = null;+ btail = null;+ status = CONTINUE;+ step = step._1;+ break;++ case FORK:+ status = STEP_RESULT;+ tmp = Fiber(util, supervisor, step._2);+ if (supervisor) {+ supervisor.register(tmp);+ }+ if (step._1) {+ tmp.run();+ }+ step = util.right(tmp);+ break;++ case SEQ:+ status = CONTINUE;+ step = sequential(util, supervisor, step._1);+ break;+ }+ break;++ case RETURN:+ bhead = null;+ btail = null;+ // If the current stack has returned, and we have no other stacks to+ // resume or finalizers to run, the fiber has halted and we can+ // invoke all join callbacks. Otherwise we need to resume.+ if (attempts === null) {+ status = COMPLETED;+ step = interrupt || fail || step;+ } else {+ // The interrupt status for the enqueued item.+ tmp = attempts._3;+ attempt = attempts._1;+ attempts = attempts._2;++ switch (attempt.tag) {+ // We cannot recover from an interrupt. Otherwise we should+ // continue stepping, or run the exception handler if an exception+ // was raised.+ case CATCH:+ // We should compare the interrupt status as well because we+ // only want it to apply if there has been an interrupt since+ // enqueuing the catch.+ if (interrupt && interrupt !== tmp) {+ status = RETURN;+ } else if (fail) {+ status = CONTINUE;+ step = attempt._2(util.fromLeft(fail));+ fail = null;+ }+ break;++ // We cannot resume from an interrupt or exception.+ case RESUME:+ // As with Catch, we only want to ignore in the case of an+ // interrupt since enqueing the item.+ if (interrupt && interrupt !== tmp || fail) {+ status = RETURN;+ } else {+ bhead = attempt._1;+ btail = attempt._2;+ status = STEP_BIND;+ step = util.fromRight(step);+ }+ break;++ // If we have a bracket, we should enqueue the handlers,+ // and continue with the success branch only if the fiber has+ // not been interrupted. If the bracket acquisition failed, we+ // should not run either.+ case BRACKET:+ bracketCount--;+ if (fail === null) {+ result = util.fromRight(step);+ // We need to enqueue the Release with the same interrupt+ // status as the Bracket that is initiating it.+ attempts = new Aff(CONS, new Aff(RELEASE, attempt._2, result), attempts, tmp);+ // We should only coninue as long as the interrupt status has not changed or+ // we are currently within a non-interruptable finalizer.+ if (interrupt === tmp || bracketCount > 0) {+ status = CONTINUE;+ step = attempt._3(result);+ }+ }+ break;++ // Enqueue the appropriate handler. We increase the bracket count+ // because it should not be cancelled.+ case RELEASE:+ bracketCount++;+ attempts = new Aff(CONS, new Aff(FINALIZED, step, fail), attempts, interrupt);+ status = CONTINUE;+ // It has only been killed if the interrupt status has changed+ // since we enqueued the item.+ if (interrupt && interrupt !== tmp) {+ step = attempt._1.killed(util.fromLeft(interrupt))(attempt._2);+ } else if (fail) {+ step = attempt._1.failed(util.fromLeft(fail))(attempt._2);+ } else {+ step = attempt._1.completed(util.fromRight(step))(attempt._2);+ }+ fail = null;+ break;++ case FINALIZER:+ bracketCount++;+ attempts = new Aff(CONS, new Aff(FINALIZED, step, fail), attempts, interrupt);+ status = CONTINUE;+ step = attempt._1;+ break;++ case FINALIZED:+ bracketCount--;+ status = RETURN;+ step = attempt._1;+ fail = attempt._2;+ break;+ }+ }+ break;++ case COMPLETED:+ for (var k in joins) {+ if (joins.hasOwnProperty(k)) {+ rethrow = rethrow && joins[k].rethrow;+ runEff(joins[k].handler(step));+ }+ }+ joins = null;+ // If we have an interrupt and a fail, then the thread threw while+ // running finalizers. This should always rethrow in a fresh stack.+ if (interrupt && fail) {+ setTimeout(function () {+ throw util.fromLeft(fail);+ }, 0);+ // If we have an unhandled exception, and no other fiber has joined+ // then we need to throw the exception in a fresh stack.+ } else if (util.isLeft(step) && rethrow) {+ setTimeout(function () {+ // Guard on reathrow because a completely synchronous fiber can+ // still have an observer which was added after-the-fact.+ if (rethrow) {+ throw util.fromLeft(step);+ }+ }, 0);+ }+ return;+ case SUSPENDED:+ status = CONTINUE;+ break;+ case PENDING: return;+ }+ }+ }++ function onComplete(join) {+ return function () {+ if (status === COMPLETED) {+ rethrow = rethrow && join.rethrow;+ join.handler(step)();+ return function () {};+ }++ var jid = joinId++;+ joins = joins || {};+ joins[jid] = join;++ return function() {+ if (joins !== null) {+ delete joins[jid];+ }+ };+ };+ }++ function kill(error, cb) {+ return function () {+ if (status === COMPLETED) {+ cb(util.right(void 0))();+ return function () {};+ }++ var canceler = onComplete({+ rethrow: false,+ handler: function (/* unused */) {+ return cb(util.right(void 0));+ }+ })();++ switch (status) {+ case SUSPENDED:+ interrupt = util.left(error);+ status = COMPLETED;+ step = interrupt;+ run(runTick);+ break;+ case PENDING:+ if (interrupt === null) {+ interrupt = util.left(error);+ }+ if (bracketCount === 0) {+ if (status === PENDING) {+ attempts = new Aff(CONS, new Aff(FINALIZER, step(error)), attempts, interrupt);+ }+ status = RETURN;+ step = null;+ fail = null;+ run(++runTick);+ }+ break;+ default:+ if (interrupt === null) {+ interrupt = util.left(error);+ }+ if (bracketCount === 0) {+ status = RETURN;+ step = null;+ fail = null;+ }+ }++ return canceler;+ };+ }++ function join(cb) {+ return function () {+ var canceler = onComplete({+ rethrow: false,+ handler: cb+ })();+ if (status === SUSPENDED) {+ run(runTick);+ }+ return canceler;+ };+ }++ return {+ kill: kill,+ join: join,+ onComplete: onComplete,+ isSuspended: function () {+ return status === SUSPENDED;+ },+ run: function () {+ if (status === SUSPENDED) {+ if (!Scheduler.isDraining()) {+ Scheduler.enqueue(function () {+ run(runTick);+ });+ } else {+ run(runTick);+ }+ }+ }+ };+ }++ function runPar(util, supervisor, par, cb) {+ // Table of all forked fibers.+ var fiberId = 0;+ var fibers = {};++ // Table of currently running cancelers, as a product of `Alt` behavior.+ var killId = 0;+ var kills = {};++ // Error used for early cancelation on Alt branches.+ var early = new Error("[ParAff] Early exit");++ // Error used to kill the entire tree.+ var interrupt = null;++ // The root pointer of the tree.+ var root = EMPTY;++ // Walks a tree, invoking all the cancelers. Returns the table of pending+ // cancellation fibers.+ function kill(error, par, cb) {+ var step = par;+ var head = null;+ var tail = null;+ var count = 0;+ var kills = {};+ var tmp, kid;++ loop: while (true) {+ tmp = null;++ switch (step.tag) {+ case FORKED:+ if (step._3 === EMPTY) {+ tmp = fibers[step._1];+ kills[count++] = tmp.kill(error, function (result) {+ return function () {+ count--;+ if (count === 0) {+ cb(result)();+ }+ };+ });+ }+ // Terminal case.+ if (head === null) {+ break loop;+ }+ // Go down the right side of the tree.+ step = head._2;+ if (tail === null) {+ head = null;+ } else {+ head = tail._1;+ tail = tail._2;+ }+ break;+ case MAP:+ step = step._2;+ break;+ case APPLY:+ case ALT:+ if (head) {+ tail = new Aff(CONS, head, tail);+ }+ head = step;+ step = step._1;+ break;+ }+ }++ if (count === 0) {+ cb(util.right(void 0))();+ } else {+ // Run the cancelation effects. We alias `count` because it's mutable.+ kid = 0;+ tmp = count;+ for (; kid < tmp; kid++) {+ kills[kid] = kills[kid]();+ }+ }++ return kills;+ }++ // When a fiber resolves, we need to bubble back up the tree with the+ // result, computing the applicative nodes.+ function join(result, head, tail) {+ var fail, step, lhs, rhs, tmp, kid;++ if (util.isLeft(result)) {+ fail = result;+ step = null;+ } else {+ step = result;+ fail = null;+ }++ loop: while (true) {+ lhs = null;+ rhs = null;+ tmp = null;+ kid = null;++ // We should never continue if the entire tree has been interrupted.+ if (interrupt !== null) {+ return;+ }++ // We've made it all the way to the root of the tree, which means+ // the tree has fully evaluated.+ if (head === null) {+ cb(fail || step)();+ return;+ }++ // The tree has already been computed, so we shouldn't try to do it+ // again. This should never happen.+ // TODO: Remove this?+ if (head._3 !== EMPTY) {+ return;+ }++ switch (head.tag) {+ case MAP:+ if (fail === null) {+ head._3 = util.right(head._1(util.fromRight(step)));+ step = head._3;+ } else {+ head._3 = fail;+ }+ break;+ case APPLY:+ lhs = head._1._3;+ rhs = head._2._3;+ // If we have a failure we should kill the other side because we+ // can't possible yield a result anymore.+ if (fail) {+ head._3 = fail;+ tmp = true;+ kid = killId++;++ kills[kid] = kill(early, fail === lhs ? head._2 : head._1, function (/* unused */) {+ return function () {+ delete kills[kid];+ if (tmp) {+ tmp = false;+ } else if (tail === null) {+ join(fail, null, null);+ } else {+ join(fail, tail._1, tail._2);+ }+ };+ });++ if (tmp) {+ tmp = false;+ return;+ }+ } else if (lhs === EMPTY || rhs === EMPTY) {+ // We can only proceed if both sides have resolved.+ return;+ } else {+ step = util.right(util.fromRight(lhs)(util.fromRight(rhs)));+ head._3 = step;+ }+ break;+ case ALT:+ lhs = head._1._3;+ rhs = head._2._3;+ // We can only proceed if both have resolved or we have a success+ if (lhs === EMPTY && util.isLeft(rhs) || rhs === EMPTY && util.isLeft(lhs)) {+ return;+ }+ // If both sides resolve with an error, we should continue with the+ // first error+ if (lhs !== EMPTY && util.isLeft(lhs) && rhs !== EMPTY && util.isLeft(rhs)) {+ fail = step === lhs ? rhs : lhs;+ step = null;+ head._3 = fail;+ } else {+ head._3 = step;+ tmp = true;+ kid = killId++;+ // Once a side has resolved, we need to cancel the side that is still+ // pending before we can continue.+ kills[kid] = kill(early, step === lhs ? head._2 : head._1, function (/* unused */) {+ return function () {+ delete kills[kid];+ if (tmp) {+ tmp = false;+ } else if (tail === null) {+ join(step, null, null);+ } else {+ join(step, tail._1, tail._2);+ }+ };+ });++ if (tmp) {+ tmp = false;+ return;+ }+ }+ break;+ }++ if (tail === null) {+ head = null;+ } else {+ head = tail._1;+ tail = tail._2;+ }+ }+ }++ function resolve(fiber) {+ return function (result) {+ return function () {+ delete fibers[fiber._1];+ fiber._3 = result;+ join(result, fiber._2._1, fiber._2._2);+ };+ };+ }++ // Walks the applicative tree, substituting non-applicative nodes with+ // `FORKED` nodes. In this tree, all applicative nodes use the `_3` slot+ // as a mutable slot for memoization. In an unresolved state, the `_3`+ // slot is `EMPTY`. In the cases of `ALT` and `APPLY`, we always walk+ // the left side first, because both operations are left-associative. As+ // we `RETURN` from those branches, we then walk the right side.+ function run() {+ var status = CONTINUE;+ var step = par;+ var head = null;+ var tail = null;+ var tmp, fid;++ loop: while (true) {+ tmp = null;+ fid = null;++ switch (status) {+ case CONTINUE:+ switch (step.tag) {+ case MAP:+ if (head) {+ tail = new Aff(CONS, head, tail);+ }+ head = new Aff(MAP, step._1, EMPTY, EMPTY);+ step = step._2;+ break;+ case APPLY:+ if (head) {+ tail = new Aff(CONS, head, tail);+ }+ head = new Aff(APPLY, EMPTY, step._2, EMPTY);+ step = step._1;+ break;+ case ALT:+ if (head) {+ tail = new Aff(CONS, head, tail);+ }+ head = new Aff(ALT, EMPTY, step._2, EMPTY);+ step = step._1;+ break;+ default:+ // When we hit a leaf value, we suspend the stack in the `FORKED`.+ // When the fiber resolves, it can bubble back up the tree.+ fid = fiberId++;+ status = RETURN;+ tmp = step;+ step = new Aff(FORKED, fid, new Aff(CONS, head, tail), EMPTY);+ tmp = Fiber(util, supervisor, tmp);+ tmp.onComplete({+ rethrow: false,+ handler: resolve(step)+ })();+ fibers[fid] = tmp;+ if (supervisor) {+ supervisor.register(tmp);+ }+ }+ break;+ case RETURN:+ // Terminal case, we are back at the root.+ if (head === null) {+ break loop;+ }+ // If we are done with the right side, we need to continue down the+ // left. Otherwise we should continue up the stack.+ if (head._1 === EMPTY) {+ head._1 = step;+ status = CONTINUE;+ step = head._2;+ head._2 = EMPTY;+ } else {+ head._2 = step;+ step = head;+ if (tail === null) {+ head = null;+ } else {+ head = tail._1;+ tail = tail._2;+ }+ }+ }+ }++ // Keep a reference to the tree root so it can be cancelled.+ root = step;++ for (fid = 0; fid < fiberId; fid++) {+ fibers[fid].run();+ }+ }++ // Cancels the entire tree. If there are already subtrees being canceled,+ // we need to first cancel those joins. We will then add fresh joins for+ // all pending branches including those that were in the process of being+ // canceled.+ function cancel(error, cb) {+ interrupt = util.left(error);+ var innerKills;+ for (var kid in kills) {+ if (kills.hasOwnProperty(kid)) {+ innerKills = kills[kid];+ for (kid in innerKills) {+ if (innerKills.hasOwnProperty(kid)) {+ innerKills[kid]();+ }+ }+ }+ }++ kills = null;+ var newKills = kill(error, root, cb);++ return function (killError) {+ return new Aff(ASYNC, function (killCb) {+ return function () {+ for (var kid in newKills) {+ if (newKills.hasOwnProperty(kid)) {+ newKills[kid]();+ }+ }+ return nonCanceler;+ };+ });+ };+ }++ run();++ return function (killError) {+ return new Aff(ASYNC, function (killCb) {+ return function () {+ return cancel(killError, killCb);+ };+ });+ };+ }++ function sequential(util, supervisor, par) {+ return new Aff(ASYNC, function (cb) {+ return function () {+ return runPar(util, supervisor, par, cb);+ };+ });+ }++ Aff.EMPTY = EMPTY;+ Aff.Pure = AffCtr(PURE);+ Aff.Throw = AffCtr(THROW);+ Aff.Catch = AffCtr(CATCH);+ Aff.Sync = AffCtr(SYNC);+ Aff.Async = AffCtr(ASYNC);+ Aff.Bind = AffCtr(BIND);+ Aff.Bracket = AffCtr(BRACKET);+ Aff.Fork = AffCtr(FORK);+ Aff.Seq = AffCtr(SEQ);+ Aff.ParMap = AffCtr(MAP);+ Aff.ParApply = AffCtr(APPLY);+ Aff.ParAlt = AffCtr(ALT);+ Aff.Fiber = Fiber;+ Aff.Supervisor = Supervisor;+ Aff.Scheduler = Scheduler;+ Aff.nonCanceler = nonCanceler;++ return Aff;+ }();++ exports._pure = Aff.Pure;++ exports._throwError = Aff.Throw;++ exports._catchError = function (aff) {+ return function (k) {+ return Aff.Catch(aff, k);+ };+ };++ exports._map = function (f) {+ return function (aff) {+ if (aff.tag === Aff.Pure.tag) {+ return Aff.Pure(f(aff._1));+ } else {+ return Aff.Bind(aff, function (value) {+ return Aff.Pure(f(value));+ });+ }+ };+ };++ exports._bind = function (aff) {+ return function (k) {+ return Aff.Bind(aff, k);+ };+ };++ exports._fork = function (immediate) {+ return function (aff) {+ return Aff.Fork(immediate, aff);+ };+ };++ exports._liftEffect = Aff.Sync;++ exports._parAffMap = function (f) {+ return function (aff) {+ return Aff.ParMap(f, aff);+ };+ };++ exports._parAffApply = function (aff1) {+ return function (aff2) {+ return Aff.ParApply(aff1, aff2);+ };+ };++ exports.makeAff = Aff.Async;++ exports._makeFiber = function (util, aff) {+ return function () {+ return Aff.Fiber(util, null, aff);+ };+ }; ++ exports._sequential = Aff.Seq;+})(PS["Effect.Aff"] = PS["Effect.Aff"] || {});+(function(exports) {+ "use strict";++ exports.error = function (msg) {+ return new Error(msg);+ };++ exports.throwException = function (e) {+ return function () {+ throw e;+ };+ };+})(PS["Effect.Exception"] = PS["Effect.Exception"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Effect.Exception"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Show = PS["Data.Show"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var $$throw = function ($1) {+ return $foreign.throwException($foreign.error($1));+ };+ exports["throw"] = $$throw;+ exports["error"] = $foreign.error;+ exports["throwException"] = $foreign.throwException;+})(PS["Effect.Exception"] = PS["Effect.Exception"] || {});+(function(exports) {+ "use strict";++ exports.unsafePerformEffect = function (f) {+ return f();+ };+})(PS["Effect.Unsafe"] = PS["Effect.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Effect.Unsafe"];+ var Effect = PS["Effect"];+ exports["unsafePerformEffect"] = $foreign.unsafePerformEffect;+})(PS["Effect.Unsafe"] = PS["Effect.Unsafe"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Effect.Aff"];+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Lazy = PS["Control.Lazy"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Parallel = PS["Control.Parallel"];+ var Control_Parallel_Class = PS["Control.Parallel.Class"];+ var Control_Plus = PS["Control.Plus"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Time_Duration = PS["Data.Time.Duration"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Exception = PS["Effect.Exception"];+ var Effect_Unsafe = PS["Effect.Unsafe"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Canceler = function (x) {+ return x;+ };+ var suspendAff = $foreign["_fork"](false);+ var functorParAff = new Data_Functor.Functor($foreign["_parAffMap"]);+ var functorAff = new Data_Functor.Functor($foreign["_map"]);+ var forkAff = $foreign["_fork"](true);+ var ffiUtil = (function () {+ var unsafeFromRight = function (v) {+ if (v instanceof Data_Either.Right) {+ return v.value0;+ };+ if (v instanceof Data_Either.Left) {+ return Partial_Unsafe.unsafeCrashWith("unsafeFromRight: Left");+ };+ throw new Error("Failed pattern match at Effect.Aff (line 400, column 21 - line 402, column 31): " + [ v.constructor.name ]);+ };+ var unsafeFromLeft = function (v) {+ if (v instanceof Data_Either.Left) {+ return v.value0;+ };+ if (v instanceof Data_Either.Right) {+ return Partial_Unsafe.unsafeCrashWith("unsafeFromLeft: Right");+ };+ throw new Error("Failed pattern match at Effect.Aff (line 395, column 20 - line 399, column 3): " + [ v.constructor.name ]);+ };+ var isLeft = function (v) {+ if (v instanceof Data_Either.Left) {+ return true;+ };+ if (v instanceof Data_Either.Right) {+ return false;+ };+ throw new Error("Failed pattern match at Effect.Aff (line 390, column 12 - line 392, column 20): " + [ v.constructor.name ]);+ };+ return {+ isLeft: isLeft,+ fromLeft: unsafeFromLeft,+ fromRight: unsafeFromRight,+ left: Data_Either.Left.create,+ right: Data_Either.Right.create+ };+ })();+ var makeFiber = function (aff) {+ return $foreign["_makeFiber"](ffiUtil, aff);+ };+ var launchAff = function (aff) {+ return function __do() {+ var v = makeFiber(aff)();+ v.run();+ return v;+ };+ };+ var applyParAff = new Control_Apply.Apply(function () {+ return functorParAff;+ }, $foreign["_parAffApply"]);+ var monadAff = new Control_Monad.Monad(function () {+ return applicativeAff;+ }, function () {+ return bindAff;+ });+ var bindAff = new Control_Bind.Bind(function () {+ return applyAff;+ }, $foreign["_bind"]);+ var applyAff = new Control_Apply.Apply(function () {+ return functorAff;+ }, Control_Monad.ap(monadAff));+ var applicativeAff = new Control_Applicative.Applicative(function () {+ return applyAff;+ }, $foreign["_pure"]);+ var monadEffectAff = new Effect_Class.MonadEffect(function () {+ return monadAff;+ }, $foreign["_liftEffect"]);+ var effectCanceler = function ($50) {+ return Canceler(Data_Function["const"](Effect_Class.liftEffect(monadEffectAff)($50)));+ };+ var joinFiber = function (v) {+ return $foreign.makeAff(function (k) {+ return Data_Functor.map(Effect.functorEffect)(effectCanceler)(v.join(k));+ });+ };+ var functorFiber = new Data_Functor.Functor(function (f) {+ return function (t) {+ return Effect_Unsafe.unsafePerformEffect(makeFiber(Data_Functor.map(functorAff)(f)(joinFiber(t))));+ };+ });+ var killFiber = function (e) {+ return function (v) {+ return Control_Bind.bind(bindAff)(Effect_Class.liftEffect(monadEffectAff)(v.isSuspended))(function (v1) {+ if (v1) {+ return Effect_Class.liftEffect(monadEffectAff)(Data_Functor["void"](Effect.functorEffect)(v.kill(e, Data_Function["const"](Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit)))));+ };+ return $foreign.makeAff(function (k) {+ return Data_Functor.map(Effect.functorEffect)(effectCanceler)(v.kill(e, k));+ });+ });+ };+ };+ var monadThrowAff = new Control_Monad_Error_Class.MonadThrow(function () {+ return monadAff;+ }, $foreign["_throwError"]);+ var monadErrorAff = new Control_Monad_Error_Class.MonadError(function () {+ return monadThrowAff;+ }, $foreign["_catchError"]); + var runAff = function (k) {+ return function (aff) {+ return launchAff(Control_Bind.bindFlipped(bindAff)(function ($52) {+ return Effect_Class.liftEffect(monadEffectAff)(k($52));+ })(Control_Monad_Error_Class["try"](monadErrorAff)(aff)));+ };+ };+ var runAff_ = function (k) {+ return function (aff) {+ return Data_Functor["void"](Effect.functorEffect)(runAff(k)(aff));+ };+ };+ var parallelAff = new Control_Parallel_Class.Parallel(function () {+ return applicativeParAff;+ }, function () {+ return monadAff;+ }, Unsafe_Coerce.unsafeCoerce, $foreign["_sequential"]);+ var applicativeParAff = new Control_Applicative.Applicative(function () {+ return applyParAff;+ }, function ($54) {+ return Control_Parallel_Class.parallel(parallelAff)(Control_Applicative.pure(applicativeAff)($54));+ });+ var monadRecAff = new Control_Monad_Rec_Class.MonadRec(function () {+ return monadAff;+ }, function (k) {+ var go = function (a) {+ return Control_Bind.bind(bindAff)(k(a))(function (v) {+ if (v instanceof Control_Monad_Rec_Class.Done) {+ return Control_Applicative.pure(applicativeAff)(v.value0);+ };+ if (v instanceof Control_Monad_Rec_Class.Loop) {+ return go(v.value0);+ };+ throw new Error("Failed pattern match at Effect.Aff (line 100, column 7 - line 102, column 22): " + [ v.constructor.name ]);+ });+ };+ return go;+ });+ var nonCanceler = Data_Function["const"](Control_Applicative.pure(applicativeAff)(Data_Unit.unit));+ exports["Canceler"] = Canceler;+ exports["launchAff"] = launchAff;+ exports["runAff"] = runAff;+ exports["runAff_"] = runAff_;+ exports["forkAff"] = forkAff;+ exports["suspendAff"] = suspendAff;+ exports["killFiber"] = killFiber;+ exports["joinFiber"] = joinFiber;+ exports["nonCanceler"] = nonCanceler;+ exports["effectCanceler"] = effectCanceler;+ exports["functorAff"] = functorAff;+ exports["applyAff"] = applyAff;+ exports["applicativeAff"] = applicativeAff;+ exports["bindAff"] = bindAff;+ exports["monadAff"] = monadAff;+ exports["monadRecAff"] = monadRecAff;+ exports["monadThrowAff"] = monadThrowAff;+ exports["monadErrorAff"] = monadErrorAff;+ exports["monadEffectAff"] = monadEffectAff;+ exports["functorParAff"] = functorParAff;+ exports["applyParAff"] = applyParAff;+ exports["applicativeParAff"] = applicativeParAff;+ exports["parallelAff"] = parallelAff;+ exports["functorFiber"] = functorFiber;+ exports["makeAff"] = $foreign.makeAff;+})(PS["Effect.Aff"] = PS["Effect.Aff"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Function = PS["Data.Function"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Exception = PS["Effect.Exception"];+ var Effect_Uncurried = PS["Effect.Uncurried"];+ var Prelude = PS["Prelude"];+ var fromEffectFnAff = function (v) {+ return Effect_Aff.makeAff(function (k) {+ return function __do() {+ var v1 = v(function ($4) {+ return k(Data_Either.Left.create($4))();+ }, function ($5) {+ return k(Data_Either.Right.create($5))();+ });+ return function (e) {+ return Effect_Aff.makeAff(function (k2) {+ return function __do() {+ v1(e, function ($6) {+ return k2(Data_Either.Left.create($6))();+ }, function ($7) {+ return k2(Data_Either.Right.create($7))();+ });+ return Effect_Aff.nonCanceler;+ };+ });+ };+ };+ });+ };+ exports["fromEffectFnAff"] = fromEffectFnAff;+})(PS["Effect.Aff.Compat"] = PS["Effect.Aff.Compat"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Affjax"];+ var Affjax_RequestBody = PS["Affjax.RequestBody"];+ var Affjax_RequestHeader = PS["Affjax.RequestHeader"];+ var Affjax_ResponseFormat = PS["Affjax.ResponseFormat"];+ var Affjax_ResponseHeader = PS["Affjax.ResponseHeader"];+ var Affjax_StatusCode = PS["Affjax.StatusCode"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Monad_Except = PS["Control.Monad.Except"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Control_Parallel = PS["Control.Parallel"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Argonaut_Core = PS["Data.Argonaut.Core"];+ var Data_Argonaut_Parser = PS["Data.Argonaut.Parser"];+ var Data_Array = PS["Data.Array"];+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_FormURLEncoded = PS["Data.FormURLEncoded"];+ var Data_Function = PS["Data.Function"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HTTP_Method = PS["Data.HTTP.Method"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Identity = PS["Data.Identity"];+ var Data_Int = PS["Data.Int"];+ var Data_List_NonEmpty = PS["Data.List.NonEmpty"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Time_Duration = PS["Data.Time.Duration"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Aff_Compat = PS["Effect.Aff.Compat"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Exception = PS["Effect.Exception"];+ var Effect_Ref = PS["Effect.Ref"];+ var Foreign = PS["Foreign"];+ var $$Math = PS["Math"];+ var Prelude = PS["Prelude"];+ var request = function (req) {+ var parseJSON = function (v) {+ if (v === "") {+ return Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity))(Data_Argonaut_Core.jsonEmptyObject);+ };+ return Data_Either.either(function ($66) {+ return Foreign.fail(Foreign.ForeignError.create($66));+ })(Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity)))(Data_Argonaut_Parser.jsonParser(v));+ };+ var fromResponse$prime = (function () {+ if (req.responseFormat instanceof Affjax_ResponseFormat["ArrayBuffer"]) {+ return Foreign.unsafeReadTagged("ArrayBuffer");+ };+ if (req.responseFormat instanceof Affjax_ResponseFormat.Blob) {+ return Foreign.unsafeReadTagged("Blob");+ };+ if (req.responseFormat instanceof Affjax_ResponseFormat.Document) {+ return Foreign.unsafeReadTagged("Document");+ };+ if (req.responseFormat instanceof Affjax_ResponseFormat.Json) {+ return Control_Bind.composeKleisliFlipped(Control_Monad_Except_Trans.bindExceptT(Data_Identity.monadIdentity))(function ($67) {+ return req.responseFormat.value0(parseJSON($67));+ })(Foreign.unsafeReadTagged("String"));+ };+ if (req.responseFormat instanceof Affjax_ResponseFormat["String"]) {+ return Foreign.unsafeReadTagged("String");+ };+ if (req.responseFormat instanceof Affjax_ResponseFormat.Ignore) {+ return Data_Function["const"](req.responseFormat.value0(Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity))(Data_Unit.unit)));+ };+ throw new Error("Failed pattern match at Affjax (line 292, column 19 - line 298, column 57): " + [ req.responseFormat.constructor.name ]);+ })();+ var extractContent = function (v) {+ if (v instanceof Affjax_RequestBody.ArrayView) {+ return v.value0(Foreign.unsafeToForeign);+ };+ if (v instanceof Affjax_RequestBody.Blob) {+ return Foreign.unsafeToForeign(v.value0);+ };+ if (v instanceof Affjax_RequestBody.Document) {+ return Foreign.unsafeToForeign(v.value0);+ };+ if (v instanceof Affjax_RequestBody["String"]) {+ return Foreign.unsafeToForeign(v.value0);+ };+ if (v instanceof Affjax_RequestBody.FormData) {+ return Foreign.unsafeToForeign(v.value0);+ };+ if (v instanceof Affjax_RequestBody.FormURLEncoded) {+ return Foreign.unsafeToForeign(Data_FormURLEncoded.encode(v.value0));+ };+ if (v instanceof Affjax_RequestBody.Json) {+ return Foreign.unsafeToForeign(Data_Argonaut_Core.stringify(v.value0));+ };+ throw new Error("Failed pattern match at Affjax (line 266, column 20 - line 273, column 57): " + [ v.constructor.name ]);+ };+ var addHeader = function (mh) {+ return function (hs) {+ if (mh instanceof Data_Maybe.Just && !Data_Foldable.any(Data_Foldable.foldableArray)(Data_HeytingAlgebra.heytingAlgebraBoolean)(Data_Function.on(Data_Eq.eq(Data_Eq.eqString))(Affjax_RequestHeader.requestHeaderName)(mh.value0))(hs)) {+ return Data_Array.snoc(hs)(mh.value0);+ };+ return hs;+ };+ };+ var headers = function (reqContent) {+ return addHeader(Data_Functor.map(Data_Maybe.functorMaybe)(Affjax_RequestHeader.ContentType.create)(Control_Bind.bindFlipped(Data_Maybe.bindMaybe)(Affjax_RequestBody.toMediaType)(reqContent)))(addHeader(Data_Functor.map(Data_Maybe.functorMaybe)(Affjax_RequestHeader.Accept.create)(Affjax_ResponseFormat.toMediaType(req.responseFormat)))(req.headers));+ };+ var req$prime = {+ method: Data_HTTP_Method.print(req.method),+ url: req.url,+ headers: Data_Functor.map(Data_Functor.functorArray)(function (h) {+ return {+ field: Affjax_RequestHeader.requestHeaderName(h),+ value: Affjax_RequestHeader.requestHeaderValue(h)+ };+ })(headers(req.content)),+ content: Data_Nullable.toNullable(Data_Functor.map(Data_Maybe.functorMaybe)(extractContent)(req.content)),+ responseType: Affjax_ResponseFormat.toResponseType(req.responseFormat),+ username: Data_Nullable.toNullable(req.username),+ password: Data_Nullable.toNullable(req.password),+ withCredentials: req.withCredentials+ };+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Aff_Compat.fromEffectFnAff($foreign["_ajax"](Affjax_ResponseHeader.responseHeader, req$prime)))(function (v) {+ var v1 = Control_Monad_Except.runExcept(fromResponse$prime(v.body));+ if (v1 instanceof Data_Either.Left) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)({+ body: new Data_Either.Left(new Affjax_ResponseFormat.ResponseFormatError(Data_List_NonEmpty.head(v1.value0), v.body)),+ headers: v.headers,+ status: v.status,+ statusText: v.statusText+ });+ };+ if (v1 instanceof Data_Either.Right) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)({+ body: new Data_Either.Right(v1.value0),+ headers: v.headers,+ status: v.status,+ statusText: v.statusText+ });+ };+ throw new Error("Failed pattern match at Affjax (line 246, column 3 - line 250, column 39): " + [ v1.constructor.name ]);+ });+ };+ var defaultRequest = {+ method: new Data_Either.Left(Data_HTTP_Method.GET.value),+ url: "/",+ headers: [ ],+ content: Data_Maybe.Nothing.value,+ username: Data_Maybe.Nothing.value,+ password: Data_Maybe.Nothing.value,+ withCredentials: false,+ responseFormat: Affjax_ResponseFormat.ignore+ };+ exports["defaultRequest"] = defaultRequest;+ exports["request"] = request;+})(PS["Affjax"] = PS["Affjax"] || {});+(function(exports) {+ "use strict";++ exports._app = function() {+ return app;+ }++ exports._mmoment8601 = function(just, nothing, tuple, s) {+ try {+ var m = moment(s, moment.ISO_8601);+ var s1 = m.fromNow();+ var s2 = m.format('MMMM D YYYY, h:mm a') + " (" + m.format() + ") ";+ return just(tuple(s1)(s2));+ } catch (error) {+ return nothing+ }+ }++ exports._closeWindow = function (window) {+ window.close();+ };+})(PS["Globals"] = PS["Globals"] || {});+(function(exports) {+ "use strict";++ exports.unsafeReadPropImpl = function (f, s, key, value) {+ return value == null ? f : s(value[key]);+ };+})(PS["Foreign.Index"] = PS["Foreign.Index"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Foreign.Index"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Identity = PS["Data.Identity"];+ var Data_List_NonEmpty = PS["Data.List.NonEmpty"];+ var Foreign = PS["Foreign"];+ var Prelude = PS["Prelude"];+ var unsafeReadProp = function (k) {+ return function (value) {+ return $foreign.unsafeReadPropImpl(Foreign.fail(new Foreign.TypeMismatch("object", Foreign.typeOf(value))), Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(Data_Identity.monadIdentity)), k, value);+ };+ };+ var readProp = unsafeReadProp;+ exports["readProp"] = readProp;+})(PS["Foreign.Index"] = PS["Foreign.Index"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Type_Data_Boolean = PS["Type.Data.Boolean"];+ var Type_Data_Symbol = PS["Type.Data.Symbol"];+ var Type_Equality = PS["Type.Equality"];+ var RLProxy = (function () {+ function RLProxy() {++ };+ RLProxy.value = new RLProxy();+ return RLProxy;+ })();+ exports["RLProxy"] = RLProxy;+})(PS["Type.Row"] = PS["Type.Row"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Eq = PS["Data.Eq"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Symbol = PS["Data.Symbol"];+ var Prelude = PS["Prelude"];+ var Record_Unsafe = PS["Record.Unsafe"];+ var Record_Unsafe_Union = PS["Record.Unsafe.Union"];+ var Type_Row = PS["Type.Row"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var get = function (dictIsSymbol) {+ return function (dictCons) {+ return function (l) {+ return function (r) {+ return Record_Unsafe.unsafeGet(Data_Symbol.reflectSymbol(dictIsSymbol)(l))(r);+ };+ };+ };+ };+ exports["get"] = get;+})(PS["Record"] = PS["Record"] || {});+(function(exports) {+ "use strict";++ exports.copyRecord = function(rec) {+ var copy = {};+ for (var key in rec) {+ if ({}.hasOwnProperty.call(rec, key)) {+ copy[key] = rec[key];+ }+ }+ return copy;+ };++ exports.unsafeInsert = function(l) {+ return function(a) {+ return function(rec) {+ rec[l] = a;+ return rec;+ };+ };+ };+})(PS["Record.Builder"] = PS["Record.Builder"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Record.Builder"];+ var Control_Category = PS["Control.Category"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Symbol = PS["Data.Symbol"];+ var Prelude = PS["Prelude"];+ var Record_Unsafe_Union = PS["Record.Unsafe.Union"];+ var Type_Row = PS["Type.Row"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var semigroupoidBuilder = Control_Semigroupoid.semigroupoidFn;+ var insert = function (dictCons) {+ return function (dictLacks) {+ return function (dictIsSymbol) {+ return function (l) {+ return function (a) {+ return function (r1) {+ return $foreign.unsafeInsert(Data_Symbol.reflectSymbol(dictIsSymbol)(l))(a)(r1);+ };+ };+ };+ };+ };+ };+ var categoryBuilder = Control_Category.categoryFn;+ var build = function (v) {+ return function (r1) {+ return v($foreign.copyRecord(r1));+ };+ };+ exports["build"] = build;+ exports["insert"] = insert;+ exports["semigroupoidBuilder"] = semigroupoidBuilder;+ exports["categoryBuilder"] = categoryBuilder;+})(PS["Record.Builder"] = PS["Record.Builder"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Simple.JSON"];+ var Control_Alt = PS["Control.Alt"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Monad_Except = PS["Control.Monad.Except"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Identity = PS["Data.Identity"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Symbol = PS["Data.Symbol"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Variant = PS["Data.Variant"];+ var Effect_Exception = PS["Effect.Exception"];+ var Effect_Uncurried = PS["Effect.Uncurried"];+ var Effect_Unsafe = PS["Effect.Unsafe"];+ var Foreign = PS["Foreign"];+ var Foreign_Index = PS["Foreign.Index"];+ var Foreign_Object = PS["Foreign.Object"];+ var Global_Unsafe = PS["Global.Unsafe"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"];+ var Record = PS["Record"];+ var Record_Builder = PS["Record.Builder"];+ var Type_Prelude = PS["Type.Prelude"];+ var Type_Row = PS["Type.Row"];+ var WriteForeign = function (writeImpl) {+ this.writeImpl = writeImpl;+ };+ var WriteForeignFields = function (writeImplFields) {+ this.writeImplFields = writeImplFields;+ };+ var writeImplFields = function (dict) {+ return dict.writeImplFields;+ };+ var writeImpl = function (dict) {+ return dict.writeImpl;+ };+ var writeJSON = function (dictWriteForeign) {+ return function ($85) {+ return Global_Unsafe.unsafeStringify(writeImpl(dictWriteForeign)($85));+ };+ };+ var writeForeignString = new WriteForeign(Foreign.unsafeToForeign);+ var writeForeignNullable = function (dictWriteForeign) {+ return new WriteForeign(function ($87) {+ return Data_Maybe.maybe(Foreign.unsafeToForeign(Data_Nullable.toNullable(Data_Maybe.Nothing.value)))(writeImpl(dictWriteForeign))(Data_Nullable.toMaybe($87));+ });+ };+ var writeForeignInt = new WriteForeign(Foreign.unsafeToForeign); + var writeForeignBoolean = new WriteForeign(Foreign.unsafeToForeign);+ var recordWriteForeign = function (dictRowToList) {+ return function (dictWriteForeignFields) {+ return new WriteForeign(function (rec) {+ var steps = writeImplFields(dictWriteForeignFields)(Type_Row.RLProxy.value)(rec);+ return Foreign.unsafeToForeign(Record_Builder.build(steps)({}));+ });+ };+ }; + var nilWriteForeignFields = new WriteForeignFields(function (v) {+ return function (v1) {+ return Control_Category.identity(Record_Builder.categoryBuilder);+ };+ });+ var consWriteForeignFields = function (dictIsSymbol) {+ return function (dictWriteForeign) {+ return function (dictWriteForeignFields) {+ return function (dictCons) {+ return function (dictLacks) {+ return function (dictCons1) {+ return new WriteForeignFields(function (v) {+ return function (rec) {+ var rest = writeImplFields(dictWriteForeignFields)(Type_Row.RLProxy.value)(rec);+ var value = writeImpl(dictWriteForeign)(Record.get(dictIsSymbol)(dictCons)(Data_Symbol.SProxy.value)(rec));+ var result = Control_Semigroupoid.compose(Record_Builder.semigroupoidBuilder)(Record_Builder.insert(dictCons1)(dictLacks)(dictIsSymbol)(Data_Symbol.SProxy.value)(value))(rest);+ return result;+ };+ });+ };+ };+ };+ };+ };+ };+ exports["writeJSON"] = writeJSON;+ exports["WriteForeign"] = WriteForeign;+ exports["writeImpl"] = writeImpl;+ exports["WriteForeignFields"] = WriteForeignFields;+ exports["writeImplFields"] = writeImplFields;+ exports["writeForeignString"] = writeForeignString;+ exports["writeForeignInt"] = writeForeignInt;+ exports["writeForeignBoolean"] = writeForeignBoolean;+ exports["writeForeignNullable"] = writeForeignNullable;+ exports["recordWriteForeign"] = recordWriteForeign;+ exports["consWriteForeignFields"] = consWriteForeignFields;+ exports["nilWriteForeignFields"] = nilWriteForeignFields;+})(PS["Simple.JSON"] = PS["Simple.JSON"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Symbol = PS["Data.Symbol"];+ var Simple_JSON = PS["Simple.JSON"];+ var usersettings_wfI = Simple_JSON.recordWriteForeign()(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "archiveDefault";+ }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "privacyLock";+ }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "privateDefault";+ }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.nilWriteForeignFields)()()())()()())()()());+ var note_wfI = Simple_JSON.recordWriteForeign()(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "created";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "id";+ }))(Simple_JSON.writeForeignInt)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "isMarkdown";+ }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "length";+ }))(Simple_JSON.writeForeignInt)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "slug";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "text";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "title";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "updated";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.nilWriteForeignFields)()()())()()())()()())()()())()()())()()())()()())()()());+ var bookmark_wfI = Simple_JSON.recordWriteForeign()(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "archiveUrl";+ }))(Simple_JSON.writeForeignNullable(Simple_JSON.writeForeignString))(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "bid";+ }))(Simple_JSON.writeForeignInt)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "description";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "private";+ }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "selected";+ }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "slug";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "tags";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "time";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "title";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "toread";+ }))(Simple_JSON.writeForeignBoolean)(Simple_JSON.consWriteForeignFields(new Data_Symbol.IsSymbol(function () {+ return "url";+ }))(Simple_JSON.writeForeignString)(Simple_JSON.nilWriteForeignFields)()()())()()())()()())()()())()()())()()())()()())()()())()()())()()())()()());+ exports["bookmark_wfI"] = bookmark_wfI;+ exports["note_wfI"] = note_wfI;+ exports["usersettings_wfI"] = usersettings_wfI;+})(PS["Model"] = PS["Model"] || {});+(function(exports) {+ /* global window */+ "use strict";++ exports.window = function () {+ return window;+ };+})(PS["Web.HTML"] = PS["Web.HTML"] || {});+(function(exports) {+ "use strict"; ++ exports._querySelector = function (selector) {+ return function (node) {+ return function () {+ return node.querySelector(selector);+ };+ };+ };+})(PS["Web.DOM.ParentNode"] = PS["Web.DOM.ParentNode"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.DOM.ParentNode"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Ord = PS["Data.Ord"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var Web_DOM_HTMLCollection = PS["Web.DOM.HTMLCollection"];+ var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];+ var Web_DOM_NodeList = PS["Web.DOM.NodeList"];+ var querySelector = function (qs) {+ return function ($3) {+ return Data_Functor.map(Effect.functorEffect)(Data_Nullable.toMaybe)($foreign["_querySelector"](qs)($3));+ };+ };+ exports["querySelector"] = querySelector;+})(PS["Web.DOM.ParentNode"] = PS["Web.DOM.ParentNode"] || {});+(function(exports) {+ "use strict";++ exports.eventListener = function (fn) {+ return function () {+ return function (event) {+ return fn(event)();+ };+ };+ };+})(PS["Web.Event.EventTarget"] = PS["Web.Event.EventTarget"] || {});+(function(exports) {+ "use strict";++ exports._currentTarget = function (e) {+ return e.currentTarget;+ };++ exports.preventDefault = function (e) {+ return function () {+ return e.preventDefault();+ };+ };+})(PS["Web.Event.Event"] = PS["Web.Event.Event"] || {});+(function(exports) {+ "use strict";++ exports.toCharCode = function (c) {+ return c.charCodeAt(0);+ };++ exports.fromCharCode = function (c) {+ return String.fromCharCode(c);+ };+})(PS["Data.Enum"] = PS["Data.Enum"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.Enum"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_MonadPlus = PS["Control.MonadPlus"];+ var Control_MonadZero = PS["Control.MonadZero"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Bounded = PS["Data.Bounded"];+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Data_Unfoldable1 = PS["Data.Unfoldable1"];+ var Data_Unit = PS["Data.Unit"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"];+ var Enum = function (Ord0, pred, succ) {+ this.Ord0 = Ord0;+ this.pred = pred;+ this.succ = succ;+ };+ var BoundedEnum = function (Bounded0, Enum1, cardinality, fromEnum, toEnum) {+ this.Bounded0 = Bounded0;+ this.Enum1 = Enum1;+ this.cardinality = cardinality;+ this.fromEnum = fromEnum;+ this.toEnum = toEnum;+ };+ var toEnum = function (dict) {+ return dict.toEnum;+ };+ var succ = function (dict) {+ return dict.succ;+ }; + var pred = function (dict) {+ return dict.pred;+ }; + var fromEnum = function (dict) {+ return dict.fromEnum;+ };+ var toEnumWithDefaults = function (dictBoundedEnum) {+ return function (low) {+ return function (high) {+ return function (x) {+ var v = toEnum(dictBoundedEnum)(x);+ if (v instanceof Data_Maybe.Just) {+ return v.value0;+ };+ if (v instanceof Data_Maybe.Nothing) {+ var $51 = x < fromEnum(dictBoundedEnum)(Data_Bounded.bottom(dictBoundedEnum.Bounded0()));+ if ($51) {+ return low;+ };+ return high;+ };+ throw new Error("Failed pattern match at Data.Enum (line 158, column 33 - line 160, column 62): " + [ v.constructor.name ]);+ };+ };+ };+ };+ var defaultSucc = function (toEnum$prime) {+ return function (fromEnum$prime) {+ return function (a) {+ return toEnum$prime(fromEnum$prime(a) + 1 | 0);+ };+ };+ };+ var defaultPred = function (toEnum$prime) {+ return function (fromEnum$prime) {+ return function (a) {+ return toEnum$prime(fromEnum$prime(a) - 1 | 0);+ };+ };+ };+ var charToEnum = function (v) {+ if (v >= Data_Bounded.bottom(Data_Bounded.boundedInt) && v <= Data_Bounded.top(Data_Bounded.boundedInt)) {+ return new Data_Maybe.Just($foreign.fromCharCode(v));+ };+ return Data_Maybe.Nothing.value;+ };+ var enumChar = new Enum(function () {+ return Data_Ord.ordChar;+ }, defaultPred(charToEnum)($foreign.toCharCode), defaultSucc(charToEnum)($foreign.toCharCode));+ var cardinality = function (dict) {+ return dict.cardinality;+ }; + var boundedEnumChar = new BoundedEnum(function () {+ return Data_Bounded.boundedChar;+ }, function () {+ return enumChar;+ }, $foreign.toCharCode(Data_Bounded.top(Data_Bounded.boundedChar)) - $foreign.toCharCode(Data_Bounded.bottom(Data_Bounded.boundedChar)) | 0, $foreign.toCharCode, charToEnum);+ exports["Enum"] = Enum;+ exports["succ"] = succ;+ exports["pred"] = pred;+ exports["BoundedEnum"] = BoundedEnum;+ exports["cardinality"] = cardinality;+ exports["toEnum"] = toEnum;+ exports["fromEnum"] = fromEnum;+ exports["toEnumWithDefaults"] = toEnumWithDefaults;+ exports["defaultSucc"] = defaultSucc;+ exports["defaultPred"] = defaultPred;+ exports["enumChar"] = enumChar;+ exports["boundedEnumChar"] = boundedEnumChar;+})(PS["Data.Enum"] = PS["Data.Enum"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.Event.Event"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_DateTime_Instant = PS["Data.DateTime.Instant"];+ var Data_Enum = PS["Data.Enum"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Ord = PS["Data.Ord"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var Web_Event_EventPhase = PS["Web.Event.EventPhase"];+ var Web_Event_Internal_Types = PS["Web.Event.Internal.Types"];+ var currentTarget = function ($6) {+ return Data_Nullable.toMaybe($foreign["_currentTarget"]($6));+ };+ exports["currentTarget"] = currentTarget;+ exports["preventDefault"] = $foreign.preventDefault;+})(PS["Web.Event.Event"] = PS["Web.Event.Event"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.Event.EventTarget"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var Web_Event_Event = PS["Web.Event.Event"];+ var Web_Event_Internal_Types = PS["Web.Event.Internal.Types"];+ exports["eventListener"] = $foreign.eventListener;+})(PS["Web.Event.EventTarget"] = PS["Web.Event.EventTarget"] || {});+(function(exports) {+ "use strict";++ exports._read = function (nothing, just, value) {+ var tag = Object.prototype.toString.call(value);+ if (tag.indexOf("[object HTML") === 0 && tag.indexOf("Element]") === tag.length - 8) {+ return just(value);+ } else {+ return nothing;+ }+ };+})(PS["Web.HTML.HTMLElement"] = PS["Web.HTML.HTMLElement"] || {});+(function(exports) {+ "use strict";++ exports.removeAttribute = function (name) {+ return function (element) {+ return function () {+ element.removeAttribute(name);+ return {};+ };+ };+ };+})(PS["Web.DOM.Element"] = PS["Web.DOM.Element"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.DOM.Element"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM_ChildNode = PS["Web.DOM.ChildNode"];+ var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];+ var Web_DOM_NonDocumentTypeChildNode = PS["Web.DOM.NonDocumentTypeChildNode"];+ var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];+ var Web_Event_EventTarget = PS["Web.Event.EventTarget"];+ var Web_Internal_FFI = PS["Web.Internal.FFI"]; + var toNode = Unsafe_Coerce.unsafeCoerce;+ exports["toNode"] = toNode;+ exports["removeAttribute"] = $foreign.removeAttribute;+})(PS["Web.DOM.Element"] = PS["Web.DOM.Element"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.HTML.HTMLElement"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM = PS["Web.DOM"];+ var Web_DOM_DOMTokenList = PS["Web.DOM.DOMTokenList"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];+ var Web_DOM_NonDocumentTypeChildNode = PS["Web.DOM.NonDocumentTypeChildNode"];+ var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];+ var Web_Event_EventTarget = PS["Web.Event.EventTarget"]; + var toNode = Unsafe_Coerce.unsafeCoerce; + var toElement = Unsafe_Coerce.unsafeCoerce;+ var fromElement = function (x) {+ return $foreign["_read"](Data_Maybe.Nothing.value, Data_Maybe.Just.create, x);+ };+ exports["fromElement"] = fromElement;+ exports["toElement"] = toElement;+ exports["toNode"] = toNode;+})(PS["Web.HTML.HTMLElement"] = PS["Web.HTML.HTMLElement"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.HTML.HTMLDocument"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM_Document = PS["Web.DOM.Document"];+ var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];+ var Web_DOM_NonElementParentNode = PS["Web.DOM.NonElementParentNode"];+ var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];+ var Web_Event_EventTarget = PS["Web.Event.EventTarget"];+ var Web_HTML_HTMLDocument_ReadyState = PS["Web.HTML.HTMLDocument.ReadyState"];+ var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];+ var Web_HTML_HTMLScriptElement = PS["Web.HTML.HTMLScriptElement"];+ var Web_Internal_FFI = PS["Web.Internal.FFI"]; + var toParentNode = Unsafe_Coerce.unsafeCoerce; + var toDocument = Unsafe_Coerce.unsafeCoerce;+ exports["toDocument"] = toDocument;+ exports["toParentNode"] = toParentNode;+})(PS["Web.HTML.HTMLDocument"] = PS["Web.HTML.HTMLDocument"] || {});+(function(exports) {+ "use strict";++ // ----------------------------------------------------------------------------++ exports.href = function (location) {+ return function () {+ return location.href;+ };+ };++ exports.setHref = function (href) {+ return function (location) {+ return function () {+ location.href = href;+ };+ };+ };++ // ----------------------------------------------------------------------------++ exports.search = function (location) {+ return function () {+ return location.search;+ };+ };++ // ----------------------------------------------------------------------------++ exports.reload = function (location) {+ return function () {+ location.reload();+ };+ };+})(PS["Web.HTML.Location"] = PS["Web.HTML.Location"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.HTML.Location"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ exports["setHref"] = $foreign.setHref;+ exports["search"] = $foreign.search;+ exports["reload"] = $foreign.reload;+})(PS["Web.HTML.Location"] = PS["Web.HTML.Location"] || {});+(function(exports) {+ "use strict";++ exports.document = function (window) {+ return function () {+ return window.document;+ };+ };++ exports.location = function (window) {+ return function () {+ return window.location;+ };+ };+})(PS["Web.HTML.Window"] = PS["Web.HTML.Window"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.HTML.Window"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Ord = PS["Data.Ord"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_Event_EventTarget = PS["Web.Event.EventTarget"];+ var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];+ var Web_HTML_History = PS["Web.HTML.History"];+ var Web_HTML_Location = PS["Web.HTML.Location"];+ var Web_HTML_Navigator = PS["Web.HTML.Navigator"];+ var Web_Storage_Storage = PS["Web.Storage.Storage"];+ exports["document"] = $foreign.document;+ exports["location"] = $foreign.location;+})(PS["Web.HTML.Window"] = PS["Web.HTML.Window"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.HTML"];+ var Effect = PS["Effect"];+ var Web_HTML_HTMLAnchorElement = PS["Web.HTML.HTMLAnchorElement"];+ var Web_HTML_HTMLAreaElement = PS["Web.HTML.HTMLAreaElement"];+ var Web_HTML_HTMLAudioElement = PS["Web.HTML.HTMLAudioElement"];+ var Web_HTML_HTMLBRElement = PS["Web.HTML.HTMLBRElement"];+ var Web_HTML_HTMLBaseElement = PS["Web.HTML.HTMLBaseElement"];+ var Web_HTML_HTMLBodyElement = PS["Web.HTML.HTMLBodyElement"];+ var Web_HTML_HTMLButtonElement = PS["Web.HTML.HTMLButtonElement"];+ var Web_HTML_HTMLCanvasElement = PS["Web.HTML.HTMLCanvasElement"];+ var Web_HTML_HTMLDListElement = PS["Web.HTML.HTMLDListElement"];+ var Web_HTML_HTMLDataElement = PS["Web.HTML.HTMLDataElement"];+ var Web_HTML_HTMLDataListElement = PS["Web.HTML.HTMLDataListElement"];+ var Web_HTML_HTMLDivElement = PS["Web.HTML.HTMLDivElement"];+ var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];+ var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];+ var Web_HTML_HTMLEmbedElement = PS["Web.HTML.HTMLEmbedElement"];+ var Web_HTML_HTMLFieldSetElement = PS["Web.HTML.HTMLFieldSetElement"];+ var Web_HTML_HTMLFormElement = PS["Web.HTML.HTMLFormElement"];+ var Web_HTML_HTMLHRElement = PS["Web.HTML.HTMLHRElement"];+ var Web_HTML_HTMLHeadElement = PS["Web.HTML.HTMLHeadElement"];+ var Web_HTML_HTMLHeadingElement = PS["Web.HTML.HTMLHeadingElement"];+ var Web_HTML_HTMLIFrameElement = PS["Web.HTML.HTMLIFrameElement"];+ var Web_HTML_HTMLImageElement = PS["Web.HTML.HTMLImageElement"];+ var Web_HTML_HTMLInputElement = PS["Web.HTML.HTMLInputElement"];+ var Web_HTML_HTMLKeygenElement = PS["Web.HTML.HTMLKeygenElement"];+ var Web_HTML_HTMLLIElement = PS["Web.HTML.HTMLLIElement"];+ var Web_HTML_HTMLLabelElement = PS["Web.HTML.HTMLLabelElement"];+ var Web_HTML_HTMLLegendElement = PS["Web.HTML.HTMLLegendElement"];+ var Web_HTML_HTMLLinkElement = PS["Web.HTML.HTMLLinkElement"];+ var Web_HTML_HTMLMapElement = PS["Web.HTML.HTMLMapElement"];+ var Web_HTML_HTMLMediaElement = PS["Web.HTML.HTMLMediaElement"];+ var Web_HTML_HTMLMetaElement = PS["Web.HTML.HTMLMetaElement"];+ var Web_HTML_HTMLMeterElement = PS["Web.HTML.HTMLMeterElement"];+ var Web_HTML_HTMLModElement = PS["Web.HTML.HTMLModElement"];+ var Web_HTML_HTMLOListElement = PS["Web.HTML.HTMLOListElement"];+ var Web_HTML_HTMLObjectElement = PS["Web.HTML.HTMLObjectElement"];+ var Web_HTML_HTMLOptGroupElement = PS["Web.HTML.HTMLOptGroupElement"];+ var Web_HTML_HTMLOptionElement = PS["Web.HTML.HTMLOptionElement"];+ var Web_HTML_HTMLOutputElement = PS["Web.HTML.HTMLOutputElement"];+ var Web_HTML_HTMLParagraphElement = PS["Web.HTML.HTMLParagraphElement"];+ var Web_HTML_HTMLParamElement = PS["Web.HTML.HTMLParamElement"];+ var Web_HTML_HTMLPreElement = PS["Web.HTML.HTMLPreElement"];+ var Web_HTML_HTMLProgressElement = PS["Web.HTML.HTMLProgressElement"];+ var Web_HTML_HTMLQuoteElement = PS["Web.HTML.HTMLQuoteElement"];+ var Web_HTML_HTMLScriptElement = PS["Web.HTML.HTMLScriptElement"];+ var Web_HTML_HTMLSelectElement = PS["Web.HTML.HTMLSelectElement"];+ var Web_HTML_HTMLSourceElement = PS["Web.HTML.HTMLSourceElement"];+ var Web_HTML_HTMLSpanElement = PS["Web.HTML.HTMLSpanElement"];+ var Web_HTML_HTMLStyleElement = PS["Web.HTML.HTMLStyleElement"];+ var Web_HTML_HTMLTableCaptionElement = PS["Web.HTML.HTMLTableCaptionElement"];+ var Web_HTML_HTMLTableCellElement = PS["Web.HTML.HTMLTableCellElement"];+ var Web_HTML_HTMLTableColElement = PS["Web.HTML.HTMLTableColElement"];+ var Web_HTML_HTMLTableDataCellElement = PS["Web.HTML.HTMLTableDataCellElement"];+ var Web_HTML_HTMLTableElement = PS["Web.HTML.HTMLTableElement"];+ var Web_HTML_HTMLTableHeaderCellElement = PS["Web.HTML.HTMLTableHeaderCellElement"];+ var Web_HTML_HTMLTableRowElement = PS["Web.HTML.HTMLTableRowElement"];+ var Web_HTML_HTMLTableSectionElement = PS["Web.HTML.HTMLTableSectionElement"];+ var Web_HTML_HTMLTemplateElement = PS["Web.HTML.HTMLTemplateElement"];+ var Web_HTML_HTMLTextAreaElement = PS["Web.HTML.HTMLTextAreaElement"];+ var Web_HTML_HTMLTimeElement = PS["Web.HTML.HTMLTimeElement"];+ var Web_HTML_HTMLTitleElement = PS["Web.HTML.HTMLTitleElement"];+ var Web_HTML_HTMLTrackElement = PS["Web.HTML.HTMLTrackElement"];+ var Web_HTML_HTMLUListElement = PS["Web.HTML.HTMLUListElement"];+ var Web_HTML_HTMLVideoElement = PS["Web.HTML.HTMLVideoElement"];+ var Web_HTML_History = PS["Web.HTML.History"];+ var Web_HTML_Location = PS["Web.HTML.Location"];+ var Web_HTML_Navigator = PS["Web.HTML.Navigator"];+ var Web_HTML_Window = PS["Web.HTML.Window"];+ exports["window"] = $foreign.window;+})(PS["Web.HTML"] = PS["Web.HTML"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Globals"];+ var Control_Applicative = PS["Control.Applicative"];+ var Data_Function = PS["Data.Function"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Effect = PS["Effect"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"];+ var Web_DOM = PS["Web.DOM"];+ var Web_HTML = PS["Web.HTML"];+ var Web_XHR_FormData = PS["Web.XHR.FormData"]; + var RawHTML = function (x) {+ return x;+ };+ var mmoment8601 = function (s) {+ return $foreign["_mmoment8601"](Data_Maybe.Just.create, Data_Maybe.Nothing.value, Data_Tuple.Tuple.create, s);+ };+ var closeWindow = function (win) {+ return Control_Applicative.pure(Effect.applicativeEffect)($foreign["_closeWindow"](win));+ };+ var app$prime = function (v) {+ return $foreign["_app"]();+ };+ exports["app'"] = app$prime;+ exports["mmoment8601"] = mmoment8601;+ exports["closeWindow"] = closeWindow;+ exports["RawHTML"] = RawHTML;+})(PS["Globals"] = PS["Globals"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Affjax = PS["Affjax"];+ var Affjax_RequestBody = PS["Affjax.RequestBody"];+ var Affjax_RequestHeader = PS["Affjax.RequestHeader"];+ var Affjax_ResponseFormat = PS["Affjax.ResponseFormat"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Argonaut = PS["Data.Argonaut"];+ var Data_Array = PS["Data.Array"];+ var Data_Either = PS["Data.Either"];+ var Data_FormURLEncoded = PS["Data.FormURLEncoded"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HTTP_Method = PS["Data.HTTP.Method"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_MediaType_Common = PS["Data.MediaType.Common"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Class = PS["Effect.Class"];+ var Globals = PS["Globals"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"];+ var Simple_JSON = PS["Simple.JSON"];+ var Web_HTML = PS["Web.HTML"];+ var Web_HTML_Location = PS["Web.HTML.Location"];+ var Web_HTML_Window = PS["Web.HTML.Window"]; + var Star = (function () {+ function Star() {++ };+ Star.value = new Star();+ return Star;+ })();+ var UnStar = (function () {+ function UnStar() {++ };+ UnStar.value = new UnStar();+ return UnStar;+ })();+ var showStar = new Data_Show.Show(function (v) {+ if (v instanceof Star) {+ return "star";+ };+ if (v instanceof UnStar) {+ return "unstar";+ };+ throw new Error("Failed pattern match at App (line 28, column 1 - line 28, column 37): " + [ v.constructor.name ]);+ });+ var fetchUrl = function (method) {+ return function (url) {+ return function (headers) {+ return function (content) {+ return function (rt) {+ var app = Globals["app'"](Data_Unit.unit);+ return Affjax.request({+ method: new Data_Either.Left(method),+ url: url,+ headers: Data_Array.cons(new Affjax_RequestHeader.RequestHeader(app.csrfHeaderName, app.csrfToken))(headers),+ content: content,+ username: Affjax.defaultRequest.username,+ password: Affjax.defaultRequest.password,+ withCredentials: Affjax.defaultRequest.withCredentials,+ responseFormat: rt+ });+ };+ };+ };+ };+ };+ var logout = function (u) {+ var app = Globals["app'"](u);+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Functor["void"](Effect_Aff.functorAff)(fetchUrl(Data_HTTP_Method.POST.value)(app.authRlogoutR)([ ])(Data_Maybe.Nothing.value)(Affjax_ResponseFormat.ignore)))(function () {+ return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Control_Bind.bind(Effect.bindEffect)(Control_Bind.bind(Effect.bindEffect)(Web_HTML.window)(Web_HTML_Window.location))(Web_HTML_Location.reload));+ });+ };+ var fetchPath = function (method) {+ return function (path) {+ return function (headers) {+ return function (content) {+ return function (rt) {+ return fetchUrl(method)((Globals["app'"](Data_Unit.unit)).homeR + path)(headers)(content)(rt);+ };+ };+ };+ };+ };+ var fetchUrlEnc = function (method) {+ return function (path) {+ return function (content) {+ return function (rt) {+ return fetchPath(method)(path)([ new Affjax_RequestHeader.ContentType(Data_MediaType_Common.applicationFormURLEncoded) ])(Data_Functor.map(Data_Maybe.functorMaybe)(Affjax_RequestBody.FormURLEncoded.create)(content))(rt);+ };+ };+ };+ };+ var markRead = function (bid) {+ var path = "bm/" + (Data_Show.show(Data_Show.showInt)(bid) + "/read");+ return fetchUrlEnc(Data_HTTP_Method.POST.value)(path)(Data_Maybe.Nothing.value)(Affjax_ResponseFormat.ignore);+ };+ var toggleStar = function (bid) {+ return function (action) {+ var path = "bm/" + (Data_Show.show(Data_Show.showInt)(bid) + ("/" + Data_Show.show(showStar)(action)));+ return Data_Functor["void"](Effect_Aff.functorAff)(fetchUrlEnc(Data_HTTP_Method.POST.value)(path)(Data_Maybe.Nothing.value)(Affjax_ResponseFormat.ignore));+ };+ };+ var fetchJson = function (dictWriteForeign) {+ return function (method) {+ return function (path) {+ return function (content) {+ return function (rt) {+ return fetchPath(method)(path)([ new Affjax_RequestHeader.ContentType(Data_MediaType_Common.applicationJSON) ])(Data_Functor.map(Data_Maybe.functorMaybe)(function ($4) {+ return Affjax_RequestBody.string(Simple_JSON.writeJSON(dictWriteForeign)($4));+ })(content))(rt);+ };+ };+ };+ };+ };+ var editNote = function (bm) {+ return fetchJson(Model.note_wfI)(Data_HTTP_Method.POST.value)("api/note/add")(new Data_Maybe.Just(bm))(Affjax_ResponseFormat.json);+ };+ var editBookmark = function (bm) {+ return fetchJson(Model.bookmark_wfI)(Data_HTTP_Method.POST.value)("api/add")(new Data_Maybe.Just(bm))(Affjax_ResponseFormat.ignore);+ };+ var editAccountSettings = function (us) {+ return fetchJson(Model.usersettings_wfI)(Data_HTTP_Method.POST.value)("api/accountSettings")(new Data_Maybe.Just(us))(Affjax_ResponseFormat.ignore);+ };+ var destroyNote = function (nid) {+ return fetchUrlEnc(Data_HTTP_Method.DELETE.value)("api/note/" + Data_Show.show(Data_Show.showInt)(nid))(Data_Maybe.Nothing.value)(Affjax_ResponseFormat.ignore);+ };+ var destroy = function (bid) {+ return fetchUrlEnc(Data_HTTP_Method.DELETE.value)("bm/" + Data_Show.show(Data_Show.showInt)(bid))(Data_Maybe.Nothing.value)(Affjax_ResponseFormat.ignore);+ };+ exports["Star"] = Star;+ exports["UnStar"] = UnStar;+ exports["toggleStar"] = toggleStar;+ exports["destroy"] = destroy;+ exports["markRead"] = markRead;+ exports["editBookmark"] = editBookmark;+ exports["editNote"] = editNote;+ exports["destroyNote"] = destroyNote;+ exports["editAccountSettings"] = editAccountSettings;+ exports["logout"] = logout;+ exports["fetchJson"] = fetchJson;+ exports["fetchUrlEnc"] = fetchUrlEnc;+ exports["fetchPath"] = fetchPath;+ exports["fetchUrl"] = fetchUrl;+ exports["showStar"] = showStar;+})(PS["App"] = PS["App"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var InputButton = (function () {+ function InputButton() {++ };+ InputButton.value = new InputButton();+ return InputButton;+ })();+ var InputCheckbox = (function () {+ function InputCheckbox() {++ };+ InputCheckbox.value = new InputCheckbox();+ return InputCheckbox;+ })();+ var InputColor = (function () {+ function InputColor() {++ };+ InputColor.value = new InputColor();+ return InputColor;+ })();+ var InputDate = (function () {+ function InputDate() {++ };+ InputDate.value = new InputDate();+ return InputDate;+ })();+ var InputDatetimeLocal = (function () {+ function InputDatetimeLocal() {++ };+ InputDatetimeLocal.value = new InputDatetimeLocal();+ return InputDatetimeLocal;+ })();+ var InputEmail = (function () {+ function InputEmail() {++ };+ InputEmail.value = new InputEmail();+ return InputEmail;+ })();+ var InputFile = (function () {+ function InputFile() {++ };+ InputFile.value = new InputFile();+ return InputFile;+ })();+ var InputHidden = (function () {+ function InputHidden() {++ };+ InputHidden.value = new InputHidden();+ return InputHidden;+ })();+ var InputImage = (function () {+ function InputImage() {++ };+ InputImage.value = new InputImage();+ return InputImage;+ })();+ var InputMonth = (function () {+ function InputMonth() {++ };+ InputMonth.value = new InputMonth();+ return InputMonth;+ })();+ var InputNumber = (function () {+ function InputNumber() {++ };+ InputNumber.value = new InputNumber();+ return InputNumber;+ })();+ var InputPassword = (function () {+ function InputPassword() {++ };+ InputPassword.value = new InputPassword();+ return InputPassword;+ })();+ var InputRadio = (function () {+ function InputRadio() {++ };+ InputRadio.value = new InputRadio();+ return InputRadio;+ })();+ var InputRange = (function () {+ function InputRange() {++ };+ InputRange.value = new InputRange();+ return InputRange;+ })();+ var InputReset = (function () {+ function InputReset() {++ };+ InputReset.value = new InputReset();+ return InputReset;+ })();+ var InputSearch = (function () {+ function InputSearch() {++ };+ InputSearch.value = new InputSearch();+ return InputSearch;+ })();+ var InputSubmit = (function () {+ function InputSubmit() {++ };+ InputSubmit.value = new InputSubmit();+ return InputSubmit;+ })();+ var InputTel = (function () {+ function InputTel() {++ };+ InputTel.value = new InputTel();+ return InputTel;+ })();+ var InputText = (function () {+ function InputText() {++ };+ InputText.value = new InputText();+ return InputText;+ })();+ var InputTime = (function () {+ function InputTime() {++ };+ InputTime.value = new InputTime();+ return InputTime;+ })();+ var InputUrl = (function () {+ function InputUrl() {++ };+ InputUrl.value = new InputUrl();+ return InputUrl;+ })();+ var InputWeek = (function () {+ function InputWeek() {++ };+ InputWeek.value = new InputWeek();+ return InputWeek;+ })();+ var renderInputType = function (v) {+ if (v instanceof InputButton) {+ return "button";+ };+ if (v instanceof InputCheckbox) {+ return "checkbox";+ };+ if (v instanceof InputColor) {+ return "color";+ };+ if (v instanceof InputDate) {+ return "date";+ };+ if (v instanceof InputDatetimeLocal) {+ return "datetime-local";+ };+ if (v instanceof InputEmail) {+ return "email";+ };+ if (v instanceof InputFile) {+ return "file";+ };+ if (v instanceof InputHidden) {+ return "hidden";+ };+ if (v instanceof InputImage) {+ return "image";+ };+ if (v instanceof InputMonth) {+ return "month";+ };+ if (v instanceof InputNumber) {+ return "number";+ };+ if (v instanceof InputPassword) {+ return "password";+ };+ if (v instanceof InputRadio) {+ return "radio";+ };+ if (v instanceof InputRange) {+ return "range";+ };+ if (v instanceof InputReset) {+ return "reset";+ };+ if (v instanceof InputSearch) {+ return "search";+ };+ if (v instanceof InputSubmit) {+ return "submit";+ };+ if (v instanceof InputTel) {+ return "tel";+ };+ if (v instanceof InputText) {+ return "text";+ };+ if (v instanceof InputTime) {+ return "time";+ };+ if (v instanceof InputUrl) {+ return "url";+ };+ if (v instanceof InputWeek) {+ return "week";+ };+ throw new Error("Failed pattern match at DOM.HTML.Indexed.InputType (line 28, column 19 - line 50, column 16): " + [ v.constructor.name ]);+ };+ exports["InputButton"] = InputButton;+ exports["InputCheckbox"] = InputCheckbox;+ exports["InputColor"] = InputColor;+ exports["InputDate"] = InputDate;+ exports["InputDatetimeLocal"] = InputDatetimeLocal;+ exports["InputEmail"] = InputEmail;+ exports["InputFile"] = InputFile;+ exports["InputHidden"] = InputHidden;+ exports["InputImage"] = InputImage;+ exports["InputMonth"] = InputMonth;+ exports["InputNumber"] = InputNumber;+ exports["InputPassword"] = InputPassword;+ exports["InputRadio"] = InputRadio;+ exports["InputRange"] = InputRange;+ exports["InputReset"] = InputReset;+ exports["InputSearch"] = InputSearch;+ exports["InputSubmit"] = InputSubmit;+ exports["InputTel"] = InputTel;+ exports["InputText"] = InputText;+ exports["InputTime"] = InputTime;+ exports["InputUrl"] = InputUrl;+ exports["InputWeek"] = InputWeek;+ exports["renderInputType"] = renderInputType;+})(PS["DOM.HTML.Indexed.InputType"] = PS["DOM.HTML.Indexed.InputType"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Newtype = PS["Data.Newtype"];+ var Prelude = PS["Prelude"]; + var Profunctor = function (dimap) {+ this.dimap = dimap;+ };+ var profunctorFn = new Profunctor(function (a2b) {+ return function (c2d) {+ return function (b2c) {+ return function ($9) {+ return c2d(b2c(a2b($9)));+ };+ };+ };+ });+ var dimap = function (dict) {+ return dict.dimap;+ };+ var rmap = function (dictProfunctor) {+ return function (b2c) {+ return dimap(dictProfunctor)(Control_Category.identity(Control_Category.categoryFn))(b2c);+ };+ };+ exports["dimap"] = dimap;+ exports["Profunctor"] = Profunctor;+ exports["rmap"] = rmap;+ exports["profunctorFn"] = profunctorFn;+})(PS["Data.Profunctor"] = PS["Data.Profunctor"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Profunctor = PS["Data.Profunctor"];+ var Data_Tuple = PS["Data.Tuple"];+ var Prelude = PS["Prelude"]; + var Strong = function (Profunctor0, first, second) {+ this.Profunctor0 = Profunctor0;+ this.first = first;+ this.second = second;+ };+ var strongFn = new Strong(function () {+ return Data_Profunctor.profunctorFn;+ }, function (a2b) {+ return function (v) {+ return new Data_Tuple.Tuple(a2b(v.value0), v.value1);+ };+ }, Data_Functor.map(Data_Tuple.functorTuple));+ var second = function (dict) {+ return dict.second;+ };+ var first = function (dict) {+ return dict.first;+ };+ exports["first"] = first;+ exports["second"] = second;+ exports["Strong"] = Strong;+ exports["strongFn"] = strongFn;+})(PS["Data.Profunctor.Strong"] = PS["Data.Profunctor.Strong"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Const = PS["Data.Const"];+ var Data_Either = PS["Data.Either"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Lens_Internal_Wander = PS["Data.Lens.Internal.Wander"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Profunctor = PS["Data.Profunctor"];+ var Data_Profunctor_Choice = PS["Data.Profunctor.Choice"];+ var Data_Profunctor_Cochoice = PS["Data.Profunctor.Cochoice"];+ var Data_Profunctor_Strong = PS["Data.Profunctor.Strong"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Tuple = PS["Data.Tuple"];+ var Prelude = PS["Prelude"]; + var Forget = function (x) {+ return x;+ };+ var profunctorForget = new Data_Profunctor.Profunctor(function (f) {+ return function (v) {+ return function (v1) {+ return function ($27) {+ return v1(f($27));+ };+ };+ };+ });+ var strongForget = new Data_Profunctor_Strong.Strong(function () {+ return profunctorForget;+ }, function (v) {+ return function ($28) {+ return v(Data_Tuple.fst($28));+ };+ }, function (v) {+ return function ($29) {+ return v(Data_Tuple.snd($29));+ };+ });+ var newtypeForget = new Data_Newtype.Newtype(function (n) {+ return n;+ }, Forget);+ exports["Forget"] = Forget;+ exports["newtypeForget"] = newtypeForget;+ exports["profunctorForget"] = profunctorForget;+ exports["strongForget"] = strongForget;+})(PS["Data.Lens.Internal.Forget"] = PS["Data.Lens.Internal.Forget"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Function = PS["Data.Function"];+ var Data_Lens_Internal_Forget = PS["Data.Lens.Internal.Forget"];+ var Data_Lens_Internal_Indexed = PS["Data.Lens.Internal.Indexed"];+ var Data_Lens_Types = PS["Data.Lens.Types"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Profunctor_Strong = PS["Data.Profunctor.Strong"];+ var Data_Tuple = PS["Data.Tuple"];+ var Prelude = PS["Prelude"]; + var view = function (l) {+ return Data_Newtype.unwrap(Data_Lens_Internal_Forget.newtypeForget)(l(Control_Category.identity(Control_Category.categoryFn)));+ };+ var viewOn = function (s) {+ return function (l) {+ return view(l)(s);+ };+ };+ var use = function (dictMonadState) {+ return function (p) {+ return Control_Monad_State_Class.gets(dictMonadState)(function (v) {+ return viewOn(v)(p);+ });+ };+ };+ exports["viewOn"] = viewOn;+ exports["view"] = view;+ exports["use"] = use;+})(PS["Data.Lens.Getter"] = PS["Data.Lens.Getter"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Data_Lens_Internal_Indexed = PS["Data.Lens.Internal.Indexed"];+ var Data_Lens_Internal_Shop = PS["Data.Lens.Internal.Shop"];+ var Data_Lens_Types = PS["Data.Lens.Types"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Profunctor = PS["Data.Profunctor"];+ var Data_Profunctor_Strong = PS["Data.Profunctor.Strong"];+ var Data_Tuple = PS["Data.Tuple"];+ var Prelude = PS["Prelude"];+ var lens$prime = function (to) {+ return function (dictStrong) {+ return function (pab) {+ return Data_Profunctor.dimap(dictStrong.Profunctor0())(to)(function (v) {+ return v.value1(v.value0);+ })(Data_Profunctor_Strong.first(dictStrong)(pab));+ };+ };+ };+ var lens = function (get) {+ return function (set) {+ return function (dictStrong) {+ return lens$prime(function (s) {+ return new Data_Tuple.Tuple(get(s), function (b) {+ return set(s)(b);+ });+ })(dictStrong);+ };+ };+ };+ exports["lens"] = lens;+})(PS["Data.Lens.Lens"] = PS["Data.Lens.Lens"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_EuclideanRing = PS["Data.EuclideanRing"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Lens_Internal_Indexed = PS["Data.Lens.Internal.Indexed"];+ var Data_Lens_Types = PS["Data.Lens.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Tuple = PS["Data.Tuple"];+ var Prelude = PS["Prelude"]; + var over = function (l) {+ return l;+ };+ var set = function (l) {+ return function (b) {+ return over(l)(Data_Function["const"](b));+ };+ };+ var modifying = function (dictMonadState) {+ return function (p) {+ return function (f) {+ return Data_Functor["void"]((((dictMonadState.Monad0()).Bind1()).Apply0()).Functor0())(Control_Monad_State_Class.modify(dictMonadState)(over(p)(f)));+ };+ };+ };+ var assign = function (dictMonadState) {+ return function (p) {+ return function (b) {+ return Data_Functor["void"]((((dictMonadState.Monad0()).Bind1()).Apply0()).Functor0())(Control_Monad_State_Class.modify(dictMonadState)(set(p)(b)));+ };+ };+ };+ exports["over"] = over;+ exports["set"] = set;+ exports["assign"] = assign;+ exports["modifying"] = modifying;+})(PS["Data.Lens.Setter"] = PS["Data.Lens.Setter"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Control_Monad_Cont_Trans = PS["Control.Monad.Cont.Trans"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Control_Monad_List_Trans = PS["Control.Monad.List.Trans"];+ var Control_Monad_Maybe_Trans = PS["Control.Monad.Maybe.Trans"];+ var Control_Monad_RWS_Trans = PS["Control.Monad.RWS.Trans"];+ var Control_Monad_Reader_Trans = PS["Control.Monad.Reader.Trans"];+ var Control_Monad_State_Trans = PS["Control.Monad.State.Trans"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Monad_Writer_Trans = PS["Control.Monad.Writer.Trans"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Class = PS["Effect.Class"];+ var Prelude = PS["Prelude"]; + var MonadAff = function (MonadEffect0, liftAff) {+ this.MonadEffect0 = MonadEffect0;+ this.liftAff = liftAff;+ };+ var monadAffAff = new MonadAff(function () {+ return Effect_Aff.monadEffectAff;+ }, Control_Category.identity(Control_Category.categoryFn));+ var liftAff = function (dict) {+ return dict.liftAff;+ };+ exports["liftAff"] = liftAff;+ exports["MonadAff"] = MonadAff;+ exports["monadAffAff"] = monadAffAff;+})(PS["Effect.Aff.Class"] = PS["Effect.Aff.Class"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Eq = PS["Data.Eq"];+ var Data_Ord = PS["Data.Ord"];+ var Prelude = PS["Prelude"]; + var OrdBox = (function () {+ function OrdBox(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ OrdBox.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new OrdBox(value0, value1, value2);+ };+ };+ };+ return OrdBox;+ })();+ var unOrdBox = function (v) {+ return v.value2;+ };+ var mkOrdBox = function (dictOrd) {+ return OrdBox.create(Data_Eq.eq(dictOrd.Eq0()))(Data_Ord.compare(dictOrd));+ };+ var eqOrdBox = new Data_Eq.Eq(function (v) {+ return function (v1) {+ return v.value0(v.value2)(v1.value2);+ };+ });+ var ordOrdBox = new Data_Ord.Ord(function () {+ return eqOrdBox;+ }, function (v) {+ return function (v1) {+ return v.value1(v.value2)(v1.value2);+ };+ });+ exports["mkOrdBox"] = mkOrdBox;+ exports["unOrdBox"] = unOrdBox;+ exports["eqOrdBox"] = eqOrdBox;+ exports["ordOrdBox"] = ordOrdBox;+})(PS["Halogen.Data.OrdBox"] = PS["Halogen.Data.OrdBox"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var ButtonButton = (function () {+ function ButtonButton() {++ };+ ButtonButton.value = new ButtonButton();+ return ButtonButton;+ })();+ var ButtonSubmit = (function () {+ function ButtonSubmit() {++ };+ ButtonSubmit.value = new ButtonSubmit();+ return ButtonSubmit;+ })();+ var ButtonReset = (function () {+ function ButtonReset() {++ };+ ButtonReset.value = new ButtonReset();+ return ButtonReset;+ })();+ var renderButtonType = function (v) {+ if (v instanceof ButtonButton) {+ return "button";+ };+ if (v instanceof ButtonSubmit) {+ return "submit";+ };+ if (v instanceof ButtonReset) {+ return "reset";+ };+ throw new Error("Failed pattern match at DOM.HTML.Indexed.ButtonType (line 9, column 20 - line 12, column 18): " + [ v.constructor.name ]);+ };+ exports["ButtonButton"] = ButtonButton;+ exports["ButtonSubmit"] = ButtonSubmit;+ exports["ButtonReset"] = ButtonReset;+ exports["renderButtonType"] = renderButtonType;+})(PS["DOM.HTML.Indexed.ButtonType"] = PS["DOM.HTML.Indexed.ButtonType"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var On = (function () {+ function On() {++ };+ On.value = new On();+ return On;+ })();+ var Off = (function () {+ function Off() {++ };+ Off.value = new Off();+ return Off;+ })();+ var renderOnOff = function (v) {+ if (v instanceof On) {+ return "on";+ };+ if (v instanceof Off) {+ return "off";+ };+ throw new Error("Failed pattern match at DOM.HTML.Indexed.OnOff (line 8, column 15 - line 10, column 10): " + [ v.constructor.name ]);+ };+ exports["On"] = On;+ exports["Off"] = Off;+ exports["renderOnOff"] = renderOnOff;+})(PS["DOM.HTML.Indexed.OnOff"] = PS["DOM.HTML.Indexed.OnOff"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Prelude = PS["Prelude"];+ var Web_DOM = PS["Web.DOM"];+ var RefUpdate = (function () {+ function RefUpdate(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ RefUpdate.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new RefUpdate(value0, value1, value2);+ };+ };+ };+ return RefUpdate;+ })();+ var Query = (function () {+ function Query(value0) {+ this.value0 = value0;+ };+ Query.create = function (value0) {+ return new Query(value0);+ };+ return Query;+ })(); + var bifunctorInputF = new Data_Bifunctor.Bifunctor(function (f) {+ return function (g) {+ return function (v) {+ if (v instanceof RefUpdate) {+ return new RefUpdate(v.value0, v.value1, f(v.value2));+ };+ if (v instanceof Query) {+ return new Query(g(v.value0));+ };+ throw new Error("Failed pattern match at Halogen.Query.InputF (line 21, column 15 - line 23, column 27): " + [ v.constructor.name ]);+ };+ };+ });+ var functorInputF = new Data_Functor.Functor(Data_Bifunctor.rmap(bifunctorInputF));+ exports["RefUpdate"] = RefUpdate;+ exports["Query"] = Query;+ exports["bifunctorInputF"] = bifunctorInputF;+ exports["functorInputF"] = functorInputF;+})(PS["Halogen.Query.InputF"] = PS["Halogen.Query.InputF"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Effect = PS["Effect"];+ var Effect_Uncurried = PS["Effect.Uncurried"];+ var Prelude = PS["Prelude"]; + var Step = (function () {+ function Step(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ Step.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new Step(value0, value1, value2);+ };+ };+ };+ return Step;+ })();+ var step = function (v) {+ return v.value1;+ };+ var halt = function (v) {+ return v.value2;+ };+ var extract = function (v) {+ return v.value0;+ };+ exports["Step"] = Step;+ exports["extract"] = extract;+ exports["step"] = step;+ exports["halt"] = halt;+})(PS["Halogen.VDom.Machine"] = PS["Halogen.VDom.Machine"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Tuple = PS["Data.Tuple"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var ElemSpec = (function () {+ function ElemSpec(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ ElemSpec.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new ElemSpec(value0, value1, value2);+ };+ };+ };+ return ElemSpec;+ })();+ var Text = (function () {+ function Text(value0) {+ this.value0 = value0;+ };+ Text.create = function (value0) {+ return new Text(value0);+ };+ return Text;+ })();+ var Elem = (function () {+ function Elem(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Elem.create = function (value0) {+ return function (value1) {+ return new Elem(value0, value1);+ };+ };+ return Elem;+ })();+ var Keyed = (function () {+ function Keyed(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Keyed.create = function (value0) {+ return function (value1) {+ return new Keyed(value0, value1);+ };+ };+ return Keyed;+ })();+ var Widget = (function () {+ function Widget(value0) {+ this.value0 = value0;+ };+ Widget.create = function (value0) {+ return new Widget(value0);+ };+ return Widget;+ })();+ var Grafted = (function () {+ function Grafted(value0) {+ this.value0 = value0;+ };+ Grafted.create = function (value0) {+ return new Grafted(value0);+ };+ return Grafted;+ })();+ var Graft = (function () {+ function Graft(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ Graft.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new Graft(value0, value1, value2);+ };+ };+ };+ return Graft;+ })();+ var unGraft = function (f) {+ return function ($90) {+ return f($90);+ };+ }; + var graft = Unsafe_Coerce.unsafeCoerce;+ var functorElemSpec = new Data_Functor.Functor(function (f) {+ return function (m) {+ return new ElemSpec(m.value0, m.value1, f(m.value2));+ };+ });+ var bifunctorGraft = new Data_Bifunctor.Bifunctor(function (f) {+ return function (g) {+ return unGraft(function (v) {+ return graft(new Graft(function ($92) {+ return f(v.value0($92));+ }, function ($93) {+ return g(v.value1($93));+ }, v.value2));+ });+ };+ });+ var bifunctorVDom = new Data_Bifunctor.Bifunctor(function (f) {+ return function (g) {+ return function (v) {+ if (v instanceof Text) {+ return new Text(v.value0);+ };+ if (v instanceof Grafted) {+ return new Grafted(Data_Bifunctor.bimap(bifunctorGraft)(f)(g)(v.value0));+ };+ return new Grafted(graft(new Graft(f, g, v)));+ };+ };+ });+ var runGraft = unGraft(function (v) {+ var go = function (v2) {+ if (v2 instanceof Text) {+ return new Text(v2.value0);+ };+ if (v2 instanceof Elem) {+ return new Elem(Data_Functor.map(functorElemSpec)(v.value0)(v2.value0), Data_Functor.map(Data_Functor.functorArray)(go)(v2.value1));+ };+ if (v2 instanceof Keyed) {+ return new Keyed(Data_Functor.map(functorElemSpec)(v.value0)(v2.value0), Data_Functor.map(Data_Functor.functorArray)(Data_Functor.map(Data_Tuple.functorTuple)(go))(v2.value1));+ };+ if (v2 instanceof Widget) {+ return new Widget(v.value1(v2.value0));+ };+ if (v2 instanceof Grafted) {+ return new Grafted(Data_Bifunctor.bimap(bifunctorGraft)(v.value0)(v.value1)(v2.value0));+ };+ throw new Error("Failed pattern match at Halogen.VDom.Types (line 74, column 7 - line 74, column 27): " + [ v2.constructor.name ]);+ };+ return go(v.value2);+ });+ exports["Text"] = Text;+ exports["Elem"] = Elem;+ exports["Keyed"] = Keyed;+ exports["Widget"] = Widget;+ exports["Grafted"] = Grafted;+ exports["Graft"] = Graft;+ exports["graft"] = graft;+ exports["unGraft"] = unGraft;+ exports["runGraft"] = runGraft;+ exports["ElemSpec"] = ElemSpec;+ exports["bifunctorVDom"] = bifunctorVDom;+ exports["bifunctorGraft"] = bifunctorGraft;+ exports["functorElemSpec"] = functorElemSpec;+})(PS["Halogen.VDom.Types"] = PS["Halogen.VDom.Types"] || {});+(function(exports) {+ "use strict";++ exports.unsafeGetAny = function (key, obj) {+ return obj[key];+ };++ exports.unsafeHasAny = function (key, obj) {+ return obj.hasOwnProperty(key);+ };++ exports.unsafeSetAny = function (key, val, obj) {+ obj[key] = val;+ };++ exports.forE = function (a, f) {+ var b = [];+ for (var i = 0; i < a.length; i++) {+ b.push(f(i, a[i]));+ }+ return b;+ };++ exports.forInE = function (o, f) {+ var ks = Object.keys(o);+ for (var i = 0; i < ks.length; i++) {+ var k = ks[i];+ f(k, o[k]);+ }+ };++ exports.diffWithIxE = function (a1, a2, f1, f2, f3) {+ var a3 = [];+ var l1 = a1.length;+ var l2 = a2.length;+ var i = 0;+ while (1) {+ if (i < l1) {+ if (i < l2) {+ a3.push(f1(i, a1[i], a2[i]));+ } else {+ f2(i, a1[i]);+ }+ } else if (i < l2) {+ a3.push(f3(i, a2[i]));+ } else {+ break;+ }+ i++;+ }+ return a3;+ };++ exports.strMapWithIxE = function (as, fk, f) {+ var o = {};+ for (var i = 0; i < as.length; i++) {+ var a = as[i];+ var k = fk(a);+ o[k] = f(k, i, a);+ }+ return o;+ };++ exports.diffWithKeyAndIxE = function (o1, as, fk, f1, f2, f3) {+ var o2 = {};+ for (var i = 0; i < as.length; i++) {+ var a = as[i];+ var k = fk(a);+ if (o1.hasOwnProperty(k)) {+ o2[k] = f1(k, i, o1[k], a);+ } else {+ o2[k] = f3(k, i, a);+ }+ }+ for (var k in o1) {+ if (k in o2) {+ continue;+ }+ f2(k, o1[k]);+ }+ return o2;+ };++ exports.refEq = function (a, b) {+ return a === b;+ };++ exports.createTextNode = function (s, doc) {+ return doc.createTextNode(s);+ };++ exports.setTextContent = function (s, n) {+ n.textContent = s;+ };++ exports.createElement = function (ns, name, doc) {+ if (ns != null) {+ return doc.createElementNS(ns, name);+ } else {+ return doc.createElement(name)+ }+ };++ exports.insertChildIx = function (i, a, b) {+ var n = b.childNodes.item(i) || null;+ if (n !== a) {+ b.insertBefore(a, n);+ }+ };++ exports.removeChild = function (a, b) {+ if (b && a.parentNode === b) {+ b.removeChild(a);+ }+ };++ exports.parentNode = function (a) {+ return a.parentNode;+ };++ exports.setAttribute = function (ns, attr, val, el) {+ if (ns != null) {+ el.setAttributeNS(ns, attr, val);+ } else {+ el.setAttribute(attr, val);+ }+ };++ exports.removeAttribute = function (ns, attr, el) {+ if (ns != null) {+ el.removeAttributeNS(ns, attr);+ } else {+ el.removeAttribute(attr);+ }+ };++ exports.addEventListener = function (ev, listener, el) {+ el.addEventListener(ev, listener, false);+ };++ exports.removeEventListener = function (ev, listener, el) {+ el.removeEventListener(ev, listener, false);+ };++ exports.jsUndefined = void 0;+})(PS["Halogen.VDom.Util"] = PS["Halogen.VDom.Util"] || {});+(function(exports) {+ "use strict";++ var getEffProp = function (name) {+ return function (node) {+ return function () {+ return node[name];+ };+ };+ }; ++ exports._parentNode = getEffProp("parentNode"); ++ exports._nextSibling = getEffProp("nextSibling");++ exports.insertBefore = function (node1) {+ return function (node2) {+ return function (parent) {+ return function () {+ return parent.insertBefore(node1, node2);+ };+ };+ };+ };++ exports.appendChild = function (node) {+ return function (parent) {+ return function () {+ return parent.appendChild(node);+ };+ };+ };++ exports.removeChild = function (node) {+ return function (parent) {+ return function () {+ return parent.removeChild(node);+ };+ };+ };+})(PS["Web.DOM.Node"] = PS["Web.DOM.Node"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Web.DOM.Node"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Enum = PS["Data.Enum"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Effect = PS["Effect"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM_Document = PS["Web.DOM.Document"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_DOM_Internal_Types = PS["Web.DOM.Internal.Types"];+ var Web_DOM_NodeType = PS["Web.DOM.NodeType"];+ var Web_Event_EventTarget = PS["Web.Event.EventTarget"];+ var Web_Internal_FFI = PS["Web.Internal.FFI"];+ var parentNode = function ($2) {+ return Data_Functor.map(Effect.functorEffect)(Data_Nullable.toMaybe)($foreign["_parentNode"]($2));+ };+ var nextSibling = function ($6) {+ return Data_Functor.map(Effect.functorEffect)(Data_Nullable.toMaybe)($foreign["_nextSibling"]($6));+ };+ exports["parentNode"] = parentNode;+ exports["nextSibling"] = nextSibling;+ exports["insertBefore"] = $foreign.insertBefore;+ exports["appendChild"] = $foreign.appendChild;+ exports["removeChild"] = $foreign.removeChild;+})(PS["Web.DOM.Node"] = PS["Web.DOM.Node"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Halogen.VDom.Util"];+ var Control_Applicative = PS["Control.Applicative"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Uncurried = PS["Effect.Uncurried"];+ var Foreign_Object = PS["Foreign.Object"];+ var Foreign_Object_ST = PS["Foreign.Object.ST"];+ var Halogen_VDom_Types = PS["Halogen.VDom.Types"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM_Document = PS["Web.DOM.Document"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_DOM_Node = PS["Web.DOM.Node"];+ var Web_Event_EventTarget = PS["Web.Event.EventTarget"]; + var unsafeLookup = $foreign.unsafeGetAny;+ var unsafeFreeze = Unsafe_Coerce.unsafeCoerce;+ var pokeMutMap = $foreign.unsafeSetAny;+ var newMutMap = Foreign_Object_ST["new"];+ var effectUnit = Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit);+ exports["effectUnit"] = effectUnit;+ exports["newMutMap"] = newMutMap;+ exports["pokeMutMap"] = pokeMutMap;+ exports["unsafeFreeze"] = unsafeFreeze;+ exports["unsafeLookup"] = unsafeLookup;+ exports["unsafeGetAny"] = $foreign.unsafeGetAny;+ exports["unsafeHasAny"] = $foreign.unsafeHasAny;+ exports["unsafeSetAny"] = $foreign.unsafeSetAny;+ exports["forE"] = $foreign.forE;+ exports["forInE"] = $foreign.forInE;+ exports["diffWithIxE"] = $foreign.diffWithIxE;+ exports["diffWithKeyAndIxE"] = $foreign.diffWithKeyAndIxE;+ exports["strMapWithIxE"] = $foreign.strMapWithIxE;+ exports["refEq"] = $foreign.refEq;+ exports["createTextNode"] = $foreign.createTextNode;+ exports["setTextContent"] = $foreign.setTextContent;+ exports["createElement"] = $foreign.createElement;+ exports["insertChildIx"] = $foreign.insertChildIx;+ exports["removeChild"] = $foreign.removeChild;+ exports["parentNode"] = $foreign.parentNode;+ exports["setAttribute"] = $foreign.setAttribute;+ exports["removeAttribute"] = $foreign.removeAttribute;+ exports["addEventListener"] = $foreign.addEventListener;+ exports["removeEventListener"] = $foreign.removeEventListener;+ exports["jsUndefined"] = $foreign.jsUndefined;+})(PS["Halogen.VDom.Util"] = PS["Halogen.VDom.Util"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Ref = PS["Effect.Ref"];+ var Effect_Uncurried = PS["Effect.Uncurried"];+ var Foreign = PS["Foreign"];+ var Foreign_Object = PS["Foreign.Object"];+ var Halogen_VDom = PS["Halogen.VDom"];+ var Halogen_VDom_Machine = PS["Halogen.VDom.Machine"];+ var Halogen_VDom_Types = PS["Halogen.VDom.Types"];+ var Halogen_VDom_Util = PS["Halogen.VDom.Util"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_Event_Event = PS["Web.Event.Event"];+ var Web_Event_EventTarget = PS["Web.Event.EventTarget"]; + var Created = (function () {+ function Created(value0) {+ this.value0 = value0;+ };+ Created.create = function (value0) {+ return new Created(value0);+ };+ return Created;+ })();+ var Removed = (function () {+ function Removed(value0) {+ this.value0 = value0;+ };+ Removed.create = function (value0) {+ return new Removed(value0);+ };+ return Removed;+ })();+ var Attribute = (function () {+ function Attribute(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ Attribute.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new Attribute(value0, value1, value2);+ };+ };+ };+ return Attribute;+ })();+ var Property = (function () {+ function Property(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Property.create = function (value0) {+ return function (value1) {+ return new Property(value0, value1);+ };+ };+ return Property;+ })();+ var Handler = (function () {+ function Handler(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Handler.create = function (value0) {+ return function (value1) {+ return new Handler(value0, value1);+ };+ };+ return Handler;+ })();+ var Ref = (function () {+ function Ref(value0) {+ this.value0 = value0;+ };+ Ref.create = function (value0) {+ return new Ref(value0);+ };+ return Ref;+ })();+ var unsafeGetProperty = Halogen_VDom_Util.unsafeGetAny;+ var setProperty = Halogen_VDom_Util.unsafeSetAny;+ var removeProperty = function (key, el) {+ var v = Foreign.typeOf(Halogen_VDom_Util.unsafeGetAny(key, el));+ if (v === "string") {+ return Halogen_VDom_Util.unsafeSetAny(key, "", el);+ };+ if (key === "rowSpan") {+ return Halogen_VDom_Util.unsafeSetAny(key, 1, el);+ };+ if (key === "colSpan") {+ return Halogen_VDom_Util.unsafeSetAny(key, 1, el);+ };+ return Halogen_VDom_Util.unsafeSetAny(key, Halogen_VDom_Util.jsUndefined, el);+ };+ var propToStrKey = function (v) {+ if (v instanceof Attribute && v.value0 instanceof Data_Maybe.Just) {+ return "attr/" + (v.value0.value0 + (":" + v.value1));+ };+ if (v instanceof Attribute) {+ return "attr/:" + v.value1;+ };+ if (v instanceof Property) {+ return "prop/" + v.value0;+ };+ if (v instanceof Handler) {+ return "handler/" + v.value0;+ };+ if (v instanceof Ref) {+ return "ref";+ };+ throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop (line 178, column 16 - line 185, column 1): " + [ v.constructor.name ]);+ };+ var propFromString = Unsafe_Coerce.unsafeCoerce;+ var propFromInt = Unsafe_Coerce.unsafeCoerce;+ var propFromBoolean = Unsafe_Coerce.unsafeCoerce;+ var functorProp = new Data_Functor.Functor(function (f) {+ return function (v) {+ if (v instanceof Handler) {+ return new Handler(v.value0, Data_Functor.map(Data_Functor.functorFn)(Data_Functor.map(Data_Maybe.functorMaybe)(f))(v.value1));+ };+ if (v instanceof Ref) {+ return new Ref(Data_Functor.map(Data_Functor.functorFn)(Data_Functor.map(Data_Maybe.functorMaybe)(f))(v.value0));+ };+ return v;+ };+ });+ var buildProp = function (emit) {+ return function (el) {+ var removeProp = function (prevEvents) {+ return function (v, v1) {+ if (v1 instanceof Attribute) {+ return Halogen_VDom_Util.removeAttribute(Data_Nullable.toNullable(v1.value0), v1.value1, el);+ };+ if (v1 instanceof Property) {+ return removeProperty(v1.value0, el);+ };+ if (v1 instanceof Handler) {+ var handler = Halogen_VDom_Util.unsafeLookup(v1.value0, prevEvents);+ return Halogen_VDom_Util.removeEventListener(v1.value0, Data_Tuple.fst(handler), el);+ };+ if (v1 instanceof Ref) {+ return Data_Unit.unit;+ };+ throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop (line 165, column 5 - line 175, column 18): " + [ v1.constructor.name ]);+ };+ };+ var mbEmit = function (v) {+ if (v instanceof Data_Maybe.Just) {+ return emit(v.value0)();+ };+ return Data_Unit.unit;+ };+ var done = function (ps) {+ var v = Foreign_Object.lookup("ref")(ps);+ if (v instanceof Data_Maybe.Just && v.value0 instanceof Ref) {+ return function () {+ return mbEmit(v.value0.value0(new Removed(el)));+ };+ };+ return Halogen_VDom_Util.effectUnit;+ };+ var diffProp = function (prevEvents, events) {+ return function (v, v1, v11, v2) {+ if (v11 instanceof Attribute && v2 instanceof Attribute) {+ var $61 = v11.value2 === v2.value2;+ if ($61) {+ return v2;+ };+ Halogen_VDom_Util.setAttribute(Data_Nullable.toNullable(v2.value0), v2.value1, v2.value2, el);+ return v2;+ };+ if (v11 instanceof Property && v2 instanceof Property) {+ var v4 = Halogen_VDom_Util.refEq(v11.value1, v2.value1);+ if (v4) {+ return v2;+ };+ if (v2.value0 === "value") {+ var elVal = unsafeGetProperty("value", el);+ var $70 = Halogen_VDom_Util.refEq(elVal, v2.value1);+ if ($70) {+ return v2;+ };+ setProperty(v2.value0, v2.value1, el);+ return v2;+ };+ setProperty(v2.value0, v2.value1, el);+ return v2;+ };+ if (v11 instanceof Handler && v2 instanceof Handler) {+ var handler = Halogen_VDom_Util.unsafeLookup(v2.value0, prevEvents);+ Effect_Ref.write(v2.value1)(Data_Tuple.snd(handler))();+ Halogen_VDom_Util.pokeMutMap(v2.value0, handler, events);+ return v2;+ };+ return v2;+ };+ };+ var applyProp = function (events) {+ return function (v, v1, v2) {+ if (v2 instanceof Attribute) {+ Halogen_VDom_Util.setAttribute(Data_Nullable.toNullable(v2.value0), v2.value1, v2.value2, el);+ return v2;+ };+ if (v2 instanceof Property) {+ setProperty(v2.value0, v2.value1, el);+ return v2;+ };+ if (v2 instanceof Handler) {+ var v3 = Halogen_VDom_Util.unsafeGetAny(v2.value0, events);+ if (Halogen_VDom_Util.unsafeHasAny(v2.value0, events)) {+ Effect_Ref.write(v2.value1)(Data_Tuple.snd(v3))();+ return v2;+ };+ var v4 = Effect_Ref["new"](v2.value1)();+ var v5 = Web_Event_EventTarget.eventListener(function (ev) {+ return function __do() {+ var v5 = Effect_Ref.read(v4)();+ return mbEmit(v5(ev));+ };+ })();+ Halogen_VDom_Util.pokeMutMap(v2.value0, new Data_Tuple.Tuple(v5, v4), events);+ Halogen_VDom_Util.addEventListener(v2.value0, v5, el);+ return v2;+ };+ if (v2 instanceof Ref) {+ mbEmit(v2.value0(new Created(el)));+ return v2;+ };+ throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop (line 109, column 5 - line 131, column 15): " + [ v2.constructor.name ]);+ };+ };+ var patch = function (prevEvents, ps1) {+ return function (ps2) {+ var v = Halogen_VDom_Util.newMutMap();+ var onThis = removeProp(prevEvents);+ var onThese = diffProp(prevEvents, v);+ var onThat = applyProp(v);+ var v1 = Halogen_VDom_Util.diffWithKeyAndIxE(ps1, ps2, propToStrKey, onThese, onThis, onThat);+ return new Halogen_VDom_Machine.Step(Data_Unit.unit, patch(Halogen_VDom_Util.unsafeFreeze(v), v1), done(v1));+ };+ };+ var render = function (ps1) {+ var v = Halogen_VDom_Util.newMutMap();+ var v1 = Halogen_VDom_Util.strMapWithIxE(ps1, propToStrKey, applyProp(v));+ return new Halogen_VDom_Machine.Step(Data_Unit.unit, patch(Halogen_VDom_Util.unsafeFreeze(v), v1), done(v1));+ };+ return render;+ };+ };+ exports["Attribute"] = Attribute;+ exports["Property"] = Property;+ exports["Handler"] = Handler;+ exports["Ref"] = Ref;+ exports["Created"] = Created;+ exports["Removed"] = Removed;+ exports["propFromString"] = propFromString;+ exports["propFromBoolean"] = propFromBoolean;+ exports["propFromInt"] = propFromInt;+ exports["buildProp"] = buildProp;+ exports["functorProp"] = functorProp;+})(PS["Halogen.VDom.DOM.Prop"] = PS["Halogen.VDom.DOM.Prop"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];+ var DOM_HTML_Indexed_CrossOriginValue = PS["DOM.HTML.Indexed.CrossOriginValue"];+ var DOM_HTML_Indexed_DirValue = PS["DOM.HTML.Indexed.DirValue"];+ var DOM_HTML_Indexed_FormMethod = PS["DOM.HTML.Indexed.FormMethod"];+ var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];+ var DOM_HTML_Indexed_KindValue = PS["DOM.HTML.Indexed.KindValue"];+ var DOM_HTML_Indexed_MenuType = PS["DOM.HTML.Indexed.MenuType"];+ var DOM_HTML_Indexed_MenuitemType = PS["DOM.HTML.Indexed.MenuitemType"];+ var DOM_HTML_Indexed_OnOff = PS["DOM.HTML.Indexed.OnOff"];+ var DOM_HTML_Indexed_OrderedListType = PS["DOM.HTML.Indexed.OrderedListType"];+ var DOM_HTML_Indexed_PreloadValue = PS["DOM.HTML.Indexed.PreloadValue"];+ var DOM_HTML_Indexed_ScopeValue = PS["DOM.HTML.Indexed.ScopeValue"];+ var DOM_HTML_Indexed_StepValue = PS["DOM.HTML.Indexed.StepValue"];+ var DOM_HTML_Indexed_WrapValue = PS["DOM.HTML.Indexed.WrapValue"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_MediaType = PS["Data.MediaType"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Tuple = PS["Data.Tuple"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Halogen_VDom = PS["Halogen.VDom"];+ var Halogen_VDom_DOM_Prop = PS["Halogen.VDom.DOM.Prop"];+ var Halogen_VDom_Types = PS["Halogen.VDom.Types"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_Event_Event = PS["Web.Event.Event"];+ var HTML = function (x) {+ return x;+ };+ var ClassName = function (x) {+ return x;+ };+ var IsProp = function (toPropValue) {+ this.toPropValue = toPropValue;+ }; + var toPropValue = function (dict) {+ return dict.toPropValue;+ };+ var text = function ($27) {+ return HTML(Halogen_VDom_Types.Text.create($27));+ };+ var stringIsProp = new IsProp(Halogen_VDom_DOM_Prop.propFromString);+ var slot = function ($29) {+ return HTML(Halogen_VDom_Types.Widget.create($29));+ }; + var ref = function (f) {+ return Halogen_VDom_DOM_Prop.Ref.create(function ($31) {+ return f((function (v) {+ if (v instanceof Halogen_VDom_DOM_Prop.Created) {+ return new Data_Maybe.Just(v.value0);+ };+ if (v instanceof Halogen_VDom_DOM_Prop.Removed) {+ return Data_Maybe.Nothing.value;+ };+ throw new Error("Failed pattern match at Halogen.HTML.Core (line 103, column 21 - line 105, column 23): " + [ v.constructor.name ]);+ })($31));+ });+ };+ var prop = function (dictIsProp) {+ return function (v) {+ return function ($32) {+ return Halogen_VDom_DOM_Prop.Property.create(v)(toPropValue(dictIsProp)($32));+ };+ };+ }; + var onOffIsProp = new IsProp(function ($35) {+ return Halogen_VDom_DOM_Prop.propFromString(DOM_HTML_Indexed_OnOff.renderOnOff($35));+ }); + var newtypeClassName = new Data_Newtype.Newtype(function (n) {+ return n;+ }, ClassName);+ var intIsProp = new IsProp(Halogen_VDom_DOM_Prop.propFromInt);+ var inputTypeIsProp = new IsProp(function ($40) {+ return Halogen_VDom_DOM_Prop.propFromString(DOM_HTML_Indexed_InputType.renderInputType($40));+ });+ var handler = Halogen_VDom_DOM_Prop.Handler.create;+ var element = function (ns) {+ return function (name) {+ return function (props) {+ return function (children) {+ return new Halogen_VDom_Types.Elem(new Halogen_VDom_Types.ElemSpec(ns, name, props), children);+ };+ };+ };+ }; + var buttonTypeIsProp = new IsProp(function ($44) {+ return Halogen_VDom_DOM_Prop.propFromString(DOM_HTML_Indexed_ButtonType.renderButtonType($44));+ });+ var booleanIsProp = new IsProp(Halogen_VDom_DOM_Prop.propFromBoolean);+ var bifunctorHTML = new Data_Bifunctor.Bifunctor(function (f) {+ return function (g) {+ return function (v) {+ return Data_Bifunctor.bimap(Halogen_VDom_Types.bifunctorVDom)(Data_Functor.map(Data_Functor.functorArray)(Data_Functor.map(Halogen_VDom_DOM_Prop.functorProp)(Data_Functor.map(Halogen_Query_InputF.functorInputF)(g))))(f)(v);+ };+ };+ }); + var attr = function (ns) {+ return function (v) {+ return Halogen_VDom_DOM_Prop.Attribute.create(ns)(v);+ };+ };+ exports["HTML"] = HTML;+ exports["slot"] = slot;+ exports["text"] = text;+ exports["element"] = element;+ exports["prop"] = prop;+ exports["attr"] = attr;+ exports["handler"] = handler;+ exports["ref"] = ref;+ exports["IsProp"] = IsProp;+ exports["toPropValue"] = toPropValue;+ exports["ClassName"] = ClassName;+ exports["bifunctorHTML"] = bifunctorHTML;+ exports["stringIsProp"] = stringIsProp;+ exports["intIsProp"] = intIsProp;+ exports["booleanIsProp"] = booleanIsProp;+ exports["buttonTypeIsProp"] = buttonTypeIsProp;+ exports["inputTypeIsProp"] = inputTypeIsProp;+ exports["onOffIsProp"] = onOffIsProp;+ exports["newtypeClassName"] = newtypeClassName;+})(PS["Halogen.HTML.Core"] = PS["Halogen.HTML.Core"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Category = PS["Control.Category"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Const = PS["Data.Const"];+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_List = PS["Data.List"];+ var Data_List_NonEmpty = PS["Data.List.NonEmpty"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_NonEmpty = PS["Data.NonEmpty"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Tuple = PS["Data.Tuple"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"]; + var Pure = (function () {+ function Pure(value0) {+ this.value0 = value0;+ };+ Pure.create = function (value0) {+ return new Pure(value0);+ };+ return Pure;+ })();+ var Lift = (function () {+ function Lift(value0) {+ this.value0 = value0;+ };+ Lift.create = function (value0) {+ return new Lift(value0);+ };+ return Lift;+ })();+ var Ap = (function () {+ function Ap(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Ap.create = function (value0) {+ return function (value1) {+ return new Ap(value0, value1);+ };+ };+ return Ap;+ })();+ var mkAp = function (fba) {+ return function (fb) {+ return new Ap(fba, fb);+ };+ };+ var liftFreeAp = Lift.create;+ var goLeft = function ($copy_dictApplicative) {+ return function ($copy_fStack) {+ return function ($copy_valStack) {+ return function ($copy_nat) {+ return function ($copy_func) {+ return function ($copy_count) {+ var $tco_var_dictApplicative = $copy_dictApplicative;+ var $tco_var_fStack = $copy_fStack;+ var $tco_var_valStack = $copy_valStack;+ var $tco_var_nat = $copy_nat;+ var $tco_var_func = $copy_func;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(dictApplicative, fStack, valStack, nat, func, count) {+ if (func instanceof Pure) {+ $tco_done = true;+ return new Data_Tuple.Tuple(new Data_List_Types.Cons({+ func: Control_Applicative.pure(dictApplicative)(func.value0),+ count: count+ }, fStack), valStack);+ };+ if (func instanceof Lift) {+ $tco_done = true;+ return new Data_Tuple.Tuple(new Data_List_Types.Cons({+ func: nat(func.value0),+ count: count+ }, fStack), valStack);+ };+ if (func instanceof Ap) {+ $tco_var_dictApplicative = dictApplicative;+ $tco_var_fStack = fStack;+ $tco_var_valStack = Data_List_NonEmpty.cons(func.value1)(valStack);+ $tco_var_nat = nat;+ $tco_var_func = func.value0;+ $copy_count = count + 1 | 0;+ return;+ };+ throw new Error("Failed pattern match at Control.Applicative.Free (line 102, column 41 - line 105, column 81): " + [ func.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_dictApplicative, $tco_var_fStack, $tco_var_valStack, $tco_var_nat, $tco_var_func, $copy_count);+ };+ return $tco_result;+ };+ };+ };+ };+ };+ };+ var goApply = function ($copy_dictApplicative) {+ return function ($copy_fStack) {+ return function ($copy_vals) {+ return function ($copy_gVal) {+ var $tco_var_dictApplicative = $copy_dictApplicative;+ var $tco_var_fStack = $copy_fStack;+ var $tco_var_vals = $copy_vals;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(dictApplicative, fStack, vals, gVal) {+ if (fStack instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return new Data_Either.Left(gVal);+ };+ if (fStack instanceof Data_List_Types.Cons) {+ var gRes = Control_Apply.apply(dictApplicative.Apply0())(fStack.value0.func)(gVal);+ var $14 = fStack.value0.count === 1;+ if ($14) {+ if (fStack.value1 instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return new Data_Either.Left(gRes);+ };+ $tco_var_dictApplicative = dictApplicative;+ $tco_var_fStack = fStack.value1;+ $tco_var_vals = vals;+ $copy_gVal = gRes;+ return;+ };+ if (vals instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return new Data_Either.Left(gRes);+ };+ if (vals instanceof Data_List_Types.Cons) {+ $tco_done = true;+ return Data_Either.Right.create(new Data_Tuple.Tuple(new Data_List_Types.Cons({+ func: gRes,+ count: fStack.value0.count - 1 | 0+ }, fStack.value1), new Data_NonEmpty.NonEmpty(vals.value0, vals.value1)));+ };+ throw new Error("Failed pattern match at Control.Applicative.Free (line 83, column 11 - line 88, column 50): " + [ vals.constructor.name ]);+ };+ throw new Error("Failed pattern match at Control.Applicative.Free (line 72, column 3 - line 88, column 50): " + [ fStack.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_dictApplicative, $tco_var_fStack, $tco_var_vals, $copy_gVal);+ };+ return $tco_result;+ };+ };+ };+ };+ var functorFreeAp = new Data_Functor.Functor(function (f) {+ return function (x) {+ return mkAp(new Pure(f))(x);+ };+ });+ var foldFreeAp = function (dictApplicative) {+ return function (nat) {+ return function (z) {+ var go = function ($copy_v) {+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(v) {+ if (v.value1.value0 instanceof Pure) {+ var v1 = goApply(dictApplicative)(v.value0)(v.value1.value1)(Control_Applicative.pure(dictApplicative)(v.value1.value0.value0));+ if (v1 instanceof Data_Either.Left) {+ $tco_done = true;+ return v1.value0;+ };+ if (v1 instanceof Data_Either.Right) {+ $copy_v = v1.value0;+ return;+ };+ throw new Error("Failed pattern match at Control.Applicative.Free (line 54, column 17 - line 56, column 24): " + [ v1.constructor.name ]);+ };+ if (v.value1.value0 instanceof Lift) {+ var v1 = goApply(dictApplicative)(v.value0)(v.value1.value1)(nat(v.value1.value0.value0));+ if (v1 instanceof Data_Either.Left) {+ $tco_done = true;+ return v1.value0;+ };+ if (v1 instanceof Data_Either.Right) {+ $copy_v = v1.value0;+ return;+ };+ throw new Error("Failed pattern match at Control.Applicative.Free (line 57, column 17 - line 59, column 24): " + [ v1.constructor.name ]);+ };+ if (v.value1.value0 instanceof Ap) {+ var nextVals = new Data_NonEmpty.NonEmpty(v.value1.value0.value1, v.value1.value1);+ $copy_v = goLeft(dictApplicative)(v.value0)(nextVals)(nat)(v.value1.value0.value0)(1);+ return;+ };+ throw new Error("Failed pattern match at Control.Applicative.Free (line 53, column 5 - line 64, column 1): " + [ v.value1.value0.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($copy_v);+ };+ return $tco_result;+ };+ return go(new Data_Tuple.Tuple(Data_List_Types.Nil.value, Data_List_NonEmpty.singleton(z)));+ };+ };+ };+ var retractFreeAp = function (dictApplicative) {+ return foldFreeAp(dictApplicative)(Control_Category.identity(Control_Category.categoryFn));+ };+ var applyFreeAp = new Control_Apply.Apply(function () {+ return functorFreeAp;+ }, function (fba) {+ return function (fb) {+ return mkAp(fba)(fb);+ };+ });+ var applicativeFreeAp = new Control_Applicative.Applicative(function () {+ return applyFreeAp;+ }, Pure.create);+ var hoistFreeAp = function (f) {+ return foldFreeAp(applicativeFreeAp)(function ($37) {+ return liftFreeAp(f($37));+ });+ };+ exports["liftFreeAp"] = liftFreeAp;+ exports["retractFreeAp"] = retractFreeAp;+ exports["foldFreeAp"] = foldFreeAp;+ exports["hoistFreeAp"] = hoistFreeAp;+ exports["functorFreeAp"] = functorFreeAp;+ exports["applyFreeAp"] = applyFreeAp;+ exports["applicativeFreeAp"] = applicativeFreeAp;+})(PS["Control.Applicative.Free"] = PS["Control.Applicative.Free"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad = PS["Control.Monad"];+ var Control_MonadPlus = PS["Control.MonadPlus"];+ var Control_MonadZero = PS["Control.MonadZero"];+ var Control_Plus = PS["Control.Plus"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Data_Unfoldable1 = PS["Data.Unfoldable1"];+ var Prelude = PS["Prelude"]; + var CatQueue = (function () {+ function CatQueue(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ CatQueue.create = function (value0) {+ return function (value1) {+ return new CatQueue(value0, value1);+ };+ };+ return CatQueue;+ })();+ var uncons = function ($copy_v) {+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(v) {+ if (v.value0 instanceof Data_List_Types.Nil && v.value1 instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return Data_Maybe.Nothing.value;+ };+ if (v.value0 instanceof Data_List_Types.Nil) {+ $copy_v = new CatQueue(Data_List.reverse(v.value1), Data_List_Types.Nil.value);+ return;+ };+ if (v.value0 instanceof Data_List_Types.Cons) {+ $tco_done = true;+ return new Data_Maybe.Just(new Data_Tuple.Tuple(v.value0.value0, new CatQueue(v.value0.value1, v.value1)));+ };+ throw new Error("Failed pattern match at Data.CatQueue (line 83, column 1 - line 83, column 63): " + [ v.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($copy_v);+ };+ return $tco_result;+ };+ var snoc = function (v) {+ return function (a) {+ return new CatQueue(v.value0, new Data_List_Types.Cons(a, v.value1));+ };+ };+ var $$null = function (v) {+ if (v.value0 instanceof Data_List_Types.Nil && v.value1 instanceof Data_List_Types.Nil) {+ return true;+ };+ return false;+ }; + var empty = new CatQueue(Data_List_Types.Nil.value, Data_List_Types.Nil.value);+ exports["CatQueue"] = CatQueue;+ exports["empty"] = empty;+ exports["null"] = $$null;+ exports["snoc"] = snoc;+ exports["uncons"] = uncons;+})(PS["Data.CatQueue"] = PS["Data.CatQueue"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad = PS["Control.Monad"];+ var Control_MonadPlus = PS["Control.MonadPlus"];+ var Control_MonadZero = PS["Control.MonadZero"];+ var Control_Plus = PS["Control.Plus"];+ var Data_CatQueue = PS["Data.CatQueue"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Data_Unfoldable1 = PS["Data.Unfoldable1"];+ var Prelude = PS["Prelude"]; + var CatNil = (function () {+ function CatNil() {++ };+ CatNil.value = new CatNil();+ return CatNil;+ })();+ var CatCons = (function () {+ function CatCons(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ CatCons.create = function (value0) {+ return function (value1) {+ return new CatCons(value0, value1);+ };+ };+ return CatCons;+ })();+ var link = function (v) {+ return function (cat) {+ if (v instanceof CatNil) {+ return cat;+ };+ if (v instanceof CatCons) {+ return new CatCons(v.value0, Data_CatQueue.snoc(v.value1)(cat));+ };+ throw new Error("Failed pattern match at Data.CatList (line 111, column 1 - line 111, column 54): " + [ v.constructor.name, cat.constructor.name ]);+ };+ };+ var foldr = function (k) {+ return function (b) {+ return function (q) {+ var foldl = function ($copy_v) {+ return function ($copy_c) {+ return function ($copy_v1) {+ var $tco_var_v = $copy_v;+ var $tco_var_c = $copy_c;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(v, c, v1) {+ if (v1 instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return c;+ };+ if (v1 instanceof Data_List_Types.Cons) {+ $tco_var_v = v;+ $tco_var_c = v(c)(v1.value0);+ $copy_v1 = v1.value1;+ return;+ };+ throw new Error("Failed pattern match at Data.CatList (line 126, column 3 - line 126, column 59): " + [ v.constructor.name, c.constructor.name, v1.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_v, $tco_var_c, $copy_v1);+ };+ return $tco_result;+ };+ };+ };+ var go = function ($copy_xs) {+ return function ($copy_ys) {+ var $tco_var_xs = $copy_xs;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(xs, ys) {+ var v = Data_CatQueue.uncons(xs);+ if (v instanceof Data_Maybe.Nothing) {+ $tco_done = true;+ return foldl(function (x) {+ return function (i) {+ return i(x);+ };+ })(b)(ys);+ };+ if (v instanceof Data_Maybe.Just) {+ $tco_var_xs = v.value0.value1;+ $copy_ys = new Data_List_Types.Cons(k(v.value0.value0), ys);+ return;+ };+ throw new Error("Failed pattern match at Data.CatList (line 122, column 14 - line 124, column 67): " + [ v.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_xs, $copy_ys);+ };+ return $tco_result;+ };+ };+ return go(q)(Data_List_Types.Nil.value);+ };+ };+ };+ var uncons = function (v) {+ if (v instanceof CatNil) {+ return Data_Maybe.Nothing.value;+ };+ if (v instanceof CatCons) {+ return new Data_Maybe.Just(new Data_Tuple.Tuple(v.value0, (function () {+ var $45 = Data_CatQueue["null"](v.value1);+ if ($45) {+ return CatNil.value;+ };+ return foldr(link)(CatNil.value)(v.value1);+ })()));+ };+ throw new Error("Failed pattern match at Data.CatList (line 102, column 1 - line 102, column 61): " + [ v.constructor.name ]);+ };+ var empty = CatNil.value;+ var append = function (v) {+ return function (v1) {+ if (v1 instanceof CatNil) {+ return v;+ };+ if (v instanceof CatNil) {+ return v1;+ };+ return link(v)(v1);+ };+ }; + var semigroupCatList = new Data_Semigroup.Semigroup(append);+ var snoc = function (cat) {+ return function (a) {+ return append(cat)(new CatCons(a, Data_CatQueue.empty));+ };+ };+ exports["CatNil"] = CatNil;+ exports["CatCons"] = CatCons;+ exports["empty"] = empty;+ exports["append"] = append;+ exports["snoc"] = snoc;+ exports["uncons"] = uncons;+ exports["semigroupCatList"] = semigroupCatList;+})(PS["Data.CatList"] = PS["Data.CatList"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_CatList = PS["Data.CatList"];+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Free = (function () {+ function Free(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Free.create = function (value0) {+ return function (value1) {+ return new Free(value0, value1);+ };+ };+ return Free;+ })();+ var Return = (function () {+ function Return(value0) {+ this.value0 = value0;+ };+ Return.create = function (value0) {+ return new Return(value0);+ };+ return Return;+ })();+ var Bind = (function () {+ function Bind(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Bind.create = function (value0) {+ return function (value1) {+ return new Bind(value0, value1);+ };+ };+ return Bind;+ })();+ var toView = function ($copy_v) {+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(v) {+ var runExpF = function (v2) {+ return v2;+ };+ var concatF = function (v2) {+ return function (r) {+ return new Free(v2.value0, Data_Semigroup.append(Data_CatList.semigroupCatList)(v2.value1)(r));+ };+ };+ if (v.value0 instanceof Return) {+ var v2 = Data_CatList.uncons(v.value1);+ if (v2 instanceof Data_Maybe.Nothing) {+ $tco_done = true;+ return new Return(v.value0.value0);+ };+ if (v2 instanceof Data_Maybe.Just) {+ $copy_v = concatF(runExpF(v2.value0.value0)(v.value0.value0))(v2.value0.value1);+ return;+ };+ throw new Error("Failed pattern match at Control.Monad.Free (line 220, column 7 - line 224, column 64): " + [ v2.constructor.name ]);+ };+ if (v.value0 instanceof Bind) {+ $tco_done = true;+ return new Bind(v.value0.value0, function (a) {+ return concatF(v.value0.value1(a))(v.value1);+ });+ };+ throw new Error("Failed pattern match at Control.Monad.Free (line 218, column 3 - line 226, column 56): " + [ v.value0.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($copy_v);+ };+ return $tco_result;+ };+ var fromView = function (f) {+ return new Free(f, Data_CatList.empty);+ };+ var freeMonad = new Control_Monad.Monad(function () {+ return freeApplicative;+ }, function () {+ return freeBind;+ });+ var freeFunctor = new Data_Functor.Functor(function (k) {+ return function (f) {+ return Control_Bind.bindFlipped(freeBind)(function ($118) {+ return Control_Applicative.pure(freeApplicative)(k($118));+ })(f);+ };+ });+ var freeBind = new Control_Bind.Bind(function () {+ return freeApply;+ }, function (v) {+ return function (k) {+ return new Free(v.value0, Data_CatList.snoc(v.value1)(k));+ };+ });+ var freeApply = new Control_Apply.Apply(function () {+ return freeFunctor;+ }, Control_Monad.ap(freeMonad));+ var freeApplicative = new Control_Applicative.Applicative(function () {+ return freeApply;+ }, function ($119) {+ return fromView(Return.create($119));+ });+ var liftF = function (f) {+ return fromView(new Bind(f, function ($120) {+ return Control_Applicative.pure(freeApplicative)($120);+ }));+ };+ var foldFree = function (dictMonadRec) {+ return function (k) {+ var go = function (f) {+ var v = toView(f);+ if (v instanceof Return) {+ return Data_Functor.map((((dictMonadRec.Monad0()).Bind1()).Apply0()).Functor0())(Control_Monad_Rec_Class.Done.create)(Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(v.value0));+ };+ if (v instanceof Bind) {+ return Data_Functor.map((((dictMonadRec.Monad0()).Bind1()).Apply0()).Functor0())(function ($127) {+ return Control_Monad_Rec_Class.Loop.create(v.value1($127));+ })(k(v.value0));+ };+ throw new Error("Failed pattern match at Control.Monad.Free (line 151, column 10 - line 153, column 37): " + [ v.constructor.name ]);+ };+ return Control_Monad_Rec_Class.tailRecM(dictMonadRec)(go);+ };+ };+ exports["liftF"] = liftF;+ exports["foldFree"] = foldFree;+ exports["freeFunctor"] = freeFunctor;+ exports["freeBind"] = freeBind;+ exports["freeApplicative"] = freeApplicative;+ exports["freeApply"] = freeApply;+ exports["freeMonad"] = freeMonad;+})(PS["Control.Monad.Free"] = PS["Control.Monad.Free"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Unsafe_Coerce = PS["Unsafe.Coerce"]; + var runExists = Unsafe_Coerce.unsafeCoerce;+ var mkExists = Unsafe_Coerce.unsafeCoerce;+ exports["mkExists"] = mkExists;+ exports["runExists"] = runExists;+})(PS["Data.Exists"] = PS["Data.Exists"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Alt = PS["Control.Alt"];+ var Control_Alternative = PS["Control.Alternative"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Comonad = PS["Control.Comonad"];+ var Control_Extend = PS["Control.Extend"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_MonadPlus = PS["Control.MonadPlus"];+ var Control_MonadZero = PS["Control.MonadZero"];+ var Control_Plus = PS["Control.Plus"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Distributive = PS["Data.Distributive"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Exists = PS["Data.Exists"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Functor_Invariant = PS["Data.Functor.Invariant"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Semigroup_Foldable = PS["Data.Semigroup.Foldable"];+ var Data_Semigroup_Traversable = PS["Data.Semigroup.Traversable"];+ var Data_Traversable = PS["Data.Traversable"];+ var Prelude = PS["Prelude"];+ var unCoyoneda = function (f) {+ return function (v) {+ return Data_Exists.runExists(function (v1) {+ return f(v1.value0)(v1.value1);+ })(v);+ };+ };+ exports["unCoyoneda"] = unCoyoneda;+})(PS["Data.Coyoneda"] = PS["Data.Coyoneda"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Monad_Reader_Class = PS["Control.Monad.Reader.Class"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Monad_Writer_Class = PS["Control.Monad.Writer.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Either = PS["Data.Either"];+ var Data_Exists = PS["Data.Exists"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Class = PS["Effect.Class"];+ var Prelude = PS["Prelude"]; + var Bound = (function () {+ function Bound(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Bound.create = function (value0) {+ return function (value1) {+ return new Bound(value0, value1);+ };+ };+ return Bound;+ })();+ var FreeT = (function () {+ function FreeT(value0) {+ this.value0 = value0;+ };+ FreeT.create = function (value0) {+ return new FreeT(value0);+ };+ return FreeT;+ })();+ var Bind = (function () {+ function Bind(value0) {+ this.value0 = value0;+ };+ Bind.create = function (value0) {+ return new Bind(value0);+ };+ return Bind;+ })();+ var monadTransFreeT = function (dictFunctor) {+ return new Control_Monad_Trans_Class.MonadTrans(function (dictMonad) {+ return function (ma) {+ return new FreeT(function (v) {+ return Data_Functor.map(((dictMonad.Bind1()).Apply0()).Functor0())(Data_Either.Left.create)(ma);+ });+ };+ });+ };+ var freeT = FreeT.create;+ var bound = function (m) {+ return function (f) {+ return new Bind(Data_Exists.mkExists(new Bound(m, f)));+ };+ };+ var functorFreeT = function (dictFunctor) {+ return function (dictFunctor1) {+ return new Data_Functor.Functor(function (f) {+ return function (v) {+ if (v instanceof FreeT) {+ return new FreeT(function (v1) {+ return Data_Functor.map(dictFunctor1)(Data_Bifunctor.bimap(Data_Either.bifunctorEither)(f)(Data_Functor.map(dictFunctor)(Data_Functor.map(functorFreeT(dictFunctor)(dictFunctor1))(f))))(v.value0(Data_Unit.unit));+ });+ };+ if (v instanceof Bind) {+ return Data_Exists.runExists(function (v1) {+ return bound(v1.value0)(function ($104) {+ return Data_Functor.map(functorFreeT(dictFunctor)(dictFunctor1))(f)(v1.value1($104));+ });+ })(v.value0);+ };+ throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 57, column 1 - line 57, column 71): " + [ f.constructor.name, v.constructor.name ]);+ };+ });+ };+ };+ var monadFreeT = function (dictFunctor) {+ return function (dictMonad) {+ return new Control_Monad.Monad(function () {+ return applicativeFreeT(dictFunctor)(dictMonad);+ }, function () {+ return bindFreeT(dictFunctor)(dictMonad);+ });+ };+ };+ var bindFreeT = function (dictFunctor) {+ return function (dictMonad) {+ return new Control_Bind.Bind(function () {+ return applyFreeT(dictFunctor)(dictMonad);+ }, function (v) {+ return function (f) {+ if (v instanceof Bind) {+ return Data_Exists.runExists(function (v1) {+ return bound(v1.value0)(function (x) {+ return bound(function (v2) {+ return v1.value1(x);+ })(f);+ });+ })(v.value0);+ };+ return bound(function (v1) {+ return v;+ })(f);+ };+ });+ };+ };+ var applyFreeT = function (dictFunctor) {+ return function (dictMonad) {+ return new Control_Apply.Apply(function () {+ return functorFreeT(dictFunctor)(((dictMonad.Bind1()).Apply0()).Functor0());+ }, Control_Monad.ap(monadFreeT(dictFunctor)(dictMonad)));+ };+ };+ var applicativeFreeT = function (dictFunctor) {+ return function (dictMonad) {+ return new Control_Applicative.Applicative(function () {+ return applyFreeT(dictFunctor)(dictMonad);+ }, function (a) {+ return new FreeT(function (v) {+ return Control_Applicative.pure(dictMonad.Applicative0())(new Data_Either.Left(a));+ });+ });+ };+ };+ var liftFreeT = function (dictFunctor) {+ return function (dictMonad) {+ return function (fa) {+ return new FreeT(function (v) {+ return Control_Applicative.pure(dictMonad.Applicative0())(new Data_Either.Right(Data_Functor.map(dictFunctor)(Control_Applicative.pure(applicativeFreeT(dictFunctor)(dictMonad)))(fa)));+ });+ };+ };+ };+ var resume = function (dictFunctor) {+ return function (dictMonadRec) {+ var go = function (v) {+ if (v instanceof FreeT) {+ return Data_Functor.map((((dictMonadRec.Monad0()).Bind1()).Apply0()).Functor0())(Control_Monad_Rec_Class.Done.create)(v.value0(Data_Unit.unit));+ };+ if (v instanceof Bind) {+ return Data_Exists.runExists(function (v1) {+ var v2 = v1.value0(Data_Unit.unit);+ if (v2 instanceof FreeT) {+ return Control_Bind.bind((dictMonadRec.Monad0()).Bind1())(v2.value0(Data_Unit.unit))(function (v3) {+ if (v3 instanceof Data_Either.Left) {+ return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Control_Monad_Rec_Class.Loop(v1.value1(v3.value0)));+ };+ if (v3 instanceof Data_Either.Right) {+ return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Control_Monad_Rec_Class.Done(new Data_Either.Right(Data_Functor.map(dictFunctor)(function (h) {+ return Control_Bind.bind(bindFreeT(dictFunctor)(dictMonadRec.Monad0()))(h)(v1.value1);+ })(v3.value0))));+ };+ throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 52, column 20 - line 54, column 67): " + [ v3.constructor.name ]);+ });+ };+ if (v2 instanceof Bind) {+ return Data_Exists.runExists(function (v3) {+ return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Control_Monad_Rec_Class.Loop(Control_Bind.bind(bindFreeT(dictFunctor)(dictMonadRec.Monad0()))(v3.value0(Data_Unit.unit))(function (z) {+ return Control_Bind.bind(bindFreeT(dictFunctor)(dictMonadRec.Monad0()))(v3.value1(z))(v1.value1);+ })));+ })(v2.value0);+ };+ throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 50, column 5 - line 55, column 98): " + [ v2.constructor.name ]);+ })(v.value0);+ };+ throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 47, column 3 - line 47, column 75): " + [ v.constructor.name ]);+ };+ return Control_Monad_Rec_Class.tailRecM(dictMonadRec)(go);+ };+ };+ var runFreeT = function (dictFunctor) {+ return function (dictMonadRec) {+ return function (interp) {+ var go = function (v) {+ if (v instanceof Data_Either.Left) {+ return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Control_Monad_Rec_Class.Done(v.value0));+ };+ if (v instanceof Data_Either.Right) {+ return Data_Functor.map((((dictMonadRec.Monad0()).Bind1()).Apply0()).Functor0())(Control_Monad_Rec_Class.Loop.create)(interp(v.value0));+ };+ throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 126, column 3 - line 126, column 63): " + [ v.constructor.name ]);+ };+ return Control_Monad_Rec_Class.tailRecM(dictMonadRec)(Control_Bind.composeKleisliFlipped((dictMonadRec.Monad0()).Bind1())(go)(resume(dictFunctor)(dictMonadRec)));+ };+ };+ };+ var monadRecFreeT = function (dictFunctor) {+ return function (dictMonad) {+ return new Control_Monad_Rec_Class.MonadRec(function () {+ return monadFreeT(dictFunctor)(dictMonad);+ }, function (f) {+ var go = function (s) {+ return Control_Bind.bind(bindFreeT(dictFunctor)(dictMonad))(f(s))(function (v) {+ if (v instanceof Control_Monad_Rec_Class.Loop) {+ return go(v.value0);+ };+ if (v instanceof Control_Monad_Rec_Class.Done) {+ return Control_Applicative.pure(applicativeFreeT(dictFunctor)(dictMonad))(v.value0);+ };+ throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 80, column 15 - line 82, column 25): " + [ v.constructor.name ]);+ });+ };+ return go;+ });+ };+ };+ exports["freeT"] = freeT;+ exports["liftFreeT"] = liftFreeT;+ exports["resume"] = resume;+ exports["runFreeT"] = runFreeT;+ exports["functorFreeT"] = functorFreeT;+ exports["applyFreeT"] = applyFreeT;+ exports["applicativeFreeT"] = applicativeFreeT;+ exports["bindFreeT"] = bindFreeT;+ exports["monadFreeT"] = monadFreeT;+ exports["monadTransFreeT"] = monadTransFreeT;+ exports["monadRecFreeT"] = monadRecFreeT;+})(PS["Control.Monad.Free.Trans"] = PS["Control.Monad.Free.Trans"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Monad_Except = PS["Control.Monad.Except"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Control_Monad_Free_Trans = PS["Control.Monad.Free.Trans"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Parallel = PS["Control.Parallel"];+ var Control_Parallel_Class = PS["Control.Parallel.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Either = PS["Data.Either"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Identity = PS["Data.Identity"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Profunctor = PS["Data.Profunctor"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Prelude = PS["Prelude"];+ var Emit = (function () {+ function Emit(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Emit.create = function (value0) {+ return function (value1) {+ return new Emit(value0, value1);+ };+ };+ return Emit;+ })();+ var runProcess = function (dictMonadRec) {+ return Control_Monad_Free_Trans.runFreeT(Data_Identity.functorIdentity)(dictMonadRec)(function ($186) {+ return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(Data_Newtype.unwrap(Data_Identity.newtypeIdentity)($186));+ });+ };+ var profunctorAwait = new Data_Profunctor.Profunctor(function (f) {+ return function (g) {+ return function (v) {+ return Data_Profunctor.dimap(Data_Profunctor.profunctorFn)(f)(g)(v);+ };+ };+ });+ var loop = function (dictFunctor) {+ return function (dictMonad) {+ return function (me) {+ return Control_Monad_Rec_Class.tailRecM(Control_Monad_Free_Trans.monadRecFreeT(dictFunctor)(dictMonad))(function (v) {+ return Data_Functor.map(Control_Monad_Free_Trans.functorFreeT(dictFunctor)(((dictMonad.Bind1()).Apply0()).Functor0()))(Data_Maybe.maybe(new Control_Monad_Rec_Class.Loop(Data_Unit.unit))(Control_Monad_Rec_Class.Done.create))(me);+ })(Data_Unit.unit);+ };+ };+ };+ var fuseWithL = function (dictFunctor) {+ return function (dictFunctor1) {+ return function (dictFunctor2) {+ return function (dictMonadRec) {+ return function (zap) {+ return function (fs) {+ return function (gs) {+ var go = function (v) {+ return Control_Monad_Except_Trans.runExceptT(Control_Bind.bind(Control_Monad_Except_Trans.bindExceptT(dictMonadRec.Monad0()))(Control_Monad_Except_Trans.ExceptT(Control_Monad_Free_Trans.resume(dictFunctor)(dictMonadRec)(v.value0)))(function (v1) {+ return Control_Bind.bind(Control_Monad_Except_Trans.bindExceptT(dictMonadRec.Monad0()))(Control_Monad_Except_Trans.ExceptT(Control_Monad_Free_Trans.resume(dictFunctor1)(dictMonadRec)(v.value1)))(function (v2) {+ return Control_Applicative.pure(Control_Monad_Except_Trans.applicativeExceptT(dictMonadRec.Monad0()))(Data_Functor.map(dictFunctor2)(function (t) {+ return Control_Monad_Free_Trans.freeT(function (v3) {+ return go(t);+ });+ })(zap(Data_Tuple.Tuple.create)(v1)(v2)));+ });+ }));+ };+ return Control_Monad_Free_Trans.freeT(function (v) {+ return go(new Data_Tuple.Tuple(fs, gs));+ });+ };+ };+ };+ };+ };+ };+ };+ var fuseWith = function (dictFunctor) {+ return function (dictFunctor1) {+ return function (dictFunctor2) {+ return function (dictMonadRec) {+ return function (dictParallel) {+ return function (zap) {+ return function (fs) {+ return function (gs) {+ var go = function (v) {+ return Control_Bind.bind((dictMonadRec.Monad0()).Bind1())(Control_Parallel_Class.sequential(dictParallel)(Control_Apply.apply((dictParallel.Applicative1()).Apply0())(Data_Functor.map(((dictParallel.Applicative1()).Apply0()).Functor0())(Control_Apply.lift2(Data_Either.applyEither)(zap(Data_Tuple.Tuple.create)))(Control_Parallel_Class.parallel(dictParallel)(Control_Monad_Free_Trans.resume(dictFunctor)(dictMonadRec)(v.value0))))(Control_Parallel_Class.parallel(dictParallel)(Control_Monad_Free_Trans.resume(dictFunctor1)(dictMonadRec)(v.value1)))))(function (v1) {+ if (v1 instanceof Data_Either.Left) {+ return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Data_Either.Left(v1.value0));+ };+ if (v1 instanceof Data_Either.Right) {+ return Control_Applicative.pure((dictMonadRec.Monad0()).Applicative0())(new Data_Either.Right(Data_Functor.map(dictFunctor2)(function (t) {+ return Control_Monad_Free_Trans.freeT(function (v2) {+ return go(t);+ });+ })(v1.value0)));+ };+ throw new Error("Failed pattern match at Control.Coroutine (line 79, column 5 - line 81, column 63): " + [ v1.constructor.name ]);+ });+ };+ return Control_Monad_Free_Trans.freeT(function (v) {+ return go(new Data_Tuple.Tuple(fs, gs));+ });+ };+ };+ };+ };+ };+ };+ };+ };+ var functorAwait = new Data_Functor.Functor(Data_Profunctor.rmap(profunctorAwait));+ var bifunctorEmit = new Data_Bifunctor.Bifunctor(function (f) {+ return function (g) {+ return function (v) {+ return new Emit(f(v.value0), g(v.value1));+ };+ };+ });+ var functorEmit = new Data_Functor.Functor(Data_Bifunctor.rmap(bifunctorEmit));+ var connect = function (dictMonadRec) {+ return function (dictParallel) {+ return fuseWith(functorEmit)(functorAwait)(Data_Identity.functorIdentity)(dictMonadRec)(dictParallel)(function (f) {+ return function (v) {+ return function (v1) {+ return f(v.value1)(v1(v.value0));+ };+ };+ });+ };+ };+ var emit = function (dictMonad) {+ return function (o) {+ return Control_Monad_Free_Trans.liftFreeT(functorEmit)(dictMonad)(new Emit(o, Data_Unit.unit));+ };+ };+ var producer = function (dictMonad) {+ return function (recv) {+ return loop(functorEmit)(dictMonad)(Control_Bind.bind(Control_Monad_Free_Trans.bindFreeT(functorEmit)(dictMonad))(Control_Monad_Trans_Class.lift(Control_Monad_Free_Trans.monadTransFreeT(functorEmit))(dictMonad)(recv))(function (v) {+ if (v instanceof Data_Either.Left) {+ return Data_Functor.voidLeft(Control_Monad_Free_Trans.functorFreeT(functorEmit)(((dictMonad.Bind1()).Apply0()).Functor0()))(emit(dictMonad)(v.value0))(Data_Maybe.Nothing.value);+ };+ if (v instanceof Data_Either.Right) {+ return Control_Applicative.pure(Control_Monad_Free_Trans.applicativeFreeT(functorEmit)(dictMonad))(new Data_Maybe.Just(v.value0));+ };+ throw new Error("Failed pattern match at Control.Coroutine (line 125, column 3 - line 127, column 29): " + [ v.constructor.name ]);+ }));+ };+ };+ var pullFrom = function (dictMonadRec) {+ return fuseWithL(functorAwait)(functorEmit)(Data_Identity.functorIdentity)(dictMonadRec)(function (f) {+ return function (v) {+ return function (v1) {+ return Control_Applicative.pure(Data_Identity.applicativeIdentity)(f(v(v1.value0))(v1.value1));+ };+ };+ });+ };+ var $$await = function (dictMonad) {+ return Control_Monad_Free_Trans.liftFreeT(functorAwait)(dictMonad)(Control_Category.identity(Control_Category.categoryFn));+ };+ exports["loop"] = loop;+ exports["runProcess"] = runProcess;+ exports["fuseWith"] = fuseWith;+ exports["fuseWithL"] = fuseWithL;+ exports["Emit"] = Emit;+ exports["emit"] = emit;+ exports["producer"] = producer;+ exports["await"] = $$await;+ exports["connect"] = connect;+ exports["pullFrom"] = pullFrom;+ exports["bifunctorEmit"] = bifunctorEmit;+ exports["functorEmit"] = functorEmit;+ exports["profunctorAwait"] = profunctorAwait;+ exports["functorAwait"] = functorAwait;+})(PS["Control.Coroutine"] = PS["Control.Coroutine"] || {});+(function(exports) {+ /* globals exports, setTimeout */+ "use strict";++ var AVar = function () {++ function MutableQueue () {+ this.head = null;+ this.last = null;+ this.size = 0;+ }++ function MutableCell (queue, value) {+ this.queue = queue;+ this.value = value;+ this.next = null;+ this.prev = null;+ }++ function AVar (value) {+ this.draining = false;+ this.error = null;+ this.value = value;+ this.takes = new MutableQueue();+ this.reads = new MutableQueue();+ this.puts = new MutableQueue();+ }++ var EMPTY = {};++ function runEff(eff) {+ try {+ eff();+ } catch (error) {+ setTimeout(function () {+ throw error;+ }, 0);+ }+ }++ function putLast (queue, value) {+ var cell = new MutableCell(queue, value);+ switch (queue.size) {+ case 0:+ queue.head = cell;+ break;+ case 1:+ cell.prev = queue.head;+ queue.head.next = cell;+ queue.last = cell;+ break;+ default:+ cell.prev = queue.last;+ queue.last.next = cell;+ queue.last = cell;+ }+ queue.size++;+ return cell;+ }++ function takeLast (queue) {+ var cell;+ switch (queue.size) {+ case 0:+ return null;+ case 1:+ cell = queue.head;+ queue.head = null;+ break;+ case 2:+ cell = queue.last;+ queue.head.next = null;+ queue.last = null;+ break;+ default:+ cell = queue.last;+ queue.last = cell.prev;+ queue.last.next = null;+ }+ cell.prev = null;+ cell.queue = null;+ queue.size--;+ return cell.value;+ }++ function takeHead (queue) {+ var cell;+ switch (queue.size) {+ case 0:+ return null;+ case 1:+ cell = queue.head;+ queue.head = null;+ break;+ case 2:+ cell = queue.head;+ queue.last.prev = null;+ queue.head = queue.last;+ queue.last = null;+ break;+ default:+ cell = queue.head;+ queue.head = cell.next;+ queue.head.prev = null;+ }+ cell.next = null;+ cell.queue = null;+ queue.size--;+ return cell.value;+ }++ function deleteCell (cell) {+ if (cell.queue === null) {+ return;+ }+ if (cell.queue.last === cell) {+ takeLast(cell.queue);+ return;+ }+ if (cell.queue.head === cell) {+ takeHead(cell.queue);+ return;+ }+ if (cell.prev) {+ cell.prev.next = cell.next;+ }+ if (cell.next) {+ cell.next.prev = cell.prev;+ }+ cell.queue.size--;+ cell.queue = null;+ cell.value = null;+ cell.next = null;+ cell.prev = null;+ }++ function drainVar (util, avar) {+ if (avar.draining) {+ return;+ }++ var ps = avar.puts;+ var ts = avar.takes;+ var rs = avar.reads;+ var p, r, t, value, rsize;++ avar.draining = true;++ while (1) { // eslint-disable-line no-constant-condition+ p = null;+ r = null;+ t = null;+ value = avar.value;+ rsize = rs.size;++ if (avar.error !== null) {+ value = util.left(avar.error);+ while (p = takeHead(ps)) { // eslint-disable-line no-cond-assign+ runEff(p.cb(value));+ }+ while (r = takeHead(rs)) { // eslint-disable-line no-cond-assign+ runEff(r(value));+ }+ while (t = takeHead(ts)) { // eslint-disable-line no-cond-assign+ runEff(t(value));+ }+ break;+ }++ // Process the next put. We do not immediately invoke the callback+ // because we want to preserve ordering. If there are takes/reads+ // we want to run those first.+ if (value === EMPTY && (p = takeHead(ps))) {+ avar.value = value = p.value;+ }++ if (value !== EMPTY) {+ // We go ahead and queue up the next take for the same reasons as+ // above. Invoking the read callbacks can affect the mutable queue.+ t = takeHead(ts);+ // We only want to process the reads queued up before running these+ // callbacks so we guard on rsize.+ while (rsize-- && (r = takeHead(rs))) {+ runEff(r(util.right(value)));+ }+ if (t !== null) {+ avar.value = EMPTY;+ runEff(t(util.right(value)));+ }+ }++ if (p !== null) {+ runEff(p.cb(util.right(void 0)));+ }++ // Callbacks could have queued up more items so we need to guard on the+ // actual mutable properties.+ if (avar.value === EMPTY && ps.size === 0 || avar.value !== EMPTY && ts.size === 0) {+ break;+ }+ }+ avar.draining = false;+ }++ AVar.EMPTY = EMPTY;+ AVar.putLast = putLast;+ AVar.takeLast = takeLast;+ AVar.takeHead = takeHead;+ AVar.deleteCell = deleteCell;+ AVar.drainVar = drainVar;++ return AVar;+ }();++ exports.empty = function () {+ return new AVar(AVar.EMPTY);+ };++ exports._killVar = function (util, error, avar) {+ return function () {+ if (avar.error === null) {+ avar.error = error;+ avar.value = AVar.EMPTY;+ AVar.drainVar(util, avar);+ }+ };+ };++ exports._putVar = function (util, value, avar, cb) {+ return function () {+ var cell = AVar.putLast(avar.puts, { cb: cb, value: value });+ AVar.drainVar(util, avar);+ return function () {+ AVar.deleteCell(cell);+ };+ };+ };++ exports._takeVar = function (util, avar, cb) {+ return function () {+ var cell = AVar.putLast(avar.takes, cb);+ AVar.drainVar(util, avar);+ return function () {+ AVar.deleteCell(cell);+ };+ };+ };+})(PS["Effect.AVar"] = PS["Effect.AVar"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Effect.AVar"];+ var Data_Either = PS["Data.Either"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Maybe = PS["Data.Maybe"];+ var Effect = PS["Effect"];+ var Effect_Exception = PS["Effect.Exception"];+ var Prelude = PS["Prelude"]; + var Killed = (function () {+ function Killed(value0) {+ this.value0 = value0;+ };+ Killed.create = function (value0) {+ return new Killed(value0);+ };+ return Killed;+ })();+ var Filled = (function () {+ function Filled(value0) {+ this.value0 = value0;+ };+ Filled.create = function (value0) {+ return new Filled(value0);+ };+ return Filled;+ })();+ var Empty = (function () {+ function Empty() {++ };+ Empty.value = new Empty();+ return Empty;+ })();+ var ffiUtil = {+ left: Data_Either.Left.create,+ right: Data_Either.Right.create,+ nothing: Data_Maybe.Nothing.value,+ just: Data_Maybe.Just.create,+ killed: Killed.create,+ filled: Filled.create,+ empty: Empty.value+ };+ var kill = function (err) {+ return function (avar) {+ return $foreign["_killVar"](ffiUtil, err, avar);+ };+ };+ var put = function (value) {+ return function (avar) {+ return function (cb) {+ return $foreign["_putVar"](ffiUtil, value, avar, cb);+ };+ };+ };+ var take = function (avar) {+ return function (cb) {+ return $foreign["_takeVar"](ffiUtil, avar, cb);+ };+ };+ exports["Killed"] = Killed;+ exports["Filled"] = Filled;+ exports["Empty"] = Empty;+ exports["take"] = take;+ exports["put"] = put;+ exports["kill"] = kill;+ exports["empty"] = $foreign.empty;+})(PS["Effect.AVar"] = PS["Effect.AVar"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Maybe = PS["Data.Maybe"];+ var Effect = PS["Effect"];+ var Effect_AVar = PS["Effect.AVar"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Exception = PS["Effect.Exception"];+ var Prelude = PS["Prelude"];+ var take = function (avar) {+ return Effect_Aff.makeAff(function (k) {+ return function __do() {+ var v = Effect_AVar.take(avar)(k)();+ return Effect_Aff.effectCanceler(v);+ };+ });+ };+ var put = function (value) {+ return function (avar) {+ return Effect_Aff.makeAff(function (k) {+ return function __do() {+ var v = Effect_AVar.put(value)(avar)(k)();+ return Effect_Aff.effectCanceler(v);+ };+ });+ };+ };+ var kill = function (error) {+ return function ($11) {+ return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_AVar.kill(error)($11));+ };+ };+ var empty = Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_AVar.empty);+ exports["empty"] = empty;+ exports["take"] = take;+ exports["put"] = put;+ exports["kill"] = kill;+})(PS["Effect.Aff.AVar"] = PS["Effect.Aff.AVar"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Coroutine = PS["Control.Coroutine"];+ var Control_Monad_Free_Trans = PS["Control.Monad.Free.Trans"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Aff_AVar = PS["Effect.Aff.AVar"];+ var Effect_Aff_Class = PS["Effect.Aff.Class"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Exception = PS["Effect.Exception"];+ var Prelude = PS["Prelude"]; + var Listening = (function () {+ function Listening() {++ };+ Listening.value = new Listening();+ return Listening;+ })();+ var Done = (function () {+ function Done() {++ };+ Done.value = new Done();+ return Done;+ })();+ var unEventSource = function (v) {+ return v;+ };+ var eqSubscribeStatus = new Data_Eq.Eq(function (x) {+ return function (y) {+ if (x instanceof Listening && y instanceof Listening) {+ return true;+ };+ if (x instanceof Done && y instanceof Done) {+ return true;+ };+ return false;+ };+ });+ exports["Listening"] = Listening;+ exports["Done"] = Done;+ exports["unEventSource"] = unEventSource;+ exports["eqSubscribeStatus"] = eqSubscribeStatus;+})(PS["Halogen.Query.EventSource"] = PS["Halogen.Query.EventSource"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Category = PS["Control.Category"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Exception = PS["Effect.Exception"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var unFork = Unsafe_Coerce.unsafeCoerce;+ exports["unFork"] = unFork;+})(PS["Halogen.Query.ForkF"] = PS["Halogen.Query.ForkF"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Applicative_Free = PS["Control.Applicative.Free"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Monad = PS["Control.Monad"];+ var Control_Monad_Free = PS["Control.Monad.Free"];+ var Control_Monad_Reader_Class = PS["Control.Monad.Reader.Class"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Monad_Writer_Class = PS["Control.Monad.Writer.Class"];+ var Control_Parallel_Class = PS["Control.Parallel.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Coyoneda = PS["Data.Coyoneda"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Aff_Class = PS["Effect.Aff.Class"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Exception = PS["Effect.Exception"];+ var Halogen_Query_EventSource = PS["Halogen.Query.EventSource"];+ var Halogen_Query_ForkF = PS["Halogen.Query.ForkF"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Prelude = PS["Prelude"];+ var Web_DOM = PS["Web.DOM"];+ var HalogenM = function (x) {+ return x;+ };+ var State = (function () {+ function State(value0) {+ this.value0 = value0;+ };+ State.create = function (value0) {+ return new State(value0);+ };+ return State;+ })();+ var Subscribe = (function () {+ function Subscribe(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Subscribe.create = function (value0) {+ return function (value1) {+ return new Subscribe(value0, value1);+ };+ };+ return Subscribe;+ })();+ var Lift = (function () {+ function Lift(value0) {+ this.value0 = value0;+ };+ Lift.create = function (value0) {+ return new Lift(value0);+ };+ return Lift;+ })();+ var Halt = (function () {+ function Halt(value0) {+ this.value0 = value0;+ };+ Halt.create = function (value0) {+ return new Halt(value0);+ };+ return Halt;+ })();+ var GetSlots = (function () {+ function GetSlots(value0) {+ this.value0 = value0;+ };+ GetSlots.create = function (value0) {+ return new GetSlots(value0);+ };+ return GetSlots;+ })();+ var CheckSlot = (function () {+ function CheckSlot(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ CheckSlot.create = function (value0) {+ return function (value1) {+ return new CheckSlot(value0, value1);+ };+ };+ return CheckSlot;+ })();+ var ChildQuery = (function () {+ function ChildQuery(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ ChildQuery.create = function (value0) {+ return function (value1) {+ return new ChildQuery(value0, value1);+ };+ };+ return ChildQuery;+ })();+ var Raise = (function () {+ function Raise(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Raise.create = function (value0) {+ return function (value1) {+ return new Raise(value0, value1);+ };+ };+ return Raise;+ })();+ var Par = (function () {+ function Par(value0) {+ this.value0 = value0;+ };+ Par.create = function (value0) {+ return new Par(value0);+ };+ return Par;+ })();+ var Fork = (function () {+ function Fork(value0) {+ this.value0 = value0;+ };+ Fork.create = function (value0) {+ return new Fork(value0);+ };+ return Fork;+ })();+ var GetRef = (function () {+ function GetRef(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ GetRef.create = function (value0) {+ return function (value1) {+ return new GetRef(value0, value1);+ };+ };+ return GetRef;+ })();+ var raise = function (o) {+ return HalogenM(Control_Monad_Free.liftF(new Raise(o, Data_Unit.unit)));+ }; + var getRef = function (p) {+ return HalogenM(Control_Monad_Free.liftF(new GetRef(p, Control_Category.identity(Control_Category.categoryFn))));+ };+ var functorHalogenM = new Data_Functor.Functor(function (f) {+ return function (v) {+ return Data_Functor.map(Control_Monad_Free.freeFunctor)(f)(v);+ };+ });+ var applyHalogenM = new Control_Apply.Apply(function () {+ return functorHalogenM;+ }, function (v) {+ return function (v1) {+ return Control_Apply.apply(Control_Monad_Free.freeApply)(v)(v1);+ };+ });+ var bindHalogenM = new Control_Bind.Bind(function () {+ return applyHalogenM;+ }, function (v) {+ return function (f) {+ return Control_Bind.bind(Control_Monad_Free.freeBind)(v)(function (x) {+ var v1 = f(x);+ return v1;+ });+ };+ }); + var applicativeHalogenM = new Control_Applicative.Applicative(function () {+ return applyHalogenM;+ }, function (a) {+ return Control_Applicative.pure(Control_Monad_Free.freeApplicative)(a);+ });+ var monadHalogenM = new Control_Monad.Monad(function () {+ return applicativeHalogenM;+ }, function () {+ return bindHalogenM;+ });+ var monadEffectHalogenM = function (dictMonadEffect) {+ return new Effect_Class.MonadEffect(function () {+ return monadHalogenM;+ }, function (eff) {+ return HalogenM(Control_Monad_Free.liftF(Lift.create(Effect_Class.liftEffect(dictMonadEffect)(eff))));+ });+ };+ var monadAffHalogenM = function (dictMonadAff) {+ return new Effect_Aff_Class.MonadAff(function () {+ return monadEffectHalogenM(dictMonadAff.MonadEffect0());+ }, function (aff) {+ return HalogenM(Control_Monad_Free.liftF(Lift.create(Effect_Aff_Class.liftAff(dictMonadAff)(aff))));+ });+ };+ var monadStateHalogenM = new Control_Monad_State_Class.MonadState(function () {+ return monadHalogenM;+ }, function ($180) {+ return HalogenM(Control_Monad_Free.liftF(State.create($180)));+ });+ exports["State"] = State;+ exports["Subscribe"] = Subscribe;+ exports["Lift"] = Lift;+ exports["Halt"] = Halt;+ exports["GetSlots"] = GetSlots;+ exports["CheckSlot"] = CheckSlot;+ exports["ChildQuery"] = ChildQuery;+ exports["Raise"] = Raise;+ exports["Par"] = Par;+ exports["Fork"] = Fork;+ exports["GetRef"] = GetRef;+ exports["HalogenM"] = HalogenM;+ exports["getRef"] = getRef;+ exports["raise"] = raise;+ exports["functorHalogenM"] = functorHalogenM;+ exports["applyHalogenM"] = applyHalogenM;+ exports["applicativeHalogenM"] = applicativeHalogenM;+ exports["bindHalogenM"] = bindHalogenM;+ exports["monadHalogenM"] = monadHalogenM;+ exports["monadEffectHalogenM"] = monadEffectHalogenM;+ exports["monadAffHalogenM"] = monadAffHalogenM;+ exports["monadStateHalogenM"] = monadStateHalogenM;+})(PS["Halogen.Query.HalogenM"] = PS["Halogen.Query.HalogenM"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Bifunctor = PS["Data.Bifunctor"];+ var Data_Const = PS["Data.Const"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Halogen_Data_OrdBox = PS["Halogen.Data.OrdBox"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"]; + var ComponentSlot = (function () {+ function ComponentSlot(value0, value1, value2, value3, value4, value5) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ this.value3 = value3;+ this.value4 = value4;+ this.value5 = value5;+ };+ ComponentSlot.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return function (value3) {+ return function (value4) {+ return function (value5) {+ return new ComponentSlot(value0, value1, value2, value3, value4, value5);+ };+ };+ };+ };+ };+ };+ return ComponentSlot;+ })();+ var unComponentSlot = function (f) {+ return function (cs) {+ return f(cs.value0)(cs.value1)(cs.value2)(cs.value3)(cs.value4)(cs.value5);+ };+ };+ var unComponent = Unsafe_Coerce.unsafeCoerce;+ var mkComponentSlot = ComponentSlot.create;+ var mkComponent = Unsafe_Coerce.unsafeCoerce;+ var parentComponent = function (dictOrd) {+ return function (spec) {+ return mkComponent({+ initialState: spec.initialState,+ render: spec.render,+ "eval": spec["eval"],+ receiver: spec.receiver,+ initializer: Data_Maybe.Nothing.value,+ finalizer: Data_Maybe.Nothing.value,+ mkOrdBox: Halogen_Data_OrdBox.mkOrdBox(dictOrd)+ });+ };+ };+ var lifecycleComponent = function (dictBifunctor) {+ return function (spec) {+ return mkComponent({+ initialState: spec.initialState,+ render: spec.render,+ "eval": spec["eval"],+ receiver: spec.receiver,+ initializer: spec.initializer,+ finalizer: spec.finalizer,+ mkOrdBox: Halogen_Data_OrdBox.mkOrdBox(Data_Ord.ordVoid)+ });+ };+ }; + var component = function (dictBifunctor) {+ return function (spec) {+ return lifecycleComponent(dictBifunctor)({+ initialState: spec.initialState,+ render: spec.render,+ "eval": spec["eval"],+ receiver: spec.receiver,+ initializer: Data_Maybe.Nothing.value,+ finalizer: Data_Maybe.Nothing.value+ });+ };+ };+ exports["mkComponent"] = mkComponent;+ exports["unComponent"] = unComponent;+ exports["component"] = component;+ exports["lifecycleComponent"] = lifecycleComponent;+ exports["parentComponent"] = parentComponent;+ exports["mkComponentSlot"] = mkComponentSlot;+ exports["unComponentSlot"] = unComponentSlot;+})(PS["Halogen.Component"] = PS["Halogen.Component"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var DOM_HTML_Indexed = PS["DOM.HTML.Indexed"];+ var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];+ var DOM_HTML_Indexed_FormMethod = PS["DOM.HTML.Indexed.FormMethod"];+ var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];+ var DOM_HTML_Indexed_MenuType = PS["DOM.HTML.Indexed.MenuType"];+ var DOM_HTML_Indexed_MenuitemType = PS["DOM.HTML.Indexed.MenuitemType"];+ var DOM_HTML_Indexed_OnOff = PS["DOM.HTML.Indexed.OnOff"];+ var DOM_HTML_Indexed_OrderedListType = PS["DOM.HTML.Indexed.OrderedListType"];+ var DOM_HTML_Indexed_PreloadValue = PS["DOM.HTML.Indexed.PreloadValue"];+ var DOM_HTML_Indexed_StepValue = PS["DOM.HTML.Indexed.StepValue"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_MediaType = PS["Data.MediaType"];+ var Data_Newtype = PS["Data.Newtype"];+ var Data_String = PS["Data.String"];+ var Data_String_Common = PS["Data.String.Common"];+ var Data_Unit = PS["Data.Unit"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Halogen_VDom_DOM_Prop = PS["Halogen.VDom.DOM.Prop"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var ref = (function () {+ var go = function (p) {+ return function (mel) {+ return new Data_Maybe.Just(new Halogen_Query_InputF.RefUpdate(p, mel, Data_Unit.unit));+ };+ };+ return function ($10) {+ return Halogen_HTML_Core.ref(go($10));+ };+ })();+ var prop = function (dictIsProp) {+ return Halogen_HTML_Core.prop(dictIsProp);+ }; + var required = prop(Halogen_HTML_Core.booleanIsProp)("required");+ var rows = prop(Halogen_HTML_Core.intIsProp)("rows"); + var target = prop(Halogen_HTML_Core.stringIsProp)("target");+ var title = prop(Halogen_HTML_Core.stringIsProp)("title");+ var type_ = function (dictIsProp) {+ return prop(dictIsProp)("type");+ };+ var value = prop(Halogen_HTML_Core.stringIsProp)("value");+ var name = prop(Halogen_HTML_Core.stringIsProp)("name"); + var id_ = prop(Halogen_HTML_Core.stringIsProp)("id");+ var href = prop(Halogen_HTML_Core.stringIsProp)("href");+ var $$for = prop(Halogen_HTML_Core.stringIsProp)("htmlFor");+ var class_ = function ($13) {+ return prop(Halogen_HTML_Core.stringIsProp)("className")(Data_Newtype.unwrap(Halogen_HTML_Core.newtypeClassName)($13));+ };+ var checked = prop(Halogen_HTML_Core.booleanIsProp)("checked"); + var autofocus = prop(Halogen_HTML_Core.booleanIsProp)("autofocus");+ var autocomplete = function ($14) {+ return prop(Halogen_HTML_Core.onOffIsProp)("autocomplete")((function (b) {+ if (b) {+ return DOM_HTML_Indexed_OnOff.On.value;+ };+ return DOM_HTML_Indexed_OnOff.Off.value;+ })($14));+ };+ var attr = Halogen_HTML_Core.attr(Data_Maybe.Nothing.value);+ exports["prop"] = prop;+ exports["attr"] = attr;+ exports["ref"] = ref;+ exports["class_"] = class_;+ exports["rows"] = rows;+ exports["for"] = $$for;+ exports["href"] = href;+ exports["id_"] = id_;+ exports["name"] = name;+ exports["target"] = target;+ exports["title"] = title;+ exports["type_"] = type_;+ exports["value"] = value;+ exports["required"] = required;+ exports["checked"] = checked;+ exports["autocomplete"] = autocomplete;+ exports["autofocus"] = autofocus;+})(PS["Halogen.HTML.Properties"] = PS["Halogen.HTML.Properties"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var DOM_HTML_Indexed = PS["DOM.HTML.Indexed"];+ var Data_Function = PS["Data.Function"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Tuple = PS["Data.Tuple"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Halogen_VDom = PS["Halogen.VDom"];+ var Halogen_VDom_Types = PS["Halogen.VDom.Types"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var element = Halogen_HTML_Core.element(Data_Maybe.Nothing.value);+ var form = element("form");+ var input = function (props) {+ return element("input")(props)([ ]);+ }; + var label = element("label");+ var p = element("p");+ var span = element("span");+ var table = element("table");+ var tbody = element("tbody");+ var tbody_ = tbody([ ]);+ var td = element("td");+ var td_ = td([ ]);+ var textarea = function (es) {+ return element("textarea")(es)([ ]);+ }; + var tr = element("tr");+ var tr_ = tr([ ]);+ var div = element("div");+ var div_ = div([ ]);+ var button = element("button");+ var br = function (props) {+ return element("br")(props)([ ]);+ };+ var br_ = br([ ]); + var a = element("a");+ exports["element"] = element;+ exports["a"] = a;+ exports["br"] = br;+ exports["br_"] = br_;+ exports["button"] = button;+ exports["div"] = div;+ exports["div_"] = div_;+ exports["form"] = form;+ exports["input"] = input;+ exports["label"] = label;+ exports["p"] = p;+ exports["span"] = span;+ exports["table"] = table;+ exports["tbody"] = tbody;+ exports["tbody_"] = tbody_;+ exports["td"] = td;+ exports["td_"] = td_;+ exports["textarea"] = textarea;+ exports["tr"] = tr;+ exports["tr_"] = tr_;+})(PS["Halogen.HTML.Elements"] = PS["Halogen.HTML.Elements"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_Component_ChildPath = PS["Halogen.Component.ChildPath"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var slot = function (p) {+ return function (component) {+ return function (input) {+ return function (outputQuery) {+ var f = Halogen_Component.unComponent(function (v) {+ return v.receiver;+ })(component);+ return Halogen_HTML_Core.slot(Halogen_Component.mkComponentSlot(p)(component)(input)(f)(outputQuery)(Data_Maybe.Just.create));+ };+ };+ };+ };+ exports["slot"] = slot;+})(PS["Halogen.HTML"] = PS["Halogen.HTML"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Apply = PS["Control.Apply"];+ var Control_Category = PS["Control.Category"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_FoldableWithIndex = PS["Data.FoldableWithIndex"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_FunctorWithIndex = PS["Data.FunctorWithIndex"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_List = PS["Data.List"];+ var Data_List_Lazy = PS["Data.List.Lazy"];+ var Data_List_Lazy_Types = PS["Data.List.Lazy.Types"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_TraversableWithIndex = PS["Data.TraversableWithIndex"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"]; + var Leaf = (function () {+ function Leaf() {++ };+ Leaf.value = new Leaf();+ return Leaf;+ })();+ var Two = (function () {+ function Two(value0, value1, value2, value3) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ this.value3 = value3;+ };+ Two.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return function (value3) {+ return new Two(value0, value1, value2, value3);+ };+ };+ };+ };+ return Two;+ })();+ var Three = (function () {+ function Three(value0, value1, value2, value3, value4, value5, value6) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ this.value3 = value3;+ this.value4 = value4;+ this.value5 = value5;+ this.value6 = value6;+ };+ Three.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return function (value3) {+ return function (value4) {+ return function (value5) {+ return function (value6) {+ return new Three(value0, value1, value2, value3, value4, value5, value6);+ };+ };+ };+ };+ };+ };+ };+ return Three;+ })();+ var TwoLeft = (function () {+ function TwoLeft(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ TwoLeft.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new TwoLeft(value0, value1, value2);+ };+ };+ };+ return TwoLeft;+ })();+ var TwoRight = (function () {+ function TwoRight(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ TwoRight.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new TwoRight(value0, value1, value2);+ };+ };+ };+ return TwoRight;+ })();+ var ThreeLeft = (function () {+ function ThreeLeft(value0, value1, value2, value3, value4, value5) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ this.value3 = value3;+ this.value4 = value4;+ this.value5 = value5;+ };+ ThreeLeft.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return function (value3) {+ return function (value4) {+ return function (value5) {+ return new ThreeLeft(value0, value1, value2, value3, value4, value5);+ };+ };+ };+ };+ };+ };+ return ThreeLeft;+ })();+ var ThreeMiddle = (function () {+ function ThreeMiddle(value0, value1, value2, value3, value4, value5) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ this.value3 = value3;+ this.value4 = value4;+ this.value5 = value5;+ };+ ThreeMiddle.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return function (value3) {+ return function (value4) {+ return function (value5) {+ return new ThreeMiddle(value0, value1, value2, value3, value4, value5);+ };+ };+ };+ };+ };+ };+ return ThreeMiddle;+ })();+ var ThreeRight = (function () {+ function ThreeRight(value0, value1, value2, value3, value4, value5) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ this.value3 = value3;+ this.value4 = value4;+ this.value5 = value5;+ };+ ThreeRight.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return function (value3) {+ return function (value4) {+ return function (value5) {+ return new ThreeRight(value0, value1, value2, value3, value4, value5);+ };+ };+ };+ };+ };+ };+ return ThreeRight;+ })();+ var KickUp = (function () {+ function KickUp(value0, value1, value2, value3) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ this.value3 = value3;+ };+ KickUp.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return function (value3) {+ return new KickUp(value0, value1, value2, value3);+ };+ };+ };+ };+ return KickUp;+ })();+ var values = function (v) {+ if (v instanceof Leaf) {+ return Data_List_Types.Nil.value;+ };+ if (v instanceof Two) {+ return Data_Semigroup.append(Data_List_Types.semigroupList)(values(v.value0))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value2))(values(v.value3)));+ };+ if (v instanceof Three) {+ return Data_Semigroup.append(Data_List_Types.semigroupList)(values(v.value0))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value2))(Data_Semigroup.append(Data_List_Types.semigroupList)(values(v.value3))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value5))(values(v.value6)))));+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 602, column 1 - line 602, column 40): " + [ v.constructor.name ]);+ };+ var lookup = function (dictOrd) {+ return function (k) {+ var comp = Data_Ord.compare(dictOrd);+ var go = function ($copy_v) {+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(v) {+ if (v instanceof Leaf) {+ $tco_done = true;+ return Data_Maybe.Nothing.value;+ };+ if (v instanceof Two) {+ var v2 = comp(k)(v.value1);+ if (v2 instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return new Data_Maybe.Just(v.value2);+ };+ if (v2 instanceof Data_Ordering.LT) {+ $copy_v = v.value0;+ return;+ };+ $copy_v = v.value3;+ return;+ };+ if (v instanceof Three) {+ var v3 = comp(k)(v.value1);+ if (v3 instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return new Data_Maybe.Just(v.value2);+ };+ var v4 = comp(k)(v.value4);+ if (v4 instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return new Data_Maybe.Just(v.value5);+ };+ if (v3 instanceof Data_Ordering.LT) {+ $copy_v = v.value0;+ return;+ };+ if (v4 instanceof Data_Ordering.GT) {+ $copy_v = v.value6;+ return;+ };+ $copy_v = v.value3;+ return;+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 197, column 5 - line 197, column 22): " + [ v.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($copy_v);+ };+ return $tco_result;+ };+ return go;+ };+ };+ var member = function (dictOrd) {+ return function (k) {+ return function (m) {+ return Data_Maybe.isJust(lookup(dictOrd)(k)(m));+ };+ };+ };+ var keys = function (v) {+ if (v instanceof Leaf) {+ return Data_List_Types.Nil.value;+ };+ if (v instanceof Two) {+ return Data_Semigroup.append(Data_List_Types.semigroupList)(keys(v.value0))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value1))(keys(v.value3)));+ };+ if (v instanceof Three) {+ return Data_Semigroup.append(Data_List_Types.semigroupList)(keys(v.value0))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value1))(Data_Semigroup.append(Data_List_Types.semigroupList)(keys(v.value3))(Data_Semigroup.append(Data_List_Types.semigroupList)(Control_Applicative.pure(Data_List_Types.applicativeList)(v.value4))(keys(v.value6)))));+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 596, column 1 - line 596, column 38): " + [ v.constructor.name ]);+ };+ var functorMap = new Data_Functor.Functor(function (v) {+ return function (v1) {+ if (v1 instanceof Leaf) {+ return Leaf.value;+ };+ if (v1 instanceof Two) {+ return new Two(Data_Functor.map(functorMap)(v)(v1.value0), v1.value1, v(v1.value2), Data_Functor.map(functorMap)(v)(v1.value3));+ };+ if (v1 instanceof Three) {+ return new Three(Data_Functor.map(functorMap)(v)(v1.value0), v1.value1, v(v1.value2), Data_Functor.map(functorMap)(v)(v1.value3), v1.value4, v(v1.value5), Data_Functor.map(functorMap)(v)(v1.value6));+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 93, column 1 - line 93, column 39): " + [ v.constructor.name, v1.constructor.name ]);+ };+ });+ var fromZipper = function ($copy_dictOrd) {+ return function ($copy_v) {+ return function ($copy_tree) {+ var $tco_var_dictOrd = $copy_dictOrd;+ var $tco_var_v = $copy_v;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(dictOrd, v, tree) {+ if (v instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return tree;+ };+ if (v instanceof Data_List_Types.Cons) {+ if (v.value0 instanceof TwoLeft) {+ $tco_var_dictOrd = dictOrd;+ $tco_var_v = v.value1;+ $copy_tree = new Two(tree, v.value0.value0, v.value0.value1, v.value0.value2);+ return;+ };+ if (v.value0 instanceof TwoRight) {+ $tco_var_dictOrd = dictOrd;+ $tco_var_v = v.value1;+ $copy_tree = new Two(v.value0.value0, v.value0.value1, v.value0.value2, tree);+ return;+ };+ if (v.value0 instanceof ThreeLeft) {+ $tco_var_dictOrd = dictOrd;+ $tco_var_v = v.value1;+ $copy_tree = new Three(tree, v.value0.value0, v.value0.value1, v.value0.value2, v.value0.value3, v.value0.value4, v.value0.value5);+ return;+ };+ if (v.value0 instanceof ThreeMiddle) {+ $tco_var_dictOrd = dictOrd;+ $tco_var_v = v.value1;+ $copy_tree = new Three(v.value0.value0, v.value0.value1, v.value0.value2, tree, v.value0.value3, v.value0.value4, v.value0.value5);+ return;+ };+ if (v.value0 instanceof ThreeRight) {+ $tco_var_dictOrd = dictOrd;+ $tco_var_v = v.value1;+ $copy_tree = new Three(v.value0.value0, v.value0.value1, v.value0.value2, v.value0.value3, v.value0.value4, v.value0.value5, tree);+ return;+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 415, column 3 - line 420, column 88): " + [ v.value0.constructor.name ]);+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 412, column 1 - line 412, column 80): " + [ v.constructor.name, tree.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_dictOrd, $tco_var_v, $copy_tree);+ };+ return $tco_result;+ };+ };+ };+ var insert = function (dictOrd) {+ return function (k) {+ return function (v) {+ var up = function ($copy_v1) {+ return function ($copy_v2) {+ var $tco_var_v1 = $copy_v1;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(v1, v2) {+ if (v1 instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return new Two(v2.value0, v2.value1, v2.value2, v2.value3);+ };+ if (v1 instanceof Data_List_Types.Cons) {+ if (v1.value0 instanceof TwoLeft) {+ $tco_done = true;+ return fromZipper(dictOrd)(v1.value1)(new Three(v2.value0, v2.value1, v2.value2, v2.value3, v1.value0.value0, v1.value0.value1, v1.value0.value2));+ };+ if (v1.value0 instanceof TwoRight) {+ $tco_done = true;+ return fromZipper(dictOrd)(v1.value1)(new Three(v1.value0.value0, v1.value0.value1, v1.value0.value2, v2.value0, v2.value1, v2.value2, v2.value3));+ };+ if (v1.value0 instanceof ThreeLeft) {+ $tco_var_v1 = v1.value1;+ $copy_v2 = new KickUp(new Two(v2.value0, v2.value1, v2.value2, v2.value3), v1.value0.value0, v1.value0.value1, new Two(v1.value0.value2, v1.value0.value3, v1.value0.value4, v1.value0.value5));+ return;+ };+ if (v1.value0 instanceof ThreeMiddle) {+ $tco_var_v1 = v1.value1;+ $copy_v2 = new KickUp(new Two(v1.value0.value0, v1.value0.value1, v1.value0.value2, v2.value0), v2.value1, v2.value2, new Two(v2.value3, v1.value0.value3, v1.value0.value4, v1.value0.value5));+ return;+ };+ if (v1.value0 instanceof ThreeRight) {+ $tco_var_v1 = v1.value1;+ $copy_v2 = new KickUp(new Two(v1.value0.value0, v1.value0.value1, v1.value0.value2, v1.value0.value3), v1.value0.value4, v1.value0.value5, new Two(v2.value0, v2.value1, v2.value2, v2.value3));+ return;+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 451, column 5 - line 456, column 108): " + [ v1.value0.constructor.name, v2.constructor.name ]);+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 448, column 3 - line 448, column 56): " + [ v1.constructor.name, v2.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_v1, $copy_v2);+ };+ return $tco_result;+ };+ };+ var comp = Data_Ord.compare(dictOrd);+ var down = function ($copy_ctx) {+ return function ($copy_v1) {+ var $tco_var_ctx = $copy_ctx;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(ctx, v1) {+ if (v1 instanceof Leaf) {+ $tco_done = true;+ return up(ctx)(new KickUp(Leaf.value, k, v, Leaf.value));+ };+ if (v1 instanceof Two) {+ var v2 = comp(k)(v1.value1);+ if (v2 instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctx)(new Two(v1.value0, k, v, v1.value3));+ };+ if (v2 instanceof Data_Ordering.LT) {+ $tco_var_ctx = new Data_List_Types.Cons(new TwoLeft(v1.value1, v1.value2, v1.value3), ctx);+ $copy_v1 = v1.value0;+ return;+ };+ $tco_var_ctx = new Data_List_Types.Cons(new TwoRight(v1.value0, v1.value1, v1.value2), ctx);+ $copy_v1 = v1.value3;+ return;+ };+ if (v1 instanceof Three) {+ var v3 = comp(k)(v1.value1);+ if (v3 instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctx)(new Three(v1.value0, k, v, v1.value3, v1.value4, v1.value5, v1.value6));+ };+ var v4 = comp(k)(v1.value4);+ if (v4 instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctx)(new Three(v1.value0, v1.value1, v1.value2, v1.value3, k, v, v1.value6));+ };+ if (v3 instanceof Data_Ordering.LT) {+ $tco_var_ctx = new Data_List_Types.Cons(new ThreeLeft(v1.value1, v1.value2, v1.value3, v1.value4, v1.value5, v1.value6), ctx);+ $copy_v1 = v1.value0;+ return;+ };+ if (v3 instanceof Data_Ordering.GT && v4 instanceof Data_Ordering.LT) {+ $tco_var_ctx = new Data_List_Types.Cons(new ThreeMiddle(v1.value0, v1.value1, v1.value2, v1.value4, v1.value5, v1.value6), ctx);+ $copy_v1 = v1.value3;+ return;+ };+ $tco_var_ctx = new Data_List_Types.Cons(new ThreeRight(v1.value0, v1.value1, v1.value2, v1.value3, v1.value4, v1.value5), ctx);+ $copy_v1 = v1.value6;+ return;+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 431, column 3 - line 431, column 55): " + [ ctx.constructor.name, v1.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_ctx, $copy_v1);+ };+ return $tco_result;+ };+ };+ return down(Data_List_Types.Nil.value);+ };+ };+ };+ var pop = function (dictOrd) {+ return function (k) {+ var up = function ($copy_ctxs) {+ return function ($copy_tree) {+ var $tco_var_ctxs = $copy_ctxs;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(ctxs, tree) {+ if (ctxs instanceof Data_List_Types.Nil) {+ $tco_done = true;+ return tree;+ };+ if (ctxs instanceof Data_List_Types.Cons) {+ if (ctxs.value0 instanceof TwoLeft && (ctxs.value0.value2 instanceof Leaf && tree instanceof Leaf)) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Two(Leaf.value, ctxs.value0.value0, ctxs.value0.value1, Leaf.value));+ };+ if (ctxs.value0 instanceof TwoRight && (ctxs.value0.value0 instanceof Leaf && tree instanceof Leaf)) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Two(Leaf.value, ctxs.value0.value1, ctxs.value0.value2, Leaf.value));+ };+ if (ctxs.value0 instanceof TwoLeft && ctxs.value0.value2 instanceof Two) {+ $tco_var_ctxs = ctxs.value1;+ $copy_tree = new Three(tree, ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2.value0, ctxs.value0.value2.value1, ctxs.value0.value2.value2, ctxs.value0.value2.value3);+ return;+ };+ if (ctxs.value0 instanceof TwoRight && ctxs.value0.value0 instanceof Two) {+ $tco_var_ctxs = ctxs.value1;+ $copy_tree = new Three(ctxs.value0.value0.value0, ctxs.value0.value0.value1, ctxs.value0.value0.value2, ctxs.value0.value0.value3, ctxs.value0.value1, ctxs.value0.value2, tree);+ return;+ };+ if (ctxs.value0 instanceof TwoLeft && ctxs.value0.value2 instanceof Three) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Two(new Two(tree, ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2.value0), ctxs.value0.value2.value1, ctxs.value0.value2.value2, new Two(ctxs.value0.value2.value3, ctxs.value0.value2.value4, ctxs.value0.value2.value5, ctxs.value0.value2.value6)));+ };+ if (ctxs.value0 instanceof TwoRight && ctxs.value0.value0 instanceof Three) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Two(new Two(ctxs.value0.value0.value0, ctxs.value0.value0.value1, ctxs.value0.value0.value2, ctxs.value0.value0.value3), ctxs.value0.value0.value4, ctxs.value0.value0.value5, new Two(ctxs.value0.value0.value6, ctxs.value0.value1, ctxs.value0.value2, tree)));+ };+ if (ctxs.value0 instanceof ThreeLeft && (ctxs.value0.value2 instanceof Leaf && (ctxs.value0.value5 instanceof Leaf && tree instanceof Leaf))) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Three(Leaf.value, ctxs.value0.value0, ctxs.value0.value1, Leaf.value, ctxs.value0.value3, ctxs.value0.value4, Leaf.value));+ };+ if (ctxs.value0 instanceof ThreeMiddle && (ctxs.value0.value0 instanceof Leaf && (ctxs.value0.value5 instanceof Leaf && tree instanceof Leaf))) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Three(Leaf.value, ctxs.value0.value1, ctxs.value0.value2, Leaf.value, ctxs.value0.value3, ctxs.value0.value4, Leaf.value));+ };+ if (ctxs.value0 instanceof ThreeRight && (ctxs.value0.value0 instanceof Leaf && (ctxs.value0.value3 instanceof Leaf && tree instanceof Leaf))) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Three(Leaf.value, ctxs.value0.value1, ctxs.value0.value2, Leaf.value, ctxs.value0.value4, ctxs.value0.value5, Leaf.value));+ };+ if (ctxs.value0 instanceof ThreeLeft && ctxs.value0.value2 instanceof Two) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Two(new Three(tree, ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2.value0, ctxs.value0.value2.value1, ctxs.value0.value2.value2, ctxs.value0.value2.value3), ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5));+ };+ if (ctxs.value0 instanceof ThreeMiddle && ctxs.value0.value0 instanceof Two) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Two(new Three(ctxs.value0.value0.value0, ctxs.value0.value0.value1, ctxs.value0.value0.value2, ctxs.value0.value0.value3, ctxs.value0.value1, ctxs.value0.value2, tree), ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5));+ };+ if (ctxs.value0 instanceof ThreeMiddle && ctxs.value0.value5 instanceof Two) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Two(ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2, new Three(tree, ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5.value0, ctxs.value0.value5.value1, ctxs.value0.value5.value2, ctxs.value0.value5.value3)));+ };+ if (ctxs.value0 instanceof ThreeRight && ctxs.value0.value3 instanceof Two) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Two(ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2, new Three(ctxs.value0.value3.value0, ctxs.value0.value3.value1, ctxs.value0.value3.value2, ctxs.value0.value3.value3, ctxs.value0.value4, ctxs.value0.value5, tree)));+ };+ if (ctxs.value0 instanceof ThreeLeft && ctxs.value0.value2 instanceof Three) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Three(new Two(tree, ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2.value0), ctxs.value0.value2.value1, ctxs.value0.value2.value2, new Two(ctxs.value0.value2.value3, ctxs.value0.value2.value4, ctxs.value0.value2.value5, ctxs.value0.value2.value6), ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5));+ };+ if (ctxs.value0 instanceof ThreeMiddle && ctxs.value0.value0 instanceof Three) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Three(new Two(ctxs.value0.value0.value0, ctxs.value0.value0.value1, ctxs.value0.value0.value2, ctxs.value0.value0.value3), ctxs.value0.value0.value4, ctxs.value0.value0.value5, new Two(ctxs.value0.value0.value6, ctxs.value0.value1, ctxs.value0.value2, tree), ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5));+ };+ if (ctxs.value0 instanceof ThreeMiddle && ctxs.value0.value5 instanceof Three) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Three(ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2, new Two(tree, ctxs.value0.value3, ctxs.value0.value4, ctxs.value0.value5.value0), ctxs.value0.value5.value1, ctxs.value0.value5.value2, new Two(ctxs.value0.value5.value3, ctxs.value0.value5.value4, ctxs.value0.value5.value5, ctxs.value0.value5.value6)));+ };+ if (ctxs.value0 instanceof ThreeRight && ctxs.value0.value3 instanceof Three) {+ $tco_done = true;+ return fromZipper(dictOrd)(ctxs.value1)(new Three(ctxs.value0.value0, ctxs.value0.value1, ctxs.value0.value2, new Two(ctxs.value0.value3.value0, ctxs.value0.value3.value1, ctxs.value0.value3.value2, ctxs.value0.value3.value3), ctxs.value0.value3.value4, ctxs.value0.value3.value5, new Two(ctxs.value0.value3.value6, ctxs.value0.value4, ctxs.value0.value5, tree)));+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 501, column 9 - line 518, column 136): " + [ ctxs.value0.constructor.name, tree.constructor.name ]);+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 498, column 5 - line 518, column 136): " + [ ctxs.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_ctxs, $copy_tree);+ };+ return $tco_result;+ };+ };+ var removeMaxNode = function ($copy_ctx) {+ return function ($copy_m) {+ var $tco_var_ctx = $copy_ctx;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(ctx, m) {+ if (m instanceof Two && (m.value0 instanceof Leaf && m.value3 instanceof Leaf)) {+ $tco_done = true;+ return up(ctx)(Leaf.value);+ };+ if (m instanceof Two) {+ $tco_var_ctx = new Data_List_Types.Cons(new TwoRight(m.value0, m.value1, m.value2), ctx);+ $copy_m = m.value3;+ return;+ };+ if (m instanceof Three && (m.value0 instanceof Leaf && (m.value3 instanceof Leaf && m.value6 instanceof Leaf))) {+ $tco_done = true;+ return up(new Data_List_Types.Cons(new TwoRight(Leaf.value, m.value1, m.value2), ctx))(Leaf.value);+ };+ if (m instanceof Three) {+ $tco_var_ctx = new Data_List_Types.Cons(new ThreeRight(m.value0, m.value1, m.value2, m.value3, m.value4, m.value5), ctx);+ $copy_m = m.value6;+ return;+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 530, column 5 - line 534, column 107): " + [ m.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_ctx, $copy_m);+ };+ return $tco_result;+ };+ };+ var maxNode = function ($copy_m) {+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(m) {+ if (m instanceof Two && m.value3 instanceof Leaf) {+ $tco_done = true;+ return {+ key: m.value1,+ value: m.value2+ };+ };+ if (m instanceof Two) {+ $copy_m = m.value3;+ return;+ };+ if (m instanceof Three && m.value6 instanceof Leaf) {+ $tco_done = true;+ return {+ key: m.value4,+ value: m.value5+ };+ };+ if (m instanceof Three) {+ $copy_m = m.value6;+ return;+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 521, column 33 - line 525, column 45): " + [ m.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($copy_m);+ };+ return $tco_result;+ };+ var comp = Data_Ord.compare(dictOrd);+ var down = function ($copy_ctx) {+ return function ($copy_m) {+ var $tco_var_ctx = $copy_ctx;+ var $tco_done = false;+ var $tco_result;+ function $tco_loop(ctx, m) {+ if (m instanceof Leaf) {+ $tco_done = true;+ return Data_Maybe.Nothing.value;+ };+ if (m instanceof Two) {+ var v = comp(k)(m.value1);+ if (m.value3 instanceof Leaf && v instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value2, up(ctx)(Leaf.value)));+ };+ if (v instanceof Data_Ordering.EQ) {+ var max = maxNode(m.value0);+ $tco_done = true;+ return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value2, removeMaxNode(new Data_List_Types.Cons(new TwoLeft(max.key, max.value, m.value3), ctx))(m.value0)));+ };+ if (v instanceof Data_Ordering.LT) {+ $tco_var_ctx = new Data_List_Types.Cons(new TwoLeft(m.value1, m.value2, m.value3), ctx);+ $copy_m = m.value0;+ return;+ };+ $tco_var_ctx = new Data_List_Types.Cons(new TwoRight(m.value0, m.value1, m.value2), ctx);+ $copy_m = m.value3;+ return;+ };+ if (m instanceof Three) {+ var leaves = (function () {+ if (m.value0 instanceof Leaf && (m.value3 instanceof Leaf && m.value6 instanceof Leaf)) {+ return true;+ };+ return false;+ })();+ var v = comp(k)(m.value4);+ var v3 = comp(k)(m.value1);+ if (leaves && v3 instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value2, fromZipper(dictOrd)(ctx)(new Two(Leaf.value, m.value4, m.value5, Leaf.value))));+ };+ if (leaves && v instanceof Data_Ordering.EQ) {+ $tco_done = true;+ return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value5, fromZipper(dictOrd)(ctx)(new Two(Leaf.value, m.value1, m.value2, Leaf.value))));+ };+ if (v3 instanceof Data_Ordering.EQ) {+ var max = maxNode(m.value0);+ $tco_done = true;+ return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value2, removeMaxNode(new Data_List_Types.Cons(new ThreeLeft(max.key, max.value, m.value3, m.value4, m.value5, m.value6), ctx))(m.value0)));+ };+ if (v instanceof Data_Ordering.EQ) {+ var max = maxNode(m.value3);+ $tco_done = true;+ return new Data_Maybe.Just(new Data_Tuple.Tuple(m.value5, removeMaxNode(new Data_List_Types.Cons(new ThreeMiddle(m.value0, m.value1, m.value2, max.key, max.value, m.value6), ctx))(m.value3)));+ };+ if (v3 instanceof Data_Ordering.LT) {+ $tco_var_ctx = new Data_List_Types.Cons(new ThreeLeft(m.value1, m.value2, m.value3, m.value4, m.value5, m.value6), ctx);+ $copy_m = m.value0;+ return;+ };+ if (v3 instanceof Data_Ordering.GT && v instanceof Data_Ordering.LT) {+ $tco_var_ctx = new Data_List_Types.Cons(new ThreeMiddle(m.value0, m.value1, m.value2, m.value4, m.value5, m.value6), ctx);+ $copy_m = m.value3;+ return;+ };+ $tco_var_ctx = new Data_List_Types.Cons(new ThreeRight(m.value0, m.value1, m.value2, m.value3, m.value4, m.value5), ctx);+ $copy_m = m.value6;+ return;+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 471, column 34 - line 494, column 80): " + [ m.constructor.name ]);+ };+ while (!$tco_done) {+ $tco_result = $tco_loop($tco_var_ctx, $copy_m);+ };+ return $tco_result;+ };+ };+ return down(Data_List_Types.Nil.value);+ };+ };+ var foldableMap = new Data_Foldable.Foldable(function (dictMonoid) {+ return function (f) {+ return function (m) {+ return Data_Foldable.foldMap(Data_List_Types.foldableList)(dictMonoid)(f)(values(m));+ };+ };+ }, function (f) {+ return function (z) {+ return function (m) {+ return Data_Foldable.foldl(Data_List_Types.foldableList)(f)(z)(values(m));+ };+ };+ }, function (f) {+ return function (z) {+ return function (m) {+ return Data_Foldable.foldr(Data_List_Types.foldableList)(f)(z)(values(m));+ };+ };+ });+ var empty = Leaf.value;+ var $$delete = function (dictOrd) {+ return function (k) {+ return function (m) {+ return Data_Maybe.maybe(m)(Data_Tuple.snd)(pop(dictOrd)(k)(m));+ };+ };+ }; + var alter = function (dictOrd) {+ return function (f) {+ return function (k) {+ return function (m) {+ var v = f(lookup(dictOrd)(k)(m));+ if (v instanceof Data_Maybe.Nothing) {+ return $$delete(dictOrd)(k)(m);+ };+ if (v instanceof Data_Maybe.Just) {+ return insert(dictOrd)(k)(v.value0)(m);+ };+ throw new Error("Failed pattern match at Data.Map.Internal (line 539, column 15 - line 541, column 25): " + [ v.constructor.name ]);+ };+ };+ };+ };+ exports["empty"] = empty;+ exports["insert"] = insert;+ exports["lookup"] = lookup;+ exports["delete"] = $$delete;+ exports["pop"] = pop;+ exports["member"] = member;+ exports["alter"] = alter;+ exports["keys"] = keys;+ exports["values"] = values;+ exports["functorMap"] = functorMap;+ exports["foldableMap"] = foldableMap;+})(PS["Data.Map.Internal"] = PS["Data.Map.Internal"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Monad_ST = PS["Control.Monad.ST"];+ var Control_Monad_ST_Internal = PS["Control.Monad.ST.Internal"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Array = PS["Data.Array"];+ var Data_Array_ST = PS["Data.Array.ST"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Map_Internal = PS["Data.Map.Internal"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ordering = PS["Data.Ordering"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Data_Unit = PS["Data.Unit"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"];+ var toList = function (v) {+ return Data_Map_Internal.keys(v);+ };+ var foldableSet = new Data_Foldable.Foldable(function (dictMonoid) {+ return function (f) {+ return function ($65) {+ return Data_Foldable.foldMap(Data_List_Types.foldableList)(dictMonoid)(f)(toList($65));+ };+ };+ }, function (f) {+ return function (x) {+ return function ($66) {+ return Data_Foldable.foldl(Data_List_Types.foldableList)(f)(x)(toList($66));+ };+ };+ }, function (f) {+ return function (x) {+ return function ($67) {+ return Data_Foldable.foldr(Data_List_Types.foldableList)(f)(x)(toList($67));+ };+ };+ });+ exports["foldableSet"] = foldableSet;+})(PS["Data.Set"] = PS["Data.Set"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Map_Internal = PS["Data.Map.Internal"];+ var Data_Set = PS["Data.Set"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"]; + var keys = function ($0) {+ return Data_Functor["void"](Data_Map_Internal.functorMap)($0);+ };+ exports["keys"] = keys;+})(PS["Data.Map"] = PS["Data.Map"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Parallel = PS["Control.Parallel"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Functor = PS["Data.Functor"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Map = PS["Data.Map"];+ var Data_Map_Internal = PS["Data.Map.Internal"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Aff_Class = PS["Effect.Aff.Class"];+ var Effect_Class = PS["Effect.Class"];+ var Halogen_Component_ChildPath = PS["Halogen.Component.ChildPath"];+ var Halogen_Query_EventSource = PS["Halogen.Query.EventSource"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Prelude = PS["Prelude"];+ var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];+ var getHTMLElementRef = function ($10) {+ return Data_Functor.map(Halogen_Query_HalogenM.functorHalogenM)(function (v) {+ return Control_Bind.bindFlipped(Data_Maybe.bindMaybe)(Web_HTML_HTMLElement.fromElement)(v);+ })(Halogen_Query_HalogenM.getRef($10));+ };+ var action = function (act) {+ return act(Data_Unit.unit);+ };+ exports["action"] = action;+ exports["getHTMLElementRef"] = getHTMLElementRef;+})(PS["Halogen.Query"] = PS["Halogen.Query"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Web_Event_Event = PS["Web.Event.Event"];+ var change = "change";+ exports["change"] = change;+})(PS["Web.HTML.Event.EventTypes"] = PS["Web.HTML.Event.EventTypes"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Web_Event_Event = PS["Web.Event.Event"];+ var click = "click";+ exports["click"] = click;+})(PS["Web.UIEvent.MouseEvent.EventTypes"] = PS["Web.UIEvent.MouseEvent.EventTypes"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_Except = PS["Control.Monad.Except"];+ var Control_Monad_Except_Trans = PS["Control.Monad.Except.Trans"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Identity = PS["Data.Identity"];+ var Data_Maybe = PS["Data.Maybe"];+ var Foreign = PS["Foreign"];+ var Foreign_Index = PS["Foreign.Index"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Halogen_Query = PS["Halogen.Query"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_Clipboard_ClipboardEvent = PS["Web.Clipboard.ClipboardEvent"];+ var Web_Clipboard_ClipboardEvent_EventTypes = PS["Web.Clipboard.ClipboardEvent.EventTypes"];+ var Web_Event_Event = PS["Web.Event.Event"];+ var Web_HTML_Event_DragEvent = PS["Web.HTML.Event.DragEvent"];+ var Web_HTML_Event_DragEvent_EventTypes = PS["Web.HTML.Event.DragEvent.EventTypes"];+ var Web_HTML_Event_EventTypes = PS["Web.HTML.Event.EventTypes"];+ var Web_TouchEvent_TouchEvent = PS["Web.TouchEvent.TouchEvent"];+ var Web_UIEvent_FocusEvent = PS["Web.UIEvent.FocusEvent"];+ var Web_UIEvent_FocusEvent_EventTypes = PS["Web.UIEvent.FocusEvent.EventTypes"];+ var Web_UIEvent_KeyboardEvent = PS["Web.UIEvent.KeyboardEvent"];+ var Web_UIEvent_KeyboardEvent_EventTypes = PS["Web.UIEvent.KeyboardEvent.EventTypes"];+ var Web_UIEvent_MouseEvent = PS["Web.UIEvent.MouseEvent"];+ var Web_UIEvent_MouseEvent_EventTypes = PS["Web.UIEvent.MouseEvent.EventTypes"];+ var Web_UIEvent_WheelEvent = PS["Web.UIEvent.WheelEvent"];+ var Web_UIEvent_WheelEvent_EventTypes = PS["Web.UIEvent.WheelEvent.EventTypes"];+ var mouseHandler = Unsafe_Coerce.unsafeCoerce;+ var input_ = function (f) {+ return function (v) {+ return Data_Maybe.Just.create(Halogen_Query.action(f));+ };+ };+ var input = function (f) {+ return function (x) {+ return Data_Maybe.Just.create(Halogen_Query.action(f(x)));+ };+ };+ var handler = function (et) {+ return function ($1) {+ return Halogen_HTML_Core.handler(et)(Data_Functor.map(Data_Functor.functorFn)(Data_Functor.map(Data_Maybe.functorMaybe)(Halogen_Query_InputF.Query.create))($1));+ };+ }; + var onClick = function ($2) {+ return handler(Web_UIEvent_MouseEvent_EventTypes.click)(mouseHandler($2));+ }; + var onSubmit = handler("submit");+ var addForeignPropHandler = function (key) {+ return function (prop) {+ return function (reader) {+ return function (f) {+ var go = function (a) {+ return Control_Bind.composeKleisliFlipped(Control_Monad_Except_Trans.bindExceptT(Data_Identity.monadIdentity))(reader)(Foreign_Index.readProp(prop))(Foreign.unsafeToForeign(a));+ };+ return handler(key)(Control_Bind.composeKleisli(Data_Maybe.bindMaybe)(Web_Event_Event.currentTarget)(function (e) {+ return Data_Either.either(Data_Function["const"](Data_Maybe.Nothing.value))(f)(Control_Monad_Except.runExcept(go(e)));+ }));+ };+ };+ };+ };+ var onChecked = addForeignPropHandler(Web_HTML_Event_EventTypes.change)("checked")(Foreign.readBoolean); + var onValueChange = addForeignPropHandler(Web_HTML_Event_EventTypes.change)("value")(Foreign.readString);+ exports["input"] = input;+ exports["input_"] = input_;+ exports["handler"] = handler;+ exports["onSubmit"] = onSubmit;+ exports["onClick"] = onClick;+ exports["onValueChange"] = onValueChange;+ exports["onChecked"] = onChecked;+})(PS["Halogen.HTML.Events"] = PS["Halogen.HTML.Events"] || {});+(function(exports) {+ "use strict";+ /* global Symbol */++ var hasArrayFrom = typeof Array.from === "function";+ var hasStringIterator =+ typeof Symbol !== "undefined" &&+ Symbol != null &&+ typeof Symbol.iterator !== "undefined" &&+ typeof String.prototype[Symbol.iterator] === "function";+ var hasFromCodePoint = typeof String.prototype.fromCodePoint === "function";+ var hasCodePointAt = typeof String.prototype.codePointAt === "function";++ exports._unsafeCodePointAt0 = function (fallback) {+ return hasCodePointAt+ ? function (str) { return str.codePointAt(0); }+ : fallback;+ };++ exports._singleton = function (fallback) {+ return hasFromCodePoint ? String.fromCodePoint : fallback;+ };++ exports._take = function (fallback) {+ return function (n) {+ if (hasStringIterator) {+ return function (str) {+ var accum = "";+ var iter = str[Symbol.iterator]();+ for (var i = 0; i < n; ++i) {+ var o = iter.next();+ if (o.done) return accum;+ accum += o.value;+ }+ return accum;+ };+ }+ return fallback(n);+ };+ };++ exports._toCodePointArray = function (fallback) {+ return function (unsafeCodePointAt0) {+ if (hasArrayFrom) {+ return function (str) {+ return Array.from(str, unsafeCodePointAt0);+ };+ }+ return fallback;+ };+ };+})(PS["Data.String.CodePoints"] = PS["Data.String.CodePoints"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Data.String.CodePoints"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Array = PS["Data.Array"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Bounded = PS["Data.Bounded"];+ var Data_Enum = PS["Data.Enum"];+ var Data_Eq = PS["Data.Eq"];+ var Data_EuclideanRing = PS["Data.EuclideanRing"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Int = PS["Data.Int"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Ring = PS["Data.Ring"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Show = PS["Data.Show"];+ var Data_String_CodeUnits = PS["Data.String.CodeUnits"];+ var Data_String_Common = PS["Data.String.Common"];+ var Data_String_Pattern = PS["Data.String.Pattern"];+ var Data_String_Unsafe = PS["Data.String.Unsafe"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unfoldable = PS["Data.Unfoldable"];+ var Prelude = PS["Prelude"];+ var unsurrogate = function (lead) {+ return function (trail) {+ return (((lead - 55296 | 0) * 1024 | 0) + (trail - 56320 | 0) | 0) + 65536 | 0;+ };+ }; + var isTrail = function (cu) {+ return 56320 <= cu && cu <= 57343;+ };+ var isLead = function (cu) {+ return 55296 <= cu && cu <= 56319;+ };+ var uncons = function (s) {+ var v = Data_String_CodeUnits.length(s);+ if (v === 0) {+ return Data_Maybe.Nothing.value;+ };+ if (v === 1) {+ return new Data_Maybe.Just({+ head: Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(0)(s)),+ tail: ""+ });+ };+ var cu1 = Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(1)(s));+ var cu0 = Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(0)(s));+ var $21 = isLead(cu0) && isTrail(cu1);+ if ($21) {+ return new Data_Maybe.Just({+ head: unsurrogate(cu0)(cu1),+ tail: Data_String_CodeUnits.drop(2)(s)+ });+ };+ return new Data_Maybe.Just({+ head: cu0,+ tail: Data_String_CodeUnits.drop(1)(s)+ });+ };+ var unconsButWithTuple = function (s) {+ return Data_Functor.map(Data_Maybe.functorMaybe)(function (v) {+ return new Data_Tuple.Tuple(v.head, v.tail);+ })(uncons(s));+ };+ var toCodePointArrayFallback = function (s) {+ return Data_Unfoldable.unfoldr(Data_Unfoldable.unfoldableArray)(unconsButWithTuple)(s);+ };+ var unsafeCodePointAt0Fallback = function (s) {+ var cu0 = Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(0)(s));+ var $25 = isLead(cu0) && Data_String_CodeUnits.length(s) > 1;+ if ($25) {+ var cu1 = Data_Enum.fromEnum(Data_Enum.boundedEnumChar)(Data_String_Unsafe.charAt(1)(s));+ var $26 = isTrail(cu1);+ if ($26) {+ return unsurrogate(cu0)(cu1);+ };+ return cu0;+ };+ return cu0;+ };+ var unsafeCodePointAt0 = $foreign["_unsafeCodePointAt0"](unsafeCodePointAt0Fallback);+ var toCodePointArray = $foreign["_toCodePointArray"](toCodePointArrayFallback)(unsafeCodePointAt0);+ var length = function ($52) {+ return Data_Array.length(toCodePointArray($52));+ };+ var fromCharCode = function ($53) {+ return Data_String_CodeUnits.singleton(Data_Enum.toEnumWithDefaults(Data_Enum.boundedEnumChar)(Data_Bounded.bottom(Data_Bounded.boundedChar))(Data_Bounded.top(Data_Bounded.boundedChar))($53));+ };+ var singletonFallback = function (v) {+ if (v <= 65535) {+ return fromCharCode(v);+ };+ var lead = Data_EuclideanRing.div(Data_EuclideanRing.euclideanRingInt)(v - 65536 | 0)(1024) + 55296 | 0;+ var trail = Data_EuclideanRing.mod(Data_EuclideanRing.euclideanRingInt)(v - 65536 | 0)(1024) + 56320 | 0;+ return fromCharCode(lead) + fromCharCode(trail);+ }; + var singleton = $foreign["_singleton"](singletonFallback);+ var takeFallback = function (n) {+ return function (v) {+ if (n < 1) {+ return "";+ };+ var v1 = uncons(v);+ if (v1 instanceof Data_Maybe.Just) {+ return singleton(v1.value0.head) + takeFallback(n - 1 | 0)(v1.value0.tail);+ };+ return v;+ };+ };+ var take = $foreign["_take"](takeFallback);+ var drop = function (n) {+ return function (s) {+ return Data_String_CodeUnits.drop(Data_String_CodeUnits.length(take(n)(s)))(s);+ };+ };+ exports["singleton"] = singleton;+ exports["toCodePointArray"] = toCodePointArray;+ exports["uncons"] = uncons;+ exports["length"] = length;+ exports["take"] = take;+ exports["drop"] = drop;+})(PS["Data.String.CodePoints"] = PS["Data.String.CodePoints"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_Maybe_Trans = PS["Control.Monad.Maybe.Trans"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Array = PS["Data.Array"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_String = PS["Data.String"];+ var Data_String_CodePoints = PS["Data.String.CodePoints"];+ var Data_String_Common = PS["Data.String.Common"];+ var Data_String_Pattern = PS["Data.String.Pattern"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Global_Unsafe = PS["Global.Unsafe"];+ var Halogen = PS["Halogen"];+ var Halogen_HTML = PS["Halogen.HTML"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Partial_Unsafe = PS["Partial.Unsafe"];+ var Prelude = PS["Prelude"];+ var Web_DOM = PS["Web.DOM"];+ var Web_DOM_Document = PS["Web.DOM.Document"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_DOM_NodeList = PS["Web.DOM.NodeList"];+ var Web_DOM_NonElementParentNode = PS["Web.DOM.NonElementParentNode"];+ var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];+ var Web_HTML = PS["Web.HTML"];+ var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];+ var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];+ var Web_HTML_Location = PS["Web.HTML.Location"];+ var Web_HTML_Window = PS["Web.HTML.Window"];+ var fromNullableStr = function ($57) {+ return Data_Maybe.fromMaybe("")(Data_Nullable.toMaybe($57));+ };+ var class_ = function ($58) {+ return Halogen_HTML_Properties.class_(Halogen_HTML_Core.ClassName($58));+ };+ var attr = function (a) {+ return Halogen_HTML_Properties.attr(a);+ };+ var _parseQueryString = function (srh) {+ var decode = function ($59) {+ return Global_Unsafe.unsafeDecodeURIComponent(Data_String_Common.replaceAll("+")(" ")($59));+ };+ var go = function (kv) {+ var v = Data_String_Common.split("=")(kv);+ if (v.length === 1) {+ return new Data_Maybe.Just(new Data_Tuple.Tuple(decode(v[0]), Data_Maybe.Nothing.value));+ };+ if (v.length === 2) {+ return new Data_Maybe.Just(new Data_Tuple.Tuple(decode(v[0]), new Data_Maybe.Just(decode(v[1]))));+ };+ return Data_Maybe.Nothing.value;+ };+ var qs = (function () {+ var srh$prime = Data_String_CodePoints.take(1)(srh);+ var $54 = srh$prime === "#" || srh$prime === "?";+ if ($54) {+ return Data_String_CodePoints.drop(1)(srh);+ };+ return srh;+ })();+ return Data_Array.mapMaybe(go)(Data_Array.filter(function (v) {+ return v !== "";+ })(Data_String_Common.split("&")(qs)));+ }; + var _lookupQueryStringValue = function (qs) {+ return function (k) {+ return Control_Bind.join(Data_Maybe.bindMaybe)(Data_Functor.map(Data_Maybe.functorMaybe)(Data_Tuple.snd)(Data_Foldable.find(Data_Foldable.foldableArray)(function ($61) {+ return (function (v) {+ return v === k;+ })(Data_Tuple.fst($61));+ })(qs)));+ };+ };+ var _loc = Control_Bind.bindFlipped(Effect.bindEffect)(Web_HTML_Window.location)(Web_HTML.window);+ var _curQuerystring = function __do() {+ var v = _loc();+ var v1 = Web_HTML_Location.search(v)();+ return _parseQueryString(v1);+ };+ exports["class_"] = class_;+ exports["attr"] = attr;+ exports["_loc"] = _loc;+ exports["_curQuerystring"] = _curQuerystring;+ exports["_parseQueryString"] = _parseQueryString;+ exports["_lookupQueryStringValue"] = _lookupQueryStringValue;+ exports["fromNullableStr"] = fromNullableStr;+})(PS["Util"] = PS["Util"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var App = PS["App"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Lens = PS["Data.Lens"];+ var Data_Lens_Getter = PS["Data.Lens.Getter"];+ var Data_Lens_Internal_Forget = PS["Data.Lens.Internal.Forget"];+ var Data_Lens_Lens = PS["Data.Lens.Lens"];+ var Data_Lens_Setter = PS["Data.Lens.Setter"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Profunctor_Strong = PS["Data.Profunctor.Strong"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Aff_Class = PS["Effect.Aff.Class"];+ var Globals = PS["Globals"];+ var Halogen = PS["Halogen"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_HTML = PS["Halogen.HTML"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];+ var Halogen_HTML_Events = PS["Halogen.HTML.Events"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"];+ var Util = PS["Util"];+ var Web_Event_Event = PS["Web.Event.Event"]; + var EarchiveDefault = (function () {+ function EarchiveDefault(value0) {+ this.value0 = value0;+ };+ EarchiveDefault.create = function (value0) {+ return new EarchiveDefault(value0);+ };+ return EarchiveDefault;+ })();+ var EprivateDefault = (function () {+ function EprivateDefault(value0) {+ this.value0 = value0;+ };+ EprivateDefault.create = function (value0) {+ return new EprivateDefault(value0);+ };+ return EprivateDefault;+ })();+ var EprivacyLock = (function () {+ function EprivacyLock(value0) {+ this.value0 = value0;+ };+ EprivacyLock.create = function (value0) {+ return new EprivacyLock(value0);+ };+ return EprivacyLock;+ })();+ var UEditField = (function () {+ function UEditField(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ UEditField.create = function (value0) {+ return function (value1) {+ return new UEditField(value0, value1);+ };+ };+ return UEditField;+ })();+ var USubmit = (function () {+ function USubmit(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ USubmit.create = function (value0) {+ return function (value1) {+ return new USubmit(value0, value1);+ };+ };+ return USubmit;+ })();+ var _us = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.us;+ })(function (v) {+ return function (v1) {+ return {+ us: v1+ };+ };+ })(dictStrong);+ };+ var usetting = function (u$prime) {+ var render = function (v) {+ var editField = function (f) {+ return function ($22) {+ return Halogen_HTML_Events.input(UEditField.create)(f($22));+ };+ };+ return Halogen_HTML_Elements.div([ Util.class_("settings-form") ])([ Halogen_HTML_Elements.div([ Util.class_("fw7 mb2") ])([ Halogen_HTML_Core.text("Account Settings") ]), Halogen_HTML_Elements.div([ Util.class_("flex items-center mb2") ])([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Util.class_("pointer mr2"), Halogen_HTML_Properties.id_("archiveDefault"), Halogen_HTML_Properties.name("archiveDefault"), Halogen_HTML_Properties.checked(v.us.archiveDefault), Halogen_HTML_Events.onChecked(editField(EarchiveDefault.create)) ]), Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("archiveDefault"), Util.class_("lh-copy") ])([ Halogen_HTML_Core.text("Archive Non-Private Bookmarks (archive.li)") ]) ]), Halogen_HTML_Elements.div([ Util.class_("flex items-center mb2") ])([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Util.class_("pointer mr2"), Halogen_HTML_Properties.id_("privateDefault"), Halogen_HTML_Properties.name("privateDefault"), Halogen_HTML_Properties.checked(v.us.privateDefault), Halogen_HTML_Events.onChecked(editField(EprivateDefault.create)) ]), Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("privateDefault"), Util.class_("lh-copy") ])([ Halogen_HTML_Core.text("Default new bookmarks to Private") ]) ]), Halogen_HTML_Elements.div([ Util.class_("flex items-center mb2") ])([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Util.class_("pointer mr2"), Halogen_HTML_Properties.id_("privacyLock"), Halogen_HTML_Properties.name("privacyLock"), Halogen_HTML_Properties.checked(v.us.privacyLock), Halogen_HTML_Events.onChecked(editField(EprivacyLock.create)) ]), Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("privacyLock"), Util.class_("lh-copy") ])([ Halogen_HTML_Core.text("Privacy Lock (Private Account)") ]) ]) ]);+ };+ var mkState = function (u) {+ return {+ us: u+ };+ };+ var $$eval = function (v) {+ if (v instanceof UEditField) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.modifying(Halogen_Query_HalogenM.monadStateHalogenM)(_us(Data_Profunctor_Strong.strongFn))((function () {+ if (v.value0 instanceof EarchiveDefault) {+ return function (v1) {+ return {+ archiveDefault: v.value0.value0,+ privateDefault: v1.privateDefault,+ privacyLock: v1.privacyLock+ };+ };+ };+ if (v.value0 instanceof EprivateDefault) {+ return function (v1) {+ return {+ archiveDefault: v1.archiveDefault,+ privateDefault: v.value0.value0,+ privacyLock: v1.privacyLock+ };+ };+ };+ if (v.value0 instanceof EprivacyLock) {+ return function (v1) {+ return {+ archiveDefault: v1.archiveDefault,+ privateDefault: v1.privateDefault,+ privacyLock: v.value0.value0+ };+ };+ };+ throw new Error("Failed pattern match at Component.AccountSettings (line 82, column 12 - line 85, column 46): " + [ v.value0.constructor.name ]);+ })()))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ };+ if (v instanceof USubmit) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_us(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.editAccountSettings(v1))))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ });+ };+ throw new Error("Failed pattern match at Component.AccountSettings (line 80, column 3 - line 80, column 58): " + [ v.constructor.name ]);+ };+ var app = Globals["app'"](Data_Unit.unit);+ return Halogen_Component.component(Halogen_HTML_Core.bifunctorHTML)({+ initialState: Data_Function["const"](mkState(u$prime)),+ render: render,+ "eval": $$eval,+ receiver: Data_Function["const"](Data_Maybe.Nothing.value)+ });+ };+ exports["_us"] = _us;+ exports["UEditField"] = UEditField;+ exports["USubmit"] = USubmit;+ exports["EarchiveDefault"] = EarchiveDefault;+ exports["EprivateDefault"] = EprivateDefault;+ exports["EprivacyLock"] = EprivacyLock;+ exports["usetting"] = usetting;+})(PS["Component.AccountSettings"] = PS["Component.AccountSettings"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var App = PS["App"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];+ var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];+ var Data_Array = PS["Data.Array"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Lens = PS["Data.Lens"];+ var Data_Lens_Getter = PS["Data.Lens.Getter"];+ var Data_Lens_Internal_Forget = PS["Data.Lens.Internal.Forget"];+ var Data_Lens_Lens = PS["Data.Lens.Lens"];+ var Data_Lens_Setter = PS["Data.Lens.Setter"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Profunctor_Strong = PS["Data.Profunctor.Strong"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_String = PS["Data.String"];+ var Data_String_Common = PS["Data.String.Common"];+ var Data_String_Pattern = PS["Data.String.Pattern"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Aff_Class = PS["Effect.Aff.Class"];+ var Effect_Class = PS["Effect.Class"];+ var Globals = PS["Globals"];+ var Halogen = PS["Halogen"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_HTML = PS["Halogen.HTML"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];+ var Halogen_HTML_Events = PS["Halogen.HTML.Events"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"];+ var Util = PS["Util"];+ var Web_Event_Event = PS["Web.Event.Event"];+ var Web_HTML = PS["Web.HTML"];+ var Web_HTML_Location = PS["Web.HTML.Location"]; + var Eurl = (function () {+ function Eurl(value0) {+ this.value0 = value0;+ };+ Eurl.create = function (value0) {+ return new Eurl(value0);+ };+ return Eurl;+ })();+ var Etitle = (function () {+ function Etitle(value0) {+ this.value0 = value0;+ };+ Etitle.create = function (value0) {+ return new Etitle(value0);+ };+ return Etitle;+ })();+ var Edescription = (function () {+ function Edescription(value0) {+ this.value0 = value0;+ };+ Edescription.create = function (value0) {+ return new Edescription(value0);+ };+ return Edescription;+ })();+ var Etags = (function () {+ function Etags(value0) {+ this.value0 = value0;+ };+ Etags.create = function (value0) {+ return new Etags(value0);+ };+ return Etags;+ })();+ var Eprivate = (function () {+ function Eprivate(value0) {+ this.value0 = value0;+ };+ Eprivate.create = function (value0) {+ return new Eprivate(value0);+ };+ return Eprivate;+ })();+ var Etoread = (function () {+ function Etoread(value0) {+ this.value0 = value0;+ };+ Etoread.create = function (value0) {+ return new Etoread(value0);+ };+ return Etoread;+ })();+ var BEditField = (function () {+ function BEditField(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ BEditField.create = function (value0) {+ return function (value1) {+ return new BEditField(value0, value1);+ };+ };+ return BEditField;+ })();+ var BEditSubmit = (function () {+ function BEditSubmit(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ BEditSubmit.create = function (value0) {+ return function (value1) {+ return new BEditSubmit(value0, value1);+ };+ };+ return BEditSubmit;+ })();+ var BDeleteAsk = (function () {+ function BDeleteAsk(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ BDeleteAsk.create = function (value0) {+ return function (value1) {+ return new BDeleteAsk(value0, value1);+ };+ };+ return BDeleteAsk;+ })();+ var BDestroy = (function () {+ function BDestroy(value0) {+ this.value0 = value0;+ };+ BDestroy.create = function (value0) {+ return new BDestroy(value0);+ };+ return BDestroy;+ })();+ var _edit_bm = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.edit_bm;+ })(function (v) {+ return function (v1) {+ return {+ edit_bm: v1,+ bm: v.bm,+ deleteAsk: v.deleteAsk,+ destroyed: v.destroyed+ };+ };+ })(dictStrong);+ };+ var _bm = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.bm;+ })(function (v) {+ return function (v1) {+ return {+ bm: v1,+ deleteAsk: v.deleteAsk,+ destroyed: v.destroyed,+ edit_bm: v.edit_bm+ };+ };+ })(dictStrong);+ };+ var addbmark = function (b$prime) {+ var render = function (v) {+ var toTextarea = function ($58) {+ return Data_Array.drop(1)(Data_Foldable.foldMap(Data_Foldable.foldableArray)(Data_Monoid.monoidArray)(function (x) {+ return [ Halogen_HTML_Elements.br_, Halogen_HTML_Core.text(x) ];+ })(Data_String_Common.split("\x0a")($58)));+ };+ var mmoment = Globals.mmoment8601(v.bm.time);+ var editField = function (f) {+ return function ($59) {+ return Halogen_HTML_Events.input(BEditField.create)(f($59));+ };+ };+ var display_exists = Halogen_HTML_Elements.div([ Util.class_("alert") ])([ Halogen_HTML_Core.text("previously saved\xa0"), Halogen_HTML_Elements.span([ Util.class_("link f7 dib gray pr3"), Halogen_HTML_Properties.title(Data_Maybe.maybe(v.bm.time)(Data_Tuple.snd)(mmoment)) ])([ Halogen_HTML_Core.text(Data_Maybe.maybe("\xa0")(Data_Tuple.fst)(mmoment)) ]), Halogen_HTML_Elements.div([ Util.class_("edit_links dib ml1") ])([ Halogen_HTML_Elements.div([ Util.class_("delete_link di") ])([ Halogen_HTML_Elements.button(Data_Semigroup.append(Data_Semigroup.semigroupArray)([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDeleteAsk.create(true))), Util.class_("delete") ])(Data_Monoid.guard(Data_Monoid.monoidArray)(v.deleteAsk)([ Util.attr("hidden")("hidden") ])))([ Halogen_HTML_Core.text("delete") ]), Halogen_HTML_Elements.span(Data_Semigroup.append(Data_Semigroup.semigroupArray)([ Util.class_("confirm red") ])(Data_Monoid.guard(Data_Monoid.monoidArray)(!v.deleteAsk)([ Util.attr("hidden")("hidden") ])))([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDeleteAsk.create(false))) ])([ Halogen_HTML_Core.text("cancel\xa0/\xa0") ]), Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDestroy.create)), Util.class_("red") ])([ Halogen_HTML_Core.text("destroy") ]) ]) ]) ]) ]);+ var display_edit = Halogen_HTML_Elements.form([ Halogen_HTML_Events.onSubmit(Halogen_HTML_Events.input(BEditSubmit.create)) ])([ Halogen_HTML_Elements.table([ Util.class_("w-100") ])([ Halogen_HTML_Elements.tbody_([ Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td([ Util.class_("w1") ])([ ]), Halogen_HTML_Elements.td_(Data_Monoid.guard(Data_Monoid.monoidArray)(v.bm.bid > 0)([ display_exists ])) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("url") ])([ Halogen_HTML_Core.text("URL") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputUrl.value), Halogen_HTML_Properties.id_("url"), Util.class_("w-100 mv1"), Halogen_HTML_Properties.required(true), Halogen_HTML_Properties.name("url"), Halogen_HTML_Properties.autofocus(Data_String_Common["null"](v.bm.url)), Halogen_HTML_Properties.value(v.edit_bm.url), Halogen_HTML_Events.onValueChange(editField(Eurl.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("title") ])([ Halogen_HTML_Core.text("title") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Halogen_HTML_Properties.id_("title"), Util.class_("w-100 mv1"), Halogen_HTML_Properties.name("title"), Halogen_HTML_Properties.value(v.edit_bm.title), Halogen_HTML_Events.onValueChange(editField(Etitle.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("description") ])([ Halogen_HTML_Core.text("description") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.textarea([ Util.class_("w-100 mt1 mid-gray"), Halogen_HTML_Properties.id_("description"), Halogen_HTML_Properties.name("description"), Halogen_HTML_Properties.rows(4), Halogen_HTML_Properties.value(v.edit_bm.description), Halogen_HTML_Events.onValueChange(editField(Edescription.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("tags") ])([ Halogen_HTML_Core.text("tags") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Halogen_HTML_Properties.id_("tags"), Util.class_("w-100 mv1"), Halogen_HTML_Properties.name("tags"), Halogen_HTML_Properties.autocomplete(false), Util.attr("autocapitalize")("off"), Halogen_HTML_Properties.autofocus(!Data_String_Common["null"](v.bm.url)), Halogen_HTML_Properties.value(v.edit_bm.tags), Halogen_HTML_Events.onValueChange(editField(Etags.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("private") ])([ Halogen_HTML_Core.text("private") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Halogen_HTML_Properties.id_("private"), Util.class_("private pointer"), Halogen_HTML_Properties.name("private"), Halogen_HTML_Properties.checked(v["edit_bm"]["private"]), Halogen_HTML_Events.onChecked(editField(Eprivate.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("toread") ])([ Halogen_HTML_Core.text("read later") ]) ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Halogen_HTML_Properties.id_("toread"), Util.class_("toread pointer"), Halogen_HTML_Properties.name("toread"), Halogen_HTML_Properties.checked(v.edit_bm.toread), Halogen_HTML_Events.onChecked(editField(Etoread.create)) ]) ]) ]), Halogen_HTML_Elements.tr_([ Halogen_HTML_Elements.td_([ ]), Halogen_HTML_Elements.td_([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputSubmit.value), Util.class_("ph3 pv2 input-reset ba b--navy bg-transparent pointer f6 dib mt1 dim"), Halogen_HTML_Properties.value((function () {+ var $26 = v.bm.bid > 0;+ if ($26) {+ return "update bookmark";+ };+ return "add bookmark";+ })()) ]) ]) ]) ]) ]) ]);+ var display_destroyed = Halogen_HTML_Elements.p([ Util.class_("red") ])([ Halogen_HTML_Core.text("you killed this bookmark") ]);+ return Halogen_HTML_Elements.div_([ (function () {+ var $27 = !v.destroyed;+ if ($27) {+ return display_edit;+ };+ return display_destroyed;+ })() ]);+ };+ var mkState = function (b) {+ return {+ bm: b,+ edit_bm: b,+ deleteAsk: false,+ destroyed: false+ };+ };+ var $$eval = function (v) {+ if (v instanceof BDeleteAsk) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {+ var $31 = {};+ for (var $32 in v1) {+ if ({}.hasOwnProperty.call(v1, $32)) {+ $31[$32] = v1[$32];+ };+ };+ $31.deleteAsk = v.value0;+ return $31;+ }))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ };+ if (v instanceof BDestroy) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.gets(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {+ return v1.bm.bid;+ }))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.destroy(v1))))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v2) {+ var $37 = {};+ for (var $38 in v2) {+ if ({}.hasOwnProperty.call(v2, $38)) {+ $37[$38] = v2[$38];+ };+ };+ $37.destroyed = true;+ return $37;+ }))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);+ });+ });+ });+ };+ if (v instanceof BEditField) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.modifying(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_bm(Data_Profunctor_Strong.strongFn))((function () {+ if (v.value0 instanceof Eurl) {+ return function (v1) {+ return {+ url: v.value0.value0,+ title: v1.title,+ description: v1.description,+ tags: v1.tags,+ "private": v1["private"],+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Etitle) {+ return function (v1) {+ return {+ url: v1.url,+ title: v.value0.value0,+ description: v1.description,+ tags: v1.tags,+ "private": v1["private"],+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Edescription) {+ return function (v1) {+ return {+ url: v1.url,+ title: v1.title,+ description: v.value0.value0,+ tags: v1.tags,+ "private": v1["private"],+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Etags) {+ return function (v1) {+ return {+ url: v1.url,+ title: v1.title,+ description: v1.description,+ tags: v.value0.value0,+ "private": v1["private"],+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Eprivate) {+ return function (v1) {+ return {+ url: v1.url,+ title: v1.title,+ description: v1.description,+ tags: v1.tags,+ "private": v.value0.value0,+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Etoread) {+ return function (v1) {+ return {+ url: v1.url,+ title: v1.title,+ description: v1.description,+ tags: v1.tags,+ "private": v1["private"],+ toread: v.value0.value0,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ throw new Error("Failed pattern match at Component.Add (line 160, column 17 - line 166, column 36): " + [ v.value0.constructor.name ]);+ })()))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ };+ if (v instanceof BEditSubmit) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_Event_Event.preventDefault(v.value0)))(function () {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_bm(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.editBookmark(v1))))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_bm(Data_Profunctor_Strong.strongFn))(v1))(function () {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Util["_loc"]))(function (v2) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_HTML.window))(function (v3) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Util["_curQuerystring"]))(function (v4) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)((function () {+ var v5 = Util["_lookupQueryStringValue"](v4)("next");+ if (v5 instanceof Data_Maybe.Just) {+ return Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_HTML_Location.setHref(v5.value0)(v2));+ };+ return Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Globals.closeWindow(v3));+ })())(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ });+ });+ });+ });+ });+ });+ });+ };+ throw new Error("Failed pattern match at Component.Add (line 150, column 3 - line 150, column 58): " + [ v.constructor.name ]);+ };+ var app = Globals["app'"](Data_Unit.unit);+ return Halogen_Component.component(Halogen_HTML_Core.bifunctorHTML)({+ initialState: Data_Function["const"](mkState(b$prime)),+ render: render,+ "eval": $$eval,+ receiver: Data_Function["const"](Data_Maybe.Nothing.value)+ });+ };+ exports["BEditField"] = BEditField;+ exports["BEditSubmit"] = BEditSubmit;+ exports["BDeleteAsk"] = BDeleteAsk;+ exports["BDestroy"] = BDestroy;+ exports["Eurl"] = Eurl;+ exports["Etitle"] = Etitle;+ exports["Edescription"] = Edescription;+ exports["Etags"] = Etags;+ exports["Eprivate"] = Eprivate;+ exports["Etoread"] = Etoread;+ exports["_bm"] = _bm;+ exports["_edit_bm"] = _edit_bm;+ exports["addbmark"] = addbmark;+})(PS["Component.Add"] = PS["Component.Add"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var App = PS["App"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];+ var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];+ var Data_Array = PS["Data.Array"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Lens = PS["Data.Lens"];+ var Data_Lens_Getter = PS["Data.Lens.Getter"];+ var Data_Lens_Internal_Forget = PS["Data.Lens.Internal.Forget"];+ var Data_Lens_Lens = PS["Data.Lens.Lens"];+ var Data_Lens_Setter = PS["Data.Lens.Setter"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Profunctor_Strong = PS["Data.Profunctor.Strong"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_String = PS["Data.String"];+ var Data_String_CodePoints = PS["Data.String.CodePoints"];+ var Data_String_Common = PS["Data.String.Common"];+ var Data_String_Pattern = PS["Data.String.Pattern"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Aff_Class = PS["Effect.Aff.Class"];+ var Effect_Class = PS["Effect.Class"];+ var Globals = PS["Globals"];+ var Halogen = PS["Halogen"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_HTML = PS["Halogen.HTML"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];+ var Halogen_HTML_Events = PS["Halogen.HTML.Events"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"];+ var Util = PS["Util"];+ var Web_Event_Event = PS["Web.Event.Event"]; + var Eurl = (function () {+ function Eurl(value0) {+ this.value0 = value0;+ };+ Eurl.create = function (value0) {+ return new Eurl(value0);+ };+ return Eurl;+ })();+ var Etitle = (function () {+ function Etitle(value0) {+ this.value0 = value0;+ };+ Etitle.create = function (value0) {+ return new Etitle(value0);+ };+ return Etitle;+ })();+ var Edescription = (function () {+ function Edescription(value0) {+ this.value0 = value0;+ };+ Edescription.create = function (value0) {+ return new Edescription(value0);+ };+ return Edescription;+ })();+ var Etags = (function () {+ function Etags(value0) {+ this.value0 = value0;+ };+ Etags.create = function (value0) {+ return new Etags(value0);+ };+ return Etags;+ })();+ var Eprivate = (function () {+ function Eprivate(value0) {+ this.value0 = value0;+ };+ Eprivate.create = function (value0) {+ return new Eprivate(value0);+ };+ return Eprivate;+ })();+ var Etoread = (function () {+ function Etoread(value0) {+ this.value0 = value0;+ };+ Etoread.create = function (value0) {+ return new Etoread(value0);+ };+ return Etoread;+ })();+ var BStar = (function () {+ function BStar(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ BStar.create = function (value0) {+ return function (value1) {+ return new BStar(value0, value1);+ };+ };+ return BStar;+ })();+ var BDeleteAsk = (function () {+ function BDeleteAsk(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ BDeleteAsk.create = function (value0) {+ return function (value1) {+ return new BDeleteAsk(value0, value1);+ };+ };+ return BDeleteAsk;+ })();+ var BDestroy = (function () {+ function BDestroy(value0) {+ this.value0 = value0;+ };+ BDestroy.create = function (value0) {+ return new BDestroy(value0);+ };+ return BDestroy;+ })();+ var BEdit = (function () {+ function BEdit(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ BEdit.create = function (value0) {+ return function (value1) {+ return new BEdit(value0, value1);+ };+ };+ return BEdit;+ })();+ var BEditField = (function () {+ function BEditField(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ BEditField.create = function (value0) {+ return function (value1) {+ return new BEditField(value0, value1);+ };+ };+ return BEditField;+ })();+ var BEditSubmit = (function () {+ function BEditSubmit(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ BEditSubmit.create = function (value0) {+ return function (value1) {+ return new BEditSubmit(value0, value1);+ };+ };+ return BEditSubmit;+ })();+ var BMarkRead = (function () {+ function BMarkRead(value0) {+ this.value0 = value0;+ };+ BMarkRead.create = function (value0) {+ return new BMarkRead(value0);+ };+ return BMarkRead;+ })();+ var BNotifyRemove = (function () {+ function BNotifyRemove() {++ };+ BNotifyRemove.value = new BNotifyRemove();+ return BNotifyRemove;+ })();+ var _edit_bm = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.edit_bm;+ })(function (v) {+ return function (v1) {+ return {+ edit_bm: v1,+ bm: v.bm,+ deleteAsk: v.deleteAsk,+ edit: v.edit+ };+ };+ })(dictStrong);+ };+ var _edit = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.edit;+ })(function (v) {+ return function (v1) {+ return {+ edit: v1,+ bm: v.bm,+ deleteAsk: v.deleteAsk,+ edit_bm: v.edit_bm+ };+ };+ })(dictStrong);+ };+ var _bm = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.bm;+ })(function (v) {+ return function (v1) {+ return {+ bm: v1,+ deleteAsk: v.deleteAsk,+ edit: v.edit,+ edit_bm: v.edit_bm+ };+ };+ })(dictStrong);+ };+ var bmark = function (b$prime) {+ var mkState = function (b) {+ return {+ bm: b,+ edit_bm: b,+ deleteAsk: false,+ edit: false+ };+ };+ var $$eval = function (v) {+ if (v instanceof BStar) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_bm(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.toggleStar(v1.bid)((function () {+ if (v.value0) {+ return App.Star.value;+ };+ return App.UnStar.value;+ })())))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.modifying(Halogen_Query_HalogenM.monadStateHalogenM)(_bm(Data_Profunctor_Strong.strongFn))(function (v2) {+ return {+ url: v2.url,+ title: v2.title,+ description: v2.description,+ tags: v2.tags,+ "private": v2["private"],+ toread: v2.toread,+ bid: v2.bid,+ slug: v2.slug,+ selected: v.value0,+ time: v2.time,+ archiveUrl: v2.archiveUrl+ };+ }))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.modifying(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_bm(Data_Profunctor_Strong.strongFn))(function (v2) {+ return {+ url: v2.url,+ title: v2.title,+ description: v2.description,+ tags: v2.tags,+ "private": v2["private"],+ toread: v2.toread,+ bid: v2.bid,+ slug: v2.slug,+ selected: v.value0,+ time: v2.time,+ archiveUrl: v2.archiveUrl+ };+ }))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ });+ });+ });+ };+ if (v instanceof BDeleteAsk) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {+ var $34 = {};+ for (var $35 in v1) {+ if ({}.hasOwnProperty.call(v1, $35)) {+ $34[$35] = v1[$35];+ };+ };+ $34.deleteAsk = v.value0;+ return $34;+ }))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ };+ if (v instanceof BDestroy) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_bm(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.destroy(v1.bid))))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Halogen_Query_HalogenM.raise(BNotifyRemove.value))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);+ });+ });+ });+ };+ if (v instanceof BMarkRead) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_bm(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.markRead(v1.bid))))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.modifying(Halogen_Query_HalogenM.monadStateHalogenM)(_bm(Data_Profunctor_Strong.strongFn))(function (v2) {+ return {+ url: v2.url,+ title: v2.title,+ description: v2.description,+ tags: v2.tags,+ "private": v2["private"],+ toread: false,+ bid: v2.bid,+ slug: v2.slug,+ selected: v2.selected,+ time: v2.time,+ archiveUrl: v2.archiveUrl+ };+ }))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);+ });+ });+ });+ };+ if (v instanceof BEdit) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_bm(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_bm(Data_Profunctor_Strong.strongFn))(v1))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_edit(Data_Profunctor_Strong.strongFn))(v.value0))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ });+ });+ };+ if (v instanceof BEditField) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.modifying(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_bm(Data_Profunctor_Strong.strongFn))((function () {+ if (v.value0 instanceof Eurl) {+ return function (v1) {+ return {+ url: v.value0.value0,+ title: v1.title,+ description: v1.description,+ tags: v1.tags,+ "private": v1["private"],+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Etitle) {+ return function (v1) {+ return {+ url: v1.url,+ title: v.value0.value0,+ description: v1.description,+ tags: v1.tags,+ "private": v1["private"],+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Edescription) {+ return function (v1) {+ return {+ url: v1.url,+ title: v1.title,+ description: v.value0.value0,+ tags: v1.tags,+ "private": v1["private"],+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Etags) {+ return function (v1) {+ return {+ url: v1.url,+ title: v1.title,+ description: v1.description,+ tags: v.value0.value0,+ "private": v1["private"],+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Eprivate) {+ return function (v1) {+ return {+ url: v1.url,+ title: v1.title,+ description: v1.description,+ tags: v1.tags,+ "private": v.value0.value0,+ toread: v1.toread,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ if (v.value0 instanceof Etoread) {+ return function (v1) {+ return {+ url: v1.url,+ title: v1.title,+ description: v1.description,+ tags: v1.tags,+ "private": v1["private"],+ toread: v.value0.value0,+ bid: v1.bid,+ slug: v1.slug,+ selected: v1.selected,+ time: v1.time,+ archiveUrl: v1.archiveUrl+ };+ };+ };+ throw new Error("Failed pattern match at Component.BMark (line 231, column 17 - line 237, column 36): " + [ v.value0.constructor.name ]);+ })()))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ };+ if (v instanceof BEditSubmit) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_Event_Event.preventDefault(v.value0)))(function () {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_bm(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.editBookmark(v1))))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_bm(Data_Profunctor_Strong.strongFn))(v1))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_edit(Data_Profunctor_Strong.strongFn))(false))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ });+ });+ });+ });+ };+ throw new Error("Failed pattern match at Component.BMark (line 193, column 3 - line 193, column 62): " + [ v.constructor.name ]);+ };+ var app = Globals["app'"](Data_Unit.unit);+ var render = function (v) {+ var toTextarea = function (input) {+ return Data_Array.drop(1)(Data_Foldable.foldMap(Data_Foldable.foldableArray)(Data_Monoid.monoidArray)(function (x) {+ return [ Halogen_HTML_Elements.br_, Halogen_HTML_Core.text(x) ];+ })(Data_String_Common.split("\x0a")(input)));+ };+ var star = Data_Monoid.guard(Data_Monoid.monoidArray)(app.dat.isowner)([ Halogen_HTML_Elements.div([ Util.class_("star fl pointer" + Data_Monoid.guard(Data_Monoid.monoidString)(v.bm.selected)(" selected")) ])([ Halogen_HTML_Elements.button([ Util.class_("moon-gray"), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BStar.create(!v.bm.selected))) ])([ Halogen_HTML_Core.text("\u272d") ]) ]) ]);+ var mmoment = Globals.mmoment8601(v.bm.time);+ var links = Data_Monoid.guard(Data_Monoid.monoidArray)(app.dat.isowner)([ Halogen_HTML_Elements.div([ Util.class_("edit_links di") ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BEdit.create(true))), Util.class_("edit light-silver hover-blue") ])([ Halogen_HTML_Core.text("edit\xa0\xa0") ]), Halogen_HTML_Elements.div([ Util.class_("delete_link di") ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDeleteAsk.create(true))), Util.class_("delete light-silver hover-blue" + Data_Monoid.guard(Data_Monoid.monoidString)(v.deleteAsk)(" dn")) ])([ Halogen_HTML_Core.text("delete") ]), Halogen_HTML_Elements.span([ Util.class_("confirm red" + Data_Monoid.guard(Data_Monoid.monoidString)(!v.deleteAsk)(" dn")) ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDeleteAsk.create(false))) ])([ Halogen_HTML_Core.text("cancel\xa0/\xa0") ]), Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BDestroy.create)), Util.class_("red") ])([ Halogen_HTML_Core.text("destroy") ]) ]) ]) ]), Halogen_HTML_Elements.div([ Util.class_("read di") ])(Data_Monoid.guard(Data_Monoid.monoidArray)(v.bm.toread)([ Halogen_HTML_Core.text("\xa0\xa0"), Halogen_HTML_Elements.button([ Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BMarkRead.create)), Util.class_("mark_read") ])([ Halogen_HTML_Core.text("mark as read") ]) ])) ]);+ var linkToFilterTag = function (tag) {+ return Util.fromNullableStr(app.userR) + ("/t:" + tag);+ };+ var linkToFilterSingle = function (slug) {+ return Util.fromNullableStr(app.userR) + ("/b:" + slug);+ };+ var editField = function (f) {+ return function ($64) {+ return Halogen_HTML_Events.input(BEditField.create)(f($64));+ };+ };+ var display_edit = [ Halogen_HTML_Elements.div([ Util.class_("edit_bookmark_form pa2 pt0 bg-white") ])([ Halogen_HTML_Elements.form([ Halogen_HTML_Events.onSubmit(Halogen_HTML_Events.input(BEditSubmit.create)) ])([ Halogen_HTML_Elements.div_([ Halogen_HTML_Core.text("url") ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputUrl.value), Util.class_("url w-100 mb2 pt1 f7 edit_form_input"), Halogen_HTML_Properties.required(true), Halogen_HTML_Properties.name("url"), Halogen_HTML_Properties.value(v.edit_bm.url), Halogen_HTML_Events.onValueChange(editField(Eurl.create)) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div_([ Halogen_HTML_Core.text("title") ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Util.class_("title w-100 mb2 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("title"), Halogen_HTML_Properties.value(v.edit_bm.title), Halogen_HTML_Events.onValueChange(editField(Etitle.create)) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div_([ Halogen_HTML_Core.text("description") ]), Halogen_HTML_Elements.textarea([ Util.class_("description w-100 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("description"), Halogen_HTML_Properties.rows(5), Halogen_HTML_Properties.value(v.edit_bm.description), Halogen_HTML_Events.onValueChange(editField(Edescription.create)) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div([ Halogen_HTML_Properties.id_("tags_input_box") ])([ Halogen_HTML_Elements.div_([ Halogen_HTML_Core.text("tags") ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Util.class_("tags w-100 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("tags"), Halogen_HTML_Properties.autocomplete(false), Util.attr("autocapitalize")("off"), Halogen_HTML_Properties.value(v.edit_bm.tags), Halogen_HTML_Events.onValueChange(editField(Etags.create)) ]), Halogen_HTML_Elements.br_ ]), Halogen_HTML_Elements.div([ Util.class_("edit_form_checkboxes mv3") ])([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Util.class_("private pointer"), Halogen_HTML_Properties.id_("edit_private"), Halogen_HTML_Properties.name("private"), Halogen_HTML_Properties.checked(v["edit_bm"]["private"]), Halogen_HTML_Events.onChecked(editField(Eprivate.create)) ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("edit_private"), Util.class_("mr2") ])([ Halogen_HTML_Core.text("private") ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Util.class_("toread pointer"), Halogen_HTML_Properties.id_("edit_toread"), Halogen_HTML_Properties.name("toread"), Halogen_HTML_Properties.checked(v.edit_bm.toread), Halogen_HTML_Events.onChecked(editField(Etoread.create)) ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("edit_toread") ])([ Halogen_HTML_Core.text("to-read") ]), Halogen_HTML_Elements.br_ ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputSubmit.value), Util.class_("mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"), Halogen_HTML_Properties.value("save") ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputReset.value), Util.class_("pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"), Halogen_HTML_Properties.value("cancel"), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(BEdit.create(false))) ]) ]) ]) ];+ var display = [ Halogen_HTML_Elements.div([ Util.class_("display") ])(Data_Semigroup.append(Data_Semigroup.semigroupArray)([ Halogen_HTML_Elements.a([ Halogen_HTML_Properties.href(v.bm.url), Halogen_HTML_Properties.target("_blank"), Util.class_("link f5 lh-title" + Data_Monoid.guard(Data_Monoid.monoidString)(v.bm.toread)(" unread")) ])([ Halogen_HTML_Core.text((function () {+ var $59 = Data_String_Common["null"](v.bm.title);+ if ($59) {+ return "[no title]";+ };+ return v.bm.title;+ })()) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.a([ Halogen_HTML_Properties.href(v.bm.url), Util.class_("link f7 gray hover-blue") ])([ Halogen_HTML_Core.text(v.bm.url) ]), Halogen_HTML_Elements.a([ Halogen_HTML_Properties.href(Data_Maybe.fromMaybe("http://archive.is/" + v.bm.url)(Data_Nullable.toMaybe(v.bm.archiveUrl))), Util.class_("link f7 gray hover-blue ml2" + Data_Monoid.guard(Data_Monoid.monoidString)(Data_Maybe.isJust(Data_Nullable.toMaybe(v.bm.archiveUrl)))(" green")), Halogen_HTML_Properties.target("_blank"), Halogen_HTML_Properties.title("archive link") ])([ (function () {+ var $60 = Data_Maybe.isJust(Data_Nullable.toMaybe(v.bm.archiveUrl));+ if ($60) {+ return Halogen_HTML_Core.text("\u2611");+ };+ return Halogen_HTML_Core.text("\u2610");+ })() ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div([ Util.class_("description mt1 mid-gray") ])(toTextarea(v.bm.description)), Halogen_HTML_Elements.div([ Util.class_("tags") ])(Data_Monoid.guard(Data_Monoid.monoidFn(Data_Monoid.monoidFn(Data_Monoid.monoidArray)))(!Data_String_Common["null"](v.bm.tags))(Data_Functor.map(Data_Functor.functorArray))(function (tag) {+ return Halogen_HTML_Elements.a([ Util.class_("link tag mr1" + Data_Monoid.guard(Data_Monoid.monoidString)(Data_String_CodePoints.take(1)(tag) === ".")(" private")), Halogen_HTML_Properties.href(linkToFilterTag(tag)) ])([ Halogen_HTML_Core.text(tag) ]);+ })(Data_String_Common.split(" ")(v.bm.tags))), Halogen_HTML_Elements.a([ Util.class_("link f7 dib gray w4"), Halogen_HTML_Properties.title(Data_Maybe.maybe(v.bm.time)(Data_Tuple.snd)(mmoment)), Halogen_HTML_Properties.href(linkToFilterSingle(v.bm.slug)) ])([ Halogen_HTML_Core.text(Data_Maybe.maybe("\xa0")(Data_Tuple.fst)(mmoment)) ]) ])(links)) ];+ return Halogen_HTML_Elements.div([ Halogen_HTML_Properties.id_(Data_Show.show(Data_Show.showInt)(v.bm.bid)), Util.class_("bookmark w-100 mw7 pa1 mb3" + Data_Monoid.guard(Data_Monoid.monoidString)(v["bm"]["private"])(" private")) ])(Data_Semigroup.append(Data_Semigroup.semigroupArray)(star)((function () {+ if (v.edit) {+ return display_edit;+ };+ return display;+ })()));+ };+ return Halogen_Component.component(Halogen_HTML_Core.bifunctorHTML)({+ initialState: Data_Function["const"](mkState(b$prime)),+ render: render,+ "eval": $$eval,+ receiver: Data_Function["const"](Data_Maybe.Nothing.value)+ });+ };+ exports["BStar"] = BStar;+ exports["BDeleteAsk"] = BDeleteAsk;+ exports["BDestroy"] = BDestroy;+ exports["BEdit"] = BEdit;+ exports["BEditField"] = BEditField;+ exports["BEditSubmit"] = BEditSubmit;+ exports["BMarkRead"] = BMarkRead;+ exports["Eurl"] = Eurl;+ exports["Etitle"] = Etitle;+ exports["Edescription"] = Edescription;+ exports["Etags"] = Etags;+ exports["Eprivate"] = Eprivate;+ exports["Etoread"] = Etoread;+ exports["BNotifyRemove"] = BNotifyRemove;+ exports["_bm"] = _bm;+ exports["_edit_bm"] = _edit_bm;+ exports["_edit"] = _edit;+ exports["bmark"] = bmark;+})(PS["Component.BMark"] = PS["Component.BMark"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Component_BMark = PS["Component.BMark"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Data_Array = PS["Data.Array"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Aff = PS["Effect.Aff"];+ var Halogen = PS["Halogen"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_HTML = PS["Halogen.HTML"];+ var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];+ var Halogen_HTML_Events = PS["Halogen.HTML.Events"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"]; + var HandleBMessage = (function () {+ function HandleBMessage(value0, value1, value2) {+ this.value0 = value0;+ this.value1 = value1;+ this.value2 = value2;+ };+ HandleBMessage.create = function (value0) {+ return function (value1) {+ return function (value2) {+ return new HandleBMessage(value0, value1, value2);+ };+ };+ };+ return HandleBMessage;+ })();+ var blist = function (st) {+ var render = function (bms) {+ var renderBookmark = function (b) {+ return Halogen_HTML.slot(b.bid)(Component_BMark.bmark(b))(Data_Unit.unit)(Halogen_HTML_Events.input(HandleBMessage.create(b.bid)));+ };+ return Halogen_HTML_Elements.div_(Data_Functor.map(Data_Functor.functorArray)(renderBookmark)(bms));+ };+ var $$eval = function (v) {+ var removeBookmark = function (bookmarkId) {+ return Data_Array.filter(function (b) {+ return b.bid !== bookmarkId;+ });+ };+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(removeBookmark(v.value0)))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value2);+ });+ };+ return Halogen_Component.parentComponent(Data_Ord.ordInt)({+ initialState: Data_Function["const"](st),+ render: render,+ "eval": $$eval,+ receiver: Data_Function["const"](Data_Maybe.Nothing.value)+ });+ };+ exports["HandleBMessage"] = HandleBMessage;+ exports["blist"] = blist;+})(PS["Component.BList"] = PS["Component.BList"] || {});+(function(exports) {// use at your own risk!+ exports.unsafeSetInnerHTML = function(element) {+ return function(html) {+ return function() {+ element.innerHTML = html;+ };+ };+ };+})(PS["Component.RawHtml"] = PS["Component.RawHtml"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Component.RawHtml"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Maybe = PS["Data.Maybe"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Class = PS["Effect.Class"];+ var Globals = PS["Globals"];+ var Halogen = PS["Halogen"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_HTML = PS["Halogen.HTML"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];+ var Halogen_HTML_Events = PS["Halogen.HTML.Events"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Halogen_Query = PS["Halogen.Query"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Prelude = PS["Prelude"];+ var Web_HTML = PS["Web.HTML"]; + var SetInnerHTML = (function () {+ function SetInnerHTML(value0) {+ this.value0 = value0;+ };+ SetInnerHTML.create = function (value0) {+ return new SetInnerHTML(value0);+ };+ return SetInnerHTML;+ })();+ var Receive = (function () {+ function Receive(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ Receive.create = function (value0) {+ return function (value1) {+ return new Receive(value0, value1);+ };+ };+ return Receive;+ })();+ var mkComponent = function (toRawHTML) {+ var render = function (state) {+ return Halogen_HTML_Elements.div([ Halogen_HTML_Properties.ref(state.elRef) ])([ ]);+ };+ var $$eval = function (v) {+ if (v instanceof SetInnerHTML) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v1) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Halogen_Query.getHTMLElementRef(v1.elRef))(function (v2) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Foldable.for_(Halogen_Query_HalogenM.applicativeHalogenM)(Data_Foldable.foldableMaybe)(v2)(function (el) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.get(Halogen_Query_HalogenM.monadStateHalogenM))(function (v3) {+ return Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))($foreign.unsafeSetInnerHTML(el)(toRawHTML(v3.inputval)));+ });+ }))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);+ });+ });+ });+ };+ if (v instanceof Receive) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {+ var $12 = {};+ for (var $13 in v1) {+ if ({}.hasOwnProperty.call(v1, $13)) {+ $12[$13] = v1[$13];+ };+ };+ $12.inputval = v.value0;+ return $12;+ }))(function () {+ return $$eval(new SetInnerHTML(v.value1));+ });+ };+ throw new Error("Failed pattern match at Component.RawHtml (line 51, column 10 - line 62, column 27): " + [ v.constructor.name ]);+ };+ return Halogen_Component.lifecycleComponent(Halogen_HTML_Core.bifunctorHTML)({+ initialState: function (inputval) {+ return {+ elRef: "inputval",+ inputval: inputval+ };+ },+ render: render,+ "eval": $$eval,+ receiver: Halogen_HTML_Events.input(Receive.create),+ initializer: Data_Maybe.Just.create(Halogen_Query.action(SetInnerHTML.create)),+ finalizer: Data_Maybe.Nothing.value+ });+ };+ exports["SetInnerHTML"] = SetInnerHTML;+ exports["Receive"] = Receive;+ exports["mkComponent"] = mkComponent;+})(PS["Component.RawHtml"] = PS["Component.RawHtml"] || {});+(function(exports) {exports.markedImpl = function(str) {+ marked.setOptions({+ pedantic: false,+ gfm: true+ });+ return marked(str);+ };+})(PS["Foreign.Marked"] = PS["Foreign.Marked"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Foreign.Marked"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Globals = PS["Globals"];+ var Prelude = PS["Prelude"]; + var marked = function ($0) {+ return Globals.RawHTML($foreign.markedImpl($0));+ };+ exports["marked"] = marked;+})(PS["Foreign.Marked"] = PS["Foreign.Marked"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Component_RawHtml = PS["Component.RawHtml"];+ var Effect_Aff = PS["Effect.Aff"];+ var Foreign_Marked = PS["Foreign.Marked"];+ var Halogen = PS["Halogen"];+ var Halogen_HTML = PS["Halogen.HTML"]; + var component = Component_RawHtml.mkComponent(Foreign_Marked.marked);+ exports["component"] = component;+})(PS["Component.Markdown"] = PS["Component.Markdown"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Data_Array = PS["Data.Array"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_String = PS["Data.String"];+ var Data_String_CodePoints = PS["Data.String.CodePoints"];+ var Data_String_Common = PS["Data.String.Common"];+ var Data_String_Pattern = PS["Data.String.Pattern"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Effect_Aff = PS["Effect.Aff"];+ var Globals = PS["Globals"];+ var Halogen = PS["Halogen"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_HTML = PS["Halogen.HTML"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"];+ var Util = PS["Util"];+ var nlist = function (st$prime) {+ var toTextarea = function (input) {+ return Data_Array.drop(1)(Data_Foldable.foldMap(Data_Foldable.foldableArray)(Data_Monoid.monoidArray)(function (x) {+ return [ Halogen_HTML_Elements.br_, Halogen_HTML_Core.text(x) ];+ })(Data_String_Common.split("\x0a")(input)));+ };+ var mmoment = function (bm) {+ return Globals.mmoment8601(bm.created);+ };+ var mkState = function (notes$prime) {+ return {+ notes: notes$prime,+ cur: Data_Maybe.Nothing.value,+ deleteAsk: false,+ edit: false+ };+ };+ var $$eval = function (v) {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);+ };+ var app = Globals["app'"](Data_Unit.unit);+ var linkToFilterSingle = function (slug) {+ return Util.fromNullableStr(app.userR) + ("/notes/" + slug);+ };+ var render = function (v) {+ var renderNote = function (bm) {+ return Halogen_HTML_Elements.div([ Halogen_HTML_Properties.id_(Data_Show.show(Data_Show.showInt)(bm.id)), Util.class_("note w-100 mw7 pa1 mb2") ])([ Halogen_HTML_Elements.div([ Util.class_("display") ])([ Halogen_HTML_Elements.a([ Halogen_HTML_Properties.href(linkToFilterSingle(bm.slug)), Util.class_("link f5 lh-title") ])([ Halogen_HTML_Core.text((function () {+ var $5 = Data_String_Common["null"](bm.title);+ if ($5) {+ return "[no title]";+ };+ return bm.title;+ })()) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.div([ Util.class_("description mt1 mid-gray") ])(toTextarea(Data_String_CodePoints.take(200)(bm.text))), Halogen_HTML_Elements.a([ Util.class_("link f7 dib gray w4"), Halogen_HTML_Properties.title(Data_Maybe.maybe(bm.created)(Data_Tuple.snd)(mmoment(bm))), Halogen_HTML_Properties.href(linkToFilterSingle(bm.slug)) ])([ Halogen_HTML_Core.text(Data_Maybe.maybe("\xa0")(Data_Tuple.fst)(mmoment(bm))) ]) ]) ]);+ };+ return Halogen_HTML_Elements.div_(Data_Functor.map(Data_Functor.functorArray)(renderNote)(v.notes));+ };+ return Halogen_Component.component(Halogen_HTML_Core.bifunctorHTML)({+ initialState: Data_Function["const"](mkState(st$prime)),+ render: render,+ "eval": $$eval,+ receiver: Data_Function["const"](Data_Maybe.Nothing.value)+ });+ };+ exports["nlist"] = nlist;+})(PS["Component.NList"] = PS["Component.NList"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var App = PS["App"];+ var Component_Markdown = PS["Component.Markdown"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_State_Class = PS["Control.Monad.State.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var DOM_HTML_Indexed_ButtonType = PS["DOM.HTML.Indexed.ButtonType"];+ var DOM_HTML_Indexed_InputType = PS["DOM.HTML.Indexed.InputType"];+ var Data_Array = PS["Data.Array"];+ var Data_Either = PS["Data.Either"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Lens = PS["Data.Lens"];+ var Data_Lens_Getter = PS["Data.Lens.Getter"];+ var Data_Lens_Internal_Forget = PS["Data.Lens.Internal.Forget"];+ var Data_Lens_Lens = PS["Data.Lens.Lens"];+ var Data_Lens_Setter = PS["Data.Lens.Setter"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Monoid = PS["Data.Monoid"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Profunctor_Strong = PS["Data.Profunctor.Strong"];+ var Data_Semigroup = PS["Data.Semigroup"];+ var Data_Show = PS["Data.Show"];+ var Data_String = PS["Data.String"];+ var Data_String_Common = PS["Data.String.Common"];+ var Data_String_Pattern = PS["Data.String.Pattern"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Data_Void = PS["Data.Void"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Aff_Class = PS["Effect.Aff.Class"];+ var Effect_Class = PS["Effect.Class"];+ var Globals = PS["Globals"];+ var Halogen = PS["Halogen"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_HTML = PS["Halogen.HTML"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_HTML_Elements = PS["Halogen.HTML.Elements"];+ var Halogen_HTML_Events = PS["Halogen.HTML.Events"];+ var Halogen_HTML_Properties = PS["Halogen.HTML.Properties"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"];+ var Util = PS["Util"];+ var Web_Event_Event = PS["Web.Event.Event"];+ var Web_HTML_Location = PS["Web.HTML.Location"]; + var Etitle = (function () {+ function Etitle(value0) {+ this.value0 = value0;+ };+ Etitle.create = function (value0) {+ return new Etitle(value0);+ };+ return Etitle;+ })();+ var Etext = (function () {+ function Etext(value0) {+ this.value0 = value0;+ };+ Etext.create = function (value0) {+ return new Etext(value0);+ };+ return Etext;+ })();+ var EisMarkdown = (function () {+ function EisMarkdown(value0) {+ this.value0 = value0;+ };+ EisMarkdown.create = function (value0) {+ return new EisMarkdown(value0);+ };+ return EisMarkdown;+ })();+ var NNop = (function () {+ function NNop(value0) {+ this.value0 = value0;+ };+ NNop.create = function (value0) {+ return new NNop(value0);+ };+ return NNop;+ })();+ var NEditField = (function () {+ function NEditField(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ NEditField.create = function (value0) {+ return function (value1) {+ return new NEditField(value0, value1);+ };+ };+ return NEditField;+ })();+ var NEditSubmit = (function () {+ function NEditSubmit(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ NEditSubmit.create = function (value0) {+ return function (value1) {+ return new NEditSubmit(value0, value1);+ };+ };+ return NEditSubmit;+ })();+ var NEdit = (function () {+ function NEdit(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ NEdit.create = function (value0) {+ return function (value1) {+ return new NEdit(value0, value1);+ };+ };+ return NEdit;+ })();+ var NDeleteAsk = (function () {+ function NDeleteAsk(value0, value1) {+ this.value0 = value0;+ this.value1 = value1;+ };+ NDeleteAsk.create = function (value0) {+ return function (value1) {+ return new NDeleteAsk(value0, value1);+ };+ };+ return NDeleteAsk;+ })();+ var NDestroy = (function () {+ function NDestroy(value0) {+ this.value0 = value0;+ };+ NDestroy.create = function (value0) {+ return new NDestroy(value0);+ };+ return NDestroy;+ })();+ var _note = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.note;+ })(function (v) {+ return function (v1) {+ return {+ note: v1,+ deleteAsk: v.deleteAsk,+ destroyed: v.destroyed,+ edit: v.edit,+ edit_note: v.edit_note+ };+ };+ })(dictStrong);+ };+ var _edit_note = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.edit_note;+ })(function (v) {+ return function (v1) {+ return {+ edit_note: v1,+ deleteAsk: v.deleteAsk,+ destroyed: v.destroyed,+ edit: v.edit,+ note: v.note+ };+ };+ })(dictStrong);+ };+ var _edit = function (dictStrong) {+ return Data_Lens_Lens.lens(function (v) {+ return v.edit;+ })(function (v) {+ return function (v1) {+ return {+ edit: v1,+ deleteAsk: v.deleteAsk,+ destroyed: v.destroyed,+ edit_note: v.edit_note,+ note: v.note+ };+ };+ })(dictStrong);+ };+ var nnote = function (st$prime) {+ var render = function (v) {+ var toTextarea = function (input) {+ return Data_Array.drop(1)(Data_Foldable.foldMap(Data_Foldable.foldableArray)(Data_Monoid.monoidArray)(function (x) {+ return [ Halogen_HTML_Elements.br_, Halogen_HTML_Core.text(x) ];+ })(Data_String_Common.split("\x0a")(input)));+ };+ var mmoment = function (n) {+ return Globals.mmoment8601(n.created);+ };+ var renderNote = Halogen_HTML_Elements.div([ Halogen_HTML_Properties.id_(Data_Show.show(Data_Show.showInt)(v.note.id)), Util.class_("note w-100 mw7 pa1 mb2") ])(Data_Semigroup.append(Data_Semigroup.semigroupArray)([ Halogen_HTML_Elements.div([ Util.class_("display") ])([ Halogen_HTML_Elements.div([ Util.class_("link f5 lh-title") ])([ Halogen_HTML_Core.text((function () {+ var $24 = Data_String_Common["null"](v.note.title);+ if ($24) {+ return "[no title]";+ };+ return v.note.title;+ })()) ]), Halogen_HTML_Elements.br_, (function () {+ if (v.note.isMarkdown) {+ return Halogen_HTML_Elements.div([ Util.class_("description mt1") ])([ Halogen_HTML.slot(Data_Unit.unit)(Component_Markdown.component)(v.note.text)(Data_Void.absurd) ]);+ };+ return Halogen_HTML_Elements.div([ Util.class_("description mt1 mid-gray") ])(toTextarea(v.note.text));+ })(), Halogen_HTML_Elements.div([ Util.class_("link f7 dib gray w4"), Halogen_HTML_Properties.title(Data_Maybe.maybe(v.note.created)(Data_Tuple.snd)(mmoment(v.note))) ])([ Halogen_HTML_Core.text(Data_Maybe.maybe("\xa0")(Data_Tuple.fst)(mmoment(v.note))) ]) ]) ])([ Halogen_HTML_Elements.div([ Util.class_("edit_links db mt3") ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NEdit.create(true))), Util.class_("edit light-silver hover-blue") ])([ Halogen_HTML_Core.text("edit\xa0\xa0") ]), Halogen_HTML_Elements.div([ Util.class_("delete_link di") ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NDeleteAsk.create(true))), Util.class_("delete light-silver hover-blue" + Data_Monoid.guard(Data_Monoid.monoidString)(v.deleteAsk)(" dn")) ])([ Halogen_HTML_Core.text("delete") ]), Halogen_HTML_Elements.span([ Util.class_("confirm red" + Data_Monoid.guard(Data_Monoid.monoidString)(!v.deleteAsk)(" dn")) ])([ Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NDeleteAsk.create(false))) ])([ Halogen_HTML_Core.text("cancel\xa0/\xa0") ]), Halogen_HTML_Elements.button([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.buttonTypeIsProp)(DOM_HTML_Indexed_ButtonType.ButtonButton.value), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NDestroy.create)), Util.class_("red") ])([ Halogen_HTML_Core.text("destroy") ]) ]) ]) ]) ]));+ var editField = function (f) {+ return function ($59) {+ return Halogen_HTML_Events.input(NEditField.create)(f($59));+ };+ };+ var renderNote_edit = Halogen_HTML_Elements.form([ Halogen_HTML_Events.onSubmit(Halogen_HTML_Events.input(NEditSubmit.create)) ])([ Halogen_HTML_Elements.p([ Util.class_("mt2 mb1") ])([ Halogen_HTML_Core.text("title:") ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputText.value), Util.class_("title w-100 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("title"), Halogen_HTML_Properties.value(v.edit_note.title), Halogen_HTML_Events.onValueChange(editField(Etitle.create)) ]), Halogen_HTML_Elements.br_, Halogen_HTML_Elements.p([ Util.class_("mt2 mb1") ])([ Halogen_HTML_Core.text("description:") ]), Halogen_HTML_Elements.textarea([ Util.class_("description w-100 mb1 pt1 f7 edit_form_input"), Halogen_HTML_Properties.name("text"), Halogen_HTML_Properties.rows(30), Halogen_HTML_Properties.value(v.edit_note.text), Halogen_HTML_Events.onValueChange(editField(Etext.create)) ]), Halogen_HTML_Elements.div([ Util.class_("edit_form_checkboxes mb3") ])([ Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputCheckbox.value), Util.class_("is-markdown pointer"), Halogen_HTML_Properties.id_("edit_ismarkdown"), Halogen_HTML_Properties.name("ismarkdown"), Halogen_HTML_Properties.checked(v.edit_note.isMarkdown), Halogen_HTML_Events.onChecked(editField(EisMarkdown.create)) ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.label([ Halogen_HTML_Properties["for"]("edit_ismarkdown"), Util.class_("mr2") ])([ Halogen_HTML_Core.text("use markdown?") ]), Halogen_HTML_Elements.br_ ]), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputSubmit.value), Util.class_("mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"), Halogen_HTML_Properties.value("save") ]), Halogen_HTML_Core.text(" "), Halogen_HTML_Elements.input([ Halogen_HTML_Properties.type_(Halogen_HTML_Core.inputTypeIsProp)(DOM_HTML_Indexed_InputType.InputReset.value), Util.class_("pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"), Halogen_HTML_Properties.value("cancel"), Halogen_HTML_Events.onClick(Halogen_HTML_Events.input_(NEdit.create(false))) ]) ]);+ var display_destroyed = Halogen_HTML_Elements.p([ Util.class_("red") ])([ Halogen_HTML_Core.text("you killed this note") ]);+ if (v.destroyed) {+ return display_destroyed;+ };+ if (v.edit) {+ return renderNote_edit;+ };+ return renderNote;+ };+ var mkState = function (note$prime) {+ return {+ note: note$prime,+ edit_note: note$prime,+ deleteAsk: false,+ edit: note$prime.id <= 0,+ destroyed: false+ };+ };+ var app = Globals["app'"](Data_Unit.unit);+ var $$eval = function (v) {+ if (v instanceof NNop) {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);+ };+ if (v instanceof NEditField) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.modifying(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_note(Data_Profunctor_Strong.strongFn))((function () {+ if (v.value0 instanceof Etitle) {+ return function (v1) {+ return {+ id: v1.id,+ slug: v1.slug,+ title: v.value0.value0,+ text: v1.text,+ length: v1.length,+ isMarkdown: v1.isMarkdown,+ created: v1.created,+ updated: v1.updated+ };+ };+ };+ if (v.value0 instanceof Etext) {+ return function (v1) {+ return {+ id: v1.id,+ slug: v1.slug,+ title: v1.title,+ text: v.value0.value0,+ length: v1.length,+ isMarkdown: v1.isMarkdown,+ created: v1.created,+ updated: v1.updated+ };+ };+ };+ if (v.value0 instanceof EisMarkdown) {+ return function (v1) {+ return {+ id: v1.id,+ slug: v1.slug,+ title: v1.title,+ text: v1.text,+ length: v1.length,+ isMarkdown: v.value0.value0,+ created: v1.created,+ updated: v1.updated+ };+ };+ };+ throw new Error("Failed pattern match at Component.NNote (line 158, column 19 - line 161, column 44): " + [ v.value0.constructor.name ]);+ })()))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ };+ if (v instanceof NDeleteAsk) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v1) {+ var $38 = {};+ for (var $39 in v1) {+ if ({}.hasOwnProperty.call(v1, $39)) {+ $38[$39] = v1[$39];+ };+ };+ $38.deleteAsk = v.value0;+ return $38;+ }))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ };+ if (v instanceof NDestroy) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_note(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Functor["void"](Halogen_Query_HalogenM.functorHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.destroyNote(v1.id))))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Control_Monad_State_Class.modify_(Halogen_Query_HalogenM.monadStateHalogenM)(function (v2) {+ var $44 = {};+ for (var $45 in v2) {+ if ({}.hasOwnProperty.call(v2, $45)) {+ $44[$45] = v2[$45];+ };+ };+ $44.destroyed = true;+ return $44;+ }))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value0);+ });+ });+ });+ };+ if (v instanceof NEdit) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_note(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_note(Data_Profunctor_Strong.strongFn))(v1))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_edit(Data_Profunctor_Strong.strongFn))(v.value0))(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ });+ });+ };+ if (v instanceof NEditSubmit) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Web_Event_Event.preventDefault(v.value0)))(function () {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Getter.use(Halogen_Query_HalogenM.monadStateHalogenM)(_edit_note(Data_Lens_Internal_Forget.strongForget)))(function (v1) {+ return Control_Bind.bind(Halogen_Query_HalogenM.bindHalogenM)(Effect_Aff_Class.liftAff(Halogen_Query_HalogenM.monadAffHalogenM(Effect_Aff_Class.monadAffAff))(App.editNote(v1)))(function (v2) {+ if (v2.body instanceof Data_Either.Left) {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ };+ if (v2.body instanceof Data_Either.Right) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)((function () {+ var $55 = v1.id === 0;+ if ($55) {+ return Effect_Class.liftEffect(Halogen_Query_HalogenM.monadEffectHalogenM(Effect_Aff.monadEffectAff))(Control_Bind.bindFlipped(Effect.bindEffect)(Web_HTML_Location.setHref(Util.fromNullableStr(app.noteR)))(Util["_loc"]));+ };+ return Control_Bind.discard(Control_Bind.discardUnit)(Halogen_Query_HalogenM.bindHalogenM)(Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_note(Data_Profunctor_Strong.strongFn))(v1))(function () {+ return Data_Lens_Setter.assign(Halogen_Query_HalogenM.monadStateHalogenM)(_edit(Data_Profunctor_Strong.strongFn))(false);+ });+ })())(function () {+ return Control_Applicative.pure(Halogen_Query_HalogenM.applicativeHalogenM)(v.value1);+ });+ };+ throw new Error("Failed pattern match at Component.NNote (line 188, column 5 - line 197, column 14): " + [ v2.body.constructor.name ]);+ });+ });+ });+ };+ throw new Error("Failed pattern match at Component.NNote (line 153, column 3 - line 153, column 72): " + [ v.constructor.name ]);+ };+ return Halogen_Component.parentComponent(Data_Ord.ordUnit)({+ initialState: Data_Function["const"](mkState(st$prime)),+ render: render,+ "eval": $$eval,+ receiver: Data_Function["const"](Data_Maybe.Nothing.value)+ });+ };+ exports["NNop"] = NNop;+ exports["NEditField"] = NEditField;+ exports["NEditSubmit"] = NEditSubmit;+ exports["NEdit"] = NEdit;+ exports["NDeleteAsk"] = NDeleteAsk;+ exports["NDestroy"] = NDestroy;+ exports["_note"] = _note;+ exports["_edit_note"] = _edit_note;+ exports["_edit"] = _edit;+ exports["Etitle"] = Etitle;+ exports["Etext"] = Etext;+ exports["EisMarkdown"] = EisMarkdown;+ exports["nnote"] = nnote;+})(PS["Component.NNote"] = PS["Component.NNote"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Monad_Reader_Trans = PS["Control.Monad.Reader.Trans"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Effect_Aff = PS["Effect.Aff"];+ var Prelude = PS["Prelude"];+ var MonadFork = function (Functor1, Monad0, fork, join, suspend) {+ this.Functor1 = Functor1;+ this.Monad0 = Monad0;+ this.fork = fork;+ this.join = join;+ this.suspend = suspend;+ };+ var suspend = function (dict) {+ return dict.suspend;+ };+ var monadForkAff = new MonadFork(function () {+ return Effect_Aff.functorFiber;+ }, function () {+ return Effect_Aff.monadAff;+ }, Effect_Aff.forkAff, Effect_Aff.joinFiber, Effect_Aff.suspendAff);+ var join = function (dict) {+ return dict.join;+ };+ var fork = function (dict) {+ return dict.fork;+ };+ exports["fork"] = fork;+ exports["join"] = join;+ exports["suspend"] = suspend;+ exports["MonadFork"] = MonadFork;+ exports["monadForkAff"] = monadForkAff;+})(PS["Control.Monad.Fork.Class"] = PS["Control.Monad.Fork.Class"] || {});+(function(exports) {+ "use strict";++ exports.warn = function (s) {+ return function () {+ console.warn(s);+ return {};+ };+ };+})(PS["Effect.Console"] = PS["Effect.Console"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Effect.Console"];+ var Data_Show = PS["Data.Show"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ exports["warn"] = $foreign.warn;+})(PS["Effect.Console"] = PS["Effect.Console"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Map = PS["Data.Map"];+ var Data_Map_Internal = PS["Data.Map.Internal"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Traversable = PS["Data.Traversable"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Ref = PS["Effect.Ref"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_Data_OrdBox = PS["Halogen.Data.OrdBox"];+ var Prelude = PS["Prelude"];+ var Unsafe_Coerce = PS["Unsafe.Coerce"];+ var Web_DOM = PS["Web.DOM"];+ var unRenderStateX = Unsafe_Coerce.unsafeCoerce;+ var unDriverStateX = Unsafe_Coerce.unsafeCoerce;+ var renderStateX_ = function (dictApplicative) {+ return function (f) {+ return unDriverStateX(function (st) {+ return Data_Foldable.traverse_(dictApplicative)(Data_Foldable.foldableMaybe)(f)(st.rendering);+ });+ };+ };+ var mkRenderStateX = function (v) {+ return Unsafe_Coerce.unsafeCoerce;+ };+ var renderStateX = function (dictFunctor) {+ return function (f) {+ return unDriverStateX(function (st) {+ return mkRenderStateX(st.prjQuery)(f(st.rendering));+ });+ };+ };+ var mkDriverStateXRef = Unsafe_Coerce.unsafeCoerce;+ var initDriverState = function (component) {+ return function (input) {+ return function (handler) {+ return function (prjQuery) {+ return function (lchs) {+ return function __do() {+ var v = Effect_Ref["new"]({})();+ var v1 = Effect_Ref["new"](Data_Map_Internal.empty)();+ var v2 = Effect_Ref["new"](Data_Map_Internal.empty)();+ var v3 = Effect_Ref["new"](Data_Functor.voidLeft(Data_Maybe.functorMaybe)(component.initializer)(Data_List_Types.Nil.value))();+ var v4 = Effect_Ref["new"](new Data_Maybe.Just(Data_List_Types.Nil.value))();+ var v5 = Effect_Ref["new"](Data_Maybe.Nothing.value)();+ var v6 = Effect_Ref["new"](0)();+ var v7 = Effect_Ref["new"](new Data_Maybe.Just(Data_Map_Internal.empty))();+ var ds = {+ component: component,+ state: component.initialState(input),+ refs: Data_Map_Internal.empty,+ children: Data_Map_Internal.empty,+ childrenIn: v1,+ childrenOut: v2,+ selfRef: v,+ handler: handler,+ pendingQueries: v3,+ pendingOuts: v4,+ pendingHandlers: v5,+ rendering: Data_Maybe.Nothing.value,+ prjQuery: prjQuery,+ fresh: v6,+ subscriptions: v7,+ lifecycleHandlers: lchs+ };+ Effect_Ref.write(ds)(v)();+ return mkDriverStateXRef(v);+ };+ };+ };+ };+ };+ };+ exports["unDriverStateX"] = unDriverStateX;+ exports["mkDriverStateXRef"] = mkDriverStateXRef;+ exports["renderStateX"] = renderStateX;+ exports["renderStateX_"] = renderStateX_;+ exports["unRenderStateX"] = unRenderStateX;+ exports["initDriverState"] = initDriverState;+})(PS["Halogen.Aff.Driver.State"] = PS["Halogen.Aff.Driver.State"] || {});+(function(exports) {+ "use strict";++ exports.reallyUnsafeRefEq = function (a) {+ return function (b) {+ return a === b;+ };+ };+})(PS["Unsafe.Reference"] = PS["Unsafe.Reference"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var $foreign = PS["Unsafe.Reference"]; + var unsafeRefEq = $foreign.reallyUnsafeRefEq;+ exports["unsafeRefEq"] = unsafeRefEq;+})(PS["Unsafe.Reference"] = PS["Unsafe.Reference"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Applicative_Free = PS["Control.Applicative.Free"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Coroutine = PS["Control.Coroutine"];+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Monad_Fork_Class = PS["Control.Monad.Fork.Class"];+ var Control_Monad_Free = PS["Control.Monad.Free"];+ var Control_Monad_Free_Trans = PS["Control.Monad.Free.Trans"];+ var Control_Monad_Trans_Class = PS["Control.Monad.Trans.Class"];+ var Control_Parallel = PS["Control.Parallel"];+ var Control_Parallel_Class = PS["Control.Parallel.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Boolean = PS["Data.Boolean"];+ var Data_Coyoneda = PS["Data.Coyoneda"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Map = PS["Data.Map"];+ var Data_Map_Internal = PS["Data.Map.Internal"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Set = PS["Data.Set"];+ var Data_Tuple = PS["Data.Tuple"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Exception = PS["Effect.Exception"];+ var Effect_Ref = PS["Effect.Ref"];+ var Halogen_Aff_Driver_State = PS["Halogen.Aff.Driver.State"];+ var Halogen_Data_OrdBox = PS["Halogen.Data.OrdBox"];+ var Halogen_Query_EventSource = PS["Halogen.Query.EventSource"];+ var Halogen_Query_ForkF = PS["Halogen.Query.ForkF"];+ var Halogen_Query_HalogenM = PS["Halogen.Query.HalogenM"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Prelude = PS["Prelude"];+ var Unsafe_Reference = PS["Unsafe.Reference"]; + var queuingHandler = function (handler) {+ return function (ref) {+ return function (message) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v) {+ if (v instanceof Data_Maybe.Nothing) {+ return handler(message);+ };+ if (v instanceof Data_Maybe.Just) {+ return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.write(new Data_Maybe.Just(new Data_List_Types.Cons(handler(message), v.value0)))(ref));+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 171, column 3 - line 175, column 59): " + [ v.constructor.name ]);+ });+ };+ };+ };+ var handleLifecycle = function (lchs) {+ return function (f) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.write({+ initializers: Data_List_Types.Nil.value,+ finalizers: Data_List_Types.Nil.value+ })(lchs)))(function () {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(f))(function (v) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(lchs)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_List_Types.foldableList)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))(v1.finalizers))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Control_Parallel.parSequence_(Effect_Aff.parallelAff)(Data_List_Types.foldableList)(v1.initializers))(function () {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v);+ });+ });+ });+ });+ });+ };+ };+ var $$eval = function (render) {+ return function (r) {+ var go = function (ref) {+ return function (v) {+ if (v instanceof Halogen_Query_HalogenM.State) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {+ var v2 = v.value0(v1.state);+ if (Unsafe_Reference.unsafeRefEq(v1.state)(v2.value1)) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v2.value0);+ };+ if (Data_Boolean.otherwise) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.write({+ component: v1.component,+ state: v2.value1,+ refs: v1.refs,+ children: v1.children,+ childrenIn: v1.childrenIn,+ childrenOut: v1.childrenOut,+ selfRef: v1.selfRef,+ handler: v1.handler,+ pendingQueries: v1.pendingQueries,+ pendingOuts: v1.pendingOuts,+ pendingHandlers: v1.pendingHandlers,+ rendering: v1.rendering,+ prjQuery: v1.prjQuery,+ fresh: v1.fresh,+ subscriptions: v1.subscriptions,+ lifecycleHandlers: v1.lifecycleHandlers+ })(ref)))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(handleLifecycle(v1.lifecycleHandlers)(render(v1.lifecycleHandlers)(ref)))(function () {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v2.value0);+ });+ });+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 76, column 7 - line 82, column 21): " + [ v2.constructor.name ]);+ });+ };+ if (v instanceof Halogen_Query_HalogenM.Subscribe) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff)(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Query_EventSource.unEventSource(v.value0))(function (v2) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref["modify'"](function (i) {+ return {+ state: i + 1 | 0,+ value: i+ };+ })(v1.fresh)))(function (v3) {+ var done$prime = Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(v1.subscriptions)))(function (v4) {+ return Control_Applicative.when(Effect_Aff.applicativeAff)(Data_Maybe.maybe(false)(Data_Map_Internal.member(Data_Ord.ordInt)(v3))(v4))(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.modify_(Data_Functor.map(Data_Maybe.functorMaybe)(Data_Map_Internal["delete"](Data_Ord.ordInt)(v3)))(v1.subscriptions)));+ });+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.modify_(Data_Functor.map(Data_Maybe.functorMaybe)(Data_Map_Internal.insert(Data_Ord.ordInt)(v3)(done$prime)))(v1.subscriptions)))(function () {+ var consumer = Control_Bind.bind(Control_Monad_Free_Trans.bindFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Control_Coroutine["await"](Effect_Aff.monadAff))(function (v4) {+ return Control_Bind.bind(Control_Monad_Free_Trans.bindFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Control_Monad_Trans_Class.lift(Control_Monad_Free_Trans.monadTransFreeT(Control_Coroutine.functorAwait))(Effect_Aff.monadAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(v1.subscriptions))))(function (v5) {+ return Control_Applicative.when(Control_Monad_Free_Trans.applicativeFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Data_Maybe.isJust(v5))(Control_Bind.bind(Control_Monad_Free_Trans.bindFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Control_Monad_Trans_Class.lift(Control_Monad_Free_Trans.monadTransFreeT(Control_Coroutine.functorAwait))(Effect_Aff.monadAff)(evalF(ref)(v4)))(function (v6) {+ return Control_Applicative.when(Control_Monad_Free_Trans.applicativeFreeT(Control_Coroutine.functorAwait)(Effect_Aff.monadAff))(Data_Eq.eq(Halogen_Query_EventSource.eqSubscribeStatus)(v6)(Halogen_Query_EventSource.Listening.value))(consumer);+ }));+ });+ });+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Control_Coroutine.runProcess(Effect_Aff.monadRecAff)(Control_Coroutine.pullFrom(Effect_Aff.monadRecAff)(consumer)(v2.producer)))(function () {+ return done$prime;+ });+ });+ });+ })))(function (v2) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value1);+ });+ });+ };+ if (v instanceof Halogen_Query_HalogenM.Lift) {+ return v.value0;+ };+ if (v instanceof Halogen_Query_HalogenM.Halt) {+ return Control_Monad_Error_Class.throwError(Effect_Aff.monadThrowAff)(Effect_Exception.error(v.value0));+ };+ if (v instanceof Halogen_Query_HalogenM.GetSlots) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value0(Data_Functor.map(Data_List_Types.functorList)(Halogen_Data_OrdBox.unOrdBox)(Data_List.fromFoldable(Data_Set.foldableSet)(Data_Map.keys(v1.children)))));+ });+ };+ if (v instanceof Halogen_Query_HalogenM.CheckSlot) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value1(Data_Map_Internal.member(Halogen_Data_OrdBox.ordOrdBox)(v1.component.mkOrdBox(v.value0))(v1.children)));+ });+ };+ if (v instanceof Halogen_Query_HalogenM.ChildQuery) {+ return evalChildQuery(ref)(v.value0)(v.value1);+ };+ if (v instanceof Halogen_Query_HalogenM.Raise) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(queuingHandler(v1.handler)(v1.pendingOuts)(v.value0))(function () {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value1);+ });+ });+ };+ if (v instanceof Halogen_Query_HalogenM.Par) {+ return Control_Parallel_Class.sequential(Effect_Aff.parallelAff)(Control_Applicative_Free.retractFreeAp(Effect_Aff.applicativeParAff)(Control_Applicative_Free.hoistFreeAp(function ($103) {+ return Control_Parallel_Class.parallel(Effect_Aff.parallelAff)(evalM(ref)($103));+ })(v.value0)));+ };+ if (v instanceof Halogen_Query_HalogenM.Fork) {+ return Halogen_Query_ForkF.unFork(function (v1) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff)(evalM(ref)(v1.value0)))(function (v2) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v1.value1(Data_Function.flip(Effect_Aff.killFiber)(v2)));+ });+ })(v.value0);+ };+ if (v instanceof Halogen_Query_HalogenM.GetRef) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v1) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value1(Data_Map_Internal.lookup(Data_Ord.ordString)(v.value0)(v1.refs)));+ });+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 73, column 12 - line 128, column 33): " + [ v.constructor.name ]);+ };+ };+ var evalM = function (ref) {+ return function (v) {+ return Control_Monad_Free.foldFree(Effect_Aff.monadRecAff)(go(ref))(v);+ };+ };+ var evalF = function (ref) {+ return function (q) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v) {+ var v1 = v["component"]["eval"](q);+ return Control_Monad_Free.foldFree(Effect_Aff.monadRecAff)(go(ref))(v1);+ });+ };+ };+ var evalChildQuery = function (ref) {+ return function (p) {+ return Data_Coyoneda.unCoyoneda(function (k) {+ return function (q) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v) {+ var v1 = Data_Map_Internal.lookup(Halogen_Data_OrdBox.ordOrdBox)(v.component.mkOrdBox(p))(v.children);+ if (v1 instanceof Data_Maybe.Just) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(v1.value0)))(function (v2) {+ return Halogen_Aff_Driver_State.unDriverStateX(function (ds) {+ var v3 = ds.prjQuery(q);+ if (v3 instanceof Data_Maybe.Just) {+ return Data_Functor.map(Effect_Aff.functorAff)(k)(evalF(ds.selfRef)(v3.value0));+ };+ if (v3 instanceof Data_Maybe.Nothing) {+ return Control_Monad_Error_Class.throwError(Effect_Aff.monadThrowAff)(Effect_Exception.error("Query projection failed for child query"));+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 141, column 32 - line 143, column 82): " + [ v3.constructor.name ]);+ })(v2);+ });+ };+ if (v1 instanceof Data_Maybe.Nothing) {+ return Control_Monad_Error_Class.throwError(Effect_Aff.monadThrowAff)(Effect_Exception.error("Slot lookup failed for child query"));+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 138, column 5 - line 144, column 73): " + [ v1.constructor.name ]);+ });+ };+ });+ };+ };+ return function (v) {+ if (v instanceof Halogen_Query_InputF.RefUpdate) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.modify_(function (v1) {+ return {+ component: v1.component,+ state: v1.state,+ refs: Data_Map_Internal.alter(Data_Ord.ordString)(Data_Function["const"](v.value1))(v.value0)(v1.refs),+ children: v1.children,+ childrenIn: v1.childrenIn,+ childrenOut: v1.childrenOut,+ selfRef: v1.selfRef,+ handler: v1.handler,+ pendingQueries: v1.pendingQueries,+ pendingOuts: v1.pendingOuts,+ pendingHandlers: v1.pendingHandlers,+ rendering: v1.rendering,+ prjQuery: v1.prjQuery,+ fresh: v1.fresh,+ subscriptions: v1.subscriptions,+ lifecycleHandlers: v1.lifecycleHandlers+ };+ })(r)))(function () {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(v.value2);+ });+ };+ if (v instanceof Halogen_Query_InputF.Query) {+ return evalF(r)(v.value0);+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 59, column 3 - line 64, column 25): " + [ v.constructor.name ]);+ };+ };+ };+ exports["handleLifecycle"] = handleLifecycle;+ exports["eval"] = $$eval;+ exports["queuingHandler"] = queuingHandler;+})(PS["Halogen.Aff.Driver.Eval"] = PS["Halogen.Aff.Driver.Eval"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Coroutine = PS["Control.Coroutine"];+ var Control_Monad_Fork_Class = PS["Control.Monad.Fork.Class"];+ var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];+ var Control_Parallel = PS["Control.Parallel"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_List = PS["Data.List"];+ var Data_List_Types = PS["Data.List.Types"];+ var Data_Map = PS["Data.Map"];+ var Data_Map_Internal = PS["Data.Map.Internal"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Ord = PS["Data.Ord"];+ var Data_Semiring = PS["Data.Semiring"];+ var Data_Traversable = PS["Data.Traversable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Aff_AVar = PS["Effect.Aff.AVar"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Console = PS["Effect.Console"];+ var Effect_Exception = PS["Effect.Exception"];+ var Effect_Ref = PS["Effect.Ref"];+ var Halogen = PS["Halogen"];+ var Halogen_Aff_Driver_Eval = PS["Halogen.Aff.Driver.Eval"];+ var Halogen_Aff_Driver_State = PS["Halogen.Aff.Driver.State"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_Data_OrdBox = PS["Halogen.Data.OrdBox"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Prelude = PS["Prelude"]; + var newLifecycleHandlers = Effect_Ref["new"]({+ initializers: Data_List_Types.Nil.value,+ finalizers: Data_List_Types.Nil.value+ });+ var handleAff = Effect_Aff.runAff_(Data_Either.either(Effect_Exception.throwException)(Data_Function["const"](Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit))));+ var runUI = function (renderSpec) {+ return function (component) {+ return function (i) {+ var subscribe = function (fresh) {+ return function (ref) {+ return function (consumer) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Aff_AVar.empty)(function (v) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(function __do() {+ var v1 = Effect_Ref.read(fresh)();+ Effect_Ref.modify_(function (v2) {+ return v2 + 1 | 0;+ })(fresh)();+ Effect_Ref.modify_(Data_Map_Internal.insert(Data_Ord.ordInt)(v1)(v))(ref)();+ return v1;+ }))(function (v1) {+ var producer = Control_Coroutine.producer(Effect_Aff.monadAff)(Data_Functor.map(Effect_Aff.functorAff)(Data_Either.Left.create)(Effect_Aff_AVar.take(v)));+ return Data_Functor["void"](Effect_Aff.functorAff)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff)(Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Control_Coroutine.runProcess(Effect_Aff.monadRecAff)(Control_Coroutine.connect(Effect_Aff.monadRecAff)(Effect_Aff.parallelAff)(producer)(consumer)))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.modify_(Data_Map_Internal["delete"](Data_Ord.ordInt)(v1))(ref)))(function () {+ return Effect_Aff_AVar.kill(Effect_Exception.error("ended"))(v);+ });+ })));+ });+ });+ };+ };+ };+ var rootHandler = function (ref) {+ return function (message) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref.read(ref)))(function (v) {+ return Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Map_Internal.foldableMap)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))(Data_Functor.map(Data_Map_Internal.functorMap)(Effect_Aff_AVar.put(message))(v));+ });+ };+ };+ var handlePending = function (ref) {+ return function __do() {+ var v = Effect_Ref.read(ref)();+ Effect_Ref.write(Data_Maybe.Nothing.value)(ref)();+ return Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(v)(function ($63) {+ return handleAff(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_List_Types.foldableList)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))(Data_List.reverse($63)));+ })();+ };+ };+ var cleanupSubscriptions = function (v) {+ return function __do() {+ Control_Bind.bindFlipped(Effect.bindEffect)(Data_Foldable.traverse_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(function ($64) {+ return handleAff(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Map_Internal.foldableMap)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))($64));+ }))(Effect_Ref.read(v.subscriptions))();+ return Effect_Ref.write(Data_Maybe.Nothing.value)(v.subscriptions)();+ };+ };+ var squashChildInitializers = function (lchs) {+ return function (preInits) {+ return Halogen_Aff_Driver_State.unDriverStateX(function (st) {+ var parentInitializer = Data_Functor.map(Data_Maybe.functorMaybe)(function ($65) {+ return evalF(st.selfRef)(Halogen_Query_InputF.Query.create($65));+ })(st.component.initializer);+ return Effect_Ref.modify_(function (handlers) {+ return {+ initializers: new Data_List_Types.Cons(Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Control_Parallel.parSequence_(Effect_Aff.parallelAff)(Data_List_Types.foldableList)(Data_List.reverse(handlers.initializers)))(function () {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Foldable.sequence_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(parentInitializer))(function () {+ return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(function __do() {+ handlePending(st.pendingQueries)();+ return handlePending(st.pendingOuts)();+ });+ });+ }), preInits),+ finalizers: handlers.finalizers+ };+ })(lchs);+ });+ };+ };+ var runComponent = function (lchs) {+ return function (handler) {+ return function (j) {+ return function (prjQuery) {+ return Halogen_Component.unComponent(function (c) {+ return function __do() {+ var v = newLifecycleHandlers();+ var v1 = Halogen_Aff_Driver_State.initDriverState(c)(j)(handler)(prjQuery)(v)();+ var v2 = Effect_Ref.read(lchs)();+ Effect_Ref.write({+ initializers: Data_List_Types.Nil.value,+ finalizers: v2.finalizers+ })(lchs)();+ Control_Bind.bindFlipped(Effect.bindEffect)(Halogen_Aff_Driver_State.unDriverStateX(function ($66) {+ return render(lchs)((function (v3) {+ return v3.selfRef;+ })($66));+ }))(Effect_Ref.read(v1))();+ Control_Bind.bindFlipped(Effect.bindEffect)(squashChildInitializers(lchs)(v2.initializers))(Effect_Ref.read(v1))();+ return v1;+ };+ });+ };+ };+ };+ };+ var renderChild = function (lchs) {+ return function (handler) {+ return function (mkOrdBox) {+ return function (childrenInRef) {+ return function (childrenOutRef) {+ return Halogen_Component.unComponentSlot(function (p) {+ return function (ctor) {+ return function (input) {+ return function (inputQuery) {+ return function (outputQuery) {+ return function (prjQuery) {+ var ordP = mkOrdBox(p);+ return function __do() {+ var v = Effect_Ref.read(childrenInRef)();+ var v1 = (function () {+ var v1 = Data_Map_Internal.pop(Halogen_Data_OrdBox.ordOrdBox)(ordP)(v);+ if (v1 instanceof Data_Maybe.Just) {+ Effect_Ref.write(v1.value0.value1)(childrenInRef)();+ Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(inputQuery(input))(function (q) {+ return function __do() {+ var v2 = Effect_Ref.read(v1.value0.value0)();+ return Halogen_Aff_Driver_State.unDriverStateX(function (st) {+ return Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(st.prjQuery(q))(function ($67) {+ return handleAff(evalF(st.selfRef)(Halogen_Query_InputF.Query.create($67)));+ });+ })(v2)();+ };+ })();+ return v1.value0.value0;+ };+ if (v1 instanceof Data_Maybe.Nothing) {+ return runComponent(lchs)(function ($68) {+ return Data_Maybe.maybe(Control_Applicative.pure(Effect_Aff.applicativeAff)(Data_Unit.unit))(handler)(outputQuery($68));+ })(input)(prjQuery)(ctor)();+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver (line 258, column 14 - line 266, column 92): " + [ v1.constructor.name ]);+ })();+ var v2 = Data_Functor.map(Effect.functorEffect)(Data_Map_Internal.member(Halogen_Data_OrdBox.ordOrdBox)(ordP))(Effect_Ref.read(childrenOutRef))();+ Control_Applicative.when(Effect.applicativeEffect)(v2)(Effect_Console.warn("Halogen: Duplicate slot address was detected during rendering, unexpected results may occur"))();+ Effect_Ref.modify_(Data_Map_Internal.insert(Halogen_Data_OrdBox.ordOrdBox)(ordP)(v1))(childrenOutRef)();+ return Control_Bind.bind(Effect.bindEffect)(Effect_Ref.read(v1))(Halogen_Aff_Driver_State.renderStateX(Effect.functorEffect)(function (v3) {+ if (v3 instanceof Data_Maybe.Nothing) {+ return Effect_Exception["throw"]("Halogen internal error: child was not initialized in renderChild");+ };+ if (v3 instanceof Data_Maybe.Just) {+ return Control_Applicative.pure(Effect.applicativeEffect)(renderSpec.renderChild(v3.value0));+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver (line 271, column 37 - line 273, column 50): " + [ v3.constructor.name ]);+ }))();+ };+ };+ };+ };+ };+ };+ });+ };+ };+ };+ };+ };+ var render = function (lchs) {+ return function ($$var) {+ return function __do() {+ var v = Effect_Ref.read($$var)();+ var v1 = Data_Functor.map(Effect.functorEffect)(Data_Maybe.isNothing)(Effect_Ref.read(v.pendingHandlers))();+ Control_Applicative.when(Effect.applicativeEffect)(v1)(Effect_Ref.write(new Data_Maybe.Just(Data_List_Types.Nil.value))(v.pendingHandlers))();+ Effect_Ref.write(Data_Map_Internal.empty)(v.childrenOut)();+ Effect_Ref.write(v.children)(v.childrenIn)();+ var handler = Halogen_Aff_Driver_Eval.queuingHandler(function ($69) {+ return Data_Functor["void"](Effect_Aff.functorAff)(evalF(v.selfRef)($69));+ })(v.pendingHandlers);+ var childHandler = Halogen_Aff_Driver_Eval.queuingHandler(function ($70) {+ return handler(Halogen_Query_InputF.Query.create($70));+ })(v.pendingQueries);+ var v2 = renderSpec.render(function ($71) {+ return handleAff(handler($71));+ })(renderChild(lchs)(childHandler)(v.component.mkOrdBox)(v.childrenIn)(v.childrenOut))(v.component.render(v.state))(v.rendering)();+ var v3 = Effect_Ref.read(v.childrenOut)();+ Control_Bind.bind(Effect.bindEffect)(Effect_Ref.read(v.childrenIn))(Data_Foldable.traverse_(Effect.applicativeEffect)(Data_Map_Internal.foldableMap)(function (childVar) {+ return function __do() {+ var v4 = Effect_Ref.read(childVar)();+ Halogen_Aff_Driver_State.renderStateX_(Effect.applicativeEffect)(renderSpec.removeChild)(v4)();+ return finalize(lchs)(v4)();+ };+ }))();+ Effect_Ref.modify_(function (v4) {+ return {+ rendering: new Data_Maybe.Just(v2),+ children: v3,+ component: v4.component,+ state: v4.state,+ refs: v4.refs,+ childrenIn: v4.childrenIn,+ childrenOut: v4.childrenOut,+ selfRef: v4.selfRef,+ handler: v4.handler,+ pendingQueries: v4.pendingQueries,+ pendingOuts: v4.pendingOuts,+ pendingHandlers: v4.pendingHandlers,+ prjQuery: v4.prjQuery,+ fresh: v4.fresh,+ subscriptions: v4.subscriptions,+ lifecycleHandlers: v4.lifecycleHandlers+ };+ })(v.selfRef)();+ return Control_Applicative.when(Effect.applicativeEffect)(v1)(Data_Function.flip(Control_Monad_Rec_Class.tailRecM(Control_Monad_Rec_Class.monadRecEffect))(Data_Unit.unit)(function (v4) {+ return function __do() {+ var v5 = Effect_Ref.read(v.pendingHandlers)();+ Effect_Ref.write(new Data_Maybe.Just(Data_List_Types.Nil.value))(v.pendingHandlers)();+ Data_Foldable.traverse_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(function ($72) {+ return handleAff(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_List_Types.foldableList)(Control_Monad_Fork_Class.fork(Control_Monad_Fork_Class.monadForkAff))(Data_List.reverse($72)));+ })(v5)();+ var v6 = Effect_Ref.read(v.pendingHandlers)();+ var $57 = Data_Maybe.maybe(false)(Data_List["null"])(v6);+ if ($57) {+ return Data_Functor.voidLeft(Effect.functorEffect)(Effect_Ref.write(Data_Maybe.Nothing.value)(v.pendingHandlers))(new Control_Monad_Rec_Class.Done(Data_Unit.unit))();+ };+ return new Control_Monad_Rec_Class.Loop(Data_Unit.unit);+ };+ }))();+ };+ };+ };+ var finalize = function (lchs) {+ return Halogen_Aff_Driver_State.unDriverStateX(function (st) {+ return function __do() {+ cleanupSubscriptions(st)();+ Data_Foldable.for_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(Data_Functor.map(Data_Maybe.functorMaybe)(function ($73) {+ return evalF(st.selfRef)(Halogen_Query_InputF.Query.create($73));+ })(st.component.finalizer))(function (f) {+ return Effect_Ref.modify_(function (handlers) {+ return {+ initializers: handlers.initializers,+ finalizers: new Data_List_Types.Cons(f, handlers.finalizers)+ };+ })(lchs);+ })();+ return Data_Foldable.for_(Effect.applicativeEffect)(Data_Map_Internal.foldableMap)(st.children)(Control_Bind.composeKleisliFlipped(Effect.bindEffect)(finalize(lchs))(Effect_Ref.read))();+ };+ });+ };+ var evalF = function (ref) {+ return Halogen_Aff_Driver_Eval["eval"](render)(ref);+ };+ var evalDriver = function (ref) {+ return function (prjQuery) {+ return function (q) {+ var v = prjQuery(q);+ if (v instanceof Data_Maybe.Just) {+ return evalF(ref)(new Halogen_Query_InputF.Query(v.value0));+ };+ if (v instanceof Data_Maybe.Nothing) {+ return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Exception.throwException(Effect_Exception.error("Halogen internal error: query projection failed in runUI'")));+ };+ throw new Error("Failed pattern match at Halogen.Aff.Driver (line 136, column 5 - line 138, column 113): " + [ v.constructor.name ]);+ };+ };+ };+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(newLifecycleHandlers))(function (v) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Effect_Ref["new"](0)))(function (v1) {+ return Halogen_Aff_Driver_Eval.handleLifecycle(v)(function __do() {+ var v2 = Effect_Ref["new"](Data_Map_Internal.empty)();+ return Control_Bind.bind(Effect.bindEffect)(Control_Bind.bind(Effect.bindEffect)(runComponent(v)(rootHandler(v2))(i)(Data_Maybe.Just.create)(component))(Effect_Ref.read))(Halogen_Aff_Driver_State.unDriverStateX(function (st) {+ return Control_Applicative.pure(Effect.applicativeEffect)({+ query: evalDriver(st.selfRef)(st.prjQuery),+ subscribe: subscribe(v1)(v2)+ });+ }))();+ });+ });+ });+ };+ };+ };+ exports["runUI"] = runUI;+})(PS["Halogen.Aff.Driver"] = PS["Halogen.Aff.Driver"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Monad_Error_Class = PS["Control.Monad.Error.Class"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Either = PS["Data.Either"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Exception = PS["Effect.Exception"];+ var Prelude = PS["Prelude"];+ var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];+ var Web_Event_EventTarget = PS["Web.Event.EventTarget"];+ var Web_HTML = PS["Web.HTML"];+ var Web_HTML_Event_EventTypes = PS["Web.HTML.Event.EventTypes"];+ var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];+ var Web_HTML_HTMLDocument_ReadyState = PS["Web.HTML.HTMLDocument.ReadyState"];+ var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];+ var Web_HTML_Window = PS["Web.HTML.Window"]; + var selectElement = function (query) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Control_Bind.bindFlipped(Effect.bindEffect)(Control_Bind.composeKleisliFlipped(Effect.bindEffect)(function ($12) {+ return Web_DOM_ParentNode.querySelector(query)(Web_HTML_HTMLDocument.toParentNode($12));+ })(Web_HTML_Window.document))(Web_HTML.window)))(function (v) {+ return Control_Applicative.pure(Effect_Aff.applicativeAff)(Control_Bind.bindFlipped(Data_Maybe.bindMaybe)(Web_HTML_HTMLElement.fromElement)(v));+ });+ };+ var runHalogenAff = Effect_Aff.runAff_(Data_Either.either(Effect_Exception.throwException)(Data_Function["const"](Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit))));+ exports["selectElement"] = selectElement;+ exports["runHalogenAff"] = runHalogenAff;+})(PS["Halogen.Aff.Util"] = PS["Halogen.Aff.Util"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Data_Array = PS["Data.Array"];+ var Data_Eq = PS["Data.Eq"];+ var Data_Function_Uncurried = PS["Data.Function.Uncurried"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Nullable = PS["Data.Nullable"];+ var Data_Tuple = PS["Data.Tuple"];+ var Effect = PS["Effect"];+ var Effect_Uncurried = PS["Effect.Uncurried"];+ var Halogen_VDom_Machine = PS["Halogen.VDom.Machine"];+ var Halogen_VDom_Types = PS["Halogen.VDom.Types"];+ var Halogen_VDom_Util = PS["Halogen.VDom.Util"];+ var Prelude = PS["Prelude"];+ var Web_DOM_Document = PS["Web.DOM.Document"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_DOM_Node = PS["Web.DOM.Node"];+ var eqElemSpec = function (a, b) {+ if (a.value1 === b.value1) {+ if (a.value0 instanceof Data_Maybe.Just && (b.value0 instanceof Data_Maybe.Just && a.value0.value0 === b.value0.value0)) {+ return true;+ };+ if (a.value0 instanceof Data_Maybe.Nothing && b.value0 instanceof Data_Maybe.Nothing) {+ return true;+ };+ return false;+ };+ return false;+ };+ var buildWidget = (function () {+ var patch = function (build, v) {+ return function (v1) {+ if (v1 instanceof Halogen_VDom_Types.Grafted) {+ return patch(build, v)(Halogen_VDom_Types.runGraft(v1.value0));+ };+ if (v1 instanceof Halogen_VDom_Types.Widget) {+ var v2 = v.value1(v1.value0);+ return new Halogen_VDom_Machine.Step(v2.value0, patch(build, v2), v2.value2);+ };+ v.value2();+ return build(v1);+ };+ };+ var render = function (v, build, w) {+ var v1 = v.buildWidget(v)(w);+ return new Halogen_VDom_Machine.Step(v1.value0, patch(build, v1), v1.value2);+ };+ return render;+ })();+ var buildText = (function () {+ var patch = function (build, halt, node, s1) {+ return function (v) {+ if (v instanceof Halogen_VDom_Types.Grafted) {+ return patch(build, halt, node, s1)(Halogen_VDom_Types.runGraft(v.value0));+ };+ if (v instanceof Halogen_VDom_Types.Text) {+ var res = new Halogen_VDom_Machine.Step(node, patch(build, halt, node, v.value0), halt);+ var $84 = s1 === v.value0;+ if ($84) {+ return res;+ };+ Halogen_VDom_Util.setTextContent(v.value0, node);+ return res;+ };+ halt();+ return build(v);+ };+ };+ var done = function (node) {+ return function __do() {+ var v = Halogen_VDom_Util.parentNode(node);+ return Halogen_VDom_Util.removeChild(node, v);+ };+ };+ var render = function (v, build, s) {+ var v1 = Halogen_VDom_Util.createTextNode(s, v.document);+ var halt = done(v1);+ return new Halogen_VDom_Machine.Step(v1, patch(build, halt, v1, s), halt);+ };+ return render;+ })();+ var buildKeyed = (function () {+ var done = function (node, attrs, steps) {+ return function __do() {+ var v = Halogen_VDom_Util.parentNode(node);+ Halogen_VDom_Util.removeChild(node, v);+ Halogen_VDom_Util.forInE(steps, function (v1, v2) {+ return v2.value2();+ });+ return Halogen_VDom_Machine.halt(attrs)();+ };+ };+ var patch = function (build, halt, node, attrs, v, ch1, len1) {+ return function (v1) {+ if (v1 instanceof Halogen_VDom_Types.Grafted) {+ return patch(build, halt, node, attrs, v, ch1, len1)(Halogen_VDom_Types.runGraft(v1.value0));+ };+ if (v1 instanceof Halogen_VDom_Types.Keyed && eqElemSpec(v, v1.value0)) {+ var v2 = Data_Array.length(v1.value1);+ if (len1 === 0 && v2 === 0) {+ var v4 = Halogen_VDom_Machine.step(attrs)(v1.value0.value2);+ var halt$prime = done(node, v4, ch1);+ return new Halogen_VDom_Machine.Step(node, patch(build, halt$prime, node, v4, v1.value0, ch1, 0), halt$prime);+ };+ var onThis = function (v4, v5) {+ return v5.value2();+ };+ var onThese = function (v4, ix$prime, v5, v6) {+ var v7 = v5.value1(v6.value1);+ Halogen_VDom_Util.insertChildIx(ix$prime, v7.value0, node);+ return v7;+ };+ var onThat = function (v4, ix, v5) {+ var v6 = build(v5.value1);+ Halogen_VDom_Util.insertChildIx(ix, v6.value0, node);+ return v6;+ };+ var v4 = Halogen_VDom_Util.diffWithKeyAndIxE(ch1, v1.value1, Data_Tuple.fst, onThese, onThis, onThat);+ var v5 = Halogen_VDom_Machine.step(attrs)(v1.value0.value2);+ var halt$prime = done(node, v5, v4);+ return new Halogen_VDom_Machine.Step(node, patch(build, halt$prime, node, v5, v1.value0, v4, v2), halt$prime);+ };+ halt();+ return build(v1);+ };+ };+ var render = function (v, build, v1, ch1) {+ var v2 = Halogen_VDom_Util.createElement(Data_Nullable.toNullable(v1.value0), v1.value1, v.document);+ var node = Web_DOM_Element.toNode(v2);+ var onChild = function (k, ix, v3) {+ var v4 = build(v3.value1);+ Halogen_VDom_Util.insertChildIx(ix, v4.value0, node);+ return v4;+ };+ var v3 = Halogen_VDom_Util.strMapWithIxE(ch1, Data_Tuple.fst, onChild);+ var v4 = v.buildAttributes(v2)(v1.value2);+ var halt = done(node, v4, v3);+ return new Halogen_VDom_Machine.Step(node, patch(build, halt, node, v4, v1, v3, Data_Array.length(ch1)), halt);+ };+ return render;+ })();+ var buildElem = (function () {+ var done = function (node, attrs, steps) {+ return function __do() {+ var v = Halogen_VDom_Util.parentNode(node);+ Halogen_VDom_Util.removeChild(node, v);+ Effect.foreachE(steps)(Halogen_VDom_Machine.halt)();+ return Halogen_VDom_Machine.halt(attrs)();+ };+ };+ var patch = function (build, halt, node, attrs, v, ch1) {+ return function (v1) {+ if (v1 instanceof Halogen_VDom_Types.Grafted) {+ return patch(build, halt, node, attrs, v, ch1)(Halogen_VDom_Types.runGraft(v1.value0));+ };+ if (v1 instanceof Halogen_VDom_Types.Elem && eqElemSpec(v, v1.value0)) {+ var v2 = Data_Array.length(v1.value1);+ var v3 = Data_Array.length(ch1);+ if (v3 === 0 && v2 === 0) {+ var v4 = Halogen_VDom_Machine.step(attrs)(v1.value0.value2);+ var halt$prime = done(node, v4, ch1);+ return new Halogen_VDom_Machine.Step(node, patch(build, halt$prime, node, v4, v1.value0, ch1), halt$prime);+ };+ var onThis = function (ix, v4) {+ return v4.value2();+ };+ var onThese = function (ix, v4, vdom) {+ var v5 = v4.value1(vdom);+ Halogen_VDom_Util.insertChildIx(ix, v5.value0, node);+ return v5;+ };+ var onThat = function (ix, vdom) {+ var v4 = build(vdom);+ Halogen_VDom_Util.insertChildIx(ix, v4.value0, node);+ return v4;+ };+ var v4 = Halogen_VDom_Util.diffWithIxE(ch1, v1.value1, onThese, onThis, onThat);+ var v5 = Halogen_VDom_Machine.step(attrs)(v1.value0.value2);+ var halt$prime = done(node, v5, v4);+ return new Halogen_VDom_Machine.Step(node, patch(build, halt$prime, node, v5, v1.value0, v4), halt$prime);+ };+ halt();+ return build(v1);+ };+ };+ var render = function (v, build, v1, ch1) {+ var v2 = Halogen_VDom_Util.createElement(Data_Nullable.toNullable(v1.value0), v1.value1, v.document);+ var node = Web_DOM_Element.toNode(v2);+ var onChild = function (ix, child) {+ var v3 = build(child);+ Halogen_VDom_Util.insertChildIx(ix, v3.value0, node);+ return v3;+ };+ var v3 = Halogen_VDom_Util.forE(ch1, onChild);+ var v4 = v.buildAttributes(v2)(v1.value2);+ var halt = done(node, v4, v3);+ return new Halogen_VDom_Machine.Step(node, patch(build, halt, node, v4, v1, v3), halt);+ };+ return render;+ })();+ var buildVDom = function (spec) {+ var build = function (v) {+ if (v instanceof Halogen_VDom_Types.Text) {+ return buildText(spec, build, v.value0);+ };+ if (v instanceof Halogen_VDom_Types.Elem) {+ return buildElem(spec, build, v.value0, v.value1);+ };+ if (v instanceof Halogen_VDom_Types.Keyed) {+ return buildKeyed(spec, build, v.value0, v.value1);+ };+ if (v instanceof Halogen_VDom_Types.Widget) {+ return buildWidget(spec, build, v.value0);+ };+ if (v instanceof Halogen_VDom_Types.Grafted) {+ return build(Halogen_VDom_Types.runGraft(v.value0));+ };+ throw new Error("Failed pattern match at Halogen.VDom.DOM (line 58, column 27 - line 63, column 52): " + [ v.constructor.name ]);+ };+ return build;+ };+ exports["buildVDom"] = buildVDom;+ exports["buildText"] = buildText;+ exports["buildElem"] = buildElem;+ exports["buildKeyed"] = buildKeyed;+ exports["buildWidget"] = buildWidget;+})(PS["Halogen.VDom.DOM"] = PS["Halogen.VDom.DOM"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Category = PS["Control.Category"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];+ var Data_Maybe = PS["Data.Maybe"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Class = PS["Effect.Class"];+ var Effect_Ref = PS["Effect.Ref"];+ var Effect_Uncurried = PS["Effect.Uncurried"];+ var Halogen_Aff_Driver = PS["Halogen.Aff.Driver"];+ var Halogen_Aff_Driver_State = PS["Halogen.Aff.Driver.State"];+ var Halogen_Component = PS["Halogen.Component"];+ var Halogen_HTML_Core = PS["Halogen.HTML.Core"];+ var Halogen_Query_InputF = PS["Halogen.Query.InputF"];+ var Halogen_VDom = PS["Halogen.VDom"];+ var Halogen_VDom_DOM = PS["Halogen.VDom.DOM"];+ var Halogen_VDom_DOM_Prop = PS["Halogen.VDom.DOM.Prop"];+ var Halogen_VDom_Machine = PS["Halogen.VDom.Machine"];+ var Prelude = PS["Prelude"];+ var Unsafe_Reference = PS["Unsafe.Reference"];+ var Web_DOM_Document = PS["Web.DOM.Document"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_DOM_Node = PS["Web.DOM.Node"];+ var Web_HTML = PS["Web.HTML"];+ var Web_HTML_HTMLDocument = PS["Web.HTML.HTMLDocument"];+ var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"];+ var Web_HTML_Window = PS["Web.HTML.Window"];+ var substInParent = function (v) {+ return function (v1) {+ return function (v2) {+ if (v1 instanceof Data_Maybe.Just && v2 instanceof Data_Maybe.Just) {+ return Data_Functor["void"](Effect.functorEffect)(Web_DOM_Node.insertBefore(v)(v1.value0)(v2.value0));+ };+ if (v1 instanceof Data_Maybe.Nothing && v2 instanceof Data_Maybe.Just) {+ return Data_Functor["void"](Effect.functorEffect)(Web_DOM_Node.appendChild(v)(v2.value0));+ };+ return Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit);+ };+ };+ };+ var removeChild = function (v) {+ return function __do() {+ var v1 = Web_DOM_Node.parentNode(v.node)();+ return Data_Foldable.traverse_(Effect.applicativeEffect)(Data_Foldable.foldableMaybe)(function (pn) {+ return Web_DOM_Node.removeChild(v.node)(pn);+ })(v1)();+ };+ };+ var mkSpec = function (handler) {+ return function (renderChildRef) {+ return function (document) {+ var getNode = Halogen_Aff_Driver_State.unRenderStateX(function (v) {+ return v.node;+ });+ var done = Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit);+ var patch = function (slot) {+ var v = Effect_Ref.read(renderChildRef)();+ var v1 = v(slot)();+ var node = getNode(v1);+ return new Halogen_VDom_Machine.Step(node, patch, done);+ };+ var buildWidget = function (spec) {+ return function (slot) {+ var v = Effect_Ref.read(renderChildRef)();+ var v1 = v(slot)();+ var node = getNode(v1);+ return new Halogen_VDom_Machine.Step(node, patch, done);+ };+ };+ var buildAttributes = Halogen_VDom_DOM_Prop.buildProp(handler);+ return {+ buildWidget: buildWidget,+ buildAttributes: buildAttributes,+ document: document+ };+ };+ };+ };+ var renderSpec = function (document) {+ return function (container) {+ var render = function (handler) {+ return function (child) {+ return function (v) {+ return function (v1) {+ if (v1 instanceof Data_Maybe.Nothing) {+ return function __do() {+ var v2 = Effect_Ref["new"](child)();+ var spec = mkSpec(handler)(v2)(document);+ var v3 = Halogen_VDom_DOM.buildVDom(spec)(v);+ var node = Halogen_VDom_Machine.extract(v3);+ Data_Functor["void"](Effect.functorEffect)(Web_DOM_Node.appendChild(node)(Web_HTML_HTMLElement.toNode(container)))();+ return {+ machine: v3,+ node: node,+ renderChildRef: v2+ };+ };+ };+ if (v1 instanceof Data_Maybe.Just) {+ return function __do() {+ Effect_Ref.write(child)(v1.value0.renderChildRef)();+ var v2 = Web_DOM_Node.parentNode(v1.value0.node)();+ var v3 = Web_DOM_Node.nextSibling(v1.value0.node)();+ var v4 = Halogen_VDom_Machine.step(v1.value0.machine)(v);+ var newNode = Halogen_VDom_Machine.extract(v4);+ Control_Applicative.when(Effect.applicativeEffect)(Data_HeytingAlgebra.not(Data_HeytingAlgebra.heytingAlgebraFunction(Data_HeytingAlgebra.heytingAlgebraFunction(Data_HeytingAlgebra.heytingAlgebraBoolean)))(Unsafe_Reference.unsafeRefEq)(v1.value0.node)(newNode))(substInParent(newNode)(v3)(v2))();+ return {+ machine: v4,+ node: newNode,+ renderChildRef: v1.value0.renderChildRef+ };+ };+ };+ throw new Error("Failed pattern match at Halogen.VDom.Driver (line 118, column 5 - line 134, column 80): " + [ v1.constructor.name ]);+ };+ };+ };+ };+ return {+ render: render,+ renderChild: Control_Category.identity(Control_Category.categoryFn),+ removeChild: removeChild+ };+ };+ };+ var runUI = function (component) {+ return function (i) {+ return function (element) {+ return Control_Bind.bind(Effect_Aff.bindAff)(Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Data_Functor.map(Effect.functorEffect)(Web_HTML_HTMLDocument.toDocument)(Control_Bind.bindFlipped(Effect.bindEffect)(Web_HTML_Window.document)(Web_HTML.window))))(function (v) {+ return Halogen_Aff_Driver.runUI(renderSpec(v)(element))(component)(i);+ });+ };+ };+ };+ exports["runUI"] = runUI;+})(PS["Halogen.VDom.Driver"] = PS["Halogen.VDom.Driver"] || {});+(function(exports) {+ // Generated by purs version 0.12.2+ "use strict";+ var App = PS["App"];+ var Component_AccountSettings = PS["Component.AccountSettings"];+ var Component_Add = PS["Component.Add"];+ var Component_BList = PS["Component.BList"];+ var Component_NList = PS["Component.NList"];+ var Component_NNote = PS["Component.NNote"];+ var Control_Applicative = PS["Control.Applicative"];+ var Control_Bind = PS["Control.Bind"];+ var Control_Semigroupoid = PS["Control.Semigroupoid"];+ var Data_Foldable = PS["Data.Foldable"];+ var Data_Function = PS["Data.Function"];+ var Data_Functor = PS["Data.Functor"];+ var Data_Unit = PS["Data.Unit"];+ var Effect = PS["Effect"];+ var Effect_Aff = PS["Effect.Aff"];+ var Effect_Class = PS["Effect.Class"];+ var Halogen_Aff = PS["Halogen.Aff"];+ var Halogen_Aff_Util = PS["Halogen.Aff.Util"];+ var Halogen_VDom_Driver = PS["Halogen.VDom.Driver"];+ var Model = PS["Model"];+ var Prelude = PS["Prelude"];+ var Web_DOM_Element = PS["Web.DOM.Element"];+ var Web_DOM_ParentNode = PS["Web.DOM.ParentNode"];+ var Web_Event_Event = PS["Web.Event.Event"];+ var Web_HTML_HTMLElement = PS["Web.HTML.HTMLElement"]; + var showFooter = Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(".user_footer"))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {+ return Effect_Class.liftEffect(Effect_Aff.monadEffectAff)(Web_DOM_Element.removeAttribute("hidden")(Web_HTML_HTMLElement.toElement(el)));+ }));+ var renderNotes = function (renderElSelector) {+ return function (notes) {+ return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Functor["void"](Effect_Aff.functorAff)(Halogen_VDom_Driver.runUI(Component_NList.nlist(notes))(Data_Unit.unit)(el)))(function () {+ return showFooter;+ });+ })));+ };+ };+ var renderNote = function (renderElSelector) {+ return function (note) {+ return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {+ return Data_Functor["void"](Effect_Aff.functorAff)(Halogen_VDom_Driver.runUI(Component_NNote.nnote(note))(Data_Unit.unit)(el));+ })));+ };+ };+ var renderBookmarks = function (renderElSelector) {+ return function (bmarks) {+ return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {+ return Control_Bind.discard(Control_Bind.discardUnit)(Effect_Aff.bindAff)(Data_Functor["void"](Effect_Aff.functorAff)(Halogen_VDom_Driver.runUI(Component_BList.blist(bmarks))(Data_Unit.unit)(el)))(function () {+ return showFooter;+ });+ })));+ };+ };+ var renderAddForm = function (renderElSelector) {+ return function (bmark) {+ return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {+ return Halogen_VDom_Driver.runUI(Component_Add.addbmark(bmark))(Data_Unit.unit)(el);+ })));+ };+ };+ var renderAccountSettings = function (renderElSelector) {+ return function (accountSettings) {+ return Halogen_Aff_Util.runHalogenAff(Control_Bind.bind(Effect_Aff.bindAff)(Halogen_Aff_Util.selectElement(renderElSelector))(Data_Foldable.traverse_(Effect_Aff.applicativeAff)(Data_Foldable.foldableMaybe)(function (el) {+ return Data_Functor["void"](Effect_Aff.functorAff)(Halogen_VDom_Driver.runUI(Component_AccountSettings.usetting(accountSettings))(Data_Unit.unit)(el));+ })));+ };+ };+ var main = Control_Applicative.pure(Effect.applicativeEffect)(Data_Unit.unit);+ var logoutE = function (e) {+ return Control_Bind.bindFlipped(Effect.bindEffect)(function ($0) {+ return Data_Functor["void"](Effect.functorEffect)(Effect_Aff.launchAff(App.logout($0)));+ })(Web_Event_Event.preventDefault(e));+ };+ exports["main"] = main;+ exports["logoutE"] = logoutE;+ exports["renderBookmarks"] = renderBookmarks;+ exports["renderAddForm"] = renderAddForm;+ exports["renderNotes"] = renderNotes;+ exports["renderNote"] = renderNote;+ exports["renderAccountSettings"] = renderAccountSettings;+ exports["showFooter"] = showFooter;+})(PS["Main"] = PS["Main"] || {});+PS["Main"].main();
static/js/app.js.gz view
binary file changed (76576 → 76960 bytes)
static/js/app.min.js view
@@ -1,1 +1,1 @@-var PS={};!function(n){"use strict";(PS["Control.Bind"]=PS["Control.Bind"]||{}).arrayBind=function(n){return function(e){for(var t=[],r=0,a=n.length;r<a;r++)Array.prototype.push.apply(t,e(n[r]));return t}}}(),function(n){"use strict";(PS["Control.Apply"]=PS["Control.Apply"]||{}).arrayApply=function(n){return function(e){for(var t=n.length,r=e.length,a=new Array(t*r),u=0,o=0;o<t;o++)for(var i=n[o],l=0;l<r;l++)a[u++]=i(e[l]);return a}}}(),function(n){"use strict";var e=function(n){this.compose=n},t=new e(function(n){return function(e){return function(t){return n(e(t))}}});n.compose=function(n){return n.compose},n.Semigroupoid=e,n.semigroupoidFn=t}(PS["Control.Semigroupoid"]=PS["Control.Semigroupoid"]||{}),function(n){"use strict";var e=PS["Control.Semigroupoid"],t=function(n,e){this.Semigroupoid0=n,this.identity=e},r=new t(function(){return e.semigroupoidFn},function(n){return n});n.Category=t,n.identity=function(n){return n.identity},n.categoryFn=r}(PS["Control.Category"]=PS["Control.Category"]||{}),function(n){"use strict";(PS["Data.Boolean"]=PS["Data.Boolean"]||{}).otherwise=!0}(),function(n){"use strict";(PS["Data.Eq"]=PS["Data.Eq"]||{}).refEq=function(n){return function(e){return n===e}}}(),function(n){"use strict";n.boolConj=function(n){return function(e){return n&&e}},n.boolDisj=function(n){return function(e){return n||e}},n.boolNot=function(n){return!n}}(PS["Data.HeytingAlgebra"]=PS["Data.HeytingAlgebra"]||{}),function(n){"use strict";PS["Data.Symbol"];var e=function(){function n(){}return n.value=new n,n}();n.IsSymbol=function(n){this.reflectSymbol=n},n.reflectSymbol=function(n){return n.reflectSymbol},n.SProxy=e}(PS["Data.Symbol"]=PS["Data.Symbol"]||{}),function(n){"use strict";(PS["Data.Unit"]=PS["Data.Unit"]||{}).unit={}}(),function(n){"use strict";n.showIntImpl=function(n){return n.toString()},n.showStringImpl=function(n){var e=n.length;return'"'+n.replace(/[\0-\x1F\x7F"\\]/g,function(t,r){switch(t){case'"':case"\\":return"\\"+t;case"":return"\\a";case"\b":return"\\b";case"\f":return"\\f";case"\n":return"\\n";case"\r":return"\\r";case"\t":return"\\t";case"\v":return"\\v"}var a=r+1,u=a<e&&n[a]>="0"&&n[a]<="9"?"\\&":"";return"\\"+t.charCodeAt(0).toString(10)+u})+'"'}}(PS["Data.Show"]=PS["Data.Show"]||{}),function(n){"use strict";(PS["Record.Unsafe"]=PS["Record.Unsafe"]||{}).unsafeGet=function(n){return function(e){return e[n]}}}(),function(n){"use strict";var e=PS["Record.Unsafe"];n.unsafeGet=e.unsafeGet}(PS["Record.Unsafe"]=PS["Record.Unsafe"]||{}),function(n){"use strict";var e=PS["Data.Show"],t=(PS["Data.Symbol"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n){this.show=n}),r=new t(e.showStringImpl),a=new t(e.showIntImpl);n.Show=t,n.show=function(n){return n.show},n.showInt=a,n.showString=r}(PS["Data.Show"]=PS["Data.Show"]||{}),function(n){"use strict";var e=PS["Data.Unit"];PS["Data.Show"];n.unit=e.unit}(PS["Data.Unit"]=PS["Data.Unit"]||{}),function(n){"use strict";var e=PS["Data.HeytingAlgebra"],t=(PS["Data.Symbol"],PS["Data.Unit"],PS["Record.Unsafe"],PS["Type.Data.Row"],PS["Type.Data.RowList"],function(n,e,t,r,a,u){this.conj=n,this.disj=e,this.ff=t,this.implies=r,this.not=a,this.tt=u}),r=function(n){return n.tt},a=function(n){return n.not},u=function(n){return n.implies},o=function(n){return n.ff},i=function(n){return n.disj},l=new t(e.boolConj,e.boolDisj,!1,function(n){return function(e){return i(l)(a(l)(n))(e)}},e.boolNot,!0),c=function(n){return n.conj};n.HeytingAlgebra=t,n.tt=r,n.ff=o,n.implies=u,n.conj=c,n.disj=i,n.not=a,n.heytingAlgebraBoolean=l,n.heytingAlgebraFunction=function(n){return new t(function(e){return function(t){return function(r){return c(n)(e(r))(t(r))}}},function(e){return function(t){return function(r){return i(n)(e(r))(t(r))}}},function(e){return o(n)},function(e){return function(t){return function(r){return u(n)(e(r))(t(r))}}},function(e){return function(t){return a(n)(e(t))}},function(e){return r(n)})}}(PS["Data.HeytingAlgebra"]=PS["Data.HeytingAlgebra"]||{}),function(n){"use strict";var e=PS["Data.Eq"],t=(PS["Data.HeytingAlgebra"],PS["Data.Symbol"],PS["Data.Unit"],PS["Data.Void"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n){this.eq=n}),r=new t(function(n){return function(n){return!0}}),a=new t(e.refEq),u=new t(e.refEq),o=new t(e.refEq);n.Eq=t,n.eq=function(n){return n.eq},n.eqInt=u,n.eqChar=o,n.eqString=a,n.eqVoid=r}(PS["Data.Eq"]=PS["Data.Eq"]||{}),function(n){"use strict";(PS["Data.Ord.Unsafe"]=PS["Data.Ord.Unsafe"]||{}).unsafeCompareImpl=function(n){return function(e){return function(t){return function(r){return function(a){return r<a?n:r===a?e:t}}}}}}(),function(n){"use strict";n.concatString=function(n){return function(e){return n+e}},n.concatArray=function(n){return function(e){return 0===n.length?e:0===e.length?n:n.concat(e)}}}(PS["Data.Semigroup"]=PS["Data.Semigroup"]||{}),function(n){"use strict";var e=PS["Data.Semigroup"],t=(PS["Data.Symbol"],PS["Data.Unit"],PS["Data.Void"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n){this.append=n}),r=new t(e.concatString),a=new t(e.concatArray),u=function(n){return n.append};n.Semigroup=t,n.append=u,n.semigroupString=r,n.semigroupFn=function(n){return new t(function(e){return function(t){return function(r){return u(n)(e(r))(t(r))}}})},n.semigroupArray=a}(PS["Data.Semigroup"]=PS["Data.Semigroup"]||{}),function(n){"use strict";PS["Data.Eq"],PS["Data.Semigroup"],PS["Data.Show"];var e=function(){function n(){}return n.value=new n,n}(),t=function(){function n(){}return n.value=new n,n}(),r=function(){function n(){}return n.value=new n,n}();n.LT=e,n.GT=t,n.EQ=r}(PS["Data.Ordering"]=PS["Data.Ordering"]||{}),function(n){"use strict";var e=PS["Data.Ord.Unsafe"],t=PS["Data.Ordering"],r=e.unsafeCompareImpl(t.LT.value)(t.EQ.value)(t.GT.value);n.unsafeCompare=r}(PS["Data.Ord.Unsafe"]=PS["Data.Ord.Unsafe"]||{}),function(n){"use strict";(PS["Data.Ring"]=PS["Data.Ring"]||{}).intSub=function(n){return function(e){return n-e|0}}}(),function(n){"use strict";n.intAdd=function(n){return function(e){return n+e|0}},n.intMul=function(n){return function(e){return n*e|0}}}(PS["Data.Semiring"]=PS["Data.Semiring"]||{}),function(n){"use strict";var e=PS["Data.Semiring"],t=(PS["Data.Symbol"],PS["Data.Unit"],PS["Record.Unsafe"],PS["Type.Data.Row"],PS["Type.Data.RowList"],function(n,e,t,r){this.add=n,this.mul=e,this.one=t,this.zero=r}),r=new t(e.intAdd,e.intMul,1,0);n.Semiring=t,n.add=function(n){return n.add},n.zero=function(n){return n.zero},n.mul=function(n){return n.mul},n.one=function(n){return n.one},n.semiringInt=r}(PS["Data.Semiring"]=PS["Data.Semiring"]||{}),function(n){"use strict";var e=PS["Data.Ring"],t=PS["Data.Semiring"],r=(PS["Data.Symbol"],PS["Data.Unit"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n,e){this.Semiring0=n,this.sub=e}),a=new r(function(){return t.semiringInt},e.intSub);n.Ring=r,n.sub=function(n){return n.sub},n.ringInt=a}(PS["Data.Ring"]=PS["Data.Ring"]||{}),function(n){"use strict";PS["Data.Ord"];var e=PS["Data.Eq"],t=PS["Data.Ord.Unsafe"],r=PS["Data.Ordering"],a=(PS["Data.Ring"],PS["Data.Semiring"],PS["Data.Unit"],PS["Data.Void"],function(n,e){this.Eq0=n,this.compare=e}),u=new a(function(){return e.eqVoid},function(n){return function(n){return r.EQ.value}}),o=new a(function(){return e.eqString},t.unsafeCompare),i=new a(function(){return e.eqInt},t.unsafeCompare),l=new a(function(){return e.eqChar},t.unsafeCompare);n.Ord=a,n.compare=function(n){return n.compare},n.ordInt=i,n.ordString=o,n.ordChar=l,n.ordVoid=u}(PS["Data.Ord"]=PS["Data.Ord"]||{}),function(n){"use strict";PS["Control.Category"],PS["Data.Boolean"],PS["Data.Ord"],PS["Data.Ring"];n.flip=function(n){return function(e){return function(t){return n(t)(e)}}},n.const=function(n){return function(e){return n}},n.on=function(n){return function(e){return function(t){return function(r){return n(e(t))(e(r))}}}}}(PS["Data.Function"]=PS["Data.Function"]||{}),function(n){"use strict";(PS["Data.Functor"]=PS["Data.Functor"]||{}).arrayMap=function(n){return function(e){for(var t=e.length,r=new Array(t),a=0;a<t;a++)r[a]=n(e[a]);return r}}}(),function(n){"use strict";var e=PS["Data.Functor"],t=PS["Control.Semigroupoid"],r=PS["Data.Function"],a=PS["Data.Unit"],u=function(n){this.map=n},o=function(n){return n.map},i=new u(t.compose(t.semigroupoidFn)),l=new u(e.arrayMap);n.Functor=u,n.map=o,n.void=function(n){return o(n)(r.const(a.unit))},n.voidLeft=function(n){return function(e){return function(t){return o(n)(r.const(t))(e)}}},n.functorFn=i,n.functorArray=l}(PS["Data.Functor"]=PS["Data.Functor"]||{}),function(n){"use strict";var e=PS["Control.Apply"],t=PS["Control.Category"],r=PS["Data.Function"],a=PS["Data.Functor"],u=function(n,e){this.Functor0=n,this.apply=e},o=new u(function(){return a.functorArray},e.arrayApply),i=function(n){return n.apply};n.Apply=u,n.apply=i,n.applySecond=function(n){return function(e){return function(u){return i(n)(a.map(n.Functor0())(r.const(t.identity(t.categoryFn)))(e))(u)}}},n.lift2=function(n){return function(e){return function(t){return function(r){return i(n)(a.map(n.Functor0())(e)(t))(r)}}}},n.applyArray=o}(PS["Control.Apply"]=PS["Control.Apply"]||{}),function(n){"use strict";var e=PS["Control.Apply"],t=(PS["Data.Functor"],PS["Data.Unit"]),r=function(n){return n.pure};n.Applicative=function(n,e){this.Apply0=n,this.pure=e},n.pure=r,n.liftA1=function(n){return function(t){return function(a){return e.apply(n.Apply0())(r(n)(t))(a)}}},n.when=function(n){return function(e){return function(a){if(e)return a;if(!e)return r(n)(t.unit);throw new Error("Failed pattern match at Control.Applicative line 57, column 1 - line 57, column 63: "+[e.constructor.name,a.constructor.name])}}}}(PS["Control.Applicative"]=PS["Control.Applicative"]||{}),function(n){"use strict";var e=PS["Control.Bind"],t=(PS["Control.Applicative"],PS["Control.Apply"]),r=PS["Control.Category"],a=PS["Data.Function"],u=(PS["Data.Functor"],PS["Data.Unit"],function(n,e){this.Apply0=n,this.bind=e}),o=function(n){this.discard=n},i=new u(function(){return t.applyArray},e.arrayBind),l=function(n){return n.bind},c=function(n){return a.flip(l(n))},f=new o(function(n){return l(n)});n.Bind=u,n.bind=l,n.bindFlipped=c,n.Discard=o,n.discard=function(n){return n.discard},n.join=function(n){return function(e){return l(n)(e)(r.identity(r.categoryFn))}},n.composeKleisli=function(n){return function(e){return function(t){return function(r){return l(n)(e(r))(t)}}}},n.composeKleisliFlipped=function(n){return function(e){return function(t){return function(r){return c(n)(e)(t(r))}}}},n.bindArray=i,n.discardUnit=f}(PS["Control.Bind"]=PS["Control.Bind"]||{}),function(n){"use strict";n.length=function(n){return n.length},n.cons=function(n){return function(e){return[n].concat(e)}},n.snoc=function(n){return function(e){var t=n.slice();return t.push(e),t}},n.concat=function(n){if(n.length<=1e4)return Array.prototype.concat.apply([],n);for(var e=[],t=0,r=n.length;t<r;t++)for(var a=n[t],u=0,o=a.length;u<o;u++)e.push(a[u]);return e},n.filter=function(n){return function(e){return e.filter(n)}},n.slice=function(n){return function(e){return function(t){return t.slice(n,e)}}},n.drop=function(n){return function(e){return n<1?e:e.slice(n)}}}(PS["Data.Array"]=PS["Data.Array"]||{}),function(n){"use strict";PS["Data.Functor"],PS["Data.Semigroup"];n.Alt=function(n,e){this.Functor0=n,this.alt=e},n.alt=function(n){return n.alt}}(PS["Control.Alt"]=PS["Control.Alt"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=(PS["Control.Apply"],PS["Control.Bind"]);PS["Data.Functor"],PS["Data.Unit"];n.Monad=function(n,e){this.Applicative0=n,this.Bind1=e},n.ap=function(n){return function(r){return function(a){return t.bind(n.Bind1())(r)(function(r){return t.bind(n.Bind1())(a)(function(t){return e.pure(n.Applicative0())(r(t))})})}}}}(PS["Control.Monad"]=PS["Control.Monad"]||{}),function(n){"use strict";var e=PS["Control.Category"],t=function(n){return n.bimap};n.bimap=t,n.Bifunctor=function(n){this.bimap=n},n.rmap=function(n){return t(n)(e.identity(e.categoryFn))}}(PS["Data.Bifunctor"]=PS["Data.Bifunctor"]||{}),function(n){"use strict";n.topInt=2147483647,n.bottomInt=-2147483648,n.topChar=String.fromCharCode(65535),n.bottomChar=String.fromCharCode(0)}(PS["Data.Bounded"]=PS["Data.Bounded"]||{}),function(n){"use strict";var e=PS["Data.Bounded"],t=PS["Data.Ord"],r=(PS["Data.Ordering"],PS["Data.Unit"],function(n,e,t){this.Ord0=n,this.bottom=e,this.top=t}),a=new r(function(){return t.ordInt},e.bottomInt,e.topInt),u=new r(function(){return t.ordChar},e.bottomChar,e.topChar);n.Bounded=r,n.bottom=function(n){return n.bottom},n.top=function(n){return n.top},n.boundedInt=a,n.boundedChar=u}(PS["Data.Bounded"]=PS["Data.Bounded"]||{}),function(n){"use strict";n.foldrArray=function(n){return function(e){return function(t){for(var r=e,a=t.length-1;a>=0;a--)r=n(t[a])(r);return r}}},n.foldlArray=function(n){return function(e){return function(t){for(var r=e,a=t.length,u=0;u<a;u++)r=n(r)(t[u]);return r}}}}(PS["Data.Foldable"]=PS["Data.Foldable"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Data.Functor"];n.Plus=function(n,e){this.Alt0=n,this.empty=e},n.empty=function(n){return n.empty}}(PS["Control.Plus"]=PS["Control.Plus"]||{}),function(n){"use strict";n.intDegree=function(n){return Math.min(Math.abs(n),2147483647)},n.intDiv=function(n){return function(e){return 0===e?0:e>0?Math.floor(n/e):-Math.floor(n/-e)}},n.intMod=function(n){return function(e){if(0===e)return 0;var t=Math.abs(e);return(n%t+t)%t}}}(PS["Data.EuclideanRing"]=PS["Data.EuclideanRing"]||{}),function(n){"use strict";var e=PS["Data.Ring"],t=(PS["Data.Semiring"],PS["Data.Symbol"],PS["Data.Unit"],function(n){this.Ring0=n}),r=new t(function(){return e.ringInt});n.CommutativeRing=t,n.commutativeRingInt=r}(PS["Data.CommutativeRing"]=PS["Data.CommutativeRing"]||{}),function(n){"use strict";var e=PS["Data.EuclideanRing"],t=(PS["Data.BooleanAlgebra"],PS["Data.CommutativeRing"]),r=(PS["Data.Eq"],PS["Data.HeytingAlgebra"],PS["Data.Ring"],PS["Data.Semiring"],function(n,e,t,r){this.CommutativeRing0=n,this.degree=e,this.div=t,this.mod=r}),a=new r(function(){return t.commutativeRingInt},e.intDegree,e.intDiv,e.intMod);n.EuclideanRing=r,n.degree=function(n){return n.degree},n.div=function(n){return n.div},n.mod=function(n){return n.mod},n.euclideanRingInt=a}(PS["Data.EuclideanRing"]=PS["Data.EuclideanRing"]||{}),function(n){"use strict";PS["Data.Boolean"],PS["Data.Eq"],PS["Data.EuclideanRing"],PS["Data.Ord"],PS["Data.Ordering"];var e=PS["Data.Semigroup"],t=(PS["Data.Symbol"],PS["Data.Unit"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n,e){this.Semigroup0=n,this.mempty=e}),r=new t(function(){return e.semigroupString},""),a=new t(function(){return e.semigroupArray},[]),u=function(n){return n.mempty};n.Monoid=t,n.mempty=u,n.guard=function(n){return function(e){return function(t){if(e)return t;if(!e)return u(n);throw new Error("Failed pattern match at Data.Monoid line 74, column 1 - line 74, column 49: "+[e.constructor.name,t.constructor.name])}}},n.monoidFn=function(n){return new t(function(){return e.semigroupFn(n.Semigroup0())},function(e){return u(n)})},n.monoidString=r,n.monoidArray=a}(PS["Data.Monoid"]=PS["Data.Monoid"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"];var e=PS["Control.Apply"],t=PS["Control.Bind"],r=PS["Control.Category"],a=(PS["Control.Extend"],PS["Control.Monad"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Data.Bounded"],PS["Data.Eq"],PS["Data.Function"]),u=PS["Data.Functor"],o=(PS["Data.Functor.Invariant"],PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.Unit"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),i=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),l=function(n){return function(e){return function(t){if(t instanceof o)return n;if(t instanceof i)return e(t.value0);throw new Error("Failed pattern match at Data.Maybe line 218, column 1 - line 218, column 51: "+[n.constructor.name,e.constructor.name,t.constructor.name])}}},c=l(!0)(a.const(!1)),f=l(!1)(a.const(!0)),s=new u.Functor(function(n){return function(e){return e instanceof i?new i(n(e.value0)):o.value}}),d=new e.Apply(function(){return s},function(n){return function(e){if(n instanceof i)return u.map(s)(n.value0)(e);if(n instanceof o)return o.value;throw new Error("Failed pattern match at Data.Maybe line 67, column 1 - line 67, column 35: "+[n.constructor.name,e.constructor.name])}}),S=new t.Bind(function(){return d},function(n){return function(e){if(n instanceof i)return e(n.value0);if(n instanceof o)return o.value;throw new Error("Failed pattern match at Data.Maybe line 126, column 1 - line 126, column 33: "+[n.constructor.name,e.constructor.name])}});n.Nothing=o,n.Just=i,n.maybe=l,n.fromMaybe=function(n){return l(n)(r.identity(r.categoryFn))},n.isJust=f,n.isNothing=c,n.fromJust=function(n){return function(n){return function(){if(n instanceof i)return n.value0;throw new Error("Failed pattern match at Data.Maybe line 269, column 1 - line 269, column 46: "+[n.constructor.name])}()}},n.functorMaybe=s,n.applyMaybe=d,n.bindMaybe=S}(PS["Data.Maybe"]=PS["Data.Maybe"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Monad"],PS["Data.Bounded"],PS["Data.Eq"],PS["Data.Functor"];var e=PS["Data.HeytingAlgebra"],t=PS["Data.Monoid"],r=(PS["Data.Ord"],PS["Data.Semigroup"]),a=(PS["Data.Semiring"],PS["Data.Show"],PS.Prelude,function(n){return new r.Semigroup(function(t){return function(r){return e.disj(n)(t)(r)}})});n.Disj=function(n){return n},n.semigroupDisj=a,n.monoidDisj=function(n){return new t.Monoid(function(){return a(n)},e.ff(n))}}(PS["Data.Monoid.Disj"]=PS["Data.Monoid.Disj"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Function"];var e=PS["Data.Functor"],t=(PS["Data.Monoid.Additive"],PS["Data.Monoid.Conj"],PS["Data.Monoid.Disj"]),r=(PS["Data.Monoid.Dual"],PS["Data.Monoid.Endo"],PS["Data.Monoid.Multiplicative"],PS["Data.Semigroup.First"],PS["Data.Semigroup.Last"],PS.Prelude,function(n,e){this.unwrap=n,this.wrap=e}),a=function(n){return n.wrap},u=function(n){return n.unwrap},o=new r(function(n){return n},t.Disj);n.unwrap=u,n.wrap=a,n.Newtype=r,n.alaF=function(n){return function(t){return function(r){return function(o){return function(i){return function(i){return function(l){return e.map(t)(u(o))(i(e.map(n)(a(r))(l)))}}}}}}},n.newtypeDisj=o}(PS["Data.Newtype"]=PS["Data.Newtype"]||{}),function(n){"use strict";var e=PS["Data.Foldable"],t=(PS["Control.Alt"],PS["Control.Applicative"]),r=PS["Control.Apply"],a=(PS["Control.Bind"],PS["Control.Category"]),u=(PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Function"]),o=PS["Data.Functor"],i=(PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),l=(PS["Data.Maybe.First"],PS["Data.Maybe.Last"],PS["Data.Monoid"]),c=(PS["Data.Monoid.Additive"],PS["Data.Monoid.Conj"],PS["Data.Monoid.Disj"]),f=(PS["Data.Monoid.Dual"],PS["Data.Monoid.Endo"],PS["Data.Monoid.Multiplicative"],PS["Data.Newtype"]),s=(PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"]),d=(PS["Data.Semiring"],PS["Data.Unit"]),S=(PS.Prelude,function(n,e,t){this.foldMap=n,this.foldl=e,this.foldr=t}),P=function(n){return n.foldr},v=function(n){return function(e){return function(a){return P(e)(function(e){return r.applySecond(n.Apply0())(a(e))})(t.pure(n)(d.unit))}}},p=function(n){return n.foldl},m=new S(function(n){return function(e){return function(t){if(t instanceof i.Nothing)return l.mempty(n);if(t instanceof i.Just)return e(t.value0);throw new Error("Failed pattern match at Data.Foldable line 129, column 1 - line 129, column 41: "+[e.constructor.name,t.constructor.name])}}},function(n){return function(e){return function(t){if(t instanceof i.Nothing)return e;if(t instanceof i.Just)return n(e)(t.value0);throw new Error("Failed pattern match at Data.Foldable line 129, column 1 - line 129, column 41: "+[n.constructor.name,e.constructor.name,t.constructor.name])}}},function(n){return function(e){return function(t){if(t instanceof i.Nothing)return e;if(t instanceof i.Just)return n(t.value0)(e);throw new Error("Failed pattern match at Data.Foldable line 129, column 1 - line 129, column 41: "+[n.constructor.name,e.constructor.name,t.constructor.name])}}}),D=function(n){return function(e){return function(t){return P(n)(function(n){return function(r){return s.append(e.Semigroup0())(t(n))(r)}})(l.mempty(e))}}},b=new S(function(n){return D(b)(n)},e.foldlArray,e.foldrArray),g=function(n){return n.foldMap};n.Foldable=S,n.foldr=P,n.foldl=p,n.foldMap=g,n.foldMapDefaultR=D,n.traverse_=v,n.for_=function(n){return function(e){return u.flip(v(n)(e))}},n.sequence_=function(n){return function(e){return v(n)(e)(a.identity(a.categoryFn))}},n.intercalate=function(n){return function(e){return function(t){return function(r){return p(n)(function(n){return function(r){return n.init?{init:!1,acc:r}:{init:!1,acc:s.append(e.Semigroup0())(n.acc)(s.append(e.Semigroup0())(t)(r))}}})({init:!0,acc:l.mempty(e)})(r).acc}}}},n.any=function(n){return function(e){return f.alaF(o.functorFn)(o.functorFn)(f.newtypeDisj)(f.newtypeDisj)(c.Disj)(g(n)(c.monoidDisj(e)))}},n.find=function(n){return function(e){return p(n)(function(n){return function(t){return n instanceof i.Nothing&&e(t)?new i.Just(t):n}})(i.Nothing.value)}},n.foldableArray=b,n.foldableMaybe=m}(PS["Data.Foldable"]=PS["Data.Foldable"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Applicative"];var e=PS["Control.Apply"],t=(PS["Control.Bind"],PS["Control.Extend"],PS["Control.Monad"],PS["Control.Semigroupoid"],PS["Data.Bifoldable"],PS["Data.Bifunctor"]),r=(PS["Data.Bitraversable"],PS["Data.Bounded"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"]),a=(PS["Data.Functor.Invariant"],PS["Data.Maybe"],PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.Traversable"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),u=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),o=new r.Functor(function(n){return function(e){if(e instanceof a)return new a(e.value0);if(e instanceof u)return new u(n(e.value0));throw new Error("Failed pattern match at Data.Either line 35, column 8 - line 35, column 52: "+[e.constructor.name])}}),i=new t.Bifunctor(function(n){return function(e){return function(t){if(t instanceof a)return new a(n(t.value0));if(t instanceof u)return new u(e(t.value0));throw new Error("Failed pattern match at Data.Either line 40, column 1 - line 40, column 45: "+[n.constructor.name,e.constructor.name,t.constructor.name])}}}),l=new e.Apply(function(){return o},function(n){return function(e){if(n instanceof a)return new a(n.value0);if(n instanceof u)return r.map(o)(n.value0)(e);throw new Error("Failed pattern match at Data.Either line 76, column 1 - line 76, column 41: "+[n.constructor.name,e.constructor.name])}});n.Left=a,n.Right=u,n.either=function(n){return function(e){return function(t){if(t instanceof a)return n(t.value0);if(t instanceof u)return e(t.value0);throw new Error("Failed pattern match at Data.Either line 220, column 1 - line 220, column 64: "+[n.constructor.name,e.constructor.name,t.constructor.name])}}},n.functorEither=o,n.bifunctorEither=i,n.applyEither=l}(PS["Data.Either"]=PS["Data.Either"]||{}),function(n){"use strict";PS["Control.Alt"];var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=(PS["Control.Comonad"],PS["Control.Extend"],PS["Control.Lazy"],PS["Control.Monad"]),u=(PS["Data.BooleanAlgebra"],PS["Data.Bounded"],PS["Data.CommutativeRing"],PS["Data.Eq"],PS["Data.EuclideanRing"],PS["Data.Foldable"],PS["Data.Functor"]),o=(PS["Data.Functor.Invariant"],PS["Data.HeytingAlgebra"],PS["Data.Monoid"],PS["Data.Newtype"]),i=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS.Prelude,function(n){return n}),l=new o.Newtype(function(n){return n},i),c=new u.Functor(function(n){return function(e){return n(e)}}),f=new t.Apply(function(){return c},function(n){return function(e){return n(e)}}),s=new r.Bind(function(){return f},function(n){return function(e){return e(n)}}),d=new e.Applicative(function(){return f},i),S=new a.Monad(function(){return d},function(){return s});n.Identity=i,n.newtypeIdentity=l,n.functorIdentity=c,n.applyIdentity=f,n.applicativeIdentity=d,n.bindIdentity=s,n.monadIdentity=S}(PS["Data.Identity"]=PS["Data.Identity"]||{}),function(n){"use strict";n.pureE=function(n){return function(){return n}},n.bindE=function(n){return function(e){return function(){return e(n())()}}},n.foreachE=function(n){return function(e){return function(){for(var t=0,r=n.length;t<r;t++)e(n[t])()}}}}(PS.Effect=PS.Effect||{}),function(n){"use strict";var e=PS.Effect,t=PS["Control.Applicative"],r=PS["Control.Apply"],a=PS["Control.Bind"],u=PS["Control.Monad"],o=PS["Data.Functor"],i=(PS["Data.Monoid"],PS["Data.Semigroup"],PS.Prelude,new u.Monad(function(){return f},function(){return l})),l=new a.Bind(function(){return c},e.bindE),c=new r.Apply(function(){return s},u.ap(i)),f=new t.Applicative(function(){return c},e.pureE),s=new o.Functor(t.liftA1(f));n.functorEffect=s,n.applyEffect=c,n.applicativeEffect=f,n.bindEffect=l,n.monadEffect=i,n.foreachE=e.foreachE}(PS.Effect=PS.Effect||{}),function(n){"use strict";n.new=function(n){return function(){return{value:n}}},n.read=function(n){return function(){return n.value}},n["modify'"]=function(n){return function(e){return function(){var t=n(e.value);return e.value=t.state,t.value}}},n.write=function(n){return function(e){return function(){return e.value=n,{}}}}}(PS["Effect.Ref"]=PS["Effect.Ref"]||{}),function(n){"use strict";var e=PS["Effect.Ref"],t=(PS["Data.Function"],PS["Data.Functor"]),r=PS.Effect,a=(PS.Prelude,function(n){return e["modify'"](function(e){var t=n(e);return{state:t,value:t}})});n.modify=a,n.modify_=function(n){return function(e){return t.void(r.functorEffect)(a(n)(e))}},n.new=e.new,n.read=e.read,n["modify'"]=e["modify'"],n.write=e.write}(PS["Effect.Ref"]=PS["Effect.Ref"]||{}),function(n){"use strict";(PS["Partial.Unsafe"]=PS["Partial.Unsafe"]||{}).unsafePartial=function(n){return n()}}(),function(n){"use strict";(PS["Partial"]=PS["Partial"]||{}).crashWith=function(){return function(n){throw new Error(n)}}}(),function(n){"use strict";var e=PS.Partial;n.crashWith=e.crashWith}(PS.Partial=PS.Partial||{}),function(n){"use strict";var e=PS["Partial.Unsafe"],t=PS.Partial;n.unsafeCrashWith=function(n){return e.unsafePartial(function(e){return t.crashWith(e)(n)})}}(PS["Partial.Unsafe"]=PS["Partial.Unsafe"]||{}),function(n){"use strict";PS["Control.Applicative"];var e=PS["Control.Bind"],t=(PS["Control.Monad"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Either"],PS["Data.Functor"]),r=(PS["Data.Identity"],PS["Data.Maybe"],PS["Data.Unit"],PS.Effect),a=PS["Effect.Ref"],u=(PS["Partial.Unsafe"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),o=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),i=function(n,e){this.Monad0=n,this.tailRecM=e},l=new i(function(){return r.monadEffect},function(n){return function(i){var l=function(n){return function(){if(n instanceof o)return n.value0;throw new Error("Failed pattern match at Control.Monad.Rec.Class line 111, column 30 - line 111, column 44: "+[n.constructor.name])}()};return function(){var c=e.bindFlipped(r.bindEffect)(a.new)(n(i))();return function(){for(;!function(){var e=a.read(c)();if(e instanceof u){var t=n(e.value0)();a.write(t)(c)();return!1}if(e instanceof o)return!0;throw new Error("Failed pattern match at Control.Monad.Rec.Class line 102, column 22 - line 107, column 28: "+[e.constructor.name])}(););}(),t.map(r.functorEffect)(l)(a.read(c))()}}});n.Loop=u,n.Done=o,n.MonadRec=i,n.tailRecM=function(n){return n.tailRecM},n.monadRecEffect=l}(PS["Control.Monad.Rec.Class"]=PS["Control.Monad.Rec.Class"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Biapplicative"],PS["Control.Biapply"],PS["Control.Bind"],PS["Control.Comonad"],PS["Control.Extend"],PS["Control.Lazy"],PS["Control.Monad"],PS["Control.Semigroupoid"],PS["Data.Bifoldable"],PS["Data.Bifunctor"],PS["Data.Bitraversable"],PS["Data.BooleanAlgebra"],PS["Data.Bounded"],PS["Data.CommutativeRing"],PS["Data.Distributive"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"];var e=PS["Data.Functor"],t=(PS["Data.Functor.Invariant"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Maybe.First"],PS["Data.Monoid"],PS["Data.Newtype"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.Unit"],PS.Prelude,PS["Type.Equality"],function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),r=new e.Functor(function(n){return function(e){return new t(e.value0,n(e.value1))}});n.Tuple=t,n.fst=function(n){return n.value0},n.snd=function(n){return n.value1},n.functorTuple=r}(PS["Data.Tuple"]=PS["Data.Tuple"]||{}),function(n){"use strict";(PS["Data.Unfoldable"]=PS["Data.Unfoldable"]||{}).unfoldrArrayImpl=function(n){return function(e){return function(t){return function(r){return function(a){return function(u){for(var o=[],i=u;;){var l=a(i);if(n(l))return o;var c=e(l);o.push(t(c)),i=r(c)}}}}}}}}(),function(n){"use strict";(PS["Data.Unfoldable1"]=PS["Data.Unfoldable1"]||{}).unfoldr1ArrayImpl=function(n){return function(e){return function(t){return function(r){return function(a){return function(u){for(var o=[],i=u;;){var l=a(i);o.push(t(l));var c=r(l);if(n(c))return o;i=e(c)}}}}}}}}(),function(n){"use strict";var e=PS["Data.Unfoldable1"],t=(PS["Data.Boolean"],PS["Data.Eq"],PS["Data.Maybe"]),r=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semigroup.Traversable"],PS["Data.Semiring"],PS["Data.Tuple"]),a=(PS["Partial.Unsafe"],PS.Prelude,function(n){this.unfoldr1=n}),u=new a(e.unfoldr1ArrayImpl(t.isNothing)(t.fromJust())(r.fst)(r.snd));n.Unfoldable1=a,n.unfoldr1=function(n){return n.unfoldr1},n.unfoldable1Array=u}(PS["Data.Unfoldable1"]=PS["Data.Unfoldable1"]||{}),function(n){"use strict";var e=PS["Data.Unfoldable"],t=(PS["Data.Function"],PS["Data.Functor"],PS["Data.Maybe"]),r=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Traversable"],PS["Data.Tuple"]),a=PS["Data.Unfoldable1"],u=(PS["Data.Unit"],PS["Partial.Unsafe"],PS.Prelude,function(n,e){this.Unfoldable10=n,this.unfoldr=e}),o=new u(function(){return a.unfoldable1Array},e.unfoldrArrayImpl(t.isNothing)(t.fromJust())(r.fst)(r.snd));n.Unfoldable=u,n.unfoldr=function(n){return n.unfoldr},n.unfoldableArray=o}(PS["Data.Unfoldable"]=PS["Data.Unfoldable"]||{}),function(n){"use strict";(PS["Unsafe.Coerce"]=PS["Unsafe.Coerce"]||{}).unsafeCoerce=function(n){return n}}(),function(n){"use strict";var e=PS["Unsafe.Coerce"];n.unsafeCoerce=e.unsafeCoerce}(PS["Unsafe.Coerce"]=PS["Unsafe.Coerce"]||{}),function(n){"use strict";var e=PS["Data.Array"],t=(PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"]),r=(PS["Control.Category"],PS["Control.Lazy"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.ST"],PS["Control.Monad.ST.Internal"],PS["Control.Semigroupoid"],PS["Data.Array.NonEmpty.Internal"],PS["Data.Array.ST"],PS["Data.Array.ST.Iterator"],PS["Data.Boolean"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"]),a=(PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),u=(PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Traversable"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Partial.Unsafe"],PS.Prelude,PS["Unsafe.Coerce"],function(n){return[n]}),o=r.flip(t.bind(t.bindArray));n.singleton=u,n.concatMap=o,n.mapMaybe=function(n){return o(function(e){return a.maybe([])(u)(n(e))})},n.length=e.length,n.cons=e.cons,n.snoc=e.snoc,n.filter=e.filter,n.drop=e.drop}(PS["Data.Array"]=PS["Data.Array"]||{}),function(n){"use strict";n.replace=function(n){return function(e){return function(t){return t.replace(n,e)}}},n.replaceAll=function(n){return function(e){return function(t){return t.replace(new RegExp(n.replace(/[-\/\\^$*+?.()|[\]{}]/g,"\\$&"),"g"),e)}}},n.split=function(n){return function(e){return e.split(n)}},n.joinWith=function(n){return function(e){return e.join(n)}}}(PS["Data.String.Common"]=PS["Data.String.Common"]||{}),function(n){"use strict";var e=PS["Data.String.Common"];PS["Data.Eq"],PS["Data.Ordering"],PS["Data.String.Pattern"],PS.Prelude;n.null=function(n){return""===n},n.replaceAll=e.replaceAll,n.split=e.split,n.joinWith=e.joinWith}(PS["Data.String.Common"]=PS["Data.String.Common"]||{}),function(n){"use strict";n.unsafeStringify=function(n){return JSON.stringify(n)},n.unsafeDecodeURIComponent=decodeURIComponent,n.unsafeEncodeURIComponent=encodeURIComponent}(PS["Global.Unsafe"]=PS["Global.Unsafe"]||{}),function(n){"use strict";var e=PS["Global.Unsafe"];n.unsafeStringify=e.unsafeStringify,n.unsafeDecodeURIComponent=e.unsafeDecodeURIComponent,n.unsafeEncodeURIComponent=e.unsafeEncodeURIComponent}(PS["Global.Unsafe"]=PS["Global.Unsafe"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Eq"];var e,t=PS["Data.Functor"],r=PS["Data.Maybe"],a=(PS["Data.Monoid"],PS["Data.Newtype"],PS["Data.Ord"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.String"],PS["Data.String.Common"]),u=(PS["Data.Tuple"],PS["Global.Unsafe"]),o=(PS.Prelude,function(n){return n}),i=(e=function(n){if(n.value1 instanceof r.Nothing)return u.unsafeEncodeURIComponent(n.value0);if(n.value1 instanceof r.Just)return u.unsafeEncodeURIComponent(n.value0)+"="+u.unsafeEncodeURIComponent(n.value1.value0);throw new Error("Failed pattern match at Data.FormURLEncoded line 35, column 18 - line 37, column 89: "+[n.constructor.name])},function(n){return a.joinWith("&")(t.map(t.functorArray)(e)(o(n)))});n.toArray=o,n.encode=i}(PS["Data.FormURLEncoded"]=PS["Data.FormURLEncoded"]||{}),function(n){"use strict";var e=PS["Data.Either"],t=(PS["Data.Eq"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Show"]),r=(PS["Data.String"],PS["Data.String.Common"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),a=function(){function n(){}return n.value=new n,n}(),u=function(){function n(){}return n.value=new n,n}(),o=function(){function n(){}return n.value=new n,n}(),i=function(){function n(){}return n.value=new n,n}(),l=function(){function n(){}return n.value=new n,n}(),c=function(){function n(){}return n.value=new n,n}(),f=function(){function n(){}return n.value=new n,n}(),s=function(){function n(){}return n.value=new n,n}(),d=function(){function n(){}return n.value=new n,n}(),S=function(){function n(){}return n.value=new n,n}(),P=function(){function n(){}return n.value=new n,n}(),v=function(){function n(){}return n.value=new n,n}(),p=function(){function n(){}return n.value=new n,n}(),m=function(){function n(){}return n.value=new n,n}(),D=function(){function n(){}return n.value=new n,n}(),b=function(n){return n},g=new t.Show(function(n){if(n instanceof r)return"OPTIONS";if(n instanceof a)return"GET";if(n instanceof u)return"HEAD";if(n instanceof o)return"POST";if(n instanceof i)return"PUT";if(n instanceof l)return"DELETE";if(n instanceof c)return"TRACE";if(n instanceof f)return"CONNECT";if(n instanceof s)return"PROPFIND";if(n instanceof d)return"PROPPATCH";if(n instanceof S)return"MKCOL";if(n instanceof P)return"COPY";if(n instanceof v)return"MOVE";if(n instanceof p)return"LOCK";if(n instanceof m)return"UNLOCK";if(n instanceof D)return"PATCH";throw new Error("Failed pattern match at Data.HTTP.Method line 40, column 1 - line 40, column 35: "+[n.constructor.name])}),h=e.either(t.show(g))(b);n.OPTIONS=r,n.GET=a,n.HEAD=u,n.POST=o,n.PUT=i,n.DELETE=l,n.TRACE=c,n.CONNECT=f,n.PROPFIND=s,n.PROPPATCH=d,n.MKCOL=S,n.COPY=P,n.MOVE=v,n.LOCK=p,n.UNLOCK=m,n.PATCH=D,n.unCustomMethod=b,n.print=h,n.showMethod=g}(PS["Data.HTTP.Method"]=PS["Data.HTTP.Method"]||{}),function(n){"use strict";PS["Data.Eq"];var e=PS["Data.Newtype"],t=(PS["Data.Ord"],PS["Data.Semigroup"],PS["Data.Show"],PS.Prelude,function(n){return n}),r=new e.Newtype(function(n){return n},t);n.MediaType=t,n.newtypeMediaType=r}(PS["Data.MediaType"]=PS["Data.MediaType"]||{}),function(n){"use strict";PS["Data.MediaType"];n.applicationFormURLEncoded="application/x-www-form-urlencoded",n.applicationJSON="application/json"}(PS["Data.MediaType.Common"]=PS["Data.MediaType.Common"]||{}),function(n){"use strict";var e=function(){var n={},e="Pure",t="Throw",r="Catch",a="Sync",u="Async",o="Bind",i="Bracket",l="Fork",c="Sequential",f="Map",s="Apply",d="Alt",S="Cons",P="Resume",v="Release",p="Finalizer",m="Finalized",D="Forked";function b(n,e,t,r){this.tag=n,this._1=e,this._2=t,this._3=r}function g(n){var e=function(e,t,r){return new b(n,e,t,r)};return e.tag=n,e}function h(n){return new b(e,void 0)}function w(n){try{n()}catch(n){setTimeout(function(){throw n},0)}}function y(n,e,t){try{return e(t())}catch(e){return n(e)}}function E(n,e,t){try{return e(t)()}catch(e){return t(n(e))(),h}}var M=function(){var n=1024,e=0,t=0,r=new Array(n),a=!1;function u(){var u;for(a=!0;0!==e;)e--,u=r[t],r[t]=void 0,t=(t+1)%n,u();a=!1}return{isDraining:function(){return a},enqueue:function(o){var i;e===n&&(i=a,u(),a=i),r[(t+e)%n]=o,e++,a||u()}}}();var C=0,T=1,A=2,F=3,H=4,L=5,_=6;function I(n,f,s){var d=0,D=C,g=s,h=null,O=null,W=null,x=null,U=null,R=0,k=0,B=null,q=!0;function j(s){for(var k,J,V;;)switch(k=null,J=null,V=null,null,D){case A:D=T,g=W(g),null===x?W=null:(W=x._1,x=x._2);break;case F:n.isLeft(g)?(D=L,h=g,g=null):null===W?D=L:(D=A,g=n.fromRight(g));break;case T:switch(g.tag){case o:W&&(x=new b(S,W,x)),W=g._2,D=T,g=g._1;break;case e:null===W?(D=L,g=n.right(g._1)):(D=A,g=g._1);break;case a:D=F,g=y(n.left,n.right,g._1);break;case u:return D=H,void(g=E(n.left,g._1,function(n){return function(){d===s&&(d++,M.enqueue(function(){D=F,g=n,j(d)}))}}));case t:D=L,h=n.left(g._1),g=null;break;case r:U=new b(S,g,null===W?U:new b(S,new b(P,W,x),U,O),O),W=null,x=null,D=T,g=g._1;break;case i:R++,U=new b(S,g,null===W?U:new b(S,new b(P,W,x),U,O),O),W=null,x=null,D=T,g=g._1;break;case l:D=F,k=I(n,f,g._2),f&&f.register(k),g._1&&k.run(),g=n.right(k);break;case c:D=T,g=N(n,f,g._1)}break;case L:if(W=null,x=null,null===U)D=_,g=O||h||g;else switch(k=U._3,V=U._1,U=U._2,V.tag){case r:O&&O!==k?D=L:h&&(D=T,g=V._2(n.fromLeft(h)),h=null);break;case P:O&&O!==k||h?D=L:(W=V._1,x=V._2,D=A,g=n.fromRight(g));break;case i:R--,null===h&&(J=n.fromRight(g),U=new b(S,new b(v,V._2,J),U,k),(O===k||R>0)&&(D=T,g=V._3(J)));break;case v:R++,U=new b(S,new b(m,g),U,O),D=T,g=O&&O!==k?V._1.killed(n.fromLeft(O))(V._2):h?V._1.failed(n.fromLeft(h))(V._2):V._1.completed(n.fromRight(g))(V._2);break;case p:R++,U=new b(S,new b(m,g),U,O),D=T,g=V._1;break;case m:R--,D=L,g=V._1}break;case _:for(var Q in B)B.hasOwnProperty(Q)&&(q=q&&B[Q].rethrow,w(B[Q].handler(g)));return B=null,void(O&&h?setTimeout(function(){throw n.fromLeft(h)},0):n.isLeft(g)&&q&&setTimeout(function(){if(q)throw n.fromLeft(g)},0));case C:D=T;break;case H:return}}function J(n){return function(){if(D===_)return q=q&&n.rethrow,n.handler(g)(),function(){};var e=k++;return(B=B||{})[e]=n,function(){null!==B&&delete B[e]}}}return{kill:function(e,t){return function(){if(D===_)return t(n.right(void 0))(),function(){};var r=J({rethrow:!1,handler:function(){return t(n.right(void 0))}})();switch(D){case C:O=n.left(e),D=_,g=O,j(d);break;case H:null===O&&(O=n.left(e)),0===R&&(D===H&&(U=new b(S,new b(p,g(e)),U,O)),D=L,g=null,h=null,j(++d));break;default:null===O&&(O=n.left(e)),0===R&&(D=L,g=null,h=null)}return r}},join:function(n){return function(){var e=J({rethrow:!1,handler:n})();return D===C&&j(d),e}},onComplete:J,isSuspended:function(){return D===C},run:function(){D===C&&(M.isDraining()?j(d):M.enqueue(function(){j(d)}))}}}function O(e,t,r,a){var o=0,i={},l=0,c={},P=new Error("[ParAff] Early exit"),v=null,p=n;function m(t,r,a){var u,o,l=r,c=null,P=null,v=0,p={};n:for(;;)switch(u=null,l.tag){case D:if(l._3===n&&(u=i[l._1],p[v++]=u.kill(t,function(n){return function(){0===--v&&a(n)()}})),null===c)break n;l=c._2,null===P?c=null:(c=P._1,P=P._2);break;case f:l=l._2;break;case s:case d:c&&(P=new b(S,c,P)),c=l,l=l._1}if(0===v)a(e.right(void 0))();else for(o=0,u=v;o<u;o++)p[o]=p[o]();return p}function g(t){return function(r){return function(){delete i[t._1],t._3=r,function t(r,u,o){var i,S,p,D,b,g;for(e.isLeft(r)?(i=r,S=null):(S=r,i=null);;){if(p=null,D=null,b=null,g=null,null!==v)return;if(null===u)return void a(i||S)();if(u._3!==n)return;switch(u.tag){case f:null===i?(u._3=e.right(u._1(e.fromRight(S))),S=u._3):u._3=i;break;case s:if(p=u._1._3,D=u._2._3,i){if(u._3=i,b=!0,g=l++,c[g]=m(P,i===p?u._2:u._1,function(){return function(){delete c[g],b?b=!1:null===o?t(S,null,null):t(S,o._1,o._2)}}),b)return void(b=!1)}else{if(p===n||D===n)return;S=e.right(e.fromRight(p)(e.fromRight(D))),u._3=S}break;case d:if(p=u._1._3,D=u._2._3,p===n&&e.isLeft(D)||D===n&&e.isLeft(p))return;if(p!==n&&e.isLeft(p)&&D!==n&&e.isLeft(D))i=S===p?D:p,S=null,u._3=i;else if(u._3=S,b=!0,g=l++,c[g]=m(P,S===p?u._2:u._1,function(){return function(){delete c[g],b?b=!1:null===o?t(S,null,null):t(S,o._1,o._2)}}),b)return void(b=!1)}null===o?u=null:(u=o._1,o=o._2)}}(r,t._2._1,t._2._2)}}}return function(){var a,u,l=T,c=r,P=null,v=null;n:for(;;)switch(a=null,u=null,l){case T:switch(c.tag){case f:P&&(v=new b(S,P,v)),P=new b(f,c._1,n,n),c=c._2;break;case s:P&&(v=new b(S,P,v)),P=new b(s,n,c._2,n),c=c._1;break;case d:P&&(v=new b(S,P,v)),P=new b(d,n,c._2,n),c=c._1;break;default:u=o++,l=L,a=c,c=new b(D,u,new b(S,P,v),n),(a=I(e,t,a)).onComplete({rethrow:!1,handler:g(c)})(),i[u]=a,t&&t.register(a)}break;case L:if(null===P)break n;P._1===n?(P._1=c,l=T,c=P._2,P._2=n):(P._2=c,c=P,null===v?P=null:(P=v._1,v=v._2))}for(p=c,u=0;u<o;u++)i[u].run()}(),function(n){return new b(u,function(t){return function(){return function(n,t){var r;for(var a in v=e.left(n),c)if(c.hasOwnProperty(a))for(a in r=c[a])r.hasOwnProperty(a)&&r[a]();c=null;var o=m(n,p,t);return function(n){return new b(u,function(n){return function(){for(var n in o)o.hasOwnProperty(n)&&o[n]();return h}})}}(n,t)}})}}function N(n,e,t){return new b(u,function(r){return function(){return O(n,e,t,r)}})}return b.EMPTY=n,b.Pure=g(e),b.Throw=g(t),b.Catch=g(r),b.Sync=g(a),b.Async=g(u),b.Bind=g(o),b.Bracket=g(i),b.Fork=g(l),b.Seq=g(c),b.ParMap=g(f),b.ParApply=g(s),b.ParAlt=g(d),b.Fiber=I,b.Supervisor=function(n){var e={},t=0,r=0;return{register:function(n){var a=t++;n.onComplete({rethrow:!0,handler:function(n){return function(){r--,delete e[a]}}}),e[a]=n,r++},isEmpty:function(){return 0===r},killAll:function(u,o){return function(){var i=0,l={};function c(t){l[t]=e[t].kill(u,function(e){return function(){delete l[t],i--,n.isLeft(e)&&n.fromLeft(e)&&setTimeout(function(){throw n.fromLeft(e)},0),0===i&&o()}})()}for(var f in e)e.hasOwnProperty(f)&&(i++,c(f));return e={},t=0,r=0,function(n){return new b(a,function(){for(var n in l)l.hasOwnProperty(n)&&l[n]()})}}}}},b.Scheduler=M,b.nonCanceler=h,b}();n._pure=e.Pure,n._throwError=e.Throw,n._catchError=function(n){return function(t){return e.Catch(n,t)}},n._map=function(n){return function(t){return t.tag===e.Pure.tag?e.Pure(n(t._1)):e.Bind(t,function(t){return e.Pure(n(t))})}},n._bind=function(n){return function(t){return e.Bind(n,t)}},n._fork=function(n){return function(t){return e.Fork(n,t)}},n._liftEffect=e.Sync,n._parAffMap=function(n){return function(t){return e.ParMap(n,t)}},n._parAffApply=function(n){return function(t){return e.ParApply(n,t)}},n.makeAff=e.Async,n._makeFiber=function(n,t){return function(){return e.Fiber(n,null,t)}},n._sequential=e.Seq}(PS["Effect.Aff"]=PS["Effect.Aff"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=(PS["Control.Bind"],PS["Control.Semigroupoid"],PS["Data.Either"]),r=(PS["Data.Function"],PS["Data.Functor"]),a=(PS["Data.Maybe"],PS["Data.Unit"],PS.Prelude,function(n){return n.catchError});n.catchError=a,n.throwError=function(n){return n.throwError},n.MonadThrow=function(n,e){this.Monad0=n,this.throwError=e},n.MonadError=function(n,e){this.MonadThrow0=n,this.catchError=e},n.try=function(n){return function(u){return a(n)(r.map(n.MonadThrow0().Monad0().Bind1().Apply0().Functor0())(t.Right.create)(u))(function(r){return e.pure(n.MonadThrow0().Monad0().Applicative0())(t.Left.create(r))})}}}(PS["Control.Monad.Error.Class"]=PS["Control.Monad.Error.Class"]||{}),function(n){"use strict";var e=PS["Data.Tuple"],t=PS["Data.Unit"],r=(PS.Prelude,function(n){return n.state});n.state=r,n.MonadState=function(n,e){this.Monad0=n,this.state=e},n.get=function(n){return r(n)(function(n){return new e.Tuple(n,n)})},n.gets=function(n){return function(t){return r(n)(function(n){return new e.Tuple(t(n),n)})}},n.put=function(n){return function(a){return r(n)(function(n){return new e.Tuple(t.unit,a)})}},n.modify_=function(n){return function(a){return r(n)(function(n){return new e.Tuple(t.unit,a(n))})}}}(PS["Control.Monad.State.Class"]=PS["Control.Monad.State.Class"]||{}),function(n){"use strict";PS.Prelude;n.lift=function(n){return n.lift},n.MonadTrans=function(n){this.lift=n}}(PS["Control.Monad.Trans.Class"]=PS["Control.Monad.Trans.Class"]||{}),function(n){"use strict";PS["Control.Category"],PS["Control.Monad"],PS.Effect;n.liftEffect=function(n){return n.liftEffect},n.MonadEffect=function(n,e){this.Monad0=n,this.liftEffect=e}}(PS["Effect.Class"]=PS["Effect.Class"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"];var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=(PS["Control.Category"],PS["Control.Monad"]),u=(PS["Control.Monad.Cont.Class"],PS["Control.Monad.Error.Class"]),o=(PS["Control.Monad.Reader.Class"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.State.Class"],PS["Control.Monad.Trans.Class"],PS["Control.Monad.Writer.Class"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Either"]),i=(PS["Data.Function"],PS["Data.Functor"]),l=(PS["Data.Monoid"],PS["Data.Newtype"],PS["Data.Semigroup"],PS["Data.Tuple"],PS["Effect.Class"],PS.Prelude,function(n){return n}),c=function(n){return function(e){return n(e)}},f=function(n){return new i.Functor(function(e){return c(i.map(n)(i.map(o.functorEither)(e)))})},s=function(n){return new a.Monad(function(){return P(n)},function(){return d(n)})},d=function(n){return new r.Bind(function(){return S(n)},function(t){return function(a){return r.bind(n.Bind1())(t)(o.either(function(t){return e.pure(n.Applicative0())(o.Left.create(t))})(function(n){return a(n)}))}})},S=function(n){return new t.Apply(function(){return f(n.Bind1().Apply0().Functor0())},a.ap(s(n)))},P=function(n){return new e.Applicative(function(){return S(n)},function(t){return l(e.pure(n.Applicative0())(o.Right.create(t)))})};n.ExceptT=l,n.runExceptT=function(n){return n},n.mapExceptT=c,n.functorExceptT=f,n.applyExceptT=S,n.applicativeExceptT=P,n.bindExceptT=d,n.monadExceptT=s,n.monadThrowExceptT=function(n){return new u.MonadThrow(function(){return s(n)},function(t){return l(e.pure(n.Applicative0())(o.Left.create(t)))})}}(PS["Control.Monad.Except.Trans"]=PS["Control.Monad.Except.Trans"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Category"],PS["Control.Monad"],PS["Control.Monad.Cont.Class"],PS["Control.Monad.Error.Class"],PS["Control.Monad.Reader.Class"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.State.Class"],PS["Control.Monad.Trans.Class"],PS["Control.Monad.Writer.Class"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Function"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Tuple"],PS["Effect.Class"],PS.Prelude;n.MaybeT=function(n){return n}}(PS["Control.Monad.Maybe.Trans"]=PS["Control.Monad.Maybe.Trans"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Monad.Cont.Trans"],PS["Control.Monad.Except.Trans"],PS["Control.Monad.Maybe.Trans"],PS["Control.Monad.Reader.Trans"],PS["Control.Monad.Writer.Trans"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Either"],PS["Data.Function"],PS["Data.Functor"],PS["Data.Functor.Compose"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Unit"],PS["Effect.Class"],PS["Effect.Ref"],PS.Prelude;n.parallel=function(n){return n.parallel},n.sequential=function(n){return n.sequential},n.Parallel=function(n,e,t,r){this.Applicative1=n,this.Monad0=e,this.parallel=t,this.sequential=r}}(PS["Control.Parallel.Class"]=PS["Control.Parallel.Class"]||{}),function(n){"use strict";PS["Control.Alternative"],PS["Control.Apply"];var e=PS["Control.Category"],t=PS["Control.Parallel.Class"],r=(PS["Control.Semigroupoid"],PS["Data.Foldable"]),a=(PS["Data.Traversable"],PS.Prelude,function(n){return function(e){return function(a){return function(u){return t.sequential(n)(r.traverse_(n.Applicative1())(e)(function(e){return t.parallel(n)(a(e))})(u))}}}});n.parTraverse_=a,n.parSequence_=function(n){return function(t){return a(n)(t)(e.identity(e.categoryFn))}}}(PS["Control.Parallel"]=PS["Control.Parallel"]||{}),function(n){"use strict";(PS["Data.Function.Uncurried"]=PS["Data.Function.Uncurried"]||{}).runFn4=function(n){return function(e){return function(t){return function(r){return function(a){return n(e,t,r,a)}}}}}}(),function(n){"use strict";var e=PS["Data.Function.Uncurried"];PS["Data.Unit"];n.runFn4=e.runFn4}(PS["Data.Function.Uncurried"]=PS["Data.Function.Uncurried"]||{}),function(n){"use strict";n.error=function(n){return new Error(n)},n.throwException=function(n){return function(){throw n}}}(PS["Effect.Exception"]=PS["Effect.Exception"]||{}),function(n){"use strict";var e=PS["Effect.Exception"];PS["Control.Applicative"],PS["Control.Semigroupoid"],PS["Data.Either"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Show"],PS.Effect,PS.Prelude;n.throw=function(n){return e.throwException(e.error(n))},n.error=e.error,n.throwException=e.throwException}(PS["Effect.Exception"]=PS["Effect.Exception"]||{}),function(n){"use strict";(PS["Effect.Unsafe"]=PS["Effect.Unsafe"]||{}).unsafePerformEffect=function(n){return n()}}(),function(n){"use strict";var e=PS["Effect.Unsafe"];PS.Effect;n.unsafePerformEffect=e.unsafePerformEffect}(PS["Effect.Unsafe"]=PS["Effect.Unsafe"]||{}),function(n){"use strict";var e=PS["Effect.Aff"],t=(PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"]),r=PS["Control.Apply"],a=PS["Control.Bind"],u=(PS["Control.Lazy"],PS["Control.Monad"]),o=PS["Control.Monad.Error.Class"],i=PS["Control.Monad.Rec.Class"],l=(PS["Control.Parallel"],PS["Control.Parallel.Class"]),c=(PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Either"]),f=(PS["Data.Foldable"],PS["Data.Function"]),s=(PS["Data.Function.Uncurried"],PS["Data.Functor"]),d=(PS["Data.Monoid"],PS["Data.Newtype"],PS["Data.Semigroup"],PS["Data.Time.Duration"],PS["Data.Unit"]),S=PS.Effect,P=PS["Effect.Class"],v=(PS["Effect.Exception"],PS["Effect.Unsafe"]),p=PS["Partial.Unsafe"],m=(PS.Prelude,PS["Unsafe.Coerce"]),D=function(n){return n},b=e._fork(!1),g=new s.Functor(e._parAffMap),h=new s.Functor(e._map),w=e._fork(!0),y={isLeft:function(n){if(n instanceof c.Left)return!0;if(n instanceof c.Right)return!1;throw new Error("Failed pattern match at Effect.Aff line 385, column 12 - line 387, column 20: "+[n.constructor.name])},fromLeft:function(n){if(n instanceof c.Left)return n.value0;if(n instanceof c.Right)return p.unsafeCrashWith("unsafeFromLeft: Right");throw new Error("Failed pattern match at Effect.Aff line 390, column 20 - line 394, column 3: "+[n.constructor.name])},fromRight:function(n){if(n instanceof c.Right)return n.value0;if(n instanceof c.Left)return p.unsafeCrashWith("unsafeFromRight: Left");throw new Error("Failed pattern match at Effect.Aff line 395, column 21 - line 397, column 31: "+[n.constructor.name])},left:c.Left.create,right:c.Right.create},E=function(n){return e._makeFiber(y,n)},M=function(n){return function(){var e=E(n)();return e.run(),e}},C=new r.Apply(function(){return g},e._parAffApply),T=new u.Monad(function(){return H},function(){return A}),A=new a.Bind(function(){return F},e._bind),F=new r.Apply(function(){return h},u.ap(T)),H=new t.Applicative(function(){return F},e._pure),L=new P.MonadEffect(function(){return T},e._liftEffect),_=function(n){return D(f.const(P.liftEffect(L)(n)))},I=function(n){return e.makeAff(function(e){return s.map(S.functorEffect)(_)(n.join(e))})},O=new s.Functor(function(n){return function(e){return v.unsafePerformEffect(E(s.map(h)(n)(I(e))))}}),N=new o.MonadThrow(function(){return T},e._throwError),W=new o.MonadError(function(){return N},e._catchError),x=function(n){return function(e){return M(a.bindFlipped(A)(function(e){return P.liftEffect(L)(n(e))})(o.try(W)(e)))}},U=new l.Parallel(function(){return R},function(){return T},m.unsafeCoerce,e._sequential),R=new t.Applicative(function(){return C},function(n){return l.parallel(U)(t.pure(H)(n))}),k=new i.MonadRec(function(){return T},function(n){var e=function(r){return a.bind(A)(n(r))(function(n){if(n instanceof i.Done)return t.pure(H)(n.value0);if(n instanceof i.Loop)return e(n.value0);throw new Error("Failed pattern match at Effect.Aff line 99, column 7 - line 101, column 22: "+[n.constructor.name])})};return e}),B=f.const(t.pure(H)(d.unit));n.Canceler=D,n.launchAff=M,n.runAff=x,n.runAff_=function(n){return function(e){return s.void(S.functorEffect)(x(n)(e))}},n.forkAff=w,n.suspendAff=b,n.killFiber=function(n){return function(r){return a.bind(A)(P.liftEffect(L)(r.isSuspended))(function(a){return a?P.liftEffect(L)(s.void(S.functorEffect)(r.kill(n,f.const(t.pure(S.applicativeEffect)(d.unit))))):e.makeAff(function(e){return s.map(S.functorEffect)(_)(r.kill(n,e))})})}},n.joinFiber=I,n.nonCanceler=B,n.effectCanceler=_,n.functorAff=h,n.applyAff=F,n.applicativeAff=H,n.bindAff=A,n.monadAff=T,n.monadRecAff=k,n.monadThrowAff=N,n.monadErrorAff=W,n.monadEffectAff=L,n.functorParAff=g,n.applyParAff=C,n.applicativeParAff=R,n.parallelAff=U,n.functorFiber=O,n.makeAff=e.makeAff}(PS["Effect.Aff"]=PS["Effect.Aff"]||{}),function(n){"use strict";n._app=function(){return app},n._closest=function(n,e,t,r){var a=r.closest(t);return a?n(a):e},n._innerHtml=function(n){return n.innerHTML},n._setInnerHtml=function(n,e){return e.innerHTML=n,e},n._createFormData=function(n){return new FormData(n)},n._createFormString=function(n){return new URLSearchParams(new FormData(n)).toString()},n._createFormArray=function(n){return Array.from(new FormData(n))},n._getDataAttribute=function(n,e){return e.dataset[n]},n._setDataAttribute=function(n,e,t){return t.dataset[n]=e},n._moment8601=function(n,e){var t=moment(e,moment.ISO_8601),r=t.fromNow(),a=t.format("MMMM D YYYY, h:mm a")+" ("+t.format()+") ";return n(r)(a)},n._mmoment8601=function(n,e,t,r){try{var a=moment(r,moment.ISO_8601),u=a.fromNow(),o=a.format("MMMM D YYYY, h:mm a")+" ("+a.format()+") ";return n(t(u)(o))}catch(n){return e}},n._closeWindow=function(n){n.close()}}(PS.Globals=PS.Globals||{}),function(n){"use strict";n.null=null,n.nullable=function(n,e,t){return null==n?e:t(n)},n.notNull=function(n){return n}}(PS["Data.Nullable"]=PS["Data.Nullable"]||{}),function(n){"use strict";var e=PS["Data.Nullable"],t=(PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Function"],PS["Data.Function.Uncurried"],PS["Data.Maybe"]),r=(PS["Data.Ord"],PS["Data.Show"],PS.Prelude,t.maybe(e.null)(e.notNull));n.toMaybe=function(n){return e.nullable(n,t.Nothing.value,t.Just.create)},n.toNullable=r}(PS["Data.Nullable"]=PS["Data.Nullable"]||{}),function(n){"use strict";PS["Control.Monad.Error.Class"];var e=PS["Control.Monad.Except.Trans"],t=(PS["Control.Semigroupoid"],PS["Data.Either"],PS["Data.Identity"]),r=PS["Data.Newtype"];PS.Prelude;n.runExcept=function(n){return r.unwrap(t.newtypeIdentity)(e.runExceptT(n))}}(PS["Control.Monad.Except"]=PS["Control.Monad.Except"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Category"];var e=PS["Control.Plus"],t=(PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Foldable"]),r=(PS["Data.FoldableWithIndex"],PS["Data.Function"],PS["Data.Functor"]),a=(PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"]),u=(PS["Data.Semigroup.Foldable"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS.Prelude,function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}());n.NonEmpty=u,n.singleton=function(n){return function(t){return new u(t,e.empty(n))}},n.functorNonEmpty=function(n){return new r.Functor(function(e){return function(t){return new u(e(t.value0),r.map(n)(e)(t.value1))}})},n.foldableNonEmpty=function(n){return new t.Foldable(function(e){return function(r){return function(u){return a.append(e.Semigroup0())(r(u.value0))(t.foldMap(n)(e)(r)(u.value1))}}},function(e){return function(r){return function(a){return t.foldl(n)(e)(e(r)(a.value0))(a.value1)}}},function(e){return function(r){return function(a){return e(a.value0)(t.foldr(n)(e)(r)(a.value1))}}})}}(PS["Data.NonEmpty"]=PS["Data.NonEmpty"]||{}),function(n){"use strict";var e=PS["Control.Alt"],t=(PS["Control.Alternative"],PS["Control.Applicative"]),r=PS["Control.Apply"],a=(PS["Control.Bind"],PS["Control.Category"],PS["Control.Comonad"],PS["Control.Extend"],PS["Control.Monad"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"]),u=(PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Foldable"]),o=(PS["Data.FoldableWithIndex"],PS["Data.Function"]),i=PS["Data.Functor"],l=(PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Monoid"]),c=(PS["Data.Newtype"],PS["Data.NonEmpty"]),f=(PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"]),s=(PS["Data.Semigroup.Foldable"],PS["Data.Semigroup.Traversable"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),d=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),S=new u.Foldable(function(n){return function(e){return u.foldl(S)(function(t){return function(r){return f.append(n.Semigroup0())(t)(e(r))}})(l.mempty(n))}},function(n){return function(e){return function(t){var r,a=e,u=!1;function o(e,r){if(r instanceof s)return u=!0,e;if(r instanceof d)return a=n(e)(r.value0),void(t=r.value1);throw new Error("Failed pattern match at Data.List.Types line 81, column 12 - line 83, column 30: "+[r.constructor.name])}for(;!u;)r=o(a,t);return r}}},function(n){return function(e){var t=u.foldl(S)(o.flip(d.create))(s.value);return function(r){return u.foldl(S)(o.flip(n))(e)(t(r))}}}),P=c.foldableNonEmpty(S),v=new i.Functor(function(n){return u.foldr(S)(function(e){return function(t){return new d(n(e),t)}})(s.value)}),p=c.functorNonEmpty(v),m=new f.Semigroup(function(n){return function(e){return u.foldr(S)(d.create)(e)(n)}}),D=new r.Apply(function(){return v},function(n){return function(e){if(n instanceof s)return s.value;if(n instanceof d)return f.append(m)(i.map(v)(n.value0)(e))(r.apply(D)(n.value1)(e));throw new Error("Failed pattern match at Data.List.Types line 127, column 1 - line 127, column 33: "+[n.constructor.name,e.constructor.name])}}),b=new t.Applicative(function(){return D},function(n){return new d(n,s.value)}),g=new e.Alt(function(){return v},f.append(m)),h=new a.Plus(function(){return g},s.value);n.Nil=s,n.Cons=d,n.NonEmptyList=function(n){return n},n.semigroupList=m,n.functorList=v,n.foldableList=S,n.applyList=D,n.applicativeList=b,n.altList=g,n.plusList=h,n.functorNonEmptyList=p,n.foldableNonEmptyList=P}(PS["Data.List.Types"]=PS["Data.List.Types"]||{}),function(n){"use strict";n.unsafeToForeign=function(n){return n},n.unsafeFromForeign=function(n){return n},n.typeOf=function(n){return typeof n},n.tagOf=function(n){return Object.prototype.toString.call(n).slice(8,-1)}}(PS.Foreign=PS.Foreign||{}),function(n){"use strict";(PS["Data.Int"]=PS["Data.Int"]||{}).fromNumberImpl=function(n){return function(e){return function(t){return(0|t)===t?n(t):e}}}}(),function(n){"use strict";var e=PS["Data.Int"],t=(PS["Control.Category"],PS["Control.Semigroupoid"],PS["Data.Boolean"],PS["Data.Bounded"],PS["Data.CommutativeRing"],PS["Data.DivisionRing"],PS["Data.Eq"],PS["Data.EuclideanRing"],PS["Data.HeytingAlgebra"],PS["Data.Int.Bits"],PS["Data.Maybe"]),r=(PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semiring"],PS["Data.Show"],PS.Global,PS.Math,PS.Prelude,e.fromNumberImpl(t.Just.create)(t.Nothing.value));n.fromNumber=r}(PS["Data.Int"]=PS["Data.Int"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Category"],PS["Control.Lazy"],PS["Control.Monad.Rec.Class"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Boolean"],PS["Data.Eq"];var e,t=PS["Data.Foldable"],r=(PS["Data.Function"],PS["Data.Functor"],PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.List.Types"]),a=(PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.NonEmpty"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Data.Unit"],PS.Prelude,e=r.Nil.value,function(n){var t,a=e,u=!1;function o(e,t){if(t instanceof r.Nil)return u=!0,e;if(t instanceof r.Cons)return a=new r.Cons(t.value0,e),void(n=t.value1);throw new Error("Failed pattern match at Data.List line 368, column 3 - line 368, column 19: "+[e.constructor.name,t.constructor.name])}for(;!u;)t=o(a,n);return t});n.fromFoldable=function(n){return t.foldr(n)(r.Cons.create)(r.Nil.value)},n.null=function(n){return n instanceof r.Nil},n.reverse=a}(PS["Data.List"]=PS["Data.List"]||{}),function(n){"use strict";PS["Control.Bind"],PS["Control.Category"],PS["Control.Semigroupoid"],PS["Data.Boolean"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"],PS["Data.List"];var e=PS["Data.List.Types"],t=(PS["Data.Maybe"],PS["Data.NonEmpty"]);PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semigroup.Foldable"],PS["Data.Semigroup.Traversable"],PS["Data.Semiring"],PS["Data.Traversable"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Partial.Unsafe"],PS.Prelude;n.singleton=function(n){return e.NonEmptyList(t.singleton(e.plusList)(n))},n.cons=function(n){return function(r){return new t.NonEmpty(n,new e.Cons(r.value0,r.value1))}}}(PS["Data.List.NonEmpty"]=PS["Data.List.NonEmpty"]||{}),function(n){"use strict";n.singleton=function(n){return n},n.length=function(n){return n.length},n.drop=function(n){return function(e){return e.substring(n)}}}(PS["Data.String.CodeUnits"]=PS["Data.String.CodeUnits"]||{}),function(n){"use strict";(PS["Data.String.Unsafe"]=PS["Data.String.Unsafe"]||{}).charAt=function(n){return function(e){if(n>=0&&n<e.length)return e.charAt(n);throw new Error("Data.String.Unsafe.charAt: Invalid index.")}}}(),function(n){"use strict";var e=PS["Data.String.Unsafe"];n.charAt=e.charAt}(PS["Data.String.Unsafe"]=PS["Data.String.Unsafe"]||{}),function(n){"use strict";var e=PS["Data.String.CodeUnits"];PS["Control.Semigroupoid"],PS["Data.Boolean"],PS["Data.Eq"],PS["Data.Function"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semiring"],PS["Data.String.Pattern"],PS["Data.String.Unsafe"],PS.Prelude;n.singleton=e.singleton,n.length=e.length,n.drop=e.drop}(PS["Data.String.CodeUnits"]=PS["Data.String.CodeUnits"]||{}),function(n){"use strict";var e=PS.Foreign,t=PS["Control.Applicative"],r=PS["Control.Monad.Error.Class"],a=(PS["Control.Monad.Except"],PS["Control.Monad.Except.Trans"]),u=(PS["Control.Semigroupoid"],PS["Data.Boolean"]),o=(PS["Data.Either"],PS["Data.Eq"],PS["Data.Function"],PS["Data.HeytingAlgebra"],PS["Data.Identity"]),i=(PS["Data.Int"],PS["Data.List.NonEmpty"]),l=(PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Show"]),c=(PS["Data.String.CodeUnits"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),f=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),s=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),d=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),S=function(n){if(n instanceof c)return n.value0;if(n instanceof s)return"Error at array index "+l.show(l.showInt)(n.value0)+": "+S(n.value1);if(n instanceof d)return"Error at property "+l.show(l.showString)(n.value0)+": "+S(n.value1);if(n instanceof f)return"Type mismatch: expected "+n.value0+", found "+n.value1;throw new Error("Failed pattern match at Foreign line 72, column 1 - line 72, column 45: "+[n.constructor.name])},P=function(n){return r.throwError(a.monadThrowExceptT(o.monadIdentity))(i.singleton(n))},v=function(n){return function(r){if(e.tagOf(r)===n)return t.pure(a.applicativeExceptT(o.monadIdentity))(e.unsafeFromForeign(r));if(u.otherwise)return P(new f(n,e.tagOf(r)));throw new Error("Failed pattern match at Foreign line 106, column 1 - line 106, column 55: "+[n.constructor.name,r.constructor.name])}},p=v("Boolean"),m=v("String");n.ForeignError=c,n.TypeMismatch=f,n.ErrorAtIndex=s,n.ErrorAtProperty=d,n.renderForeignError=S,n.unsafeReadTagged=v,n.readString=m,n.readBoolean=p,n.fail=P,n.unsafeToForeign=e.unsafeToForeign,n.typeOf=e.typeOf}(PS.Foreign=PS.Foreign||{}),function(n){"use strict";(PS["Foreign.Index"]=PS["Foreign.Index"]||{}).unsafeReadPropImpl=function(n,e,t,r){return null==r?n:e(r[t])}}(),function(n){"use strict";var e=PS["Foreign.Index"],t=PS["Control.Applicative"],r=(PS["Control.Bind"],PS["Control.Monad.Except.Trans"]),a=(PS["Data.Eq"],PS["Data.Function"],PS["Data.Function.Uncurried"],PS["Data.HeytingAlgebra"],PS["Data.Identity"]),u=(PS["Data.List.NonEmpty"],PS.Foreign),o=(PS.Prelude,function(n){return function(o){return e.unsafeReadPropImpl(u.fail(new u.TypeMismatch("object",u.typeOf(o))),t.pure(r.applicativeExceptT(a.monadIdentity)),n,o)}});n.readProp=o}(PS["Foreign.Index"]=PS["Foreign.Index"]||{}),function(n){"use strict";n.empty={},n._lookup=function(n,e,t,r){return t in r?e(r[t]):n}}(PS["Foreign.Object"]=PS["Foreign.Object"]||{}),function(n){"use strict";(PS["Foreign.Object.ST"]=PS["Foreign.Object.ST"]||{}).new=function(){return{}}}(),function(n){"use strict";var e=PS["Foreign.Object.ST"];PS["Control.Monad.ST"],PS["Data.Maybe"];n.new=e.new}(PS["Foreign.Object.ST"]=PS["Foreign.Object.ST"]||{}),function(n){"use strict";var e=PS["Foreign.Object"],t=(PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Category"],PS["Control.Monad.ST"],PS["Control.Monad.ST.Internal"],PS["Control.Semigroupoid"],PS["Data.Array"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.FoldableWithIndex"],PS["Data.Function"],PS["Data.Function.Uncurried"]),r=(PS["Data.Functor"],PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),a=(PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Foreign.Object.ST"],PS.Prelude,t.runFn4(e._lookup)(r.Nothing.value)(r.Just.create));n.lookup=a,n.empty=e.empty}(PS["Foreign.Object"]=PS["Foreign.Object"]||{}),function(n){"use strict";PS["Type.Data.Boolean"],PS["Type.Data.Symbol"],PS["Type.Equality"];var e=function(){function n(){}return n.value=new n,n}();n.RLProxy=e}(PS["Type.Row"]=PS["Type.Row"]||{}),function(n){"use strict";PS["Data.Eq"],PS["Data.Function.Uncurried"],PS["Data.HeytingAlgebra"];var e=PS["Data.Symbol"],t=(PS.Prelude,PS["Record.Unsafe"]);PS["Record.Unsafe.Union"],PS["Type.Row"],PS["Unsafe.Coerce"];n.get=function(n){return function(r){return function(r){return function(a){return t.unsafeGet(e.reflectSymbol(n)(r))(a)}}}}}(PS.Record=PS.Record||{}),function(n){"use strict";n.copyRecord=function(n){var e={};for(var t in n)({}).hasOwnProperty.call(n,t)&&(e[t]=n[t]);return e},n.unsafeInsert=function(n){return function(e){return function(t){return t[n]=e,t}}}}(PS["Record.Builder"]=PS["Record.Builder"]||{}),function(n){"use strict";var e=PS["Record.Builder"],t=PS["Control.Category"],r=PS["Control.Semigroupoid"],a=(PS["Data.Function.Uncurried"],PS["Data.Symbol"]),u=(PS.Prelude,PS["Record.Unsafe.Union"],PS["Type.Row"],PS["Unsafe.Coerce"],r.semigroupoidFn),o=t.categoryFn;n.build=function(n){return function(t){return n(e.copyRecord(t))}},n.insert=function(n){return function(n){return function(n){return function(t){return function(r){return function(u){return e.unsafeInsert(a.reflectSymbol(n)(t))(r)(u)}}}}}},n.semigroupoidBuilder=u,n.categoryBuilder=o}(PS["Record.Builder"]=PS["Record.Builder"]||{}),function(n){"use strict";PS["Simple.JSON"],PS["Control.Alt"],PS["Control.Applicative"],PS["Control.Bind"];var e=PS["Control.Category"],t=(PS["Control.Monad.Except"],PS["Control.Monad.Except.Trans"],PS["Control.Semigroupoid"]),r=(PS["Data.Bifunctor"],PS["Data.Boolean"],PS["Data.Either"],PS["Data.Eq"],PS["Data.Function"],PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.Identity"],PS["Data.List.Types"],PS["Data.Maybe"],PS["Data.Nullable"],PS["Data.Semigroup"],PS["Data.Symbol"]),a=(PS["Data.Traversable"],PS["Data.Variant"],PS["Effect.Exception"],PS["Effect.Uncurried"],PS["Effect.Unsafe"],PS.Foreign),u=(PS["Foreign.Index"],PS["Foreign.Object"],PS["Global.Unsafe"]),o=(PS["Partial.Unsafe"],PS.Prelude,PS.Record),i=PS["Record.Builder"],l=(PS["Type.Prelude"],PS["Type.Row"]),c=function(n){this.writeImpl=n},f=function(n){this.writeImplFields=n},s=function(n){return n.writeImplFields},d=function(n){return n.writeImpl},S=new c(a.unsafeToForeign),P=new c(a.unsafeToForeign),v=new c(a.unsafeToForeign),p=new f(function(n){return function(n){return e.identity(i.categoryBuilder)}});n.writeJSON=function(n){return function(e){return u.unsafeStringify(d(n)(e))}},n.WriteForeign=c,n.writeImpl=d,n.WriteForeignFields=f,n.writeImplFields=s,n.writeForeignString=S,n.writeForeignInt=P,n.writeForeignBoolean=v,n.recordWriteForeign=function(n){return function(n){return new c(function(e){var t=s(n)(l.RLProxy.value)(e);return a.unsafeToForeign(i.build(t)({}))})}},n.consWriteForeignFields=function(n){return function(e){return function(a){return function(u){return function(c){return function(S){return new f(function(f){return function(f){var P=s(a)(l.RLProxy.value)(f),v=d(e)(o.get(n)(u)(r.SProxy.value)(f));return t.compose(i.semigroupoidBuilder)(i.insert(S)(c)(n)(r.SProxy.value)(v))(P)}})}}}}}},n.nilWriteForeignFields=p}(PS["Simple.JSON"]=PS["Simple.JSON"]||{}),function(n){"use strict";var e=PS["Data.Symbol"],t=PS["Simple.JSON"],r=t.recordWriteForeign()(t.consWriteForeignFields(new e.IsSymbol(function(){return"created"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"id"}))(t.writeForeignInt)(t.consWriteForeignFields(new e.IsSymbol(function(){return"length"}))(t.writeForeignInt)(t.consWriteForeignFields(new e.IsSymbol(function(){return"text"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"title"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"updated"}))(t.writeForeignString)(t.nilWriteForeignFields)()()())()()())()()())()()())()()())()()()),a=t.recordWriteForeign()(t.consWriteForeignFields(new e.IsSymbol(function(){return"bid"}))(t.writeForeignInt)(t.consWriteForeignFields(new e.IsSymbol(function(){return"description"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"private"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"selected"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"tags"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"time"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"title"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"toread"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"url"}))(t.writeForeignString)(t.nilWriteForeignFields)()()())()()())()()())()()())()()())()()())()()())()()())()()());n.bookmark_wfI=a,n.note_wfI=r}(PS.Model=PS.Model||{}),function(n){"use strict";(PS["Web.HTML"]=PS["Web.HTML"]||{}).window=function(){return window}}(),function(n){"use strict";(PS["Web.HTML.HTMLDocument"]=PS["Web.HTML.HTMLDocument"]||{})._body=function(n){return function(){return n.body}}}(),function(n){"use strict";(PS["Web.DOM.Element"]=PS["Web.DOM.Element"]||{}).removeAttribute=function(n){return function(e){return function(){return e.removeAttribute(n),{}}}}}(),function(n){"use strict";n._querySelector=function(n){return function(e){return function(){return e.querySelector(n)}}},n.querySelectorAll=function(n){return function(e){return function(){return e.querySelectorAll(n)}}}}(PS["Web.DOM.ParentNode"]=PS["Web.DOM.ParentNode"]||{}),function(n){"use strict";(PS["Web.DOM.NodeList"]=PS["Web.DOM.NodeList"]||{}).toArray=function(n){return function(){return[].slice.call(n)}}}(),function(n){"use strict";var e=PS["Web.DOM.NodeList"];PS["Control.Semigroupoid"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Nullable"],PS.Effect,PS.Prelude,PS["Web.DOM.Internal.Types"];n.toArray=e.toArray}(PS["Web.DOM.NodeList"]=PS["Web.DOM.NodeList"]||{}),function(n){"use strict";var e=PS["Web.DOM.ParentNode"],t=(PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Functor"]),r=(PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Nullable"]),a=(PS["Data.Ord"],PS.Effect);PS.Prelude,PS["Web.DOM.HTMLCollection"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NodeList"];n.querySelector=function(n){return function(u){return t.map(a.functorEffect)(r.toMaybe)(e._querySelector(n)(u))}},n.querySelectorAll=e.querySelectorAll}(PS["Web.DOM.ParentNode"]=PS["Web.DOM.ParentNode"]||{}),function(n){"use strict";(PS["Web.Event.EventTarget"]=PS["Web.Event.EventTarget"]||{}).eventListener=function(n){return function(){return function(e){return n(e)()}}}}(),function(n){"use strict";n._currentTarget=function(n){return n.currentTarget},n.preventDefault=function(n){return function(){return n.preventDefault()}}}(PS["Web.Event.Event"]=PS["Web.Event.Event"]||{}),function(n){"use strict";n.toCharCode=function(n){return n.charCodeAt(0)},n.fromCharCode=function(n){return String.fromCharCode(n)}}(PS["Data.Enum"]=PS["Data.Enum"]||{}),function(n){"use strict";var e=PS["Data.Enum"],t=(PS["Control.Apply"],PS["Control.Bind"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Semigroupoid"],PS["Data.Boolean"],PS["Data.Bounded"]),r=(PS["Data.Either"],PS["Data.Eq"],PS["Data.Function"],PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),a=(PS["Data.Newtype"],PS["Data.Ord"]),u=(PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS["Data.Unit"],PS["Partial.Unsafe"],PS.Prelude,function(n,e,t){this.Ord0=n,this.pred=e,this.succ=t}),o=function(n,e,t,r,a){this.Bounded0=n,this.Enum1=e,this.cardinality=t,this.fromEnum=r,this.toEnum=a},i=function(n){return n.toEnum},l=function(n){return n.fromEnum},c=function(n){return function(e){return function(t){return n(e(t)+1|0)}}},f=function(n){return function(e){return function(t){return n(e(t)-1|0)}}},s=function(n){return n>=t.bottom(t.boundedInt)&&n<=t.top(t.boundedInt)?new r.Just(e.fromCharCode(n)):r.Nothing.value},d=new u(function(){return a.ordChar},f(s)(e.toCharCode),c(s)(e.toCharCode)),S=new o(function(){return t.boundedChar},function(){return d},e.toCharCode(t.top(t.boundedChar))-e.toCharCode(t.bottom(t.boundedChar))|0,e.toCharCode,s);n.Enum=u,n.succ=function(n){return n.succ},n.pred=function(n){return n.pred},n.BoundedEnum=o,n.cardinality=function(n){return n.cardinality},n.toEnum=i,n.fromEnum=l,n.toEnumWithDefaults=function(n){return function(e){return function(a){return function(u){var o=i(n)(u);if(o instanceof r.Just)return o.value0;if(o instanceof r.Nothing)return u<l(n)(t.bottom(n.Bounded0()))?e:a;throw new Error("Failed pattern match at Data.Enum line 158, column 33 - line 160, column 62: "+[o.constructor.name])}}}},n.defaultSucc=c,n.defaultPred=f,n.enumChar=d,n.boundedEnumChar=S}(PS["Data.Enum"]=PS["Data.Enum"]||{}),function(n){"use strict";var e=PS["Web.Event.Event"],t=(PS["Control.Semigroupoid"],PS["Data.DateTime.Instant"],PS["Data.Enum"],PS["Data.Eq"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Nullable"]);PS["Data.Ord"],PS.Effect,PS.Prelude,PS["Web.Event.EventPhase"],PS["Web.Event.Internal.Types"];n.currentTarget=function(n){return t.toMaybe(e._currentTarget(n))},n.preventDefault=e.preventDefault}(PS["Web.Event.Event"]=PS["Web.Event.Event"]||{}),function(n){"use strict";var e=PS["Web.Event.EventTarget"];PS.Effect,PS.Prelude,PS["Web.Event.Event"],PS["Web.Event.Internal.Types"];n.eventListener=e.eventListener}(PS["Web.Event.EventTarget"]=PS["Web.Event.EventTarget"]||{}),function(n){"use strict";(PS["Web.Internal.FFI"]=PS["Web.Internal.FFI"]||{})._unsafeReadProtoTagged=function(n,e,t,r){for(var a=r;null!=a;){var u=Object.getPrototypeOf(a),o=u.constructor.name;if(o===t)return e(r);if("Object"===o)return n;a=u}return n}}(),function(n){"use strict";var e=PS["Web.Internal.FFI"],t=(PS["Data.Function.Uncurried"],PS["Data.Maybe"]);n.unsafeReadProtoTagged=function(n){return function(r){return e._unsafeReadProtoTagged(t.Nothing.value,t.Just.create,n,r)}}}(PS["Web.Internal.FFI"]=PS["Web.Internal.FFI"]||{}),function(n){"use strict";var e=PS["Web.DOM.Element"],t=(PS["Control.Semigroupoid"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Nullable"],PS.Effect,PS.Prelude,PS["Unsafe.Coerce"]),r=(PS["Web.DOM.ChildNode"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NonDocumentTypeChildNode"],PS["Web.DOM.ParentNode"],PS["Web.Event.EventTarget"],PS["Web.Internal.FFI"]),a=t.unsafeCoerce,u=t.unsafeCoerce,o=r.unsafeReadProtoTagged("Element");n.fromNode=o,n.toNode=u,n.toParentNode=a,n.removeAttribute=e.removeAttribute}(PS["Web.DOM.Element"]=PS["Web.DOM.Element"]||{}),function(n){"use strict";(PS["Web.DOM.NonElementParentNode"]=PS["Web.DOM.NonElementParentNode"]||{})._getElementById=function(n){return function(e){return function(){return e.getElementById(n)}}}}(),function(n){"use strict";var e=PS["Web.DOM.NonElementParentNode"],t=(PS["Control.Semigroupoid"],PS["Data.Functor"]),r=(PS["Data.Maybe"],PS["Data.Nullable"]),a=PS.Effect;PS.Prelude,PS["Web.DOM.Element"];n.getElementById=function(n){return function(u){return t.map(a.functorEffect)(r.toMaybe)(e._getElementById(n)(u))}}}(PS["Web.DOM.NonElementParentNode"]=PS["Web.DOM.NonElementParentNode"]||{}),function(n){"use strict";PS["Web.DOM.Document"],PS["Control.Semigroupoid"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Nullable"],PS.Effect,PS.Prelude;var e=PS["Unsafe.Coerce"],t=(PS["Web.DOM.Comment"],PS["Web.DOM.DocumentFragment"],PS["Web.DOM.DocumentType"],PS["Web.DOM.Element"],PS["Web.DOM.HTMLCollection"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NonElementParentNode"],PS["Web.DOM.ParentNode"],PS["Web.DOM.ProcessingInstruction"],PS["Web.DOM.Text"],PS["Web.Event.EventTarget"],PS["Web.Internal.FFI"],e.unsafeCoerce);n.toNonElementParentNode=t}(PS["Web.DOM.Document"]=PS["Web.DOM.Document"]||{}),function(n){"use strict";(PS["Web.HTML.HTMLElement"]=PS["Web.HTML.HTMLElement"]||{})._read=function(n,e,t){var r=Object.prototype.toString.call(t);return 0===r.indexOf("[object HTML")&&r.indexOf("Element]")===r.length-8?e(t):n}}(),function(n){"use strict";var e=PS["Web.HTML.HTMLElement"],t=(PS["Control.Semigroupoid"],PS["Data.Function.Uncurried"],PS["Data.Functor"],PS["Data.Maybe"]),r=(PS["Data.Nullable"],PS.Effect,PS.Prelude,PS["Unsafe.Coerce"]),a=(PS["Web.DOM"],PS["Web.DOM.DOMTokenList"],PS["Web.DOM.Element"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NonDocumentTypeChildNode"],PS["Web.DOM.ParentNode"],PS["Web.Event.EventTarget"],r.unsafeCoerce),u=r.unsafeCoerce;n.fromElement=function(n){return e._read(t.Nothing.value,t.Just.create,n)},n.toElement=u,n.toNode=a}(PS["Web.HTML.HTMLElement"]=PS["Web.HTML.HTMLElement"]||{}),function(n){"use strict";var e=PS["Web.HTML.HTMLDocument"],t=(PS["Control.Semigroupoid"],PS["Data.Functor"]),r=(PS["Data.Maybe"],PS["Data.Nullable"]),a=PS.Effect,u=(PS.Prelude,PS["Unsafe.Coerce"]),o=(PS["Web.DOM.Document"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NonElementParentNode"],PS["Web.DOM.ParentNode"],PS["Web.Event.EventTarget"],PS["Web.HTML.HTMLDocument.ReadyState"],PS["Web.HTML.HTMLElement"],PS["Web.Internal.FFI"],u.unsafeCoerce),i=u.unsafeCoerce;n.toDocument=i,n.toParentNode=o,n.body=function(n){return t.map(a.functorEffect)(r.toMaybe)(e._body(n))}}(PS["Web.HTML.HTMLDocument"]=PS["Web.HTML.HTMLDocument"]||{}),function(n){"use strict";n.href=function(n){return function(){return n.href}},n.setHref=function(n){return function(e){return function(){e.href=n}}},n.search=function(n){return function(){return n.search}},n.reload=function(n){return function(){n.reload()}}}(PS["Web.HTML.Location"]=PS["Web.HTML.Location"]||{}),function(n){"use strict";var e=PS["Web.HTML.Location"];PS.Effect,PS.Prelude;n.setHref=e.setHref,n.search=e.search,n.reload=e.reload}(PS["Web.HTML.Location"]=PS["Web.HTML.Location"]||{}),function(n){"use strict";n.document=function(n){return function(){return n.document}},n.location=function(n){return function(){return n.location}}}(PS["Web.HTML.Window"]=PS["Web.HTML.Window"]||{}),function(n){"use strict";var e=PS["Web.HTML.Window"];PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Nullable"],PS["Data.Ord"],PS.Effect,PS.Prelude,PS["Unsafe.Coerce"],PS["Web.Event.EventTarget"],PS["Web.HTML.HTMLDocument"],PS["Web.HTML.History"],PS["Web.HTML.Location"],PS["Web.HTML.Navigator"],PS["Web.Storage.Storage"];n.document=e.document,n.location=e.location}(PS["Web.HTML.Window"]=PS["Web.HTML.Window"]||{}),function(n){"use strict";var e=PS["Web.HTML"];PS.Effect,PS["Web.HTML.HTMLAnchorElement"],PS["Web.HTML.HTMLAreaElement"],PS["Web.HTML.HTMLAudioElement"],PS["Web.HTML.HTMLBRElement"],PS["Web.HTML.HTMLBaseElement"],PS["Web.HTML.HTMLBodyElement"],PS["Web.HTML.HTMLButtonElement"],PS["Web.HTML.HTMLCanvasElement"],PS["Web.HTML.HTMLDListElement"],PS["Web.HTML.HTMLDataElement"],PS["Web.HTML.HTMLDataListElement"],PS["Web.HTML.HTMLDivElement"],PS["Web.HTML.HTMLDocument"],PS["Web.HTML.HTMLElement"],PS["Web.HTML.HTMLEmbedElement"],PS["Web.HTML.HTMLFieldSetElement"],PS["Web.HTML.HTMLFormElement"],PS["Web.HTML.HTMLHRElement"],PS["Web.HTML.HTMLHeadElement"],PS["Web.HTML.HTMLHeadingElement"],PS["Web.HTML.HTMLIFrameElement"],PS["Web.HTML.HTMLImageElement"],PS["Web.HTML.HTMLInputElement"],PS["Web.HTML.HTMLKeygenElement"],PS["Web.HTML.HTMLLIElement"],PS["Web.HTML.HTMLLabelElement"],PS["Web.HTML.HTMLLegendElement"],PS["Web.HTML.HTMLLinkElement"],PS["Web.HTML.HTMLMapElement"],PS["Web.HTML.HTMLMediaElement"],PS["Web.HTML.HTMLMetaElement"],PS["Web.HTML.HTMLMeterElement"],PS["Web.HTML.HTMLModElement"],PS["Web.HTML.HTMLOListElement"],PS["Web.HTML.HTMLObjectElement"],PS["Web.HTML.HTMLOptGroupElement"],PS["Web.HTML.HTMLOptionElement"],PS["Web.HTML.HTMLOutputElement"],PS["Web.HTML.HTMLParagraphElement"],PS["Web.HTML.HTMLParamElement"],PS["Web.HTML.HTMLPreElement"],PS["Web.HTML.HTMLProgressElement"],PS["Web.HTML.HTMLQuoteElement"],PS["Web.HTML.HTMLScriptElement"],PS["Web.HTML.HTMLSelectElement"],PS["Web.HTML.HTMLSourceElement"],PS["Web.HTML.HTMLSpanElement"],PS["Web.HTML.HTMLStyleElement"],PS["Web.HTML.HTMLTableCaptionElement"],PS["Web.HTML.HTMLTableCellElement"],PS["Web.HTML.HTMLTableColElement"],PS["Web.HTML.HTMLTableDataCellElement"],PS["Web.HTML.HTMLTableElement"],PS["Web.HTML.HTMLTableHeaderCellElement"],PS["Web.HTML.HTMLTableRowElement"],PS["Web.HTML.HTMLTableSectionElement"],PS["Web.HTML.HTMLTemplateElement"],PS["Web.HTML.HTMLTextAreaElement"],PS["Web.HTML.HTMLTimeElement"],PS["Web.HTML.HTMLTitleElement"],PS["Web.HTML.HTMLTrackElement"],PS["Web.HTML.HTMLUListElement"],PS["Web.HTML.HTMLVideoElement"],PS["Web.HTML.History"],PS["Web.HTML.Location"],PS["Web.HTML.Navigator"],PS["Web.HTML.Window"];n.window=e.window}(PS["Web.HTML"]=PS["Web.HTML"]||{}),function(n){"use strict";var e=PS.Globals,t=PS["Control.Applicative"],r=(PS["Data.Function"],PS["Data.Function.Uncurried"],PS["Data.Maybe"]),a=PS["Data.Nullable"],u=PS["Data.Tuple"],o=PS.Effect;PS.Model,PS.Prelude,PS["Web.DOM"],PS["Web.HTML"],PS["Web.XHR.FormData"];n["app'"]=function(n){return e._app()},n.closest=function(n){return function(a){return t.pure(o.applicativeEffect)(e._closest(r.Just.create,r.Nothing.value,n,a))}},n.moment8601=function(n){return t.pure(o.applicativeEffect)(e._moment8601(u.Tuple.create,n))},n.mmoment8601=function(n){return e._mmoment8601(r.Just.create,r.Nothing.value,u.Tuple.create,n)},n.innerHtml=function(n){return t.pure(o.applicativeEffect)(e._innerHtml(n))},n.setInnerHtml=function(n){return function(r){return t.pure(o.applicativeEffect)(e._setInnerHtml(n,r))}},n.createFormData=function(n){return e._createFormData(n)},n.createFormString=function(n){return e._createFormString(n)},n.createFormArray=function(n){return e._createFormArray(n)},n.getDataAttribute=function(n){return function(r){return t.pure(o.applicativeEffect)(a.toMaybe(e._getDataAttribute(n,r)))}},n.setDataAttribute=function(n){return function(r){return function(a){return t.pure(o.applicativeEffect)(e._setDataAttribute(n,r,a))}}},n.closeWindow=function(n){return t.pure(o.applicativeEffect)(e._closeWindow(n))},n._app=e._app,n._closest=e._closest,n._moment8601=e._moment8601,n._mmoment8601=e._mmoment8601,n._innerHtml=e._innerHtml,n._setInnerHtml=e._setInnerHtml,n._createFormData=e._createFormData,n._createFormString=e._createFormString,n._createFormArray=e._createFormArray,n._getDataAttribute=e._getDataAttribute,n._setDataAttribute=e._setDataAttribute,n._closeWindow=e._closeWindow}(PS.Globals=PS.Globals||{}),function(n){"use strict";var e;(PS["Network.HTTP.Affjax"]=PS["Network.HTTP.Affjax"]||{})._ajax=(e={},"undefined"==typeof module||!module.require||"undefined"!=typeof process&&process.versions.electron?(e.newXHR=function(){return new XMLHttpRequest},e.fixupUrl=function(n){return n||"/"},e.getResponse=function(n){return n.response}):(e.newXHR=function(){return new(module.require("xhr2"))},e.fixupUrl=function(n){var e=module.require("url"),t=e.parse(n);return t.protocol=t.protocol||"http:",t.hostname=t.hostname||"localhost",e.format(t)},e.getResponse=function(n){return n.response}),function(n,t){return function(r,a){var u=e.newXHR(),o=e.fixupUrl(t.url);if(u.open(t.method||"GET",o,!0,t.username,t.password),t.headers)try{for(var i,l=0;null!=(i=t.headers[l]);l++)u.setRequestHeader(i.field,i.value)}catch(n){r(n)}return u.onerror=function(){r(new Error("AJAX request failed: "+t.method+" "+t.url))},u.onload=function(){a({status:u.status,statusText:u.statusText,headers:u.getAllResponseHeaders().split("\r\n").filter(function(n){return n.length>0}).map(function(e){var t=e.indexOf(":");return n(e.substring(0,t))(e.substring(t+2))}),response:e.getResponse(u)})},u.responseType=t.responseType,u.withCredentials=t.withCredentials,u.send(t.content),function(n,e,t){try{u.abort()}catch(n){return e(n)}return t()}}})}(),function(n){"use strict";n.fromObject=function(n){return n},n.stringify=function(n){return JSON.stringify(n)};var e=Object.prototype.toString;n._caseJson=function(n,t,r,a,u,o,i){return null==i?n():"boolean"==typeof i?t(i):"number"==typeof i?r(i):"string"==typeof i?a(i):"[object Array]"===e.call(i)?u(i):o(i)}}(PS["Data.Argonaut.Core"]=PS["Data.Argonaut.Core"]||{}),function(n){"use strict";var e,t=PS["Data.Argonaut.Core"],r=(PS["Data.Eq"],PS["Data.Function"]),a=(PS["Data.Function.Uncurried"],PS["Data.Maybe"]),u=(PS["Data.Ord"],PS["Data.Ordering"],PS["Foreign.Object"]),o=(PS.Prelude,(e=a.Nothing.value,function(n){return function(t){return t(e)(n)}})(a.Just.create)),i=t.fromObject(u.empty),l=function(n){return function(e){return function(a){return t._caseJson(r.const(n),r.const(n),e,r.const(n),r.const(n),r.const(n),a)}}},c=o(l);n.caseJsonNumber=l,n.toNumber=c,n.jsonEmptyObject=i,n.stringify=t.stringify}(PS["Data.Argonaut.Core"]=PS["Data.Argonaut.Core"]||{}),function(n){"use strict";(PS["Data.Argonaut.Parser"]=PS["Data.Argonaut.Parser"]||{})._jsonParser=function(n,e,t){try{return e(JSON.parse(t))}catch(e){return n(e.message)}}}(),function(n){"use strict";var e=PS["Data.Argonaut.Parser"],t=(PS["Data.Argonaut.Core"],PS["Data.Either"]);PS["Data.Function.Uncurried"];n.jsonParser=function(n){return e._jsonParser(t.Left.create,t.Right.create,n)}}(PS["Data.Argonaut.Parser"]=PS["Data.Argonaut.Parser"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Semigroupoid"];var e=PS["Data.Either"],t=(PS["Data.Function"],PS.Effect,PS["Effect.Aff"]);PS["Effect.Exception"],PS["Effect.Uncurried"],PS.Prelude;n.fromEffectFnAff=function(n){return t.makeAff(function(r){return function(){var a=n(function(n){return r(e.Left.create(n))()},function(n){return r(e.Right.create(n))()});return function(n){return t.makeAff(function(r){return function(){return a(n,function(n){return r(e.Left.create(n))()},function(n){return r(e.Right.create(n))()}),t.nonCanceler}})}}})}}(PS["Effect.Aff.Compat"]=PS["Effect.Aff.Compat"]||{}),function(n){"use strict";PS["Data.Argonaut.Core"],PS["Data.ArrayBuffer.Types"],PS["Data.FormURLEncoded"];var e=PS["Data.Maybe"],t=(PS["Data.MediaType"],PS["Data.MediaType.Common"]),r=(PS["Web.DOM.Document"],PS["Web.File.Blob"],PS["Web.XHR.FormData"],function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),a=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),u=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),o=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),i=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),l=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),c=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),f=o.create;n.ArrayView=r,n.Blob=a,n.Document=u,n.String=o,n.FormData=i,n.FormURLEncoded=l,n.Json=c,n.string=f,n.toMediaType=function(n){return n instanceof l?new e.Just(t.applicationFormURLEncoded):n instanceof c?new e.Just(t.applicationJSON):e.Nothing.value}}(PS["Network.HTTP.Affjax.Request"]=PS["Network.HTTP.Affjax.Request"]||{}),function(n){"use strict";var e=PS["Control.Category"],t=(PS["Data.Argonaut.Core"],PS["Data.ArrayBuffer.Types"],PS["Data.Maybe"]),r=(PS["Data.MediaType"],PS["Data.MediaType.Common"]),a=(PS.Prelude,PS["Web.DOM.Document"],PS["Web.File.Blob"],function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),u=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),o=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),i=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),l=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),c=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),f=new i(e.identity(e.categoryFn)),s=new c(e.identity(e.categoryFn));n.ArrayBuffer=a,n.Blob=u,n.Document=o,n.Json=i,n.String=l,n.Ignore=c,n.json=f,n.ignore=s,n.toResponseType=function(n){if(n instanceof a)return"arraybuffer";if(n instanceof u)return"blob";if(n instanceof o)return"document";if(n instanceof i)return"text";if(n instanceof l)return"text";if(n instanceof c)return"";throw new Error("Failed pattern match at Network.HTTP.Affjax.Response line 41, column 3 - line 49, column 1: "+[n.constructor.name])},n.toMediaType=function(n){return n instanceof i?new t.Just(r.applicationJSON):t.Nothing.value}}(PS["Network.HTTP.Affjax.Response"]=PS["Network.HTTP.Affjax.Response"]||{}),function(n){"use strict";PS["Data.Eq"],PS["Data.HeytingAlgebra"];var e=PS["Data.MediaType"],t=PS["Data.Newtype"],r=(PS["Data.Semigroup"],PS["Data.Show"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),a=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),u=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}();n.Accept=r,n.ContentType=a,n.RequestHeader=u,n.requestHeaderName=function(n){if(n instanceof r)return"Accept";if(n instanceof a)return"Content-Type";if(n instanceof u)return n.value0;throw new Error("Failed pattern match at Network.HTTP.RequestHeader line 24, column 1 - line 24, column 45: "+[n.constructor.name])},n.requestHeaderValue=function(n){if(n instanceof r)return t.unwrap(e.newtypeMediaType)(n.value0);if(n instanceof a)return t.unwrap(e.newtypeMediaType)(n.value0);if(n instanceof u)return n.value1;throw new Error("Failed pattern match at Network.HTTP.RequestHeader line 29, column 1 - line 29, column 46: "+[n.constructor.name])}}(PS["Network.HTTP.RequestHeader"]=PS["Network.HTTP.RequestHeader"]||{}),function(n){"use strict";PS["Data.Eq"],PS["Data.HeytingAlgebra"],PS["Data.Semigroup"],PS["Data.Show"],PS.Prelude;var e=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}();n.responseHeader=function(n){return function(t){return new e(n,t)}}}(PS["Network.HTTP.ResponseHeader"]=PS["Network.HTTP.ResponseHeader"]||{}),function(n){"use strict";var e=PS["Network.HTTP.Affjax"],t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.Error.Class"],u=PS["Control.Monad.Except"],o=PS["Control.Monad.Except.Trans"],i=(PS["Control.Parallel"],PS["Control.Semigroupoid"],PS["Data.Argonaut.Core"]),l=PS["Data.Argonaut.Parser"],c=PS["Data.Array"],f=PS["Data.Either"],s=PS["Data.Eq"],d=PS["Data.Foldable"],S=PS["Data.FormURLEncoded"],P=PS["Data.Function"],v=(PS["Data.Function.Uncurried"],PS["Data.Functor"]),p=PS["Data.HTTP.Method"],m=PS["Data.HeytingAlgebra"],D=PS["Data.Identity"],b=(PS["Data.Int"],PS["Data.List.Types"]),g=PS["Data.Maybe"],h=PS["Data.Monoid"],w=PS["Data.Nullable"],y=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semiring"],PS["Data.Time.Duration"],PS["Data.Unit"]),E=PS["Effect.Aff"],M=PS["Effect.Aff.Compat"],C=(PS["Effect.Class"],PS["Effect.Exception"]),T=(PS["Effect.Ref"],PS.Foreign),A=(PS.Math,PS["Network.HTTP.Affjax.Request"]),F=PS["Network.HTTP.Affjax.Response"],H=PS["Network.HTTP.RequestHeader"],L=PS["Network.HTTP.ResponseHeader"],_=(PS["Network.HTTP.StatusCode"],PS.Prelude,{method:new f.Left(p.GET.value),url:"/",headers:[],content:g.Nothing.value,username:g.Nothing.value,password:g.Nothing.value,withCredentials:!1});n.defaultRequest=_,n.affjax=function(n){return function(_){var I,O=function(){if(n instanceof F.ArrayBuffer)return T.unsafeReadTagged("ArrayBuffer");if(n instanceof F.Blob)return T.unsafeReadTagged("Blob");if(n instanceof F.Document)return T.unsafeReadTagged("Document");if(n instanceof F.Json)return r.composeKleisliFlipped(o.bindExceptT(D.monadIdentity))(function(e){return n.value0(""===(r=e)?t.pure(o.applicativeExceptT(D.monadIdentity))(i.jsonEmptyObject):f.either(function(n){return T.fail(T.ForeignError.create(n))})(t.pure(o.applicativeExceptT(D.monadIdentity)))(l.jsonParser(r)));var r})(T.unsafeReadTagged("String"));if(n instanceof F.String)return T.unsafeReadTagged("String");if(n instanceof F.Ignore)return P.const(n.value0(t.pure(o.applicativeExceptT(D.monadIdentity))(y.unit)));throw new Error("Failed pattern match at Network.HTTP.Affjax line 261, column 19 - line 267, column 51: "+[n.constructor.name])}(),N=function(n){return function(e){return n instanceof g.Just&&!d.any(d.foldableArray)(m.heytingAlgebraBoolean)(P.on(s.eq(s.eqString))(H.requestHeaderName)(n.value0))(e)?c.snoc(e)(n.value0):e}},W={method:p.print(_.method),url:_.url,headers:v.map(v.functorArray)(function(n){return{field:H.requestHeaderName(n),value:H.requestHeaderValue(n)}})((I=_.content,N(v.map(g.functorMaybe)(H.ContentType.create)(r.bindFlipped(g.bindMaybe)(A.toMediaType)(I)))(N(v.map(g.functorMaybe)(H.Accept.create)(F.toMediaType(n)))(_.headers)))),content:w.toNullable(v.map(g.functorMaybe)(function(n){if(n instanceof A.ArrayView)return n.value0(T.unsafeToForeign);if(n instanceof A.Blob)return T.unsafeToForeign(n.value0);if(n instanceof A.Document)return T.unsafeToForeign(n.value0);if(n instanceof A.String)return T.unsafeToForeign(n.value0);if(n instanceof A.FormData)return T.unsafeToForeign(n.value0);if(n instanceof A.FormURLEncoded)return T.unsafeToForeign(S.encode(n.value0));if(n instanceof A.Json)return T.unsafeToForeign(i.stringify(n.value0));throw new Error("Failed pattern match at Network.HTTP.Affjax line 235, column 20 - line 242, column 53: "+[n.constructor.name])})(_.content)),responseType:F.toResponseType(n),username:w.toNullable(_.username),password:w.toNullable(_.password),withCredentials:_.withCredentials};return r.bind(E.bindAff)(M.fromEffectFnAff(e._ajax(L.responseHeader,W)))(function(n){var e=u.runExcept(O(n.response));if(e instanceof f.Left)return a.throwError(E.monadThrowAff)(C.error(d.intercalate(b.foldableNonEmptyList)(h.monoidString)("\n")(v.map(b.functorNonEmptyList)(T.renderForeignError)(e.value0))));if(e instanceof f.Right)return t.pure(E.applicativeAff)({response:e.value0,headers:n.headers,status:n.status,statusText:n.statusText});throw new Error("Failed pattern match at Network.HTTP.Affjax line 217, column 3 - line 219, column 49: "+[e.constructor.name])})}}}(PS["Network.HTTP.Affjax"]=PS["Network.HTTP.Affjax"]||{}),function(n){"use strict";var e=PS["Control.Bind"],t=(PS["Control.Semigroupoid"],PS["Data.Argonaut"],PS["Data.Array"]),r=PS["Data.Either"],a=(PS["Data.FormURLEncoded"],PS["Data.Functor"]),u=PS["Data.HTTP.Method"],o=PS["Data.Maybe"],i=PS["Data.MediaType.Common"],l=(PS["Data.Semigroup"],PS["Data.Show"]),c=PS["Data.Unit"],f=PS.Effect,s=PS["Effect.Aff"],d=PS["Effect.Class"],S=PS.Globals,P=PS.Model,v=PS["Network.HTTP.Affjax"],p=PS["Network.HTTP.Affjax.Request"],m=PS["Network.HTTP.Affjax.Response"],D=PS["Network.HTTP.RequestHeader"],b=(PS.Prelude,PS["Simple.JSON"]),g=PS["Web.Event.Event"],h=PS["Web.HTML"],w=PS["Web.HTML.Location"],y=PS["Web.HTML.Window"],E=function(){function n(){}return n.value=new n,n}(),M=function(){function n(){}return n.value=new n,n}(),C=new l.Show(function(n){if(n instanceof E)return"star";if(n instanceof M)return"unstar";throw new Error("Failed pattern match at App line 31, column 1 - line 31, column 37: "+[n.constructor.name])}),T=function(n){return function(e){return function(a){return function(u){return function(o){var i=S["app'"](c.unit);return v.affjax(o)({method:new r.Left(n),url:e,headers:t.cons(new D.RequestHeader(i.csrfHeaderName,i.csrfToken))(a),content:u,username:v.defaultRequest.username,password:v.defaultRequest.password,withCredentials:v.defaultRequest.withCredentials})}}}}},A=function(n){var t=S["app'"](n);return e.discard(e.discardUnit)(s.bindAff)(a.void(s.functorAff)(T(u.POST.value)(t.authRlogoutR)([])(o.Nothing.value)(m.ignore)))(function(){return d.liftEffect(s.monadEffectAff)(e.bind(f.bindEffect)(e.bind(f.bindEffect)(h.window)(y.location))(w.reload))})},F=function(n){return function(e){return function(t){return function(r){return function(a){return T(n)(S["app'"](c.unit).homeR+e)(t)(r)(a)}}}}},H=function(n){return function(e){return function(t){return function(r){return F(n)(e)([new D.ContentType(i.applicationFormURLEncoded)])(a.map(o.functorMaybe)(p.FormURLEncoded.create)(t))(r)}}}},L=function(n){return function(e){return function(t){return function(r){return function(u){return F(e)(t)([new D.ContentType(i.applicationJSON)])(a.map(o.functorMaybe)(function(e){return p.string(b.writeJSON(n)(e))})(r))(u)}}}}};n.Star=E,n.UnStar=M,n.toggleStar=function(n){return function(e){var t="bm/"+l.show(l.showInt)(n)+"/"+l.show(C)(e);return a.void(s.functorAff)(H(u.POST.value)(t)(o.Nothing.value)(m.ignore))}},n.destroy=function(n){return H(u.DELETE.value)("bm/"+l.show(l.showInt)(n))(o.Nothing.value)(m.ignore)},n.markRead=function(n){var e="bm/"+l.show(l.showInt)(n)+"/read";return H(u.POST.value)(e)(o.Nothing.value)(m.ignore)},n.editBookmark=function(n){return L(P.bookmark_wfI)(u.POST.value)("api/add")(new o.Just(n))(m.ignore)},n.editNote=function(n){return L(P.note_wfI)(u.POST.value)("api/note/add")(new o.Just(n))(m.json)},n.destroyNote=function(n){return H(u.DELETE.value)("api/note/"+l.show(l.showInt)(n))(o.Nothing.value)(m.ignore)},n.logoutE=function(n){return e.bindFlipped(f.bindEffect)(function(n){return a.void(f.functorEffect)(s.launchAff(A(n)))})(g.preventDefault(n))},n.logout=A,n.fetchJson=L,n.fetchUrlEnc=H,n.fetchPath=F,n.fetchUrl=T,n.showStar=C}(PS.App=PS.App||{}),function(n){"use strict";var e=function(){function n(){}return n.value=new n,n}(),t=function(){function n(){}return n.value=new n,n}(),r=function(){function n(){}return n.value=new n,n}();n.ButtonButton=e,n.ButtonSubmit=t,n.ButtonReset=r,n.renderButtonType=function(n){if(n instanceof e)return"button";if(n instanceof t)return"submit";if(n instanceof r)return"reset";throw new Error("Failed pattern match at DOM.HTML.Indexed.ButtonType line 9, column 20 - line 12, column 18: "+[n.constructor.name])}}(PS["DOM.HTML.Indexed.ButtonType"]=PS["DOM.HTML.Indexed.ButtonType"]||{}),function(n){"use strict";var e=function(){function n(){}return n.value=new n,n}(),t=function(){function n(){}return n.value=new n,n}(),r=function(){function n(){}return n.value=new n,n}(),a=function(){function n(){}return n.value=new n,n}(),u=function(){function n(){}return n.value=new n,n}(),o=function(){function n(){}return n.value=new n,n}(),i=function(){function n(){}return n.value=new n,n}(),l=function(){function n(){}return n.value=new n,n}(),c=function(){function n(){}return n.value=new n,n}(),f=function(){function n(){}return n.value=new n,n}(),s=function(){function n(){}return n.value=new n,n}(),d=function(){function n(){}return n.value=new n,n}(),S=function(){function n(){}return n.value=new n,n}(),P=function(){function n(){}return n.value=new n,n}(),v=function(){function n(){}return n.value=new n,n}(),p=function(){function n(){}return n.value=new n,n}(),m=function(){function n(){}return n.value=new n,n}(),D=function(){function n(){}return n.value=new n,n}(),b=function(){function n(){}return n.value=new n,n}(),g=function(){function n(){}return n.value=new n,n}(),h=function(){function n(){}return n.value=new n,n}(),w=function(){function n(){}return n.value=new n,n}();n.InputButton=e,n.InputCheckbox=t,n.InputColor=r,n.InputDate=a,n.InputDatetimeLocal=u,n.InputEmail=o,n.InputFile=i,n.InputHidden=l,n.InputImage=c,n.InputMonth=f,n.InputNumber=s,n.InputPassword=d,n.InputRadio=S,n.InputRange=P,n.InputReset=v,n.InputSearch=p,n.InputSubmit=m,n.InputTel=D,n.InputText=b,n.InputTime=g,n.InputUrl=h,n.InputWeek=w,n.renderInputType=function(n){if(n instanceof e)return"button";if(n instanceof t)return"checkbox";if(n instanceof r)return"color";if(n instanceof a)return"date";if(n instanceof u)return"datetime-local";if(n instanceof o)return"email";if(n instanceof i)return"file";if(n instanceof l)return"hidden";if(n instanceof c)return"image";if(n instanceof f)return"month";if(n instanceof s)return"number";if(n instanceof d)return"password";if(n instanceof S)return"radio";if(n instanceof P)return"range";if(n instanceof v)return"reset";if(n instanceof p)return"search";if(n instanceof m)return"submit";if(n instanceof D)return"tel";if(n instanceof b)return"text";if(n instanceof g)return"time";if(n instanceof h)return"url";if(n instanceof w)return"week";throw new Error("Failed pattern match at DOM.HTML.Indexed.InputType line 28, column 19 - line 50, column 16: "+[n.constructor.name])}}(PS["DOM.HTML.Indexed.InputType"]=PS["DOM.HTML.Indexed.InputType"]||{}),function(n){"use strict";var e=PS["Control.Category"],t=(PS["Control.Monad.Cont.Trans"],PS["Control.Monad.Except.Trans"],PS["Control.Monad.List.Trans"],PS["Control.Monad.Maybe.Trans"],PS["Control.Monad.RWS.Trans"],PS["Control.Monad.Reader.Trans"],PS["Control.Monad.State.Trans"],PS["Control.Monad.Trans.Class"],PS["Control.Monad.Writer.Trans"],PS["Control.Semigroupoid"],PS["Effect.Aff"]),r=(PS["Effect.Class"],PS.Prelude,function(n,e){this.MonadEffect0=n,this.liftAff=e}),a=new r(function(){return t.monadEffectAff},e.identity(e.categoryFn));n.liftAff=function(n){return n.liftAff},n.MonadAff=r,n.monadAffAff=a}(PS["Effect.Aff.Class"]=PS["Effect.Aff.Class"]||{}),function(n){"use strict";var e=PS["Data.Eq"],t=PS["Data.Ord"],r=(PS.Prelude,function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}()),a=new e.Eq(function(n){return function(e){return n.value0(n.value2)(e.value2)}}),u=new t.Ord(function(){return a},function(n){return function(e){return n.value1(n.value2)(e.value2)}});n.mkOrdBox=function(n){return r.create(e.eq(n.Eq0()))(t.compare(n))},n.unOrdBox=function(n){return n.value2},n.eqOrdBox=a,n.ordOrdBox=u}(PS["Halogen.Data.OrdBox"]=PS["Halogen.Data.OrdBox"]||{}),function(n){"use strict";var e=function(){function n(){}return n.value=new n,n}(),t=function(){function n(){}return n.value=new n,n}();n.On=e,n.Off=t,n.renderOnOff=function(n){if(n instanceof e)return"on";if(n instanceof t)return"off";throw new Error("Failed pattern match at DOM.HTML.Indexed.OnOff line 8, column 15 - line 10, column 10: "+[n.constructor.name])}}(PS["DOM.HTML.Indexed.OnOff"]=PS["DOM.HTML.Indexed.OnOff"]||{}),function(n){"use strict";var e=PS["Data.Bifunctor"],t=(PS["Data.Eq"],PS["Data.Functor"]),r=(PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Ord"],PS.Prelude,PS["Web.DOM"],function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}()),a=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),u=new e.Bifunctor(function(n){return function(e){return function(t){if(t instanceof r)return new r(t.value0,t.value1,n(t.value2));if(t instanceof a)return new a(e(t.value0));throw new Error("Failed pattern match at Halogen.Query.InputF line 21, column 15 - line 23, column 27: "+[t.constructor.name])}}}),o=new t.Functor(e.rmap(u));n.RefUpdate=r,n.Query=a,n.bifunctorInputF=u,n.functorInputF=o}(PS["Halogen.Query.InputF"]=PS["Halogen.Query.InputF"]||{}),function(n){"use strict";PS.Effect,PS["Effect.Uncurried"],PS.Prelude;var e=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}();n.Step=e,n.extract=function(n){return n.value0},n.step=function(n){return n.value1},n.halt=function(n){return n.value2}}(PS["Halogen.VDom.Machine"]=PS["Halogen.VDom.Machine"]||{}),function(n){"use strict";PS["Control.Category"],PS["Control.Semigroupoid"];var e=PS["Data.Bifunctor"],t=(PS["Data.Eq"],PS["Data.Functor"]),r=(PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Tuple"]),a=(PS.Prelude,PS["Unsafe.Coerce"]),u=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),o=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),i=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),l=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),c=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),f=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),s=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),d=function(n){return function(e){return n(e)}},S=a.unsafeCoerce,P=new t.Functor(function(n){return function(e){return new u(e.value0,e.value1,n(e.value2))}}),v=new e.Bifunctor(function(n){return function(e){return d(function(t){return S(new s(function(e){return n(t.value0(e))},function(n){return e(t.value1(n))},t.value2))})}}),p=new e.Bifunctor(function(n){return function(t){return function(r){return r instanceof o?new o(r.value0):new f(r instanceof f?e.bimap(v)(n)(t)(r.value0):S(new s(n,t,r)))}}}),m=d(function(n){var a=function(u){if(u instanceof o)return new o(u.value0);if(u instanceof i)return new i(t.map(P)(n.value0)(u.value0),t.map(t.functorArray)(a)(u.value1));if(u instanceof l)return new l(t.map(P)(n.value0)(u.value0),t.map(t.functorArray)(t.map(r.functorTuple)(a))(u.value1));if(u instanceof c)return new c(n.value1(u.value0));if(u instanceof f)return new f(e.bimap(v)(n.value0)(n.value1)(u.value0));throw new Error("Failed pattern match at Halogen.VDom.Types line 74, column 7 - line 74, column 27: "+[u.constructor.name])};return a(n.value2)});n.Text=o,n.Elem=i,n.Keyed=l,n.Widget=c,n.Grafted=f,n.Graft=s,n.graft=S,n.unGraft=d,n.runGraft=m,n.ElemSpec=u,n.bifunctorVDom=p,n.bifunctorGraft=v,n.functorElemSpec=P}(PS["Halogen.VDom.Types"]=PS["Halogen.VDom.Types"]||{}),function(n){"use strict";n.unsafeGetAny=function(n,e){return e[n]},n.unsafeHasAny=function(n,e){return e.hasOwnProperty(n)},n.unsafeSetAny=function(n,e,t){t[n]=e},n.forE=function(n,e){for(var t=[],r=0;r<n.length;r++)t.push(e(r,n[r]));return t},n.forInE=function(n,e){for(var t=Object.keys(n),r=0;r<t.length;r++){var a=t[r];e(a,n[a])}},n.diffWithIxE=function(n,e,t,r,a){for(var u=[],o=n.length,i=e.length,l=0;;){if(l<o)l<i?u.push(t(l,n[l],e[l])):r(l,n[l]);else{if(!(l<i))break;u.push(a(l,e[l]))}l++}return u},n.strMapWithIxE=function(n,e,t){for(var r={},a=0;a<n.length;a++){var u=n[a],o=e(u);r[o]=t(o,a,u)}return r},n.diffWithKeyAndIxE=function(n,e,t,r,a,u){for(var o={},i=0;i<e.length;i++){var l=e[i],c=t(l);n.hasOwnProperty(c)?o[c]=r(c,i,n[c],l):o[c]=u(c,i,l)}for(var c in n)c in o||a(c,n[c]);return o},n.refEq=function(n,e){return n===e},n.createTextNode=function(n,e){return e.createTextNode(n)},n.setTextContent=function(n,e){e.textContent=n},n.createElement=function(n,e,t){return null!=n?t.createElementNS(n,e):t.createElement(e)},n.insertChildIx=function(n,e,t){var r=t.childNodes.item(n)||null;r!==e&&t.insertBefore(e,r)},n.removeChild=function(n,e){e&&n.parentNode===e&&e.removeChild(n)},n.parentNode=function(n){return n.parentNode},n.setAttribute=function(n,e,t,r){null!=n?r.setAttributeNS(n,e,t):r.setAttribute(e,t)},n.removeAttribute=function(n,e,t){null!=n?t.removeAttributeNS(n,e):t.removeAttribute(e)},n.addEventListener=function(n,e,t){t.addEventListener(n,e,!1)},n.removeEventListener=function(n,e,t){t.removeEventListener(n,e,!1)},n.jsUndefined=void 0}(PS["Halogen.VDom.Util"]=PS["Halogen.VDom.Util"]||{}),function(n){"use strict";var e=function(n){return function(e){return function(){return e[n]}}};n._parentNode=e("parentNode"),n._nextSibling=e("nextSibling"),n.insertBefore=function(n){return function(e){return function(t){return function(){return t.insertBefore(n,e)}}}},n.appendChild=function(n){return function(e){return function(){return e.appendChild(n)}}},n.removeChild=function(n){return function(e){return function(){return e.removeChild(n)}}}}(PS["Web.DOM.Node"]=PS["Web.DOM.Node"]||{}),function(n){"use strict";var e=PS["Web.DOM.Node"],t=(PS["Control.Semigroupoid"],PS["Data.Enum"],PS["Data.Functor"]),r=(PS["Data.Maybe"],PS["Data.Nullable"]),a=PS.Effect;PS.Prelude,PS["Unsafe.Coerce"],PS["Web.DOM.Document"],PS["Web.DOM.Element"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NodeType"],PS["Web.Event.EventTarget"],PS["Web.Internal.FFI"];n.parentNode=function(n){return t.map(a.functorEffect)(r.toMaybe)(e._parentNode(n))},n.nextSibling=function(n){return t.map(a.functorEffect)(r.toMaybe)(e._nextSibling(n))},n.insertBefore=e.insertBefore,n.appendChild=e.appendChild,n.removeChild=e.removeChild}(PS["Web.DOM.Node"]=PS["Web.DOM.Node"]||{}),function(n){"use strict";var e=PS["Halogen.VDom.Util"],t=PS["Control.Applicative"],r=(PS["Data.Function.Uncurried"],PS["Data.Nullable"],PS["Data.Unit"]),a=PS.Effect,u=(PS["Effect.Uncurried"],PS["Foreign.Object"],PS["Foreign.Object.ST"]),o=(PS["Halogen.VDom.Types"],PS.Prelude,PS["Unsafe.Coerce"]),i=(PS["Web.DOM.Document"],PS["Web.DOM.Element"],PS["Web.DOM.Node"],PS["Web.Event.EventTarget"],e.unsafeGetAny),l=o.unsafeCoerce,c=e.unsafeSetAny,f=u.new,s=t.pure(a.applicativeEffect)(r.unit);n.effectUnit=s,n.newMutMap=f,n.pokeMutMap=c,n.unsafeFreeze=l,n.unsafeLookup=i,n.unsafeGetAny=e.unsafeGetAny,n.unsafeHasAny=e.unsafeHasAny,n.unsafeSetAny=e.unsafeSetAny,n.forE=e.forE,n.forInE=e.forInE,n.diffWithIxE=e.diffWithIxE,n.diffWithKeyAndIxE=e.diffWithKeyAndIxE,n.strMapWithIxE=e.strMapWithIxE,n.refEq=e.refEq,n.createTextNode=e.createTextNode,n.setTextContent=e.setTextContent,n.createElement=e.createElement,n.insertChildIx=e.insertChildIx,n.removeChild=e.removeChild,n.parentNode=e.parentNode,n.setAttribute=e.setAttribute,n.removeAttribute=e.removeAttribute,n.addEventListener=e.addEventListener,n.removeEventListener=e.removeEventListener,n.jsUndefined=e.jsUndefined}(PS["Halogen.VDom.Util"]=PS["Halogen.VDom.Util"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Data.Eq"],PS["Data.Function.Uncurried"];var e=PS["Data.Functor"],t=PS["Data.Maybe"],r=PS["Data.Nullable"],a=(PS["Data.Semigroup"],PS["Data.Tuple"]),u=PS["Data.Unit"],o=(PS.Effect,PS["Effect.Ref"]),i=(PS["Effect.Uncurried"],PS.Foreign),l=PS["Foreign.Object"],c=(PS["Halogen.VDom"],PS["Halogen.VDom.Machine"]),f=(PS["Halogen.VDom.Types"],PS["Halogen.VDom.Util"]),s=(PS.Prelude,PS["Unsafe.Coerce"]),d=(PS["Web.DOM.Element"],PS["Web.Event.Event"],PS["Web.Event.EventTarget"]),S=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),P=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),v=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),p=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),m=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),D=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),b=f.unsafeGetAny,g=f.unsafeSetAny,h=function(n){if(n instanceof v&&n.value0 instanceof t.Just)return"attr/"+n.value0.value0+":"+n.value1;if(n instanceof v)return"attr/:"+n.value1;if(n instanceof p)return"prop/"+n.value0;if(n instanceof m)return"handler/"+n.value0;if(n instanceof D)return"ref";throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop line 178, column 16 - line 185, column 1: "+[n.constructor.name])},w=s.unsafeCoerce,y=s.unsafeCoerce,E=s.unsafeCoerce,M=new e.Functor(function(n){return function(r){return r instanceof m?new m(r.value0,e.map(e.functorFn)(e.map(t.functorMaybe)(n))(r.value1)):r instanceof D?new D(e.map(e.functorFn)(e.map(t.functorMaybe)(n))(r.value0)):r}});n.Attribute=v,n.Property=p,n.Handler=m,n.Ref=D,n.Created=S,n.Removed=P,n.propFromString=w,n.propFromBoolean=E,n.propFromInt=y,n.buildProp=function(n){return function(e){var s=function(n){return function(t,o){if(o instanceof v)return f.removeAttribute(r.toNullable(o.value0),o.value1,e);if(o instanceof p)return function(n,e){return"string"===i.typeOf(f.unsafeGetAny(n,e))?f.unsafeSetAny(n,"",e):"rowSpan"===n?f.unsafeSetAny(n,1,e):"colSpan"===n?f.unsafeSetAny(n,1,e):f.unsafeSetAny(n,f.jsUndefined,e)}(o.value0,e);if(o instanceof m){var l=f.unsafeLookup(o.value0,n);return f.removeEventListener(o.value0,a.fst(l),e)}if(o instanceof D)return u.unit;throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop line 165, column 5 - line 175, column 18: "+[o.constructor.name])}},w=function(e){return e instanceof t.Just?n(e.value0)():u.unit},y=function(n){var r=l.lookup("ref")(n);return r instanceof t.Just&&r.value0 instanceof D?function(){return w(r.value0.value0(new P(e)))}:f.effectUnit},E=function(n){return function(t,u,i){if(i instanceof v)return f.setAttribute(r.toNullable(i.value0),i.value1,i.value2,e),i;if(i instanceof p)return g(i.value0,i.value1,e),i;if(i instanceof m){var l=f.unsafeGetAny(i.value0,n);if(f.unsafeHasAny(i.value0,n))return o.write(i.value1)(a.snd(l))(),i;var c=o.new(i.value1)(),s=d.eventListener(function(n){return function(){var e=o.read(c)();return w(e(n))}})();return f.pokeMutMap(i.value0,new a.Tuple(s,c),n),f.addEventListener(i.value0,s,e),i}if(i instanceof D)return w(i.value0(new S(e))),i;throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop line 109, column 5 - line 131, column 15: "+[i.constructor.name])}},M=function(n,t){return function(i){var l=f.newMutMap(),d=s(n),S=function(n,t){return function(u,i,l,c){if(l instanceof v&&c instanceof v)return l.value2===c.value2?c:(f.setAttribute(r.toNullable(c.value0),c.value1,c.value2,e),c);if(l instanceof p&&c instanceof p){if(f.refEq(l.value1,c.value1))return c;if("value"===c.value0){var s=b("value",e);return f.refEq(s,c.value1)?c:(g(c.value0,c.value1,e),c)}return g(c.value0,c.value1,e),c}if(l instanceof m&&c instanceof m){var d=f.unsafeLookup(c.value0,n);return o.write(c.value1)(a.snd(d))(),f.pokeMutMap(c.value0,d,t),c}return c}}(n,l),P=E(l),D=f.diffWithKeyAndIxE(t,i,h,S,d,P);return new c.Step(u.unit,M(f.unsafeFreeze(l),D),y(D))}};return function(n){var e=f.newMutMap(),t=f.strMapWithIxE(n,h,E(e));return new c.Step(u.unit,M(f.unsafeFreeze(e),t),y(t))}}},n.functorProp=M}(PS["Halogen.VDom.DOM.Prop"]=PS["Halogen.VDom.DOM.Prop"]||{}),function(n){"use strict";PS["Control.Semigroupoid"];var e=PS["DOM.HTML.Indexed.ButtonType"],t=(PS["DOM.HTML.Indexed.CrossOriginValue"],PS["DOM.HTML.Indexed.DirValue"],PS["DOM.HTML.Indexed.FormMethod"],PS["DOM.HTML.Indexed.InputType"]),r=(PS["DOM.HTML.Indexed.KindValue"],PS["DOM.HTML.Indexed.MenuType"],PS["DOM.HTML.Indexed.MenuitemType"],PS["DOM.HTML.Indexed.OnOff"]),a=(PS["DOM.HTML.Indexed.OrderedListType"],PS["DOM.HTML.Indexed.PreloadValue"],PS["DOM.HTML.Indexed.ScopeValue"],PS["DOM.HTML.Indexed.StepValue"],PS["DOM.HTML.Indexed.WrapValue"],PS["Data.Bifunctor"]),u=(PS["Data.Eq"],PS["Data.Function"],PS["Data.Functor"]),o=(PS["Data.Maybe"],PS["Data.MediaType"],PS["Data.Newtype"]),i=(PS["Data.Ord"],PS["Data.Semigroup"],PS["Data.Tuple"],PS["Halogen.Query.InputF"]),l=(PS["Halogen.VDom"],PS["Halogen.VDom.DOM.Prop"]),c=PS["Halogen.VDom.Types"],f=(PS.Prelude,PS["Unsafe.Coerce"],PS["Web.DOM.Element"],PS["Web.Event.Event"],function(n){return n}),s=function(n){return n},d=function(n){this.toPropValue=n},S=function(n){return n.toPropValue},P=new d(l.propFromString),v=new d(function(n){return l.propFromString(r.renderOnOff(n))}),p=new o.Newtype(function(n){return n},s),m=new d(l.propFromInt),D=new d(function(n){return l.propFromString(t.renderInputType(n))}),b=l.Handler.create,g=new d(function(n){return l.propFromString(e.renderButtonType(n))}),h=new d(l.propFromBoolean),w=new a.Bifunctor(function(n){return function(e){return function(t){return a.bimap(c.bifunctorVDom)(u.map(u.functorArray)(u.map(l.functorProp)(u.map(i.functorInputF)(e))))(n)(t)}}});n.HTML=f,n.slot=function(n){return f(c.Widget.create(n))},n.text=function(n){return f(c.Text.create(n))},n.element=function(n){return function(e){return function(t){return function(r){return new c.Elem(new c.ElemSpec(n,e,t),r)}}}},n.prop=function(n){return function(e){return function(t){return l.Property.create(e)(S(n)(t))}}},n.attr=function(n){return function(e){return l.Attribute.create(n)(e)}},n.handler=b,n.IsProp=d,n.toPropValue=S,n.ClassName=s,n.bifunctorHTML=w,n.stringIsProp=P,n.intIsProp=m,n.booleanIsProp=h,n.buttonTypeIsProp=g,n.inputTypeIsProp=D,n.onOffIsProp=v,n.newtypeClassName=p}(PS["Halogen.HTML.Core"]=PS["Halogen.HTML.Core"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Category"],a=(PS["Control.Semigroupoid"],PS["Data.Const"],PS["Data.Either"]),u=(PS["Data.Eq"],PS["Data.Function"],PS["Data.Functor"]),o=(PS["Data.List"],PS["Data.List.NonEmpty"]),i=PS["Data.List.Types"],l=(PS["Data.Newtype"],PS["Data.NonEmpty"]),c=(PS["Data.Ring"],PS["Data.Semiring"],PS["Data.Tuple"]),f=(PS.Prelude,PS["Unsafe.Coerce"],function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),s=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),d=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),S=function(n){return function(e){return new d(n,e)}},P=s.create,v=function(n){return function(t){return function(r){return function(a){return function(u){return function(l){var S,P=n,v=t,p=r,m=a,D=u,b=!1;function g(n,t,r,a,u,S){if(u instanceof f)return b=!0,new c.Tuple(new i.Cons({func:e.pure(n)(u.value0),count:S},t),r);if(u instanceof s)return b=!0,new c.Tuple(new i.Cons({func:a(u.value0),count:S},t),r);if(u instanceof d)return P=n,v=t,p=o.cons(u.value1)(r),m=a,D=u.value0,void(l=S+1|0);throw new Error("Failed pattern match at Control.Applicative.Free line 102, column 41 - line 105, column 81: "+[u.constructor.name])}for(;!b;)S=g(P,v,p,m,D,l);return S}}}}}},p=function(n){return function(e){return function(r){return function(u){var o,f=n,s=e,d=r,S=!1;function P(n,e,r,o){if(e instanceof i.Nil)return S=!0,new a.Left(o);if(e instanceof i.Cons){var P=t.apply(n.Apply0())(e.value0.func)(o);if(1===e.value0.count)return e.value1 instanceof i.Nil?(S=!0,new a.Left(P)):(f=n,s=e.value1,d=r,void(u=P));if(r instanceof i.Nil)return S=!0,new a.Left(P);if(r instanceof i.Cons)return S=!0,a.Right.create(new c.Tuple(new i.Cons({func:P,count:e.value0.count-1|0},e.value1),new l.NonEmpty(r.value0,r.value1)));throw new Error("Failed pattern match at Control.Applicative.Free line 83, column 11 - line 88, column 50: "+[r.constructor.name])}throw new Error("Failed pattern match at Control.Applicative.Free line 72, column 3 - line 88, column 50: "+[e.constructor.name])}for(;!S;)o=P(f,s,d,u);return o}}}},m=new u.Functor(function(n){return function(e){return S(new f(n))(e)}}),D=function(n){return function(t){return function(r){return function(r){var u,o=!1;function i(u){if(u.value1.value0 instanceof f){if((i=p(n)(u.value0)(u.value1.value1)(e.pure(n)(u.value1.value0.value0)))instanceof a.Left)return o=!0,i.value0;if(i instanceof a.Right)return void(r=i.value0);throw new Error("Failed pattern match at Control.Applicative.Free line 54, column 17 - line 56, column 24: "+[i.constructor.name])}if(u.value1.value0 instanceof s){var i;if((i=p(n)(u.value0)(u.value1.value1)(t(u.value1.value0.value0)))instanceof a.Left)return o=!0,i.value0;if(i instanceof a.Right)return void(r=i.value0);throw new Error("Failed pattern match at Control.Applicative.Free line 57, column 17 - line 59, column 24: "+[i.constructor.name])}if(!(u.value1.value0 instanceof d))throw new Error("Failed pattern match at Control.Applicative.Free line 53, column 5 - line 64, column 1: "+[u.value1.value0.constructor.name]);var c=new l.NonEmpty(u.value1.value0.value1,u.value1.value1);r=v(n)(u.value0)(c)(t)(u.value1.value0.value0)(1)}for(;!o;)u=i(r);return u}(new c.Tuple(i.Nil.value,o.singleton(r)))}}},b=new t.Apply(function(){return m},function(n){return function(e){return S(n)(e)}}),g=new e.Applicative(function(){return b},f.create);n.liftFreeAp=P,n.retractFreeAp=function(n){return D(n)(r.identity(r.categoryFn))},n.foldFreeAp=D,n.hoistFreeAp=function(n){return D(g)(function(e){return P(n(e))})},n.functorFreeAp=m,n.applyFreeAp=b,n.applicativeFreeAp=g}(PS["Control.Applicative.Free"]=PS["Control.Applicative.Free"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Monad"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"];var e=PS["Data.List"],t=PS["Data.List.Types"],r=PS["Data.Maybe"],a=(PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.Tuple"]),u=(PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS.Prelude,function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),o=new u(t.Nil.value,t.Nil.value);n.CatQueue=u,n.empty=o,n.null=function(n){return n.value0 instanceof t.Nil&&n.value1 instanceof t.Nil},n.snoc=function(n){return function(e){return new u(n.value0,new t.Cons(e,n.value1))}},n.uncons=function(n){var o,i=!1;function l(o){if(o.value0 instanceof t.Nil&&o.value1 instanceof t.Nil)return i=!0,r.Nothing.value;if(!(o.value0 instanceof t.Nil)){if(o.value0 instanceof t.Cons)return i=!0,new r.Just(new a.Tuple(o.value0.value0,new u(o.value0.value1,o.value1)));throw new Error("Failed pattern match at Data.CatQueue line 83, column 1 - line 83, column 63: "+[o.constructor.name])}n=new u(e.reverse(o.value1),t.Nil.value)}for(;!i;)o=l(n);return o}}(PS["Data.CatQueue"]=PS["Data.CatQueue"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Monad"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"];var e=PS["Data.CatQueue"],t=(PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"],PS["Data.List"],PS["Data.List.Types"]),r=PS["Data.Maybe"],a=(PS["Data.Monoid"],PS["Data.Semigroup"]),u=(PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.Tuple"]),o=(PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),i=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),l=function(n){return function(t){if(n instanceof o)return t;if(n instanceof i)return new i(n.value0,e.snoc(n.value1)(t));throw new Error("Failed pattern match at Data.CatList line 111, column 1 - line 111, column 54: "+[n.constructor.name,t.constructor.name])}},c=o.value,f=function(n){return function(e){return e instanceof o?n:n instanceof o?e:l(n)(e)}},s=new a.Semigroup(f);n.CatNil=o,n.CatCons=i,n.empty=c,n.append=f,n.snoc=function(n){return function(t){return f(n)(new i(t,e.empty))}},n.uncons=function(n){if(n instanceof o)return r.Nothing.value;if(n instanceof i)return new r.Just(new u.Tuple(n.value0,e.null(n.value1)?o.value:(a=l,function(n){return function(u){var o,i=function(n){return function(e){return function(r){var a,u=n,o=e,i=!1;function l(n,e,a){if(a instanceof t.Nil)return i=!0,e;if(a instanceof t.Cons)return u=n,o=n(e)(a.value0),void(r=a.value1);throw new Error("Failed pattern match at Data.CatList line 126, column 3 - line 126, column 59: "+[n.constructor.name,e.constructor.name,a.constructor.name])}for(;!i;)a=l(u,o,r);return a}}};return(o=u,function(u){var l,c=o,f=!1;function s(o,l){var s=e.uncons(o);if(s instanceof r.Nothing)return f=!0,i(function(n){return function(e){return e(n)}})(n)(l);if(s instanceof r.Just)return c=s.value0.value1,void(u=new t.Cons(a(s.value0.value0),l));throw new Error("Failed pattern match at Data.CatList line 122, column 14 - line 124, column 67: "+[s.constructor.name])}for(;!f;)l=s(c,u);return l})(t.Nil.value)}})(o.value)(n.value1)));var a;throw new Error("Failed pattern match at Data.CatList line 102, column 1 - line 102, column 61: "+[n.constructor.name])},n.semigroupCatList=s}(PS["Data.CatList"]=PS["Data.CatList"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=(PS["Control.Category"],PS["Control.Monad"]),u=PS["Control.Monad.Rec.Class"],o=(PS["Control.Monad.Trans.Class"],PS["Control.Semigroupoid"],PS["Data.CatList"]),i=(PS["Data.Either"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"]),l=PS["Data.Maybe"],c=(PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"]),f=(PS["Data.Traversable"],PS["Data.Tuple"],PS.Prelude,PS["Unsafe.Coerce"],function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),s=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),d=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),S=function(n){return new f(n,o.empty)},P=new a.Monad(function(){return D},function(){return p}),v=new i.Functor(function(n){return function(t){return r.bindFlipped(p)(function(t){return e.pure(D)(n(t))})(t)}}),p=new r.Bind(function(){return m},function(n){return function(e){return new f(n.value0,o.snoc(n.value1)(e))}}),m=new t.Apply(function(){return v},a.ap(P)),D=new e.Applicative(function(){return m},function(n){return S(s.create(n))});n.liftF=function(n){return S(new d(n,function(n){return e.pure(D)(n)}))},n.foldFree=function(n){return function(t){return u.tailRecM(n)(function(r){var a=function(n){var e,t=!1;function r(e){var r=function(n){return function(e){return new f(n.value0,c.append(o.semigroupCatList)(n.value1)(e))}};if(e.value0 instanceof s){var a=o.uncons(e.value1);if(a instanceof l.Nothing)return t=!0,new s(e.value0.value0);if(a instanceof l.Just)return void(n=r(function(n){return n}(a.value0.value0)(e.value0.value0))(a.value0.value1));throw new Error("Failed pattern match at Control.Monad.Free line 220, column 7 - line 224, column 64: "+[a.constructor.name])}if(e.value0 instanceof d)return t=!0,new d(e.value0.value0,function(n){return r(e.value0.value1(n))(e.value1)});throw new Error("Failed pattern match at Control.Monad.Free line 218, column 3 - line 226, column 56: "+[e.value0.constructor.name])}for(;!t;)e=r(n);return e}(r);if(a instanceof s)return i.map(n.Monad0().Bind1().Apply0().Functor0())(u.Done.create)(e.pure(n.Monad0().Applicative0())(a.value0));if(a instanceof d)return i.map(n.Monad0().Bind1().Apply0().Functor0())(function(n){return u.Loop.create(a.value1(n))})(t(a.value0));throw new Error("Failed pattern match at Control.Monad.Free line 151, column 10 - line 153, column 37: "+[a.constructor.name])})}},n.freeFunctor=v,n.freeBind=p,n.freeApplicative=D,n.freeApply=m,n.freeMonad=P}(PS["Control.Monad.Free"]=PS["Control.Monad.Free"]||{}),function(n){"use strict";var e=PS["Unsafe.Coerce"],t=e.unsafeCoerce,r=e.unsafeCoerce;n.mkExists=r,n.runExists=t}(PS["Data.Exists"]=PS["Data.Exists"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Category"],PS["Control.Comonad"],PS["Control.Extend"],PS["Control.Monad"],PS["Control.Monad.Trans.Class"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Distributive"],PS["Data.Eq"];var e=PS["Data.Exists"];PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"],PS["Data.Functor.Invariant"],PS["Data.Ord"],PS["Data.Semigroup.Foldable"],PS["Data.Semigroup.Traversable"],PS["Data.Traversable"],PS.Prelude;n.unCoyoneda=function(n){return function(t){return e.runExists(function(e){return n(e.value0)(e.value1)})(t)}}}(PS["Data.Coyoneda"]=PS["Data.Coyoneda"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=(PS["Control.Category"],PS["Control.Monad"]),u=(PS["Control.Monad.Error.Class"],PS["Control.Monad.Reader.Class"],PS["Control.Monad.Rec.Class"]),o=(PS["Control.Monad.State.Class"],PS["Control.Monad.Trans.Class"]),i=(PS["Control.Monad.Writer.Class"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"]),l=PS["Data.Either"],c=PS["Data.Exists"],f=PS["Data.Functor"],s=(PS["Data.Monoid"],PS["Data.Semigroup"],PS["Data.Unit"]),d=(PS["Effect.Class"],PS.Prelude,function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),S=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),P=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),v=S.create,p=function(n){return function(e){return new P(c.mkExists(new d(n,e)))}},m=function(n){return function(e){return new f.Functor(function(t){return function(r){if(r instanceof S)return new S(function(a){return f.map(e)(i.bimap(l.bifunctorEither)(t)(f.map(n)(f.map(m(n)(e))(t))))(r.value0(s.unit))});if(r instanceof P)return c.runExists(function(r){return p(r.value0)(function(a){return f.map(m(n)(e))(t)(r.value1(a))})})(r.value0);throw new Error("Failed pattern match at Control.Monad.Free.Trans line 57, column 1 - line 57, column 71: "+[t.constructor.name,r.constructor.name])}})}},D=function(n){return function(e){return new a.Monad(function(){return h(n)(e)},function(){return b(n)(e)})}},b=function(n){return function(e){return new r.Bind(function(){return g(n)(e)},function(n){return function(e){return n instanceof P?c.runExists(function(n){return p(n.value0)(function(t){return p(function(e){return n.value1(t)})(e)})})(n.value0):p(function(e){return n})(e)}})}},g=function(n){return function(e){return new t.Apply(function(){return m(n)(e.Bind1().Apply0().Functor0())},a.ap(D(n)(e)))}},h=function(n){return function(t){return new e.Applicative(function(){return g(n)(t)},function(n){return new S(function(r){return e.pure(t.Applicative0())(new l.Left(n))})})}},w=function(n){return function(t){return u.tailRecM(t)(function(a){if(a instanceof S)return f.map(t.Monad0().Bind1().Apply0().Functor0())(u.Done.create)(a.value0(s.unit));if(a instanceof P)return c.runExists(function(a){var o=a.value0(s.unit);if(o instanceof S)return r.bind(t.Monad0().Bind1())(o.value0(s.unit))(function(o){if(o instanceof l.Left)return e.pure(t.Monad0().Applicative0())(new u.Loop(a.value1(o.value0)));if(o instanceof l.Right)return e.pure(t.Monad0().Applicative0())(new u.Done(new l.Right(f.map(n)(function(e){return r.bind(b(n)(t.Monad0()))(e)(a.value1)})(o.value0))));throw new Error("Failed pattern match at Control.Monad.Free.Trans line 52, column 20 - line 54, column 67: "+[o.constructor.name])});if(o instanceof P)return c.runExists(function(o){return e.pure(t.Monad0().Applicative0())(new u.Loop(r.bind(b(n)(t.Monad0()))(o.value0(s.unit))(function(e){return r.bind(b(n)(t.Monad0()))(o.value1(e))(a.value1)})))})(o.value0);throw new Error("Failed pattern match at Control.Monad.Free.Trans line 50, column 5 - line 55, column 98: "+[o.constructor.name])})(a.value0);throw new Error("Failed pattern match at Control.Monad.Free.Trans line 47, column 3 - line 47, column 75: "+[a.constructor.name])})}};n.freeT=v,n.liftFreeT=function(n){return function(t){return function(r){return new S(function(a){return e.pure(t.Applicative0())(new l.Right(f.map(n)(e.pure(h(n)(t)))(r)))})}}},n.resume=w,n.runFreeT=function(n){return function(t){return function(a){return u.tailRecM(t)(r.composeKleisliFlipped(t.Monad0().Bind1())(function(n){if(n instanceof l.Left)return e.pure(t.Monad0().Applicative0())(new u.Done(n.value0));if(n instanceof l.Right)return f.map(t.Monad0().Bind1().Apply0().Functor0())(u.Loop.create)(a(n.value0));throw new Error("Failed pattern match at Control.Monad.Free.Trans line 126, column 3 - line 126, column 63: "+[n.constructor.name])})(w(n)(t)))}}},n.functorFreeT=m,n.applyFreeT=g,n.applicativeFreeT=h,n.bindFreeT=b,n.monadFreeT=D,n.monadTransFreeT=function(n){return new o.MonadTrans(function(n){return function(e){return new S(function(t){return f.map(n.Bind1().Apply0().Functor0())(l.Left.create)(e)})}})},n.monadRecFreeT=function(n){return function(t){return new u.MonadRec(function(){return D(n)(t)},function(a){var o=function(i){return r.bind(b(n)(t))(a(i))(function(r){if(r instanceof u.Loop)return o(r.value0);if(r instanceof u.Done)return e.pure(h(n)(t))(r.value0);throw new Error("Failed pattern match at Control.Monad.Free.Trans line 80, column 15 - line 82, column 25: "+[r.constructor.name])})};return o})}}}(PS["Control.Monad.Free.Trans"]=PS["Control.Monad.Free.Trans"]||{}),function(n){"use strict";var e=PS["Control.Category"],t=(PS["Control.Semigroupoid"],PS["Data.Newtype"],PS.Prelude,function(n){this.dimap=n}),r=new t(function(n){return function(e){return function(t){return function(r){return e(t(n(r)))}}}}),a=function(n){return n.dimap};n.dimap=a,n.Profunctor=t,n.rmap=function(n){return function(t){return a(n)(e.identity(e.categoryFn))(t)}},n.profunctorFn=r}(PS["Data.Profunctor"]=PS["Data.Profunctor"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=PS["Control.Category"],u=(PS["Control.Monad.Except"],PS["Control.Monad.Except.Trans"]),o=PS["Control.Monad.Free.Trans"],i=PS["Control.Monad.Rec.Class"],l=PS["Control.Monad.Trans.Class"],c=(PS["Control.Parallel"],PS["Control.Parallel.Class"]),f=(PS["Control.Semigroupoid"],PS["Data.Bifunctor"]),s=PS["Data.Either"],d=(PS["Data.Function"],PS["Data.Functor"]),S=PS["Data.Identity"],P=PS["Data.Maybe"],v=PS["Data.Newtype"],p=PS["Data.Profunctor"],m=PS["Data.Tuple"],D=PS["Data.Unit"],b=(PS.Prelude,function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),g=new p.Profunctor(function(n){return function(e){return function(t){return p.dimap(p.profunctorFn)(n)(e)(t)}}}),h=function(n){return function(e){return function(t){return i.tailRecM(o.monadRecFreeT(n)(e))(function(r){return d.map(o.functorFreeT(n)(e.Bind1().Apply0().Functor0()))(P.maybe(new i.Loop(D.unit))(i.Done.create))(t)})(D.unit)}}},w=function(n){return function(t){return function(a){return function(i){return function(l){return function(c){return function(f){var s=function(c){return u.runExceptT(r.bind(u.bindExceptT(i.Monad0()))(u.ExceptT(o.resume(n)(i)(c.value0)))(function(n){return r.bind(u.bindExceptT(i.Monad0()))(u.ExceptT(o.resume(t)(i)(c.value1)))(function(t){return e.pure(u.applicativeExceptT(i.Monad0()))(d.map(a)(function(n){return o.freeT(function(e){return s(n)})})(l(m.Tuple.create)(n)(t)))})}))};return o.freeT(function(n){return s(new m.Tuple(c,f))})}}}}}}},y=function(n){return function(a){return function(u){return function(i){return function(l){return function(f){return function(S){return function(P){var v=function(S){return r.bind(i.Monad0().Bind1())(c.sequential(l)(t.apply(l.Applicative1().Apply0())(d.map(l.Applicative1().Apply0().Functor0())(t.lift2(s.applyEither)(f(m.Tuple.create)))(c.parallel(l)(o.resume(n)(i)(S.value0))))(c.parallel(l)(o.resume(a)(i)(S.value1)))))(function(n){if(n instanceof s.Left)return e.pure(i.Monad0().Applicative0())(new s.Left(n.value0));if(n instanceof s.Right)return e.pure(i.Monad0().Applicative0())(new s.Right(d.map(u)(function(n){return o.freeT(function(e){return v(n)})})(n.value0)));throw new Error("Failed pattern match at Control.Coroutine line 79, column 5 - line 81, column 63: "+[n.constructor.name])})};return o.freeT(function(n){return v(new m.Tuple(S,P))})}}}}}}}},E=new d.Functor(p.rmap(g)),M=new f.Bifunctor(function(n){return function(e){return function(t){return new b(n(t.value0),e(t.value1))}}}),C=new d.Functor(f.rmap(M)),T=function(n){return function(e){return o.liftFreeT(C)(n)(new b(e,D.unit))}};n.loop=h,n.runProcess=function(n){return o.runFreeT(S.functorIdentity)(n)(function(t){return e.pure(n.Monad0().Applicative0())(v.unwrap(S.newtypeIdentity)(t))})},n.fuseWith=y,n.fuseWithL=w,n.Emit=b,n.emit=T,n.producer=function(n){return function(t){return h(C)(n)(r.bind(o.bindFreeT(C)(n))(l.lift(o.monadTransFreeT(C))(n)(t))(function(t){if(t instanceof s.Left)return d.voidLeft(o.functorFreeT(C)(n.Bind1().Apply0().Functor0()))(T(n)(t.value0))(P.Nothing.value);if(t instanceof s.Right)return e.pure(o.applicativeFreeT(C)(n))(new P.Just(t.value0));throw new Error("Failed pattern match at Control.Coroutine line 125, column 3 - line 127, column 29: "+[t.constructor.name])}))}},n.await=function(n){return o.liftFreeT(E)(n)(a.identity(a.categoryFn))},n.connect=function(n){return function(e){return y(C)(E)(S.functorIdentity)(n)(e)(function(n){return function(e){return function(t){return n(e.value1)(t(e.value0))}}})}},n.pullFrom=function(n){return w(E)(C)(S.functorIdentity)(n)(function(n){return function(t){return function(r){return e.pure(S.applicativeIdentity)(n(t(r.value0))(r.value1))}}})},n.bifunctorEmit=M,n.functorEmit=C,n.profunctorAwait=g,n.functorAwait=E}(PS["Control.Coroutine"]=PS["Control.Coroutine"]||{}),function(n){"use strict";var e=function(){function n(){this.head=null,this.last=null,this.size=0}function e(n,e){this.queue=n,this.value=e,this.next=null,this.prev=null}function t(e){this.draining=!1,this.error=null,this.value=e,this.takes=new n,this.reads=new n,this.puts=new n}var r={};function a(n){try{n()}catch(n){setTimeout(function(){throw n},0)}}function u(n){var e;switch(n.size){case 0:return null;case 1:e=n.head,n.head=null;break;case 2:e=n.last,n.head.next=null,n.last=null;break;default:e=n.last,n.last=e.prev,n.last.next=null}return e.prev=null,e.queue=null,n.size--,e.value}function o(n){var e;switch(n.size){case 0:return null;case 1:e=n.head,n.head=null;break;case 2:e=n.head,n.last.prev=null,n.head=n.last,n.last=null;break;default:e=n.head,n.head=e.next,n.head.prev=null}return e.next=null,e.queue=null,n.size--,e.value}return t.EMPTY=r,t.putLast=function(n,t){var r=new e(n,t);switch(n.size){case 0:n.head=r;break;case 1:r.prev=n.head,n.head.next=r,n.last=r;break;default:r.prev=n.last,n.last.next=r,n.last=r}return n.size++,r},t.takeLast=u,t.takeHead=o,t.deleteCell=function(n){null!==n.queue&&(n.queue.last!==n?n.queue.head!==n?(n.prev&&(n.prev.next=n.next),n.next&&(n.next.prev=n.prev),n.queue.size--,n.queue=null,n.value=null,n.next=null,n.prev=null):o(n.queue):u(n.queue))},t.drainVar=function(n,e){if(!e.draining){var t,u,i,l,c,f=e.puts,s=e.takes,d=e.reads;for(e.draining=!0;;){if(t=null,u=null,i=null,l=e.value,c=d.size,null!==e.error){for(l=n.left(e.error);t=o(f);)a(t.cb(l));for(;u=o(d);)a(u(l));for(;i=o(s);)a(i(l));break}if(l===r&&(t=o(f))&&(e.value=l=t.value),l!==r){for(i=o(s);c--&&(u=o(d));)a(u(n.right(l)));null!==i&&(e.value=r,a(i(n.right(l))))}if(null!==t&&a(t.cb(n.right(void 0))),e.value===r&&0===f.size||e.value!==r&&0===s.size)break}e.draining=!1}},t}();n.empty=function(){return new e(e.EMPTY)},n._killVar=function(n,t,r){return function(){null===r.error&&(r.error=t,r.value=e.EMPTY,e.drainVar(n,r))}},n._putVar=function(n,t,r,a){return function(){var u=e.putLast(r.puts,{cb:a,value:t});return e.drainVar(n,r),function(){e.deleteCell(u)}}},n._takeVar=function(n,t,r){return function(){var a=e.putLast(t.takes,r);return e.drainVar(n,t),function(){e.deleteCell(a)}}}}(PS["Effect.AVar"]=PS["Effect.AVar"]||{}),function(n){"use strict";var e=PS["Effect.AVar"],t=PS["Data.Either"],r=(PS["Data.Function.Uncurried"],PS["Data.Maybe"]),a=(PS.Effect,PS["Effect.Exception"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),u=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),o=function(){function n(){}return n.value=new n,n}(),i={left:t.Left.create,right:t.Right.create,nothing:r.Nothing.value,just:r.Just.create,killed:a.create,filled:u.create,empty:o.value};n.Killed=a,n.Filled=u,n.Empty=o,n.take=function(n){return function(t){return e._takeVar(i,n,t)}},n.put=function(n){return function(t){return function(r){return e._putVar(i,n,t,r)}}},n.kill=function(n){return function(t){return e._killVar(i,n,t)}},n.empty=e.empty}(PS["Effect.AVar"]=PS["Effect.AVar"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Semigroupoid"],PS["Data.Maybe"],PS.Effect;var e=PS["Effect.AVar"],t=PS["Effect.Aff"],r=PS["Effect.Class"],a=(PS["Effect.Exception"],PS.Prelude,r.liftEffect(t.monadEffectAff)(e.empty));n.empty=a,n.take=function(n){return t.makeAff(function(r){return function(){var a=e.take(n)(r)();return t.effectCanceler(a)}})},n.put=function(n){return function(r){return t.makeAff(function(a){return function(){var u=e.put(n)(r)(a)();return t.effectCanceler(u)}})}},n.kill=function(n){return function(a){return r.liftEffect(t.monadEffectAff)(e.kill(n)(a))}}}(PS["Effect.Aff.AVar"]=PS["Effect.Aff.AVar"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Coroutine"],PS["Control.Monad.Free.Trans"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.Trans.Class"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Either"];var e=PS["Data.Eq"],t=(PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Unit"],PS.Effect,PS["Effect.Aff"],PS["Effect.Aff.AVar"],PS["Effect.Aff.Class"],PS["Effect.Class"],PS["Effect.Exception"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),r=function(){function n(){}return n.value=new n,n}(),a=new e.Eq(function(n){return function(e){return n instanceof t&&e instanceof t||n instanceof r&&e instanceof r}});n.Listening=t,n.Done=r,n.unEventSource=function(n){return n},n.eqSubscribeStatus=a}(PS["Halogen.Query.EventSource"]=PS["Halogen.Query.EventSource"]||{}),function(n){"use strict";PS["Control.Category"],PS["Data.Function"],PS["Data.Functor"],PS["Effect.Aff"],PS["Effect.Exception"],PS.Prelude;var e=PS["Unsafe.Coerce"].unsafeCoerce;n.unFork=e}(PS["Halogen.Query.ForkF"]=PS["Halogen.Query.ForkF"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=(PS["Control.Applicative.Free"],PS["Control.Apply"]),r=PS["Control.Bind"],a=(PS["Control.Category"],PS["Control.Monad"]),u=PS["Control.Monad.Free"],o=(PS["Control.Monad.Reader.Class"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.State.Class"]),i=(PS["Control.Monad.Trans.Class"],PS["Control.Monad.Writer.Class"],PS["Control.Parallel.Class"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Coyoneda"],PS["Data.Function"],PS["Data.Functor"]),l=(PS["Data.List"],PS["Data.List.Types"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Tuple"],PS["Data.Unit"]),c=PS["Effect.Aff.Class"],f=PS["Effect.Class"],s=(PS["Effect.Exception"],PS["Halogen.Query.EventSource"],PS["Halogen.Query.ForkF"],PS["Halogen.Query.InputF"],PS.Prelude,PS["Web.DOM"],function(n){return n}),d=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),S=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),P=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),v=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),p=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),m=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),D=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),b=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),g=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),h=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),w=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),y=new i.Functor(function(n){return function(e){return i.map(u.freeFunctor)(n)(e)}}),E=new t.Apply(function(){return y},function(n){return function(e){return t.apply(u.freeApply)(n)(e)}}),M=new r.Bind(function(){return E},function(n){return function(e){return r.bind(u.freeBind)(n)(function(n){return e(n)})}}),C=new e.Applicative(function(){return E},function(n){return e.pure(u.freeApplicative)(n)}),T=new a.Monad(function(){return C},function(){return M}),A=function(n){return new f.MonadEffect(function(){return T},function(e){return s(u.liftF(P.create(f.liftEffect(n)(e))))})},F=new o.MonadState(function(){return T},function(n){return s(u.liftF(d.create(n)))});n.State=d,n.Subscribe=S,n.Lift=P,n.Halt=v,n.GetSlots=p,n.CheckSlot=m,n.ChildQuery=D,n.Raise=b,n.Par=g,n.Fork=h,n.GetRef=w,n.HalogenM=s,n.raise=function(n){return s(u.liftF(new b(n,l.unit)))},n.functorHalogenM=y,n.applyHalogenM=E,n.applicativeHalogenM=C,n.bindHalogenM=M,n.monadHalogenM=T,n.monadEffectHalogenM=A,n.monadAffHalogenM=function(n){return new c.MonadAff(function(){return A(n.MonadEffect0())},function(e){return s(u.liftF(P.create(c.liftAff(n)(e))))})},n.monadStateHalogenM=F}(PS["Halogen.Query.HalogenM"]=PS["Halogen.Query.HalogenM"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Const"],PS["Data.Functor"];var e=PS["Data.Maybe"],t=PS["Data.Ord"],r=PS["Halogen.Data.OrdBox"],a=(PS["Halogen.HTML.Core"],PS["Halogen.Query.HalogenM"],PS.Prelude,PS["Unsafe.Coerce"]),u=function(){function n(n,e,t,r,a,u){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=u}return n.create=function(e){return function(t){return function(r){return function(a){return function(u){return function(o){return new n(e,t,r,a,u,o)}}}}}},n}(),o=a.unsafeCoerce,i=u.create,l=a.unsafeCoerce,c=function(n){return function(n){return l({initialState:n.initialState,render:n.render,eval:n.eval,receiver:n.receiver,initializer:n.initializer,finalizer:n.finalizer,mkOrdBox:r.mkOrdBox(t.ordVoid)})}};n.mkComponent=l,n.unComponent=o,n.component=function(n){return function(n){return c()({initialState:n.initialState,render:n.render,eval:n.eval,receiver:n.receiver,initializer:e.Nothing.value,finalizer:e.Nothing.value})}},n.lifecycleComponent=c,n.parentComponent=function(n){return function(t){return l({initialState:t.initialState,render:t.render,eval:t.eval,receiver:t.receiver,initializer:e.Nothing.value,finalizer:e.Nothing.value,mkOrdBox:r.mkOrdBox(n)})}},n.mkComponentSlot=i,n.unComponentSlot=function(n){return function(e){return n(e.value0)(e.value1)(e.value2)(e.value3)(e.value4)(e.value5)}}}(PS["Halogen.Component"]=PS["Halogen.Component"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed"],PS["DOM.HTML.Indexed.ButtonType"],PS["DOM.HTML.Indexed.FormMethod"],PS["DOM.HTML.Indexed.InputType"],PS["DOM.HTML.Indexed.MenuType"],PS["DOM.HTML.Indexed.MenuitemType"];var e=PS["DOM.HTML.Indexed.OnOff"],t=(PS["DOM.HTML.Indexed.OrderedListType"],PS["DOM.HTML.Indexed.PreloadValue"],PS["DOM.HTML.Indexed.StepValue"],PS["Data.Function"],PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),r=(PS["Data.MediaType"],PS["Data.Newtype"]),a=(PS["Data.String"],PS["Data.String.Common"],PS["Data.Unit"],PS["Halogen.HTML.Core"]),u=(PS["Halogen.Query.InputF"],PS["Halogen.VDom.DOM.Prop"],PS.Prelude,PS["Unsafe.Coerce"],PS["Web.DOM.Element"],function(n){return a.prop(n)}),o=u(a.booleanIsProp)("required"),i=u(a.intIsProp)("rows"),l=u(a.stringIsProp)("target"),c=u(a.stringIsProp)("title"),f=u(a.stringIsProp)("value"),s=u(a.stringIsProp)("name"),d=u(a.stringIsProp)("id"),S=u(a.stringIsProp)("href"),P=u(a.stringIsProp)("htmlFor"),v=u(a.booleanIsProp)("checked"),p=u(a.booleanIsProp)("autofocus"),m=a.attr(t.Nothing.value);n.prop=u,n.attr=m,n.class_=function(n){return u(a.stringIsProp)("className")(r.unwrap(a.newtypeClassName)(n))},n.rows=i,n.for=P,n.href=S,n.id_=d,n.name=s,n.target=l,n.title=c,n.type_=function(n){return u(n)("type")},n.value=f,n.required=o,n.checked=v,n.autocomplete=function(n){return u(a.onOffIsProp)("autocomplete")(n?e.On.value:e.Off.value)},n.autofocus=p}(PS["Halogen.HTML.Properties"]=PS["Halogen.HTML.Properties"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed"],PS["Data.Function"];var e=PS["Data.Maybe"],t=(PS["Data.Tuple"],PS["Halogen.HTML.Core"]),r=(PS["Halogen.HTML.Properties"],PS["Halogen.Query.InputF"],PS["Halogen.VDom"],PS["Halogen.VDom.Types"],PS.Prelude,PS["Unsafe.Coerce"],t.element(e.Nothing.value)),a=r("form"),u=r("label"),o=r("p"),i=o([]),l=r("span"),c=r("table"),f=r("tbody"),s=f([]),d=r("td"),S=d([]),P=r("tr"),v=P([]),p=r("div"),m=p([]),D=r("button"),b=function(n){return r("br")(n)([])},g=b([]),h=r("a");n.element=r,n.a=h,n.br=b,n.br_=g,n.button=D,n.div=p,n.div_=m,n.form=a,n.input=function(n){return r("input")(n)([])},n.label=u,n.p=o,n.p_=i,n.span=l,n.table=c,n.tbody=f,n.tbody_=s,n.td=d,n.td_=S,n.textarea=function(n){return r("textarea")(n)([])},n.tr=P,n.tr_=v}(PS["Halogen.HTML.Elements"]=PS["Halogen.HTML.Elements"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Functor"];var e=PS["Data.Maybe"],t=PS["Halogen.Component"],r=(PS["Halogen.Component.ChildPath"],PS["Halogen.HTML.Core"]);PS["Halogen.HTML.Elements"],PS["Halogen.HTML.Properties"],PS.Prelude,PS["Unsafe.Coerce"];n.slot=function(n){return function(a){return function(u){return function(o){var i=t.unComponent(function(n){return n.receiver})(a);return r.slot(t.mkComponentSlot(n)(a)(u)(i)(o)(e.Just.create))}}}}}(PS["Halogen.HTML"]=PS["Halogen.HTML"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=(PS["Control.Apply"],PS["Control.Category"],PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Foldable"]),r=(PS["Data.FoldableWithIndex"],PS["Data.Function"],PS["Data.Functor"]),a=(PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.List"],PS["Data.List.Lazy"],PS["Data.List.Lazy.Types"],PS["Data.List.Types"]),u=PS["Data.Maybe"],o=(PS["Data.Monoid"],PS["Data.Ord"]),i=PS["Data.Ordering"],l=PS["Data.Semigroup"],c=(PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Tuple"]),f=(PS["Data.Unfoldable"],PS["Partial.Unsafe"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),s=function(){function n(n,e,t,r){this.value0=n,this.value1=e,this.value2=t,this.value3=r}return n.create=function(e){return function(t){return function(r){return function(a){return new n(e,t,r,a)}}}},n}(),d=function(){function n(n,e,t,r,a,u,o){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=u,this.value6=o}return n.create=function(e){return function(t){return function(r){return function(a){return function(u){return function(o){return function(i){return new n(e,t,r,a,u,o,i)}}}}}}},n}(),S=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),P=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),v=function(){function n(n,e,t,r,a,u){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=u}return n.create=function(e){return function(t){return function(r){return function(a){return function(u){return function(o){return new n(e,t,r,a,u,o)}}}}}},n}(),p=function(){function n(n,e,t,r,a,u){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=u}return n.create=function(e){return function(t){return function(r){return function(a){return function(u){return function(o){return new n(e,t,r,a,u,o)}}}}}},n}(),m=function(){function n(n,e,t,r,a,u){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=u}return n.create=function(e){return function(t){return function(r){return function(a){return function(u){return function(o){return new n(e,t,r,a,u,o)}}}}}},n}(),D=function(){function n(n,e,t,r){this.value0=n,this.value1=e,this.value2=t,this.value3=r}return n.create=function(e){return function(t){return function(r){return function(a){return new n(e,t,r,a)}}}},n}(),b=function(n){if(n instanceof f)return a.Nil.value;if(n instanceof s)return l.append(a.semigroupList)(b(n.value0))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value2))(b(n.value3)));if(n instanceof d)return l.append(a.semigroupList)(b(n.value0))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value2))(l.append(a.semigroupList)(b(n.value3))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value5))(b(n.value6)))));throw new Error("Failed pattern match at Data.Map.Internal line 594, column 1 - line 594, column 40: "+[n.constructor.name])},g=function(n){return function(e){var t=o.compare(n);return function(n){var r,a=!1;function o(r){if(r instanceof f)return a=!0,u.Nothing.value;if(r instanceof s){var o=t(e)(r.value1);return o instanceof i.EQ?(a=!0,new u.Just(r.value2)):o instanceof i.LT?void(n=r.value0):void(n=r.value3)}if(r instanceof d){var l=t(e)(r.value1);if(l instanceof i.EQ)return a=!0,new u.Just(r.value2);var c=t(e)(r.value4);return c instanceof i.EQ?(a=!0,new u.Just(r.value5)):l instanceof i.LT?void(n=r.value0):c instanceof i.GT?void(n=r.value6):void(n=r.value3)}throw new Error("Failed pattern match at Data.Map.Internal line 193, column 5 - line 193, column 22: "+[r.constructor.name])}for(;!a;)r=o(n);return r}}},h=function(n){if(n instanceof f)return a.Nil.value;if(n instanceof s)return l.append(a.semigroupList)(h(n.value0))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value1))(h(n.value3)));if(n instanceof d)return l.append(a.semigroupList)(h(n.value0))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value1))(l.append(a.semigroupList)(h(n.value3))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value4))(h(n.value6)))));throw new Error("Failed pattern match at Data.Map.Internal line 588, column 1 - line 588, column 38: "+[n.constructor.name])},w=new r.Functor(function(n){return function(e){if(e instanceof f)return f.value;if(e instanceof s)return new s(r.map(w)(n)(e.value0),e.value1,n(e.value2),r.map(w)(n)(e.value3));if(e instanceof d)return new d(r.map(w)(n)(e.value0),e.value1,n(e.value2),r.map(w)(n)(e.value3),e.value4,n(e.value5),r.map(w)(n)(e.value6));throw new Error("Failed pattern match at Data.Map.Internal line 89, column 1 - line 89, column 39: "+[n.constructor.name,e.constructor.name])}}),y=function(n){return function(e){return function(t){var r,u=n,o=e,i=!1;function l(n,e,r){if(e instanceof a.Nil)return i=!0,r;if(e instanceof a.Cons){if(e.value0 instanceof S)return u=n,o=e.value1,void(t=new s(r,e.value0.value0,e.value0.value1,e.value0.value2));if(e.value0 instanceof P)return u=n,o=e.value1,void(t=new s(e.value0.value0,e.value0.value1,e.value0.value2,r));if(e.value0 instanceof v)return u=n,o=e.value1,void(t=new d(r,e.value0.value0,e.value0.value1,e.value0.value2,e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p)return u=n,o=e.value1,void(t=new d(e.value0.value0,e.value0.value1,e.value0.value2,r,e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof m)return u=n,o=e.value1,void(t=new d(e.value0.value0,e.value0.value1,e.value0.value2,e.value0.value3,e.value0.value4,e.value0.value5,r));throw new Error("Failed pattern match at Data.Map.Internal line 411, column 3 - line 416, column 88: "+[e.value0.constructor.name])}throw new Error("Failed pattern match at Data.Map.Internal line 408, column 1 - line 408, column 80: "+[e.constructor.name,r.constructor.name])}for(;!i;)r=l(u,o,t);return r}}},E=function(n){return function(e){return function(t){var r,u=function(e){return function(t){var r,u=e,o=!1;function i(e,r){if(e instanceof a.Nil)return o=!0,new s(r.value0,r.value1,r.value2,r.value3);if(e instanceof a.Cons){if(e.value0 instanceof S)return o=!0,y(n)(e.value1)(new d(r.value0,r.value1,r.value2,r.value3,e.value0.value0,e.value0.value1,e.value0.value2));if(e.value0 instanceof P)return o=!0,y(n)(e.value1)(new d(e.value0.value0,e.value0.value1,e.value0.value2,r.value0,r.value1,r.value2,r.value3));if(e.value0 instanceof v)return u=e.value1,void(t=new D(new s(r.value0,r.value1,r.value2,r.value3),e.value0.value0,e.value0.value1,new s(e.value0.value2,e.value0.value3,e.value0.value4,e.value0.value5)));if(e.value0 instanceof p)return u=e.value1,void(t=new D(new s(e.value0.value0,e.value0.value1,e.value0.value2,r.value0),r.value1,r.value2,new s(r.value3,e.value0.value3,e.value0.value4,e.value0.value5)));if(e.value0 instanceof m)return u=e.value1,void(t=new D(new s(e.value0.value0,e.value0.value1,e.value0.value2,e.value0.value3),e.value0.value4,e.value0.value5,new s(r.value0,r.value1,r.value2,r.value3)));throw new Error("Failed pattern match at Data.Map.Internal line 447, column 5 - line 452, column 108: "+[e.value0.constructor.name,r.constructor.name])}throw new Error("Failed pattern match at Data.Map.Internal line 444, column 3 - line 444, column 56: "+[e.constructor.name,r.constructor.name])}for(;!o;)r=i(u,t);return r}},l=o.compare(n);return r=a.Nil.value,function(o){var c,b=r,g=!1;function h(r,c){if(c instanceof f)return g=!0,u(r)(new D(f.value,e,t,f.value));if(c instanceof s){var h=l(e)(c.value1);return h instanceof i.EQ?(g=!0,y(n)(r)(new s(c.value0,e,t,c.value3))):h instanceof i.LT?(b=new a.Cons(new S(c.value1,c.value2,c.value3),r),void(o=c.value0)):(b=new a.Cons(new P(c.value0,c.value1,c.value2),r),void(o=c.value3))}if(c instanceof d){var w=l(e)(c.value1);if(w instanceof i.EQ)return g=!0,y(n)(r)(new d(c.value0,e,t,c.value3,c.value4,c.value5,c.value6));var E=l(e)(c.value4);return E instanceof i.EQ?(g=!0,y(n)(r)(new d(c.value0,c.value1,c.value2,c.value3,e,t,c.value6))):w instanceof i.LT?(b=new a.Cons(new v(c.value1,c.value2,c.value3,c.value4,c.value5,c.value6),r),void(o=c.value0)):w instanceof i.GT&&E instanceof i.LT?(b=new a.Cons(new p(c.value0,c.value1,c.value2,c.value4,c.value5,c.value6),r),void(o=c.value3)):(b=new a.Cons(new m(c.value0,c.value1,c.value2,c.value3,c.value4,c.value5),r),void(o=c.value6))}throw new Error("Failed pattern match at Data.Map.Internal line 427, column 3 - line 427, column 55: "+[r.constructor.name,c.constructor.name])}for(;!g;)c=h(b,o);return c}}}},M=function(n){return function(e){var t,r=function(e){return function(t){if(e instanceof a.Nil)return t;if(e instanceof a.Cons){return function(){if(e.value0 instanceof S&&e.value0.value2 instanceof f&&t instanceof f)return y(n)(e.value1)(new s(f.value,e.value0.value0,e.value0.value1,f.value));if(e.value0 instanceof P&&e.value0.value0 instanceof f&&t instanceof f)return y(n)(e.value1)(new s(f.value,e.value0.value1,e.value0.value2,f.value));if(e.value0 instanceof S&&e.value0.value2 instanceof s)return r(e.value1)(new d(t,e.value0.value0,e.value0.value1,e.value0.value2.value0,e.value0.value2.value1,e.value0.value2.value2,e.value0.value2.value3));if(e.value0 instanceof P&&e.value0.value0 instanceof s)return r(e.value1)(new d(e.value0.value0.value0,e.value0.value0.value1,e.value0.value0.value2,e.value0.value0.value3,e.value0.value1,e.value0.value2,t));if(e.value0 instanceof S&&e.value0.value2 instanceof d)return y(n)(e.value1)(new s(new s(t,e.value0.value0,e.value0.value1,e.value0.value2.value0),e.value0.value2.value1,e.value0.value2.value2,new s(e.value0.value2.value3,e.value0.value2.value4,e.value0.value2.value5,e.value0.value2.value6)));if(e.value0 instanceof P&&e.value0.value0 instanceof d)return y(n)(e.value1)(new s(new s(e.value0.value0.value0,e.value0.value0.value1,e.value0.value0.value2,e.value0.value0.value3),e.value0.value0.value4,e.value0.value0.value5,new s(e.value0.value0.value6,e.value0.value1,e.value0.value2,t)));if(e.value0 instanceof v&&e.value0.value2 instanceof f&&e.value0.value5 instanceof f&&t instanceof f)return y(n)(e.value1)(new d(f.value,e.value0.value0,e.value0.value1,f.value,e.value0.value3,e.value0.value4,f.value));if(e.value0 instanceof p&&e.value0.value0 instanceof f&&e.value0.value5 instanceof f&&t instanceof f)return y(n)(e.value1)(new d(f.value,e.value0.value1,e.value0.value2,f.value,e.value0.value3,e.value0.value4,f.value));if(e.value0 instanceof m&&e.value0.value0 instanceof f&&e.value0.value3 instanceof f&&t instanceof f)return y(n)(e.value1)(new d(f.value,e.value0.value1,e.value0.value2,f.value,e.value0.value4,e.value0.value5,f.value));if(e.value0 instanceof v&&e.value0.value2 instanceof s)return y(n)(e.value1)(new s(new d(t,e.value0.value0,e.value0.value1,e.value0.value2.value0,e.value0.value2.value1,e.value0.value2.value2,e.value0.value2.value3),e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p&&e.value0.value0 instanceof s)return y(n)(e.value1)(new s(new d(e.value0.value0.value0,e.value0.value0.value1,e.value0.value0.value2,e.value0.value0.value3,e.value0.value1,e.value0.value2,t),e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p&&e.value0.value5 instanceof s)return y(n)(e.value1)(new s(e.value0.value0,e.value0.value1,e.value0.value2,new d(t,e.value0.value3,e.value0.value4,e.value0.value5.value0,e.value0.value5.value1,e.value0.value5.value2,e.value0.value5.value3)));if(e.value0 instanceof m&&e.value0.value3 instanceof s)return y(n)(e.value1)(new s(e.value0.value0,e.value0.value1,e.value0.value2,new d(e.value0.value3.value0,e.value0.value3.value1,e.value0.value3.value2,e.value0.value3.value3,e.value0.value4,e.value0.value5,t)));if(e.value0 instanceof v&&e.value0.value2 instanceof d)return y(n)(e.value1)(new d(new s(t,e.value0.value0,e.value0.value1,e.value0.value2.value0),e.value0.value2.value1,e.value0.value2.value2,new s(e.value0.value2.value3,e.value0.value2.value4,e.value0.value2.value5,e.value0.value2.value6),e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p&&e.value0.value0 instanceof d)return y(n)(e.value1)(new d(new s(e.value0.value0.value0,e.value0.value0.value1,e.value0.value0.value2,e.value0.value0.value3),e.value0.value0.value4,e.value0.value0.value5,new s(e.value0.value0.value6,e.value0.value1,e.value0.value2,t),e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p&&e.value0.value5 instanceof d)return y(n)(e.value1)(new d(e.value0.value0,e.value0.value1,e.value0.value2,new s(t,e.value0.value3,e.value0.value4,e.value0.value5.value0),e.value0.value5.value1,e.value0.value5.value2,new s(e.value0.value5.value3,e.value0.value5.value4,e.value0.value5.value5,e.value0.value5.value6)));if(e.value0 instanceof m&&e.value0.value3 instanceof d)return y(n)(e.value1)(new d(e.value0.value0,e.value0.value1,e.value0.value2,new s(e.value0.value3.value0,e.value0.value3.value1,e.value0.value3.value2,e.value0.value3.value3),e.value0.value3.value4,e.value0.value3.value5,new s(e.value0.value3.value6,e.value0.value4,e.value0.value5,t)));throw new Error("Failed pattern match at Data.Map.Internal line 497, column 9 - line 514, column 136: "+[e.value0.constructor.name,t.constructor.name])}()}throw new Error("Failed pattern match at Data.Map.Internal line 494, column 5 - line 514, column 136: "+[e.constructor.name])}},l=function(n){return function(e){return function(){if(e instanceof s&&e.value0 instanceof f&&e.value3 instanceof f)return r(n)(f.value);if(e instanceof s)return l(new a.Cons(new P(e.value0,e.value1,e.value2),n))(e.value3);if(e instanceof d&&e.value0 instanceof f&&e.value3 instanceof f&&e.value6 instanceof f)return r(new a.Cons(new P(f.value,e.value1,e.value2),n))(f.value);if(e instanceof d)return l(new a.Cons(new m(e.value0,e.value1,e.value2,e.value3,e.value4,e.value5),n))(e.value6);throw new Error("Failed pattern match at Data.Map.Internal line 526, column 5 - line 530, column 107: "+[e.constructor.name])}()}},D=function(n){return function(){if(n instanceof s&&n.value3 instanceof f)return{key:n.value1,value:n.value2};if(n instanceof s)return D(n.value3);if(n instanceof d&&n.value6 instanceof f)return{key:n.value4,value:n.value5};if(n instanceof d)return D(n.value6);throw new Error("Failed pattern match at Data.Map.Internal line 517, column 33 - line 521, column 45: "+[n.constructor.name])}()},b=o.compare(n);return t=a.Nil.value,function(o){var g,h=t,w=!1;function E(t,g){if(g instanceof f)return w=!0,u.Nothing.value;if(g instanceof s){var E=b(e)(g.value1);if(g.value3 instanceof f&&E instanceof i.EQ)return w=!0,new u.Just(new c.Tuple(g.value2,r(t)(f.value)));if(E instanceof i.EQ){var M=D(g.value0);return w=!0,new u.Just(new c.Tuple(g.value2,l(new a.Cons(new S(M.key,M.value,g.value3),t))(g.value0)))}return E instanceof i.LT?(h=new a.Cons(new S(g.value1,g.value2,g.value3),t),void(o=g.value0)):(h=new a.Cons(new P(g.value0,g.value1,g.value2),t),void(o=g.value3))}if(g instanceof d){var C=g.value0 instanceof f&&g.value3 instanceof f&&g.value6 instanceof f,T=(E=b(e)(g.value4),b(e)(g.value1));return C&&T instanceof i.EQ?(w=!0,new u.Just(new c.Tuple(g.value2,y(n)(t)(new s(f.value,g.value4,g.value5,f.value))))):C&&E instanceof i.EQ?(w=!0,new u.Just(new c.Tuple(g.value5,y(n)(t)(new s(f.value,g.value1,g.value2,f.value))))):T instanceof i.EQ?(M=D(g.value0),w=!0,new u.Just(new c.Tuple(g.value2,l(new a.Cons(new v(M.key,M.value,g.value3,g.value4,g.value5,g.value6),t))(g.value0)))):E instanceof i.EQ?(M=D(g.value3),w=!0,new u.Just(new c.Tuple(g.value5,l(new a.Cons(new p(g.value0,g.value1,g.value2,M.key,M.value,g.value6),t))(g.value3)))):T instanceof i.LT?(h=new a.Cons(new v(g.value1,g.value2,g.value3,g.value4,g.value5,g.value6),t),void(o=g.value0)):T instanceof i.GT&&E instanceof i.LT?(h=new a.Cons(new p(g.value0,g.value1,g.value2,g.value4,g.value5,g.value6),t),void(o=g.value3)):(h=new a.Cons(new m(g.value0,g.value1,g.value2,g.value3,g.value4,g.value5),t),void(o=g.value6))}throw new Error("Failed pattern match at Data.Map.Internal line 467, column 34 - line 490, column 80: "+[g.constructor.name])}for(;!w;)g=E(h,o);return g}}},C=new t.Foldable(function(n){return function(e){return function(r){return t.foldMap(a.foldableList)(n)(e)(b(r))}}},function(n){return function(e){return function(r){return t.foldl(a.foldableList)(n)(e)(b(r))}}},function(n){return function(e){return function(r){return t.foldr(a.foldableList)(n)(e)(b(r))}}}),T=f.value,A=function(n){return function(e){return function(t){return u.maybe(t)(c.snd)(M(n)(e)(t))}}};n.empty=T,n.insert=E,n.lookup=g,n.delete=A,n.pop=M,n.member=function(n){return function(e){return function(t){return u.isJust(g(n)(e)(t))}}},n.alter=function(n){return function(e){return function(t){return function(r){var a=e(g(n)(t)(r));if(a instanceof u.Nothing)return A(n)(t)(r);if(a instanceof u.Just)return E(n)(t)(a.value0)(r);throw new Error("Failed pattern match at Data.Map.Internal line 535, column 15 - line 537, column 25: "+[a.constructor.name])}}}},n.keys=h,n.values=b,n.functorMap=w,n.foldableMap=C}(PS["Data.Map.Internal"]=PS["Data.Map.Internal"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.ST"],PS["Control.Monad.ST.Internal"],PS["Control.Semigroupoid"],PS["Data.Array"],PS["Data.Array.ST"],PS["Data.Eq"];var e=PS["Data.Foldable"],t=(PS["Data.Function"],PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.List"],PS["Data.List.Types"]),r=PS["Data.Map.Internal"],a=(PS["Data.Maybe"],PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Unfoldable"],PS["Data.Unit"],PS["Partial.Unsafe"],PS.Prelude,function(n){return r.keys(n)}),u=new e.Foldable(function(n){return function(r){return function(u){return e.foldMap(t.foldableList)(n)(r)(a(u))}}},function(n){return function(r){return function(u){return e.foldl(t.foldableList)(n)(r)(a(u))}}},function(n){return function(r){return function(u){return e.foldr(t.foldableList)(n)(r)(a(u))}}});n.foldableSet=u}(PS["Data.Set"]=PS["Data.Set"]||{}),function(n){"use strict";PS["Control.Semigroupoid"];var e=PS["Data.Functor"],t=PS["Data.Map.Internal"];PS["Data.Set"],PS.Prelude,PS["Unsafe.Coerce"];n.keys=function(n){return e.void(t.functorMap)(n)}}(PS["Data.Map"]=PS["Data.Map"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Category"],PS["Control.Monad.State.Class"],PS["Control.Monad.Trans.Class"],PS["Control.Parallel"],PS["Control.Semigroupoid"],PS["Data.Functor"],PS["Data.List"],PS["Data.List.Types"],PS["Data.Map"],PS["Data.Map.Internal"],PS["Data.Maybe"],PS["Data.Tuple"];var e=PS["Data.Unit"];PS["Effect.Aff.Class"],PS["Effect.Class"],PS["Halogen.Component.ChildPath"],PS["Halogen.Query.EventSource"],PS["Halogen.Query.HalogenM"],PS["Halogen.Query.InputF"],PS.Prelude,PS["Web.HTML.HTMLElement"];n.action=function(n){return n(e.unit)}}(PS["Halogen.Query"]=PS["Halogen.Query"]||{}),function(n){"use strict";PS["Web.Event.Event"];n.change="change"}(PS["Web.HTML.Event.EventTypes"]=PS["Web.HTML.Event.EventTypes"]||{}),function(n){"use strict";PS["Web.Event.Event"];n.click="click"}(PS["Web.UIEvent.MouseEvent.EventTypes"]=PS["Web.UIEvent.MouseEvent.EventTypes"]||{}),function(n){"use strict";var e=PS["Control.Bind"],t=PS["Control.Monad.Except"],r=PS["Control.Monad.Except.Trans"],a=(PS["Control.Semigroupoid"],PS["Data.Either"]),u=PS["Data.Function"],o=PS["Data.Functor"],i=PS["Data.Identity"],l=PS["Data.Maybe"],c=PS.Foreign,f=PS["Foreign.Index"],s=PS["Halogen.HTML.Core"],d=(PS["Halogen.HTML.Properties"],PS["Halogen.Query"]),S=PS["Halogen.Query.InputF"],P=(PS.Prelude,PS["Unsafe.Coerce"]),v=(PS["Web.Clipboard.ClipboardEvent"],PS["Web.Clipboard.ClipboardEvent.EventTypes"],PS["Web.Event.Event"]),p=(PS["Web.HTML.Event.DragEvent"],PS["Web.HTML.Event.DragEvent.EventTypes"],PS["Web.HTML.Event.EventTypes"]),m=(PS["Web.TouchEvent.TouchEvent"],PS["Web.UIEvent.FocusEvent"],PS["Web.UIEvent.FocusEvent.EventTypes"],PS["Web.UIEvent.KeyboardEvent"],PS["Web.UIEvent.KeyboardEvent.EventTypes"],PS["Web.UIEvent.MouseEvent"],PS["Web.UIEvent.MouseEvent.EventTypes"]),D=(PS["Web.UIEvent.WheelEvent"],PS["Web.UIEvent.WheelEvent.EventTypes"],P.unsafeCoerce),b=function(n){return function(e){return s.handler(n)(o.map(o.functorFn)(o.map(l.functorMaybe)(S.Query.create))(e))}},g=b("submit"),h=function(n){return function(o){return function(s){return function(d){return b(n)(e.composeKleisli(l.bindMaybe)(v.currentTarget)(function(n){return a.either(u.const(l.Nothing.value))(d)(t.runExcept((S=n,e.composeKleisliFlipped(r.bindExceptT(i.monadIdentity))(s)(f.readProp(o))(c.unsafeToForeign(S)))));var S}))}}}},w=h(p.change)("checked")(c.readBoolean),y=h(p.change)("value")(c.readString);n.input=function(n){return function(e){return l.Just.create(d.action(n(e)))}},n.input_=function(n){return function(e){return l.Just.create(d.action(n))}},n.handler=b,n.onSubmit=g,n.onClick=function(n){return b(m.click)(D(n))},n.onValueChange=y,n.onChecked=w}(PS["Halogen.HTML.Events"]=PS["Halogen.HTML.Events"]||{}),function(n){"use strict";var e="function"==typeof Array.from,t="undefined"!=typeof Symbol&&null!=Symbol&&void 0!==Symbol.iterator&&"function"==typeof String.prototype[Symbol.iterator],r="function"==typeof String.prototype.fromCodePoint,a="function"==typeof String.prototype.codePointAt;n._unsafeCodePointAt0=function(n){return a?function(n){return n.codePointAt(0)}:n},n._singleton=function(n){return r?String.fromCodePoint:n},n._take=function(n){return function(e){return t?function(n){for(var t="",r=n[Symbol.iterator](),a=0;a<e;++a){var u=r.next();if(u.done)return t;t+=u.value}return t}:n(e)}},n._toCodePointArray=function(n){return function(t){return e?function(n){return Array.from(n,t)}:n}}}(PS["Data.String.CodePoints"]=PS["Data.String.CodePoints"]||{}),function(n){"use strict";var e=PS["Data.String.CodePoints"],t=(PS["Control.Semigroupoid"],PS["Data.Array"]),r=(PS["Data.Boolean"],PS["Data.Bounded"]),a=PS["Data.Enum"],u=(PS["Data.Eq"],PS["Data.EuclideanRing"]),o=PS["Data.Functor"],i=(PS["Data.HeytingAlgebra"],PS["Data.Int"],PS["Data.Maybe"]),l=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.String.CodeUnits"]),c=(PS["Data.String.Common"],PS["Data.String.Pattern"],PS["Data.String.Unsafe"]),f=PS["Data.Tuple"],s=PS["Data.Unfoldable"],d=(PS.Prelude,function(n){return function(e){return 65536+((1024*(n-55296|0)|0)+(e-56320|0)|0)|0}}),S=function(n){return 56320<=n&&n<=57343},P=function(n){return 55296<=n&&n<=56319},v=function(n){var e=l.length(n);if(0===e)return i.Nothing.value;if(1===e)return new i.Just({head:a.fromEnum(a.boundedEnumChar)(c.charAt(0)(n)),tail:""});var t=a.fromEnum(a.boundedEnumChar)(c.charAt(1)(n)),r=a.fromEnum(a.boundedEnumChar)(c.charAt(0)(n));return P(r)&&S(t)?new i.Just({head:d(r)(t),tail:l.drop(2)(n)}):new i.Just({head:r,tail:l.drop(1)(n)})},p=function(n){return o.map(i.functorMaybe)(function(n){return new f.Tuple(n.head,n.tail)})(v(n))},m=e._unsafeCodePointAt0(function(n){var e=a.fromEnum(a.boundedEnumChar)(c.charAt(1)(n)),t=a.fromEnum(a.boundedEnumChar)(c.charAt(0)(n));return P(t)&&S(e)?d(t)(e):t}),D=e._toCodePointArray(function(n){return s.unfoldr(s.unfoldableArray)(p)(n)})(m),b=function(n){return l.singleton(a.toEnumWithDefaults(a.boundedEnumChar)(r.bottom(r.boundedChar))(r.top(r.boundedChar))(n))},g=e._singleton(function(n){if(n<=65535)return b(n);var e=u.div(u.euclideanRingInt)(n-65536|0)(1024)+55296|0,t=u.mod(u.euclideanRingInt)(n-65536|0)(1024)+56320|0;return b(e)+b(t)}),h=function(n){return function(e){if(n<1)return"";var t=v(e);return t instanceof i.Just?g(t.value0.head)+h(n-1|0)(t.value0.tail):e}},w=e._take(h);n.singleton=g,n.toCodePointArray=D,n.uncons=v,n.length=function(n){return t.length(D(n))},n.take=w,n.drop=function(n){return function(e){return l.drop(l.length(w(n)(e)))(e)}}}(PS["Data.String.CodePoints"]=PS["Data.String.CodePoints"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Bind"],r=PS["Control.Monad.Maybe.Trans"],a=(PS["Control.Semigroupoid"],PS["Data.Array"]),u=(PS["Data.Eq"],PS["Data.Foldable"]),o=(PS["Data.Function"],PS["Data.Functor"]),i=(PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),l=(PS["Data.String"],PS["Data.String.CodePoints"]),c=PS["Data.String.Common"],f=(PS["Data.String.Pattern"],PS["Data.Tuple"]),s=PS.Effect,d=PS["Global.Unsafe"],S=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),P=PS["Halogen.HTML.Properties"],v=(PS["Partial.Unsafe"],PS.Prelude,PS["Web.DOM"],PS["Web.DOM.Document"]),p=PS["Web.DOM.Element"],m=PS["Web.DOM.NodeList"],D=PS["Web.DOM.NonElementParentNode"],b=PS["Web.DOM.ParentNode"],g=PS["Web.HTML"],h=PS["Web.HTML.HTMLDocument"],w=PS["Web.HTML.HTMLElement"],y=PS["Web.HTML.Location"],E=PS["Web.HTML.Window"],M=function(n){return function(e){return t.bindFlipped(s.bindEffect)(m.toArray)(b.querySelectorAll(n)(p.toParentNode(e)))}},C=function(n){return function(e){return b.querySelector(n)(p.toParentNode(e))}},T=function(n){var e,t=function(n){return d.unsafeDecodeURIComponent(c.replaceAll("+")(" ")(n))},r="#"===(e=l.take(1)(n))||"?"===e?l.drop(1)(n):n;return a.mapMaybe(function(n){var e=c.split("=")(n);return 1===e.length?new i.Just(new f.Tuple(t(e[0]),i.Nothing.value)):2===e.length?new i.Just(new f.Tuple(t(e[0]),new i.Just(t(e[1])))):i.Nothing.value})(a.filter(function(n){return""!==n})(c.split("&")(r)))},A=r.MaybeT,F=t.bindFlipped(s.bindEffect)(E.location)(g.window),H=t.bindFlipped(s.bindEffect)(E.document)(g.window),L=t.bindFlipped(s.bindEffect)(function(n){return e.pure(s.applicativeEffect)(i.fromJust()(n))})(t.bindFlipped(s.bindEffect)(h.body)(H));n.class_=function(n){return P.class_(S.ClassName(n))},n.attr=function(n){return P.attr(n)},n._queryBoth=function(n){return function(e){return function(t){return function(){var r=C(n.value0)(n.value1)(),a=C(e.value0)(e.value1)();return u.for_(s.applicativeEffect)(u.foldableMaybe)(r)(function(n){return u.for_(s.applicativeEffect)(u.foldableMaybe)(a)(function(e){return t(n)(e)})})()}}}},n["_queryBoth'"]=function(n){return function(e){return function(t){return function(){var r=C(n.value0)(n.value1)(),a=M(e.value0)(e.value1)();return u.for_(s.applicativeEffect)(u.foldableMaybe)(r)(function(n){return t(n)(a)})()}}}},n["_queryBoth''"]=function(n){return function(e){return function(t){return function(){var r=M(n.value0)(n.value1)(),a=M(e.value0)(e.value1)();return t(r)(a)()}}}},n._querySelector=C,n._querySelectorAll=M,n._fromNode=function(n){return i.fromJust()(p.fromNode(n))},n._fromElement=function(n){return i.fromJust()(w.fromElement(n))},n._getElementById=function(n){return function(e){return D.getElementById(n)(v.toNonElementParentNode(h.toDocument(e)))}},n._doc=H,n._loc=F,n._curQuerystring=function(){var n=F(),e=y.search(n)();return T(e)},n._parseQueryString=T,n._lookupQueryStringValue=function(n){return function(e){return t.join(i.bindMaybe)(o.map(i.functorMaybe)(f.snd)(u.find(u.foldableArray)(function(n){return f.fst(n)===e})(n)))}},n._body=L,n._mt=A,n._mt_pure=function(n){return r.MaybeT(e.pure(s.applicativeEffect)(n))}}(PS.Util=PS.Util||{}),function(n){"use strict";var e=PS.App,t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.State.Class"],u=(PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed.ButtonType"]),o=PS["DOM.HTML.Indexed.InputType"],i=(PS["Data.Array"],PS["Data.Foldable"],PS["Data.Function"]),l=PS["Data.Functor"],c=(PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),f=PS["Data.Monoid"],s=(PS["Data.Ord"],PS["Data.Semigroup"]),d=(PS["Data.String"],PS["Data.String.Common"]),S=(PS["Data.String.Pattern"],PS["Data.Tuple"]),P=PS["Data.Unit"],v=PS["Effect.Aff"],p=PS["Effect.Aff.Class"],m=PS["Effect.Class"],D=PS.Globals,b=(PS.Halogen,PS["Halogen.Component"]),g=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),h=PS["Halogen.HTML.Elements"],w=PS["Halogen.HTML.Events"],y=PS["Halogen.HTML.Properties"],E=PS["Halogen.Query.HalogenM"],M=(PS.Model,PS.Prelude,PS.Util),C=PS["Web.Event.Event"],T=PS["Web.HTML"],A=PS["Web.HTML.Location"],F=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),H=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),L=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),_=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),I=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),O=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),N=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),W=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),x=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),U=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}();n.BEditField=N,n.BEditSubmit=W,n.BDeleteAsk=x,n.BDestroy=U,n.Eurl=F,n.Etitle=H,n.Edescription=L,n.Etags=_,n.Eprivate=I,n.Etoread=O,n.addbmark=function(n){var R;D["app'"](P.unit);return b.component(g.bifunctorHTML)({initialState:i.const((R=n,{bm:R,edit_bm:R,deleteAsk:!1,destroyed:!1})),render:function(n){var e=D.mmoment8601(n.bm.time),t=function(n){return function(e){return w.input(N.create)(n(e))}},r=h.div([M.class_("alert")])([g.text("previously saved "),h.span([M.class_("link f7 dib gray pr3"),y.title(c.maybe(n.bm.time)(S.snd)(e))])([g.text(c.maybe(" ")(S.fst)(e))]),h.div([M.class_("edit_links dib ml1")])([h.div([M.class_("delete_link di")])([h.button(s.append(s.semigroupArray)([y.type_(g.buttonTypeIsProp)(u.ButtonButton.value),w.onClick(w.input_(x.create(!0))),M.class_("delete")])(f.guard(f.monoidArray)(n.deleteAsk)([M.attr("hidden")("hidden")])))([g.text("delete")]),h.span(s.append(s.semigroupArray)([M.class_("confirm red")])(f.guard(f.monoidArray)(!n.deleteAsk)([M.attr("hidden")("hidden")])))([h.button([y.type_(g.buttonTypeIsProp)(u.ButtonButton.value),w.onClick(w.input_(x.create(!1)))])([g.text("cancel / ")]),h.button([y.type_(g.buttonTypeIsProp)(u.ButtonButton.value),w.onClick(w.input_(U.create)),M.class_("red")])([g.text("destroy")])])])])]),a=h.form([w.onSubmit(w.input(W.create))])([h.table([M.class_("w-100")])([h.tbody_([h.tr_([h.td([M.class_("w1")])([]),h.td_(f.guard(f.monoidArray)(n.bm.bid>0)([r]))]),h.tr_([h.td_([h.label([y.for("url")])([g.text("URL")])]),h.td_([h.input([y.type_(g.inputTypeIsProp)(o.InputUrl.value),y.id_("url"),M.class_("w-100 mv1"),y.required(!0),y.name("url"),y.autofocus(d.null(n.bm.url)),y.value(n.edit_bm.url),w.onValueChange(t(F.create))])])]),h.tr_([h.td_([h.label([y.for("title")])([g.text("title")])]),h.td_([h.input([y.type_(g.inputTypeIsProp)(o.InputText.value),y.id_("title"),M.class_("w-100 mv1"),y.name("title"),y.value(n.edit_bm.title),w.onValueChange(t(H.create))])])]),h.tr_([h.td_([h.label([y.for("description")])([g.text("description")])]),h.td_([h.textarea([M.class_("w-100 mt1 mid-gray"),y.id_("description"),y.name("description"),y.rows(4),y.value(n.edit_bm.description),w.onValueChange(t(L.create))])])]),h.tr_([h.td_([h.label([y.for("tags")])([g.text("tags")])]),h.td_([h.input([y.type_(g.inputTypeIsProp)(o.InputText.value),y.id_("tags"),M.class_("w-100 mv1"),y.name("tags"),y.autocomplete(!1),M.attr("autocapitalize")("off"),y.autofocus(!d.null(n.bm.url)),y.value(n.edit_bm.tags),w.onValueChange(t(_.create))])])]),h.tr_([h.td_([h.label([y.for("private")])([g.text("private")])]),h.td_([h.input([y.type_(g.inputTypeIsProp)(o.InputCheckbox.value),y.id_("private"),M.class_("private pointer"),y.name("private"),y.checked(n.edit_bm.private),w.onChecked(t(I.create))])])]),h.tr_([h.td_([h.label([y.for("toread")])([g.text("read later")])]),h.td_([h.input([y.type_(g.inputTypeIsProp)(o.InputCheckbox.value),y.id_("toread"),M.class_("toread pointer"),y.name("toread"),y.checked(n.edit_bm.toread),w.onChecked(t(O.create))])])]),h.tr_([h.td_([]),h.td_([h.input([y.type_(g.inputTypeIsProp)(o.InputSubmit.value),M.class_("ph3 pv2 input-reset ba b--navy bg-transparent pointer f6 dib mt1 dim"),y.value(n.bm.bid>0?"update bookmark":"add bookmark")])])])])])]),i=h.p([M.class_("red")])([g.text("you killed this bookmark")]);return h.div_([n.destroyed?i:a])},eval:function(n){if(n instanceof x)return r.discard(r.discardUnit)(E.bindHalogenM)(a.modify_(E.monadStateHalogenM)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.deleteAsk=n.value0,t}))(function(){return t.pure(E.applicativeHalogenM)(n.value1)});if(n instanceof U)return r.bind(E.bindHalogenM)(a.gets(E.monadStateHalogenM)(function(n){return n.bm.bid}))(function(u){return r.discard(r.discardUnit)(E.bindHalogenM)(l.void(E.functorHalogenM)(p.liftAff(E.monadAffHalogenM(p.monadAffAff))(e.destroy(u))))(function(){return r.discard(r.discardUnit)(E.bindHalogenM)(a.modify_(E.monadStateHalogenM)(function(n){var e={};for(var t in n)({}).hasOwnProperty.call(n,t)&&(e[t]=n[t]);return e.destroyed=!0,e}))(function(){return t.pure(E.applicativeHalogenM)(n.value0)})})});if(n instanceof N)return r.discard(r.discardUnit)(E.bindHalogenM)((u=E.monadStateHalogenM,function(n){return a.modify_(u)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.edit_bm=n(e.edit_bm),t})})(function(){if(n.value0 instanceof F)return function(e){return{url:n.value0.value0,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof H)return function(e){return{url:e.url,title:n.value0.value0,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof L)return function(e){return{url:e.url,title:e.title,description:n.value0.value0,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof _)return function(e){return{url:e.url,title:e.title,description:e.description,tags:n.value0.value0,private:e.private,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof I)return function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:n.value0.value0,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof O)return function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:n.value0.value0,bid:e.bid,selected:e.selected,time:e.time}};throw new Error("Failed pattern match at Component.Add line 156, column 18 - line 162, column 36: "+[n.value0.constructor.name])}()))(function(){return t.pure(E.applicativeHalogenM)(n.value1)});var u;if(n instanceof W)return r.discard(r.discardUnit)(E.bindHalogenM)(m.liftEffect(E.monadEffectHalogenM(v.monadEffectAff))(C.preventDefault(n.value0)))(function(){return r.bind(E.bindHalogenM)(a.get(E.monadStateHalogenM))(function(u){return r.discard(r.discardUnit)(E.bindHalogenM)(l.void(E.functorHalogenM)(p.liftAff(E.monadAffHalogenM(p.monadAffAff))(e.editBookmark(u.edit_bm))))(function(){return r.discard(r.discardUnit)(E.bindHalogenM)(a.put(E.monadStateHalogenM)(function(){var n={};for(var e in u)({}).hasOwnProperty.call(u,e)&&(n[e]=u[e]);return n.bm=u.edit_bm,n}()))(function(){return r.bind(E.bindHalogenM)(m.liftEffect(E.monadEffectHalogenM(v.monadEffectAff))(M._loc))(function(e){return r.bind(E.bindHalogenM)(m.liftEffect(E.monadEffectHalogenM(v.monadEffectAff))(T.window))(function(a){return r.bind(E.bindHalogenM)(m.liftEffect(E.monadEffectHalogenM(v.monadEffectAff))(M._curQuerystring))(function(u){return r.discard(r.discardUnit)(E.bindHalogenM)((o=M._lookupQueryStringValue(u)("next"))instanceof c.Just?m.liftEffect(E.monadEffectHalogenM(v.monadEffectAff))(A.setHref(o.value0)(e)):m.liftEffect(E.monadEffectHalogenM(v.monadEffectAff))(D.closeWindow(a)))(function(){return t.pure(E.applicativeHalogenM)(n.value1)});var o})})})})})})});throw new Error("Failed pattern match at Component.Add line 146, column 3 - line 146, column 58: "+[n.constructor.name])},receiver:i.const(c.Nothing.value)})}}(PS["Component.Add"]=PS["Component.Add"]||{}),function(n){"use strict";var e=PS.App,t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.State.Class"],u=(PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed.ButtonType"]),o=PS["DOM.HTML.Indexed.InputType"],i=PS["Data.Array"],l=(PS["Data.Eq"],PS["Data.Foldable"]),c=PS["Data.Function"],f=PS["Data.Functor"],s=(PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),d=PS["Data.Monoid"],S=PS["Data.Semigroup"],P=PS["Data.Show"],v=(PS["Data.String"],PS["Data.String.CodePoints"]),p=PS["Data.String.Common"],m=(PS["Data.String.Pattern"],PS["Data.Tuple"]),D=PS["Data.Unit"],b=PS["Effect.Aff"],g=PS["Effect.Aff.Class"],h=PS["Effect.Class"],w=PS.Globals,y=(PS.Halogen,PS["Halogen.Component"]),E=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),M=PS["Halogen.HTML.Elements"],C=PS["Halogen.HTML.Events"],T=PS["Halogen.HTML.Properties"],A=PS["Halogen.Query.HalogenM"],F=(PS.Model,PS.Prelude,PS.Util),H=PS["Web.Event.Event"],L=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),_=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),I=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),O=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),N=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),W=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),x=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),U=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),R=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),k=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),B=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),q=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),j=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),J=function(){function n(){}return n.value=new n,n}();n.BStar=x,n.BDeleteAsk=U,n.BDestroy=R,n.BEdit=k,n.BEditField=B,n.BEditSubmit=q,n.BMarkRead=j,n.Eurl=L,n.Etitle=_,n.Edescription=I,n.Etags=O,n.Eprivate=N,n.Etoread=W,n.BNotifyRemove=J,n.bmark=function(n){var V,Q=w["app'"](D.unit);return y.component(E.bifunctorHTML)({initialState:c.const((V=n,{bm:V,edit_bm:V,deleteAsk:!1,edit:!1})),render:function(n){var e,t,r=d.guard(d.monoidArray)(Q.dat.isowner)([M.div([F.class_("star fl pointer"+d.guard(d.monoidString)(n.bm.selected)(" selected"))])([M.button([F.class_("moon-gray"),C.onClick(C.input_(x.create(!n.bm.selected)))])([E.text("✭")])])]),a=w.mmoment8601(n.bm.time),c=d.guard(d.monoidArray)(Q.dat.isowner)([M.div([F.class_("edit_links di")])([M.button([T.type_(E.buttonTypeIsProp)(u.ButtonButton.value),C.onClick(C.input_(k.create(!0))),F.class_("edit light-silver hover-blue")])([E.text("edit ")]),M.div([F.class_("delete_link di")])([M.button([T.type_(E.buttonTypeIsProp)(u.ButtonButton.value),C.onClick(C.input_(U.create(!0))),F.class_("delete light-silver hover-blue"+d.guard(d.monoidString)(n.deleteAsk)(" dn"))])([E.text("delete")]),M.span([F.class_("confirm red"+d.guard(d.monoidString)(!n.deleteAsk)(" dn"))])([M.button([T.type_(E.buttonTypeIsProp)(u.ButtonButton.value),C.onClick(C.input_(U.create(!1)))])([E.text("cancel / ")]),M.button([T.type_(E.buttonTypeIsProp)(u.ButtonButton.value),C.onClick(C.input_(R.create)),F.class_("red")])([E.text("destroy")])])])]),M.div([F.class_("read di")])(d.guard(d.monoidArray)(n.bm.toread)([E.text(" "),M.button([C.onClick(C.input_(j.create)),F.class_("mark_read")])([E.text("mark as read")])]))]),D=function(n){return function(e){return C.input(B.create)(n(e))}},b=[M.div([F.class_("edit_bookmark_form pa2 bg-white")])([M.form([C.onSubmit(C.input(q.create))])([M.input([T.type_(E.inputTypeIsProp)(o.InputUrl.value),F.class_("url w-100 mt2 mb1 pt1 f7 edit_form_input"),T.required(!0),T.name("url"),T.value(n.edit_bm.url),C.onValueChange(D(L.create))]),M.br_,M.input([T.type_(E.inputTypeIsProp)(o.InputText.value),F.class_("title w-100 mt2 mb1 pt1 f7 edit_form_input"),T.name("title"),T.value(n.edit_bm.title),C.onValueChange(D(_.create))]),M.br_,M.p([F.class_("mt2 mb1")])([E.text(" description:")]),M.textarea([F.class_("description w-100 mt2 mb1 pt1 f7 edit_form_input"),T.name("description"),T.rows(5),T.value(n.edit_bm.description),C.onValueChange(D(I.create))]),M.br_,M.div([T.id_("tags_input_box")])([M.p_([M.div_([E.text(" tags:")]),M.input([T.type_(E.inputTypeIsProp)(o.InputText.value),F.class_("tags w-100 mt2 mb1 pt1 f7 edit_form_input"),T.name("tags"),T.autocomplete(!1),F.attr("autocapitalize")("off"),T.value(n.edit_bm.tags),C.onValueChange(D(O.create))]),M.br_])]),M.div([F.class_("edit_form_checkboxes mv3")])([M.input([T.type_(E.inputTypeIsProp)(o.InputCheckbox.value),F.class_("private pointer"),T.id_("edit_private"),T.name("private"),T.checked(n.edit_bm.private),C.onChecked(D(N.create))]),E.text(" "),M.label([T.for("edit_private"),F.class_("mr2")])([E.text("private")]),E.text(" "),M.input([T.type_(E.inputTypeIsProp)(o.InputCheckbox.value),F.class_("toread pointer"),T.id_("edit_toread"),T.name("toread"),T.checked(n.edit_bm.toread),C.onChecked(D(W.create))]),E.text(" "),M.label([T.for("edit_toread")])([E.text("toread")]),M.br_]),M.input([T.type_(E.inputTypeIsProp)(o.InputSubmit.value),F.class_("mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"),T.value("save")]),E.text(" "),M.input([T.type_(E.inputTypeIsProp)(o.InputReset.value),F.class_("pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"),T.value("cancel"),C.onClick(C.input_(k.create(!1)))])])])],g=[M.div([F.class_("display")])(S.append(S.semigroupArray)([M.a([T.href(n.bm.url),T.target("_blank"),F.class_("link f5 lh-title"+d.guard(d.monoidString)(n.bm.toread)(" unread"))])([E.text(p.null(n.bm.title)?"[no title]":n.bm.title)]),M.br_,M.a([T.href(n.bm.url),F.class_("link f7 gray hover-blue")])([E.text(n.bm.url)]),M.br_,M.div([F.class_("description mt1 mid-gray")])((t=n.bm.description,i.drop(1)(l.foldMap(l.foldableArray)(d.monoidArray)(function(n){return[M.br_,E.text(n)]})(p.split("\n")(t))))),M.div([F.class_("tags")])(d.guard(d.monoidFn(d.monoidFn(d.monoidArray)))(!p.null(n.bm.tags))(f.map(f.functorArray))(function(n){return M.a([F.class_("link tag mr1"+d.guard(d.monoidString)("."===v.take(1)(n))(" private")),T.href(function(n){return Q.userR+"/t:"+n}(n))])([E.text(n)])})(p.split(" ")(n.bm.tags))),M.a([F.class_("link f7 dib gray w4"),T.title(s.maybe(n.bm.time)(m.snd)(a)),T.href((e=n.bm.bid,Q.userR+"/b:"+P.show(P.showInt)(e)))])([E.text(s.maybe(" ")(m.fst)(a))])])(c))];return M.div([T.id_(P.show(P.showInt)(n.bm.bid)),F.class_("bookmark w-100 mw7 pa1 mb3"+d.guard(d.monoidString)(n.bm.private)(" private"))])(S.append(S.semigroupArray)(r)(n.edit?b:g))},eval:function(n){if(n instanceof x)return r.bind(A.bindHalogenM)(a.get(A.monadStateHalogenM))(function(u){return r.discard(r.discardUnit)(A.bindHalogenM)(g.liftAff(A.monadAffHalogenM(g.monadAffAff))(e.toggleStar(u.bm.bid)(n.value0?e.Star.value:e.UnStar.value)))(function(){return r.discard(r.discardUnit)(A.bindHalogenM)(a.put(A.monadStateHalogenM)(function(){var e={};for(var t in u)({}).hasOwnProperty.call(u,t)&&(e[t]=u[t]);return e.bm=function(){var e={};for(var t in u.bm)({}).hasOwnProperty.call(u.bm,t)&&(e[t]=u.bm[t]);return e.selected=n.value0,e}(),e.edit_bm=function(){var e={};for(var t in u.edit_bm)({}).hasOwnProperty.call(u.edit_bm,t)&&(e[t]=u.edit_bm[t]);return e.selected=n.value0,e}(),e}()))(function(){return t.pure(A.applicativeHalogenM)(n.value1)})})});if(n instanceof U)return r.discard(r.discardUnit)(A.bindHalogenM)(a.modify_(A.monadStateHalogenM)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.deleteAsk=n.value0,t}))(function(){return t.pure(A.applicativeHalogenM)(n.value1)});if(n instanceof R)return r.bind(A.bindHalogenM)(a.gets(A.monadStateHalogenM)(function(n){return n.bm.bid}))(function(a){return r.discard(r.discardUnit)(A.bindHalogenM)(f.void(A.functorHalogenM)(g.liftAff(A.monadAffHalogenM(g.monadAffAff))(e.destroy(a))))(function(){return r.discard(r.discardUnit)(A.bindHalogenM)(A.raise(J.value))(function(){return t.pure(A.applicativeHalogenM)(n.value0)})})});if(n instanceof j)return r.bind(A.bindHalogenM)(a.get(A.monadStateHalogenM))(function(u){return r.discard(r.discardUnit)(A.bindHalogenM)(f.void(A.functorHalogenM)(g.liftAff(A.monadAffHalogenM(g.monadAffAff))(e.markRead(u.bm.bid))))(function(){var e=function(){var n={};for(var e in u)({}).hasOwnProperty.call(u,e)&&(n[e]=u[e]);return n.bm=function(){var n={};for(var e in u.bm)({}).hasOwnProperty.call(u.bm,e)&&(n[e]=u.bm[e]);return n.toread=!1,n}(),n}();return r.discard(r.discardUnit)(A.bindHalogenM)(a.put(A.monadStateHalogenM)(e))(function(){return t.pure(A.applicativeHalogenM)(n.value0)})})});if(n instanceof k)return r.bind(A.bindHalogenM)(a.get(A.monadStateHalogenM))(function(e){var u=function(){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.edit=n.value0,t.edit_bm=e.bm,t}();return r.discard(r.discardUnit)(A.bindHalogenM)(a.put(A.monadStateHalogenM)(u))(function(){return t.pure(A.applicativeHalogenM)(n.value1)})});if(n instanceof B)return r.discard(r.discardUnit)(A.bindHalogenM)((u=A.monadStateHalogenM,function(n){return a.modify_(u)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.edit_bm=n(e.edit_bm),t})})(function(){if(n.value0 instanceof L)return function(e){return{url:n.value0.value0,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof _)return function(e){return{url:e.url,title:n.value0.value0,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof I)return function(e){return{url:e.url,title:e.title,description:n.value0.value0,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof O)return function(e){return{url:e.url,title:e.title,description:e.description,tags:n.value0.value0,private:e.private,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof N)return function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:n.value0.value0,toread:e.toread,bid:e.bid,selected:e.selected,time:e.time}};if(n.value0 instanceof W)return function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:n.value0.value0,bid:e.bid,selected:e.selected,time:e.time}};throw new Error("Failed pattern match at Component.BMark line 229, column 18 - line 235, column 36: "+[n.value0.constructor.name])}()))(function(){return t.pure(A.applicativeHalogenM)(n.value1)});var u;if(n instanceof q)return r.discard(r.discardUnit)(A.bindHalogenM)(h.liftEffect(A.monadEffectHalogenM(b.monadEffectAff))(H.preventDefault(n.value0)))(function(){return r.bind(A.bindHalogenM)(a.get(A.monadStateHalogenM))(function(u){return r.discard(r.discardUnit)(A.bindHalogenM)(f.void(A.functorHalogenM)(g.liftAff(A.monadAffHalogenM(g.monadAffAff))(e.editBookmark(u.edit_bm))))(function(){return r.discard(r.discardUnit)(A.bindHalogenM)(a.put(A.monadStateHalogenM)(function(){var n={};for(var e in u)({}).hasOwnProperty.call(u,e)&&(n[e]=u[e]);return n.edit=!1,n.bm=u.edit_bm,n}()))(function(){return t.pure(A.applicativeHalogenM)(n.value1)})})})});throw new Error("Failed pattern match at Component.BMark line 191, column 3 - line 191, column 65: "+[n.constructor.name])},receiver:c.const(s.Nothing.value)})}}(PS["Component.BMark"]=PS["Component.BMark"]||{}),function(n){"use strict";var e=PS["Component.BMark"],t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.State.Class"],u=PS["Data.Array"],o=(PS["Data.Eq"],PS["Data.Function"]),i=PS["Data.Functor"],l=PS["Data.Maybe"],c=PS["Data.Ord"],f=PS["Data.Unit"],s=(PS["Effect.Aff"],PS.Halogen,PS["Halogen.Component"]),d=PS["Halogen.HTML"],S=PS["Halogen.HTML.Elements"],P=PS["Halogen.HTML.Events"],v=PS["Halogen.Query.HalogenM"],p=(PS.Model,PS.Prelude,function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}());n.HandleBMessage=p,n.blist=function(n){return s.parentComponent(c.ordInt)({initialState:o.const(n),render:function(n){return S.div_(i.map(i.functorArray)(function(n){return d.slot(n.bid)(e.bmark(n))(f.unit)(P.input(p.create(n.bid)))})(n))},eval:function(n){var e;return r.discard(r.discardUnit)(v.bindHalogenM)(a.modify_(v.monadStateHalogenM)((e=n.value0,u.filter(function(n){return n.bid!==e}))))(function(){return t.pure(v.applicativeHalogenM)(n.value2)})},receiver:o.const(l.Nothing.value)})}}(PS["Component.BList"]=PS["Component.BList"]||{}),function(n){"use strict";var e=PS.App,t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.State.Class"],u=(PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed.ButtonType"]),o=PS["DOM.HTML.Indexed.InputType"],i=(PS["Data.Argonaut"],PS["Data.Argonaut.Core"]),l=PS["Data.Array"],c=(PS["Data.Either"],PS["Data.Foldable"]),f=PS["Data.Function"],s=PS["Data.Functor"],d=(PS["Data.HeytingAlgebra"],PS["Data.Int"]),S=PS["Data.Maybe"],P=PS["Data.Monoid"],v=(PS["Data.Ord"],PS["Data.Semigroup"]),p=PS["Data.Show"],m=(PS["Data.String"],PS["Data.String.CodePoints"]),D=PS["Data.String.Common"],b=(PS["Data.String.Pattern"],PS["Data.Tuple"]),g=PS["Data.Unit"],h=PS["Effect.Aff"],w=PS["Effect.Aff.Class"],y=PS["Effect.Class"],E=(PS["Effect.Exception"],PS.Globals),M=(PS.Halogen,PS["Halogen.Component"]),C=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),T=PS["Halogen.HTML.Elements"],A=PS["Halogen.HTML.Events"],F=PS["Halogen.HTML.Properties"],H=PS["Halogen.Query.HalogenM"],L=(PS.Model,PS.Prelude,PS.Util),_=PS["Web.Event.Event"],I=(PS["Web.HTML"],PS["Web.HTML.Location"],function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),O=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),N=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),W=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),x=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),U=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),R=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),k=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}();n.nlist=function(n){var e,r=function(n){return E.mmoment8601(n.created)},a=E["app'"](g.unit),u=function(n){return a.userR+"/notes/"+p.show(p.showInt)(n)};return M.component(C.bifunctorHTML)({initialState:f.const((e=n,{notes:e,cur:S.Nothing.value,deleteAsk:!1,edit:!1})),render:function(n){return T.div_(s.map(s.functorArray)(function(n){return T.div([F.id_(p.show(p.showInt)(n.id)),L.class_("note w-100 mw7 pa1 mb2")])([T.div([L.class_("display")])([T.a([F.href(u(n.id)),F.target("_blank"),L.class_("link f5 lh-title")])([C.text(D.null(n.title)?"[no title]":n.title)]),T.br_,T.div([L.class_("description mt1 mid-gray")])((e=m.take(200)(n.text),l.drop(1)(c.foldMap(c.foldableArray)(P.monoidArray)(function(n){return[T.br_,C.text(n)]})(D.split("\n")(e))))),T.a([L.class_("link f7 dib gray w4"),F.title(S.maybe(n.created)(b.snd)(r(n))),F.href(u(n.id))])([C.text(S.maybe(" ")(b.fst)(r(n)))])])]);var e})(n.notes))},eval:function(n){return t.pure(H.applicativeHalogenM)(n.value0)},receiver:f.const(S.Nothing.value)})},n.NNop=N,n.NEditField=W,n.NEditSubmit=x,n.NEdit=U,n.NDeleteAsk=R,n.NDestroy=k,n.Etitle=I,n.Etext=O,n.nnote=function(n){var m;E["app'"](g.unit);return M.component(C.bifunctorHTML)({initialState:f.const((m=n,{note:m,edit_note:m,deleteAsk:!1,edit:m.id<=0,destroyed:!1})),render:function(n){var e,t=function(n){return E.mmoment8601(n.created)},r=T.div([F.id_(p.show(p.showInt)(n.note.id)),L.class_("note w-100 mw7 pa1 mb2")])(v.append(v.semigroupArray)([T.div([L.class_("display")])([T.div([L.class_("link f5 lh-title")])([C.text(D.null(n.note.title)?"[no title]":n.note.title)]),T.br_,T.div([L.class_("description mt1 mid-gray")])((e=n.note.text,l.drop(1)(c.foldMap(c.foldableArray)(P.monoidArray)(function(n){return[T.br_,C.text(n)]})(D.split("\n")(e))))),T.div([L.class_("link f7 dib gray w4"),F.title(S.maybe(n.note.created)(b.snd)(t(n.note)))])([C.text(S.maybe(" ")(b.fst)(t(n.note)))])])])([T.div([L.class_("edit_links db mt3")])([T.button([F.type_(C.buttonTypeIsProp)(u.ButtonButton.value),A.onClick(A.input_(U.create(!0))),L.class_("edit light-silver hover-blue")])([C.text("edit ")]),T.div([L.class_("delete_link di")])([T.button([F.type_(C.buttonTypeIsProp)(u.ButtonButton.value),A.onClick(A.input_(R.create(!0))),L.class_("delete light-silver hover-blue"+P.guard(P.monoidString)(n.deleteAsk)(" dn"))])([C.text("delete")]),T.span([L.class_("confirm red"+P.guard(P.monoidString)(!n.deleteAsk)(" dn"))])([T.button([F.type_(C.buttonTypeIsProp)(u.ButtonButton.value),A.onClick(A.input_(R.create(!1)))])([C.text("cancel / ")]),T.button([F.type_(C.buttonTypeIsProp)(u.ButtonButton.value),A.onClick(A.input_(k.create)),L.class_("red")])([C.text("destroy")])])])])])),a=function(n){return function(e){return A.input(W.create)(n(e))}},i=T.form([A.onSubmit(A.input(x.create))])([T.p([L.class_("mt2 mb1")])([C.text("Title:")]),T.input([F.type_(C.inputTypeIsProp)(o.InputText.value),L.class_("title w-100 mt2 mb1 pt1 f7 edit_form_input"),F.name("title"),F.value(n.edit_note.title),A.onValueChange(a(I.create))]),T.br_,T.p([L.class_("mt2 mb1")])([C.text("Description:")]),T.textarea([L.class_("description w-100 mt2 mb1 pt1 f7 edit_form_input"),F.name("text"),F.rows(30),F.value(n.edit_note.text),A.onValueChange(a(O.create))]),T.div([L.class_("edit_form_checkboxes mv3")])([T.input([F.type_(C.inputTypeIsProp)(o.InputSubmit.value),L.class_("mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"),F.value("save")]),C.text(" "),T.input([F.type_(C.inputTypeIsProp)(o.InputReset.value),L.class_("pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"),F.value("cancel"),A.onClick(A.input_(U.create(!1)))])])]),f=T.p([L.class_("red")])([C.text("you killed this note")]);return n.destroyed?f:n.edit?i:r},eval:function(n){if(n instanceof N)return t.pure(H.applicativeHalogenM)(n.value0);if(n instanceof W)return r.discard(r.discardUnit)(H.bindHalogenM)((u=H.monadStateHalogenM,function(n){return a.modify_(u)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.edit_note=n(e.edit_note),t})})(function(){if(n.value0 instanceof I)return function(e){return{id:e.id,title:n.value0.value0,text:e.text,length:e.length,created:e.created,updated:e.updated}};if(n.value0 instanceof O)return function(e){return{id:e.id,title:e.title,text:n.value0.value0,length:e.length,created:e.created,updated:e.updated}};throw new Error("Failed pattern match at Component.NList line 210, column 18 - line 212, column 32: "+[n.value0.constructor.name])}()))(function(){return t.pure(H.applicativeHalogenM)(n.value1)});var u;if(n instanceof R)return r.discard(r.discardUnit)(H.bindHalogenM)(a.modify_(H.monadStateHalogenM)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.deleteAsk=n.value0,t}))(function(){return t.pure(H.applicativeHalogenM)(n.value1)});if(n instanceof k)return r.bind(H.bindHalogenM)(a.get(H.monadStateHalogenM))(function(u){return r.discard(r.discardUnit)(H.bindHalogenM)(s.void(H.functorHalogenM)(w.liftAff(H.monadAffHalogenM(w.monadAffAff))(e.destroyNote(u.note.id))))(function(){return r.discard(r.discardUnit)(H.bindHalogenM)(a.put(H.monadStateHalogenM)(function(){var n={};for(var e in u)({}).hasOwnProperty.call(u,e)&&(n[e]=u[e]);return n.destroyed=!0,n}()))(function(){return t.pure(H.applicativeHalogenM)(n.value0)})})});if(n instanceof U)return r.bind(H.bindHalogenM)(a.get(H.monadStateHalogenM))(function(e){var u=function(){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.edit=n.value0,t.edit_note=e.note,t}();return r.discard(r.discardUnit)(H.bindHalogenM)(a.put(H.monadStateHalogenM)(u))(function(){return t.pure(H.applicativeHalogenM)(n.value1)})});if(n instanceof x)return r.discard(r.discardUnit)(H.bindHalogenM)(y.liftEffect(H.monadEffectHalogenM(h.monadEffectAff))(_.preventDefault(n.value0)))(function(){return r.bind(H.bindHalogenM)(a.get(H.monadStateHalogenM))(function(u){return r.bind(H.bindHalogenM)(w.liftAff(H.monadAffHalogenM(w.monadAffAff))(e.editNote(u.edit_note)))(function(e){var o=S.fromMaybe(u.edit_note)(r.bind(S.bindMaybe)(r.bind(S.bindMaybe)(i.toNumber(e.response))(d.fromNumber))(function(n){return new S.Just({id:n,created:u.edit_note.created,length:u.edit_note.length,text:u.edit_note.text,title:u.edit_note.title,updated:u.edit_note.updated})}));return r.discard(r.discardUnit)(H.bindHalogenM)(a.put(H.monadStateHalogenM)(function(){var n={};for(var e in u)({}).hasOwnProperty.call(u,e)&&(n[e]=u[e]);return n.edit=!1,n.note=o,n.edit_note=o,n}()))(function(){return t.pure(H.applicativeHalogenM)(n.value1)})})})});throw new Error("Failed pattern match at Component.NList line 205, column 3 - line 205, column 61: "+[n.constructor.name])},receiver:f.const(S.Nothing.value)})}}(PS["Component.NList"]=PS["Component.NList"]||{}),function(n){"use strict";PS["Control.Monad.Error.Class"],PS["Control.Monad.Reader.Trans"],PS["Control.Monad.Trans.Class"],PS["Control.Semigroupoid"];var e=PS["Effect.Aff"],t=(PS.Prelude,function(n,e,t,r,a){this.Functor1=n,this.Monad0=e,this.fork=t,this.join=r,this.suspend=a}),r=new t(function(){return e.functorFiber},function(){return e.monadAff},e.forkAff,e.joinFiber,e.suspendAff);n.fork=function(n){return n.fork},n.join=function(n){return n.join},n.suspend=function(n){return n.suspend},n.MonadFork=t,n.monadForkAff=r}(PS["Control.Monad.Fork.Class"]=PS["Control.Monad.Fork.Class"]||{}),function(n){"use strict";(PS["Effect.Console"]=PS["Effect.Console"]||{}).warn=function(n){return function(){return console.warn(n),{}}}}(),function(n){"use strict";var e=PS["Effect.Console"];PS["Data.Show"],PS["Data.Unit"],PS.Effect;n.warn=e.warn}(PS["Effect.Console"]=PS["Effect.Console"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"];var e=PS["Data.Foldable"],t=(PS["Data.Function"],PS["Data.Functor"]),r=(PS["Data.List"],PS["Data.List.Types"]),a=(PS["Data.Map"],PS["Data.Map.Internal"]),u=PS["Data.Maybe"],o=(PS["Data.Traversable"],PS.Effect,PS["Effect.Aff"],PS["Effect.Ref"]),i=(PS["Halogen.Component"],PS["Halogen.Data.OrdBox"],PS.Prelude,PS["Unsafe.Coerce"]),l=(PS["Web.DOM"],i.unsafeCoerce),c=i.unsafeCoerce,f=i.unsafeCoerce;n.unDriverStateX=c,n.mkDriverStateXRef=f,n.renderStateX=function(n){return function(n){return c(function(e){return(e.prjQuery,i.unsafeCoerce)(n(e.rendering))})}},n.renderStateX_=function(n){return function(t){return c(function(r){return e.traverse_(n)(e.foldableMaybe)(t)(r.rendering)})}},n.unRenderStateX=l,n.initDriverState=function(n){return function(e){return function(i){return function(l){return function(c){return function(){var s=o.new({})(),d=o.new(a.empty)(),S=o.new(a.empty)(),P=o.new(t.voidLeft(u.functorMaybe)(n.initializer)(r.Nil.value))(),v=o.new(new u.Just(r.Nil.value))(),p=o.new(u.Nothing.value)(),m=o.new(0)(),D=o.new(new u.Just(a.empty))(),b={component:n,state:n.initialState(e),refs:a.empty,children:a.empty,childrenIn:d,childrenOut:S,selfRef:s,handler:i,pendingQueries:P,pendingOuts:v,pendingHandlers:p,rendering:u.Nothing.value,prjQuery:l,fresh:m,subscriptions:D,lifecycleHandlers:c};return o.write(b)(s)(),f(s)}}}}}}}(PS["Halogen.Aff.Driver.State"]=PS["Halogen.Aff.Driver.State"]||{}),function(n){"use strict";(PS["Unsafe.Reference"]=PS["Unsafe.Reference"]||{}).reallyUnsafeRefEq=function(n){return function(e){return n===e}}}(),function(n){"use strict";var e=PS["Unsafe.Reference"].reallyUnsafeRefEq;n.unsafeRefEq=e}(PS["Unsafe.Reference"]=PS["Unsafe.Reference"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Applicative.Free"],r=PS["Control.Bind"],a=PS["Control.Coroutine"],u=PS["Control.Monad.Error.Class"],o=PS["Control.Monad.Fork.Class"],i=PS["Control.Monad.Free"],l=PS["Control.Monad.Free.Trans"],c=PS["Control.Monad.Trans.Class"],f=PS["Control.Parallel"],s=PS["Control.Parallel.Class"],d=(PS["Control.Semigroupoid"],PS["Data.Boolean"]),S=PS["Data.Coyoneda"],P=PS["Data.Eq"],v=PS["Data.Foldable"],p=PS["Data.Function"],m=PS["Data.Functor"],D=PS["Data.List"],b=PS["Data.List.Types"],g=PS["Data.Map"],h=PS["Data.Map.Internal"],w=PS["Data.Maybe"],y=PS["Data.Ord"],E=(PS["Data.Semiring"],PS["Data.Set"]),M=(PS["Data.Tuple"],PS.Effect,PS["Effect.Aff"]),C=PS["Effect.Class"],T=PS["Effect.Exception"],A=PS["Effect.Ref"],F=PS["Halogen.Aff.Driver.State"],H=PS["Halogen.Data.OrdBox"],L=PS["Halogen.Query.EventSource"],_=PS["Halogen.Query.ForkF"],I=PS["Halogen.Query.HalogenM"],O=PS["Halogen.Query.InputF"],N=(PS.Prelude,PS["Unsafe.Reference"]),W=function(n){return function(e){return function(t){return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(e)))(function(r){if(r instanceof w.Nothing)return n(t);if(r instanceof w.Just)return C.liftEffect(M.monadEffectAff)(A.write(new w.Just(new b.Cons(n(t),r.value0)))(e));throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 171, column 3 - line 175, column 59: "+[r.constructor.name])})}}},x=function(n){return function(t){return r.discard(r.discardUnit)(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.write({initializers:b.Nil.value,finalizers:b.Nil.value})(n)))(function(){return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(t))(function(t){return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(n)))(function(n){return r.discard(r.discardUnit)(M.bindAff)(v.traverse_(M.applicativeAff)(b.foldableList)(o.fork(o.monadForkAff))(n.finalizers))(function(){return r.discard(r.discardUnit)(M.bindAff)(f.parSequence_(M.parallelAff)(b.foldableList)(n.initializers))(function(){return e.pure(M.applicativeAff)(t)})})})})})}};n.handleLifecycle=x,n.eval=function(n){return function(f){var v=function(i){return function(f){if(f instanceof I.State)return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(i)))(function(t){var a=f.value0(t.state);if(N.unsafeRefEq(t.state)(a.value1))return e.pure(M.applicativeAff)(a.value0);if(d.otherwise)return r.discard(r.discardUnit)(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.write({component:t.component,state:a.value1,refs:t.refs,children:t.children,childrenIn:t.childrenIn,childrenOut:t.childrenOut,selfRef:t.selfRef,handler:t.handler,pendingQueries:t.pendingQueries,pendingOuts:t.pendingOuts,pendingHandlers:t.pendingHandlers,rendering:t.rendering,prjQuery:t.prjQuery,fresh:t.fresh,subscriptions:t.subscriptions,lifecycleHandlers:t.lifecycleHandlers})(i)))(function(){return r.discard(r.discardUnit)(M.bindAff)(x(t.lifecycleHandlers)(n(t.lifecycleHandlers)(i)))(function(){return e.pure(M.applicativeAff)(a.value0)})});throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 76, column 7 - line 82, column 21: "+[a.constructor.name])});if(f instanceof I.Subscribe)return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(i)))(function(n){return r.bind(M.bindAff)(o.fork(o.monadForkAff)(r.bind(M.bindAff)(L.unEventSource(f.value0))(function(t){return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A["modify'"](function(n){return{state:n+1|0,value:n}})(n.fresh)))(function(u){var o=r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(n.subscriptions)))(function(t){return e.when(M.applicativeAff)(w.maybe(!1)(h.member(y.ordInt)(u))(t))(C.liftEffect(M.monadEffectAff)(A.modify_(m.map(w.functorMaybe)(h.delete(y.ordInt)(u)))(n.subscriptions)))});return r.discard(r.discardUnit)(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.modify_(m.map(w.functorMaybe)(h.insert(y.ordInt)(u)(o)))(n.subscriptions)))(function(){var u=r.bind(l.bindFreeT(a.functorAwait)(M.monadAff))(a.await(M.monadAff))(function(t){return r.bind(l.bindFreeT(a.functorAwait)(M.monadAff))(c.lift(l.monadTransFreeT(a.functorAwait))(M.monadAff)(C.liftEffect(M.monadEffectAff)(A.read(n.subscriptions))))(function(n){return e.when(l.applicativeFreeT(a.functorAwait)(M.monadAff))(w.isJust(n))(r.bind(l.bindFreeT(a.functorAwait)(M.monadAff))(c.lift(l.monadTransFreeT(a.functorAwait))(M.monadAff)(R(i)(t)))(function(n){return e.when(l.applicativeFreeT(a.functorAwait)(M.monadAff))(P.eq(L.eqSubscribeStatus)(n)(L.Listening.value))(u)}))})});return r.discard(r.discardUnit)(M.bindAff)(a.runProcess(M.monadRecAff)(a.pullFrom(M.monadRecAff)(u)(t.producer)))(function(){return o})})})})))(function(n){return e.pure(M.applicativeAff)(f.value1)})});if(f instanceof I.Lift)return f.value0;if(f instanceof I.Halt)return u.throwError(M.monadThrowAff)(T.error(f.value0));if(f instanceof I.GetSlots)return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(i)))(function(n){return e.pure(M.applicativeAff)(f.value0(m.map(b.functorList)(H.unOrdBox)(D.fromFoldable(E.foldableSet)(g.keys(n.children)))))});if(f instanceof I.CheckSlot)return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(i)))(function(n){return e.pure(M.applicativeAff)(f.value1(h.member(H.ordOrdBox)(n.component.mkOrdBox(f.value0))(n.children)))});if(f instanceof I.ChildQuery)return k(i)(f.value0)(f.value1);if(f instanceof I.Raise)return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(i)))(function(n){return r.discard(r.discardUnit)(M.bindAff)(W(n.handler)(n.pendingOuts)(f.value0))(function(){return e.pure(M.applicativeAff)(f.value1)})});if(f instanceof I.Par)return s.sequential(M.parallelAff)(t.retractFreeAp(M.applicativeParAff)(t.hoistFreeAp(function(n){return s.parallel(M.parallelAff)(U(i)(n))})(f.value0)));if(f instanceof I.Fork)return _.unFork(function(n){return r.bind(M.bindAff)(o.fork(o.monadForkAff)(U(i)(n.value0)))(function(t){return e.pure(M.applicativeAff)(n.value1(p.flip(M.killFiber)(t)))})})(f.value0);if(f instanceof I.GetRef)return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(i)))(function(n){return e.pure(M.applicativeAff)(f.value1(h.lookup(y.ordString)(f.value0)(n.refs)))});throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 73, column 12 - line 128, column 33: "+[f.constructor.name])}},U=function(n){return function(e){return i.foldFree(M.monadRecAff)(v(n))(e)}},R=function(n){return function(e){return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(n)))(function(t){var r=t.component.eval(e);return i.foldFree(M.monadRecAff)(v(n))(r)})}},k=function(n){return function(e){return S.unCoyoneda(function(t){return function(a){return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(n)))(function(n){var o=h.lookup(H.ordOrdBox)(n.component.mkOrdBox(e))(n.children);if(o instanceof w.Just)return r.bind(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.read(o.value0)))(function(n){return F.unDriverStateX(function(n){var e=n.prjQuery(a);if(e instanceof w.Just)return m.map(M.functorAff)(t)(R(n.selfRef)(e.value0));if(e instanceof w.Nothing)return u.throwError(M.monadThrowAff)(T.error("Query projection failed for child query"));throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 141, column 32 - line 143, column 82: "+[e.constructor.name])})(n)});if(o instanceof w.Nothing)return u.throwError(M.monadThrowAff)(T.error("Slot lookup failed for child query"));throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 138, column 5 - line 144, column 73: "+[o.constructor.name])})}})}};return function(n){if(n instanceof O.RefUpdate)return r.discard(r.discardUnit)(M.bindAff)(C.liftEffect(M.monadEffectAff)(A.modify_(function(e){return{component:e.component,state:e.state,refs:h.alter(y.ordString)(p.const(n.value1))(n.value0)(e.refs),children:e.children,childrenIn:e.childrenIn,childrenOut:e.childrenOut,selfRef:e.selfRef,handler:e.handler,pendingQueries:e.pendingQueries,pendingOuts:e.pendingOuts,pendingHandlers:e.pendingHandlers,rendering:e.rendering,prjQuery:e.prjQuery,fresh:e.fresh,subscriptions:e.subscriptions,lifecycleHandlers:e.lifecycleHandlers}})(f)))(function(){return e.pure(M.applicativeAff)(n.value2)});if(n instanceof O.Query)return R(f)(n.value0);throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval line 59, column 3 - line 64, column 25: "+[n.constructor.name])}}},n.queuingHandler=W}(PS["Halogen.Aff.Driver.Eval"]=PS["Halogen.Aff.Driver.Eval"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Bind"],r=PS["Control.Coroutine"],a=PS["Control.Monad.Fork.Class"],u=PS["Control.Monad.Rec.Class"],o=PS["Control.Parallel"],i=(PS["Control.Semigroupoid"],PS["Data.Either"]),l=PS["Data.Foldable"],c=PS["Data.Function"],f=PS["Data.Functor"],s=PS["Data.List"],d=PS["Data.List.Types"],S=(PS["Data.Map"],PS["Data.Map.Internal"]),P=PS["Data.Maybe"],v=PS["Data.Ord"],p=(PS["Data.Semiring"],PS["Data.Traversable"],PS["Data.Tuple"],PS["Data.Unit"]),m=PS.Effect,D=PS["Effect.Aff"],b=PS["Effect.Aff.AVar"],g=PS["Effect.Class"],h=PS["Effect.Console"],w=PS["Effect.Exception"],y=PS["Effect.Ref"],E=(PS.Halogen,PS["Halogen.Aff.Driver.Eval"]),M=PS["Halogen.Aff.Driver.State"],C=PS["Halogen.Component"],T=PS["Halogen.Data.OrdBox"],A=PS["Halogen.Query.InputF"],F=(PS.Prelude,y.new({initializers:d.Nil.value,finalizers:d.Nil.value})),H=D.runAff_(i.either(w.throwException)(c.const(e.pure(m.applicativeEffect)(p.unit))));n.runUI=function(n){return function(L){return function(_){var I=function(n){return function(){var e=y.read(n)();return y.write(P.Nothing.value)(n)(),l.for_(m.applicativeEffect)(l.foldableMaybe)(e)(function(n){return H(l.traverse_(D.applicativeAff)(d.foldableList)(a.fork(a.monadForkAff))(s.reverse(n)))})()}},O=function(n){return function(e){return function(r){return function(a){return C.unComponent(function(u){return function(){var i=F(),c=M.initDriverState(u)(r)(e)(a)(i)(),S=y.read(n)();return y.write({initializers:d.Nil.value,finalizers:S.finalizers})(n)(),t.bindFlipped(m.bindEffect)(M.unDriverStateX(function(e){return N(n)(e.selfRef)}))(y.read(c))(),t.bindFlipped(m.bindEffect)(function(n){return function(e){return M.unDriverStateX(function(r){var a=f.map(P.functorMaybe)(function(n){return x(r.selfRef)(A.Query.create(n))})(r.component.initializer);return y.modify_(function(n){return{initializers:new d.Cons(t.discard(t.discardUnit)(D.bindAff)(o.parSequence_(D.parallelAff)(d.foldableList)(s.reverse(n.initializers)))(function(){return t.discard(t.discardUnit)(D.bindAff)(l.sequence_(D.applicativeAff)(l.foldableMaybe)(a))(function(){return g.liftEffect(D.monadEffectAff)(function(){return I(r.pendingQueries)(),I(r.pendingOuts)()})})}),e),finalizers:n.finalizers}})(n)})}}(n)(S.initializers))(y.read(c))(),c}})}}}},N=function(r){return function(o){return function(){var i=y.read(o)(),v=f.map(m.functorEffect)(P.isNothing)(y.read(i.pendingHandlers))();e.when(m.applicativeEffect)(v)(y.write(new P.Just(d.Nil.value))(i.pendingHandlers))(),y.write(S.empty)(i.childrenOut)(),y.write(i.children)(i.childrenIn)();var b=E.queuingHandler(function(n){return f.void(D.functorAff)(x(i.selfRef)(n))})(i.pendingHandlers),g=E.queuingHandler(function(n){return b(A.Query.create(n))})(i.pendingQueries),F=n.render(function(n){return H(b(n))})(function(r){return function(a){return function(u){return function(o){return function(i){return C.unComponentSlot(function(c){return function(s){return function(d){return function(v){return function(b){return function(g){var E=u(c);return function(){var u=y.read(o)(),c=function(){var n=S.pop(T.ordOrdBox)(E)(u);if(n instanceof P.Just)return y.write(n.value0.value1)(o)(),l.for_(m.applicativeEffect)(l.foldableMaybe)(v(d))(function(e){return function(){var t=y.read(n.value0.value0)();return M.unDriverStateX(function(n){return l.for_(m.applicativeEffect)(l.foldableMaybe)(n.prjQuery(e))(function(e){return H(x(n.selfRef)(A.Query.create(e)))})})(t)()}})(),n.value0.value0;if(n instanceof P.Nothing)return O(r)(function(n){return P.maybe(e.pure(D.applicativeAff)(p.unit))(a)(b(n))})(d)(g)(s)();throw new Error("Failed pattern match at Halogen.Aff.Driver line 258, column 14 - line 266, column 92: "+[n.constructor.name])}(),C=f.map(m.functorEffect)(S.member(T.ordOrdBox)(E))(y.read(i))();return e.when(m.applicativeEffect)(C)(h.warn("Halogen: Duplicate slot address was detected during rendering, unexpected results may occur"))(),y.modify_(S.insert(T.ordOrdBox)(E)(c))(i)(),t.bind(m.bindEffect)(y.read(c))(M.renderStateX(m.functorEffect)(function(t){if(t instanceof P.Nothing)return w.throw("Halogen internal error: child was not initialized in renderChild");if(t instanceof P.Just)return e.pure(m.applicativeEffect)(n.renderChild(t.value0));throw new Error("Failed pattern match at Halogen.Aff.Driver line 271, column 37 - line 273, column 50: "+[t.constructor.name])}))()}}}}}}})}}}}}(r)(g)(i.component.mkOrdBox)(i.childrenIn)(i.childrenOut))(i.component.render(i.state))(i.rendering)(),L=y.read(i.childrenOut)();return t.bind(m.bindEffect)(y.read(i.childrenIn))(l.traverse_(m.applicativeEffect)(S.foldableMap)(function(e){return function(){var t=y.read(e)();return M.renderStateX_(m.applicativeEffect)(n.removeChild)(t)(),W(r)(t)()}}))(),y.modify_(function(n){return{rendering:new P.Just(F),children:L,component:n.component,state:n.state,refs:n.refs,childrenIn:n.childrenIn,childrenOut:n.childrenOut,selfRef:n.selfRef,handler:n.handler,pendingQueries:n.pendingQueries,pendingOuts:n.pendingOuts,pendingHandlers:n.pendingHandlers,prjQuery:n.prjQuery,fresh:n.fresh,subscriptions:n.subscriptions,lifecycleHandlers:n.lifecycleHandlers}})(i.selfRef)(),e.when(m.applicativeEffect)(v)(c.flip(u.tailRecM(u.monadRecEffect))(p.unit)(function(n){return function(){var n=y.read(i.pendingHandlers)();y.write(new P.Just(d.Nil.value))(i.pendingHandlers)(),l.traverse_(m.applicativeEffect)(l.foldableMaybe)(function(n){return H(l.traverse_(D.applicativeAff)(d.foldableList)(a.fork(a.monadForkAff))(s.reverse(n)))})(n)();var e=y.read(i.pendingHandlers)();return P.maybe(!1)(s.null)(e)?f.voidLeft(m.functorEffect)(y.write(P.Nothing.value)(i.pendingHandlers))(new u.Done(p.unit))():new u.Loop(p.unit)}}))()}}},W=function(n){return M.unDriverStateX(function(e){return function(){var r;return(r=e,function(){return t.bindFlipped(m.bindEffect)(l.traverse_(m.applicativeEffect)(l.foldableMaybe)(function(n){return H(l.traverse_(D.applicativeAff)(S.foldableMap)(a.fork(a.monadForkAff))(n))}))(y.read(r.subscriptions))(),y.write(P.Nothing.value)(r.subscriptions)()})(),l.for_(m.applicativeEffect)(l.foldableMaybe)(f.map(P.functorMaybe)(function(n){return x(e.selfRef)(A.Query.create(n))})(e.component.finalizer))(function(e){return y.modify_(function(n){return{initializers:n.initializers,finalizers:new d.Cons(e,n.finalizers)}})(n)})(),l.for_(m.applicativeEffect)(S.foldableMap)(e.children)(t.composeKleisliFlipped(m.bindEffect)(W(n))(y.read))()}})},x=function(n){return E.eval(N)(n)};return t.bind(D.bindAff)(g.liftEffect(D.monadEffectAff)(F))(function(n){return t.bind(D.bindAff)(g.liftEffect(D.monadEffectAff)(y.new(0)))(function(u){return E.handleLifecycle(n)(function(){var o,c=y.new(S.empty)();return t.bind(m.bindEffect)(t.bind(m.bindEffect)(O(n)((o=c,function(n){return t.bind(D.bindAff)(g.liftEffect(D.monadEffectAff)(y.read(o)))(function(e){return l.traverse_(D.applicativeAff)(S.foldableMap)(a.fork(a.monadForkAff))(f.map(S.functorMap)(b.put(n))(e))})}))(_)(P.Just.create)(L))(y.read))(M.unDriverStateX(function(n){return e.pure(m.applicativeEffect)({query:(l=n.selfRef,function(n){return function(e){var t=n(e);if(t instanceof P.Just)return x(l)(new A.Query(t.value0));if(t instanceof P.Nothing)return g.liftEffect(D.monadEffectAff)(w.throwException(w.error("Halogen internal error: query projection failed in runUI'")));throw new Error("Failed pattern match at Halogen.Aff.Driver line 136, column 5 - line 138, column 113: "+[t.constructor.name])}})(n.prjQuery),subscribe:(o=u,function(n){return function(e){return t.bind(D.bindAff)(b.empty)(function(u){return t.bind(D.bindAff)(g.liftEffect(D.monadEffectAff)(function(){var e=y.read(o)();return y.modify_(function(n){return n+1|0})(o)(),y.modify_(S.insert(v.ordInt)(e)(u))(n)(),e}))(function(o){var l=r.producer(D.monadAff)(f.map(D.functorAff)(i.Left.create)(b.take(u)));return f.void(D.functorAff)(a.fork(a.monadForkAff)(t.discard(t.discardUnit)(D.bindAff)(r.runProcess(D.monadRecAff)(r.connect(D.monadRecAff)(D.parallelAff)(l)(e)))(function(){return t.discard(t.discardUnit)(D.bindAff)(g.liftEffect(D.monadEffectAff)(y.modify_(S.delete(v.ordInt)(o))(n)))(function(){return b.kill(w.error("ended"))(u)})})))})})}})(c)});var o,l}))()})})})}}}}(PS["Halogen.Aff.Driver"]=PS["Halogen.Aff.Driver"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Bind"],r=(PS["Control.Monad.Error.Class"],PS["Control.Semigroupoid"],PS["Data.Either"]),a=PS["Data.Function"],u=(PS["Data.Functor"],PS["Data.Maybe"]),o=PS["Data.Unit"],i=PS.Effect,l=PS["Effect.Aff"],c=PS["Effect.Class"],f=PS["Effect.Exception"],s=(PS.Prelude,PS["Web.DOM.ParentNode"]),d=(PS["Web.Event.EventTarget"],PS["Web.HTML"]),S=(PS["Web.HTML.Event.EventTypes"],PS["Web.HTML.HTMLDocument"]),P=(PS["Web.HTML.HTMLDocument.ReadyState"],PS["Web.HTML.HTMLElement"]),v=PS["Web.HTML.Window"],p=l.runAff_(r.either(f.throwException)(a.const(e.pure(i.applicativeEffect)(o.unit))));n.selectElement=function(n){return t.bind(l.bindAff)(c.liftEffect(l.monadEffectAff)(t.bindFlipped(i.bindEffect)(t.composeKleisliFlipped(i.bindEffect)(function(e){return s.querySelector(n)(S.toParentNode(e))})(v.document))(d.window)))(function(n){return e.pure(l.applicativeAff)(t.bindFlipped(u.bindMaybe)(P.fromElement)(n))})},n.runHalogenAff=p}(PS["Halogen.Aff.Util"]=PS["Halogen.Aff.Util"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"];var e,t=PS["Data.Array"],r=(PS["Data.Eq"],PS["Data.Function.Uncurried"],PS["Data.Maybe"]),a=PS["Data.Nullable"],u=PS["Data.Tuple"],o=PS.Effect,i=(PS["Effect.Uncurried"],PS["Halogen.VDom.Machine"]),l=PS["Halogen.VDom.Types"],c=PS["Halogen.VDom.Util"],f=(PS.Prelude,PS["Web.DOM.Document"],PS["Web.DOM.Element"]),s=(PS["Web.DOM.Node"],function(n,e){return n.value1===e.value1&&(n.value0 instanceof r.Just&&e.value0 instanceof r.Just&&n.value0.value0===e.value0.value0||n.value0 instanceof r.Nothing&&e.value0 instanceof r.Nothing)}),d=(e=function(n,t){return function(r){if(r instanceof l.Grafted)return e(n,t)(l.runGraft(r.value0));if(r instanceof l.Widget){var a=t.value1(r.value0);return new i.Step(a.value0,e(n,a),a.value2)}return t.value2(),n(r)}},function(n,t,r){var a=n.buildWidget(n)(r);return new i.Step(a.value0,e(t,a),a.value2)}),S=function(){var n=function(e,t,r,a){return function(u){if(u instanceof l.Grafted)return n(e,t,r,a)(l.runGraft(u.value0));if(u instanceof l.Text){var o=new i.Step(r,n(e,t,r,u.value0),t);return a===u.value0?o:(c.setTextContent(u.value0,r),o)}return t(),e(u)}};return function(e,t,r){var a,u=c.createTextNode(r,e.document),o=(a=u,function(){var n=c.parentNode(a);return c.removeChild(a,n)});return new i.Step(u,n(t,o,u,r),o)}}(),P=function(){var n=function(n,e,t){return function(){var r=c.parentNode(n);return c.removeChild(n,r),c.forInE(t,function(n,e){return e.value2()}),i.halt(e)()}},e=function(r,a,o,f,d,S,P){return function(v){if(v instanceof l.Grafted)return e(r,a,o,f,d,S,P)(l.runGraft(v.value0));if(v instanceof l.Keyed&&s(d,v.value0)){var p=t.length(v.value1);if(0===P&&0===p){var m=i.step(f)(v.value0.value2),D=n(o,m,S);return new i.Step(o,e(r,D,o,m,v.value0,S,0),D)}m=c.diffWithKeyAndIxE(S,v.value1,u.fst,function(n,e,t,r){var a=t.value1(r.value1);return c.insertChildIx(e,a.value0,o),a},function(n,e){return e.value2()},function(n,e,t){var a=r(t.value1);return c.insertChildIx(e,a.value0,o),a});var b=i.step(f)(v.value0.value2);D=n(o,b,m);return new i.Step(o,e(r,D,o,b,v.value0,m,p),D)}return a(),r(v)}};return function(r,o,l,s){var d=c.createElement(a.toNullable(l.value0),l.value1,r.document),S=f.toNode(d),P=c.strMapWithIxE(s,u.fst,function(n,e,t){var r=o(t.value1);return c.insertChildIx(e,r.value0,S),r}),v=r.buildAttributes(d)(l.value2),p=n(S,v,P);return new i.Step(S,e(o,p,S,v,l,P,t.length(s)),p)}}(),v=function(){var n=function(n,e,t){return function(){var r=c.parentNode(n);return c.removeChild(n,r),o.foreachE(t)(i.halt)(),i.halt(e)()}},e=function(r,a,u,o,f,d){return function(S){if(S instanceof l.Grafted)return e(r,a,u,o,f,d)(l.runGraft(S.value0));if(S instanceof l.Elem&&s(f,S.value0)){var P=t.length(S.value1);if(0===t.length(d)&&0===P){var v=i.step(o)(S.value0.value2),p=n(u,v,d);return new i.Step(u,e(r,p,u,v,S.value0,d),p)}v=c.diffWithIxE(d,S.value1,function(n,e,t){var r=e.value1(t);return c.insertChildIx(n,r.value0,u),r},function(n,e){return e.value2()},function(n,e){var t=r(e);return c.insertChildIx(n,t.value0,u),t});var m=i.step(o)(S.value0.value2);p=n(u,m,v);return new i.Step(u,e(r,p,u,m,S.value0,v),p)}return a(),r(S)}};return function(t,r,u,o){var l=c.createElement(a.toNullable(u.value0),u.value1,t.document),s=f.toNode(l),d=c.forE(o,function(n,e){var t=r(e);return c.insertChildIx(n,t.value0,s),t}),S=t.buildAttributes(l)(u.value2),P=n(s,S,d);return new i.Step(s,e(r,P,s,S,u,d),P)}}();n.buildVDom=function(n){var e=function(t){if(t instanceof l.Text)return S(n,e,t.value0);if(t instanceof l.Elem)return v(n,e,t.value0,t.value1);if(t instanceof l.Keyed)return P(n,e,t.value0,t.value1);if(t instanceof l.Widget)return d(n,e,t.value0);if(t instanceof l.Grafted)return e(l.runGraft(t.value0));throw new Error("Failed pattern match at Halogen.VDom.DOM line 58, column 27 - line 63, column 52: "+[t.constructor.name])};return e},n.buildText=S,n.buildElem=v,n.buildKeyed=P,n.buildWidget=d}(PS["Halogen.VDom.DOM"]=PS["Halogen.VDom.DOM"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Bind"],r=PS["Control.Category"],a=PS["Data.Foldable"],u=(PS["Data.Function"],PS["Data.Functor"]),o=PS["Data.HeytingAlgebra"],i=PS["Data.Maybe"],l=PS["Data.Unit"],c=PS.Effect,f=PS["Effect.Aff"],s=PS["Effect.Class"],d=PS["Effect.Ref"],S=(PS["Effect.Uncurried"],PS["Halogen.Aff.Driver"]),P=PS["Halogen.Aff.Driver.State"],v=(PS["Halogen.Component"],PS["Halogen.HTML.Core"],PS["Halogen.Query.InputF"],PS["Halogen.VDom"],PS["Halogen.VDom.DOM"]),p=PS["Halogen.VDom.DOM.Prop"],m=PS["Halogen.VDom.Machine"],D=(PS.Prelude,PS["Unsafe.Reference"]),b=(PS["Web.DOM.Document"],PS["Web.DOM.Element"],PS["Web.DOM.Node"]),g=PS["Web.HTML"],h=PS["Web.HTML.HTMLDocument"],w=PS["Web.HTML.HTMLElement"],y=PS["Web.HTML.Window"],E=function(n){return function(){var e=b.parentNode(n.node)();return a.traverse_(c.applicativeEffect)(a.foldableMaybe)(function(e){return b.removeChild(n.node)(e)})(e)()}},M=function(n){return function(t){return{render:function(r){return function(a){return function(f){return function(s){if(s instanceof i.Nothing)return function(){var o=d.new(a)(),i=function(n){return function(t){return function(r){var a=P.unRenderStateX(function(n){return n.node}),u=e.pure(c.applicativeEffect)(l.unit),o=function(n){var e=d.read(t)()(n)(),r=a(e);return new m.Step(r,o,u)};return{buildWidget:function(n){return function(n){var e=d.read(t)()(n)(),r=a(e);return new m.Step(r,o,u)}},buildAttributes:p.buildProp(n),document:r}}}}(r)(o)(n),s=v.buildVDom(i)(f),S=m.extract(s);return u.void(c.functorEffect)(b.appendChild(S)(w.toNode(t)))(),{machine:s,node:S,renderChildRef:o}};if(s instanceof i.Just)return function(){d.write(a)(s.value0.renderChildRef)();var n=b.parentNode(s.value0.node)(),t=b.nextSibling(s.value0.node)(),r=m.step(s.value0.machine)(f),S=m.extract(r);return e.when(c.applicativeEffect)(o.not(o.heytingAlgebraFunction(o.heytingAlgebraFunction(o.heytingAlgebraBoolean)))(D.unsafeRefEq)(s.value0.node)(S))(function(n){return function(t){return function(r){return t instanceof i.Just&&r instanceof i.Just?u.void(c.functorEffect)(b.insertBefore(n)(t.value0)(r.value0)):t instanceof i.Nothing&&r instanceof i.Just?u.void(c.functorEffect)(b.appendChild(n)(r.value0)):e.pure(c.applicativeEffect)(l.unit)}}}(S)(t)(n))(),{machine:r,node:S,renderChildRef:s.value0.renderChildRef}};throw new Error("Failed pattern match at Halogen.VDom.Driver line 118, column 5 - line 134, column 80: "+[s.constructor.name])}}}},renderChild:r.identity(r.categoryFn),removeChild:E}}};n.runUI=function(n){return function(e){return function(r){return t.bind(f.bindAff)(s.liftEffect(f.monadEffectAff)(u.map(c.functorEffect)(h.toDocument)(t.bindFlipped(c.bindEffect)(y.document)(g.window))))(function(t){return S.runUI(M(t)(r))(n)(e)})}}}}(PS["Halogen.VDom.Driver"]=PS["Halogen.VDom.Driver"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Data.Unit"],r=PS.Effect,a=(PS.Prelude,e.pure(r.applicativeEffect)(t.unit));n.main=a}(PS.Main=PS.Main||{}),function(n){"use strict";var e=PS["Component.Add"],t=PS["Component.BList"],r=PS["Component.NList"],a=PS["Control.Bind"],u=PS["Data.Foldable"],o=(PS["Data.Function"],PS["Data.Functor"]),i=PS["Data.Unit"],l=(PS.Effect,PS["Effect.Aff"]),c=PS["Effect.Class"],f=(PS["Halogen.Aff"],PS["Halogen.Aff.Util"]),s=PS["Halogen.VDom.Driver"],d=(PS.Model,PS.Prelude,PS["Web.DOM.Element"]),S=(PS["Web.DOM.ParentNode"],PS["Web.HTML.HTMLElement"]),P=a.bind(l.bindAff)(f.selectElement(".user_footer"))(u.traverse_(l.applicativeAff)(u.foldableMaybe)(function(n){return c.liftEffect(l.monadEffectAff)(d.removeAttribute("hidden")(S.toElement(n)))}));n.renderBookmarks=function(n){return function(e){return f.runHalogenAff(a.bind(l.bindAff)(f.selectElement(n))(u.traverse_(l.applicativeAff)(u.foldableMaybe)(function(n){return a.discard(a.discardUnit)(l.bindAff)(o.void(l.functorAff)(s.runUI(t.blist(e))(i.unit)(n)))(function(){return P})})))}},n.renderAddForm=function(n){return function(t){return f.runHalogenAff(a.bind(l.bindAff)(f.selectElement(n))(u.traverse_(l.applicativeAff)(u.foldableMaybe)(function(n){return s.runUI(e.addbmark(t))(i.unit)(n)})))}},n.renderNotes=function(n){return function(e){return f.runHalogenAff(a.bind(l.bindAff)(f.selectElement(n))(u.traverse_(l.applicativeAff)(u.foldableMaybe)(function(n){return a.discard(a.discardUnit)(l.bindAff)(o.void(l.functorAff)(s.runUI(r.nlist(e))(i.unit)(n)))(function(){return P})})))}},n.renderNote=function(n){return function(e){return f.runHalogenAff(a.bind(l.bindAff)(f.selectElement(n))(u.traverse_(l.applicativeAff)(u.foldableMaybe)(function(n){return o.void(l.functorAff)(s.runUI(r.nnote(e))(i.unit)(n))})))}},n.showFooter=P}(PS.User=PS.User||{});+var PS={};!function(n){"use strict";var e;(PS["Affjax"]=PS["Affjax"]||{})._ajax=(e={},"undefined"==typeof module||!module.require||"undefined"!=typeof process&&process.versions.electron?(e.newXHR=function(){return new XMLHttpRequest},e.fixupUrl=function(n){return n||"/"},e.getResponse=function(n){return n.response}):(e.newXHR=function(){return new(module.require("xhr2"))},e.fixupUrl=function(n){var e=module.require("url"),t=e.parse(n);return t.protocol=t.protocol||"http:",t.hostname=t.hostname||"localhost",e.format(t)},e.getResponse=function(n){return n.response}),function(n,t){return function(r,a){var o=e.newXHR(),u=e.fixupUrl(t.url);if(o.open(t.method||"GET",u,!0,t.username,t.password),t.headers)try{for(var i,l=0;null!=(i=t.headers[l]);l++)o.setRequestHeader(i.field,i.value)}catch(n){r(n)}return o.onerror=function(){r(new Error("AJAX request failed: "+t.method+" "+t.url))},o.onload=function(){a({status:o.status,statusText:o.statusText,headers:o.getAllResponseHeaders().split("\r\n").filter(function(n){return n.length>0}).map(function(e){var t=e.indexOf(":");return n(e.substring(0,t))(e.substring(t+2))}),body:e.getResponse(o)})},o.responseType=t.responseType,o.withCredentials=t.withCredentials,o.send(t.content),function(n,e,t){try{o.abort()}catch(n){return e(n)}return t()}}})}(),function(n){"use strict";n.fromObject=function(n){return n},n.stringify=function(n){return JSON.stringify(n)}}(PS["Data.Argonaut.Core"]=PS["Data.Argonaut.Core"]||{}),function(n){"use strict";(PS["Data.Eq"]=PS["Data.Eq"]||{}).refEq=function(n){return function(e){return n===e}}}(),function(n){"use strict";n.boolConj=function(n){return function(e){return n&&e}},n.boolDisj=function(n){return function(e){return n||e}},n.boolNot=function(n){return!n}}(PS["Data.HeytingAlgebra"]=PS["Data.HeytingAlgebra"]||{}),function(n){"use strict";PS["Data.Symbol"];var e=function(){function n(){}return n.value=new n,n}();n.IsSymbol=function(n){this.reflectSymbol=n},n.reflectSymbol=function(n){return n.reflectSymbol},n.SProxy=e}(PS["Data.Symbol"]=PS["Data.Symbol"]||{}),function(n){"use strict";(PS["Data.Unit"]=PS["Data.Unit"]||{}).unit={}}(),function(n){"use strict";(PS["Data.Show"]=PS["Data.Show"]||{}).showIntImpl=function(n){return n.toString()}}(),function(n){"use strict";(PS["Record.Unsafe"]=PS["Record.Unsafe"]||{}).unsafeGet=function(n){return function(e){return e[n]}}}(),function(n){"use strict";var e=PS["Record.Unsafe"];n.unsafeGet=e.unsafeGet}(PS["Record.Unsafe"]=PS["Record.Unsafe"]||{}),function(n){"use strict";var e=PS["Data.Show"],t=(PS["Data.Symbol"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n){this.show=n}),r=new t(e.showIntImpl);n.Show=t,n.show=function(n){return n.show},n.showInt=r}(PS["Data.Show"]=PS["Data.Show"]||{}),function(n){"use strict";var e=PS["Data.Unit"];PS["Data.Show"];n.unit=e.unit}(PS["Data.Unit"]=PS["Data.Unit"]||{}),function(n){"use strict";var e=PS["Data.HeytingAlgebra"],t=(PS["Data.Symbol"],PS["Data.Unit"],PS["Record.Unsafe"],PS["Type.Data.Row"],PS["Type.Data.RowList"],function(n,e,t,r,a,o){this.conj=n,this.disj=e,this.ff=t,this.implies=r,this.not=a,this.tt=o}),r=function(n){return n.tt},a=function(n){return n.not},o=function(n){return n.implies},u=function(n){return n.ff},i=function(n){return n.disj},l=new t(e.boolConj,e.boolDisj,!1,function(n){return function(e){return i(l)(a(l)(n))(e)}},e.boolNot,!0),c=function(n){return n.conj};n.HeytingAlgebra=t,n.tt=r,n.ff=u,n.implies=o,n.conj=c,n.disj=i,n.not=a,n.heytingAlgebraBoolean=l,n.heytingAlgebraFunction=function(n){return new t(function(e){return function(t){return function(r){return c(n)(e(r))(t(r))}}},function(e){return function(t){return function(r){return i(n)(e(r))(t(r))}}},function(e){return u(n)},function(e){return function(t){return function(r){return o(n)(e(r))(t(r))}}},function(e){return function(t){return a(n)(e(t))}},function(e){return r(n)})}}(PS["Data.HeytingAlgebra"]=PS["Data.HeytingAlgebra"]||{}),function(n){"use strict";PS["Data.Show"];n.absurd=function(n){return function(n){for(var e;;)e=void(n=n);return e}(n)}}(PS["Data.Void"]=PS["Data.Void"]||{}),function(n){"use strict";var e=PS["Data.Eq"],t=(PS["Data.HeytingAlgebra"],PS["Data.Symbol"],PS["Data.Unit"],PS["Data.Void"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n){this.eq=n}),r=new t(function(n){return function(n){return!0}}),a=new t(function(n){return function(n){return!0}}),o=new t(e.refEq),u=new t(e.refEq),i=new t(e.refEq);n.Eq=t,n.eq=function(n){return n.eq},n.eqInt=u,n.eqChar=i,n.eqString=o,n.eqUnit=a,n.eqVoid=r}(PS["Data.Eq"]=PS["Data.Eq"]||{}),function(n){"use strict";var e=function(n){this.compose=n},t=new e(function(n){return function(e){return function(t){return n(e(t))}}});n.compose=function(n){return n.compose},n.Semigroupoid=e,n.semigroupoidFn=t}(PS["Control.Semigroupoid"]=PS["Control.Semigroupoid"]||{}),function(n){"use strict";var e=PS["Control.Semigroupoid"],t=function(n,e){this.Semigroupoid0=n,this.identity=e},r=new t(function(){return e.semigroupoidFn},function(n){return n});n.Category=t,n.identity=function(n){return n.identity},n.categoryFn=r}(PS["Control.Category"]=PS["Control.Category"]||{}),function(n){"use strict";(PS["Data.Boolean"]=PS["Data.Boolean"]||{}).otherwise=!0}(),function(n){"use strict";(PS["Data.Ord.Unsafe"]=PS["Data.Ord.Unsafe"]||{}).unsafeCompareImpl=function(n){return function(e){return function(t){return function(r){return function(a){return r<a?n:r===a?e:t}}}}}}(),function(n){"use strict";n.concatString=function(n){return function(e){return n+e}},n.concatArray=function(n){return function(e){return 0===n.length?e:0===e.length?n:n.concat(e)}}}(PS["Data.Semigroup"]=PS["Data.Semigroup"]||{}),function(n){"use strict";var e=PS["Data.Semigroup"],t=(PS["Data.Symbol"],PS["Data.Unit"],PS["Data.Void"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n){this.append=n}),r=new t(e.concatString),a=new t(e.concatArray),o=function(n){return n.append};n.Semigroup=t,n.append=o,n.semigroupString=r,n.semigroupFn=function(n){return new t(function(e){return function(t){return function(r){return o(n)(e(r))(t(r))}}})},n.semigroupArray=a}(PS["Data.Semigroup"]=PS["Data.Semigroup"]||{}),function(n){"use strict";PS["Data.Eq"],PS["Data.Semigroup"],PS["Data.Show"];var e=function(){function n(){}return n.value=new n,n}(),t=function(){function n(){}return n.value=new n,n}(),r=function(){function n(){}return n.value=new n,n}();n.LT=e,n.GT=t,n.EQ=r}(PS["Data.Ordering"]=PS["Data.Ordering"]||{}),function(n){"use strict";var e=PS["Data.Ord.Unsafe"],t=PS["Data.Ordering"],r=e.unsafeCompareImpl(t.LT.value)(t.EQ.value)(t.GT.value);n.unsafeCompare=r}(PS["Data.Ord.Unsafe"]=PS["Data.Ord.Unsafe"]||{}),function(n){"use strict";(PS["Data.Ring"]=PS["Data.Ring"]||{}).intSub=function(n){return function(e){return n-e|0}}}(),function(n){"use strict";n.intAdd=function(n){return function(e){return n+e|0}},n.intMul=function(n){return function(e){return n*e|0}}}(PS["Data.Semiring"]=PS["Data.Semiring"]||{}),function(n){"use strict";var e=PS["Data.Semiring"],t=(PS["Data.Symbol"],PS["Data.Unit"],PS["Record.Unsafe"],PS["Type.Data.Row"],PS["Type.Data.RowList"],function(n,e,t,r){this.add=n,this.mul=e,this.one=t,this.zero=r}),r=new t(e.intAdd,e.intMul,1,0);n.Semiring=t,n.add=function(n){return n.add},n.zero=function(n){return n.zero},n.mul=function(n){return n.mul},n.one=function(n){return n.one},n.semiringInt=r}(PS["Data.Semiring"]=PS["Data.Semiring"]||{}),function(n){"use strict";var e=PS["Data.Ring"],t=PS["Data.Semiring"],r=(PS["Data.Symbol"],PS["Data.Unit"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n,e){this.Semiring0=n,this.sub=e}),a=new r(function(){return t.semiringInt},e.intSub);n.Ring=r,n.sub=function(n){return n.sub},n.ringInt=a}(PS["Data.Ring"]=PS["Data.Ring"]||{}),function(n){"use strict";PS["Data.Ord"];var e=PS["Data.Eq"],t=PS["Data.Ord.Unsafe"],r=PS["Data.Ordering"],a=(PS["Data.Ring"],PS["Data.Semiring"],PS["Data.Symbol"],PS["Data.Unit"],PS["Data.Void"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n,e){this.Eq0=n,this.compare=e}),o=new a(function(){return e.eqVoid},function(n){return function(n){return r.EQ.value}}),u=new a(function(){return e.eqUnit},function(n){return function(n){return r.EQ.value}}),i=new a(function(){return e.eqString},t.unsafeCompare),l=new a(function(){return e.eqInt},t.unsafeCompare),c=new a(function(){return e.eqChar},t.unsafeCompare);n.Ord=a,n.compare=function(n){return n.compare},n.ordInt=l,n.ordString=i,n.ordChar=c,n.ordUnit=u,n.ordVoid=o}(PS["Data.Ord"]=PS["Data.Ord"]||{}),function(n){"use strict";PS["Control.Category"],PS["Data.Boolean"],PS["Data.Ord"],PS["Data.Ring"];n.flip=function(n){return function(e){return function(t){return n(t)(e)}}},n.const=function(n){return function(e){return n}},n.on=function(n){return function(e){return function(t){return function(r){return n(e(t))(e(r))}}}}}(PS["Data.Function"]=PS["Data.Function"]||{}),function(n){"use strict";(PS["Data.Function.Uncurried"]=PS["Data.Function.Uncurried"]||{}).runFn4=function(n){return function(e){return function(t){return function(r){return function(a){return n(e,t,r,a)}}}}}}(),function(n){"use strict";var e=PS["Data.Function.Uncurried"];PS["Data.Unit"];n.runFn4=e.runFn4}(PS["Data.Function.Uncurried"]=PS["Data.Function.Uncurried"]||{}),function(n){"use strict";(PS["Data.Functor"]=PS["Data.Functor"]||{}).arrayMap=function(n){return function(e){for(var t=e.length,r=new Array(t),a=0;a<t;a++)r[a]=n(e[a]);return r}}}(),function(n){"use strict";var e=PS["Data.Functor"],t=PS["Control.Semigroupoid"],r=PS["Data.Function"],a=PS["Data.Unit"],o=function(n){this.map=n},u=function(n){return n.map},i=new o(t.compose(t.semigroupoidFn)),l=new o(e.arrayMap);n.Functor=o,n.map=u,n.void=function(n){return u(n)(r.const(a.unit))},n.voidLeft=function(n){return function(e){return function(t){return u(n)(r.const(t))(e)}}},n.functorFn=i,n.functorArray=l}(PS["Data.Functor"]=PS["Data.Functor"]||{}),function(n){"use strict";PS["Data.Functor"],PS["Data.Semigroup"];n.Alt=function(n,e){this.Functor0=n,this.alt=e},n.alt=function(n){return n.alt}}(PS["Control.Alt"]=PS["Control.Alt"]||{}),function(n){"use strict";(PS["Control.Apply"]=PS["Control.Apply"]||{}).arrayApply=function(n){return function(e){for(var t=n.length,r=e.length,a=new Array(t*r),o=0,u=0;u<t;u++)for(var i=n[u],l=0;l<r;l++)a[o++]=i(e[l]);return a}}}(),function(n){"use strict";var e=PS["Control.Apply"],t=PS["Control.Category"],r=PS["Data.Function"],a=PS["Data.Functor"],o=function(n,e){this.Functor0=n,this.apply=e},u=new o(function(){return a.functorArray},e.arrayApply),i=function(n){return n.apply};n.Apply=o,n.apply=i,n.applySecond=function(n){return function(e){return function(o){return i(n)(a.map(n.Functor0())(r.const(t.identity(t.categoryFn)))(e))(o)}}},n.lift2=function(n){return function(e){return function(t){return function(r){return i(n)(a.map(n.Functor0())(e)(t))(r)}}}},n.applyArray=u}(PS["Control.Apply"]=PS["Control.Apply"]||{}),function(n){"use strict";var e=PS["Control.Apply"],t=(PS["Data.Functor"],PS["Data.Unit"]),r=function(n){return n.pure};n.Applicative=function(n,e){this.Apply0=n,this.pure=e},n.pure=r,n.liftA1=function(n){return function(t){return function(a){return e.apply(n.Apply0())(r(n)(t))(a)}}},n.when=function(n){return function(e){return function(a){if(e)return a;if(!e)return r(n)(t.unit);throw new Error("Failed pattern match at Control.Applicative (line 57, column 1 - line 57, column 63): "+[e.constructor.name,a.constructor.name])}}}}(PS["Control.Applicative"]=PS["Control.Applicative"]||{}),function(n){"use strict";(PS["Control.Bind"]=PS["Control.Bind"]||{}).arrayBind=function(n){return function(e){for(var t=[],r=0,a=n.length;r<a;r++)Array.prototype.push.apply(t,e(n[r]));return t}}}(),function(n){"use strict";var e=PS["Control.Bind"],t=(PS["Control.Applicative"],PS["Control.Apply"]),r=PS["Control.Category"],a=PS["Data.Function"],o=(PS["Data.Functor"],PS["Data.Unit"],function(n,e){this.Apply0=n,this.bind=e}),u=function(n){this.discard=n},i=new o(function(){return t.applyArray},e.arrayBind),l=function(n){return n.bind},c=function(n){return a.flip(l(n))},f=new u(function(n){return l(n)});n.Bind=o,n.bind=l,n.bindFlipped=c,n.Discard=u,n.discard=function(n){return n.discard},n.join=function(n){return function(e){return l(n)(e)(r.identity(r.categoryFn))}},n.composeKleisli=function(n){return function(e){return function(t){return function(r){return l(n)(e(r))(t)}}}},n.composeKleisliFlipped=function(n){return function(e){return function(t){return function(r){return c(n)(e)(t(r))}}}},n.bindArray=i,n.discardUnit=f}(PS["Control.Bind"]=PS["Control.Bind"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=(PS["Control.Apply"],PS["Control.Bind"]);PS["Data.Functor"],PS["Data.Unit"];n.Monad=function(n,e){this.Applicative0=n,this.Bind1=e},n.ap=function(n){return function(r){return function(a){return t.bind(n.Bind1())(r)(function(r){return t.bind(n.Bind1())(a)(function(t){return e.pure(n.Applicative0())(r(t))})})}}}}(PS["Control.Monad"]=PS["Control.Monad"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Data.Functor"];n.Plus=function(n,e){this.Alt0=n,this.empty=e},n.empty=function(n){return n.empty}}(PS["Control.Plus"]=PS["Control.Plus"]||{}),function(n){"use strict";n.topInt=2147483647,n.bottomInt=-2147483648,n.topChar=String.fromCharCode(65535),n.bottomChar=String.fromCharCode(0)}(PS["Data.Bounded"]=PS["Data.Bounded"]||{}),function(n){"use strict";var e=PS["Data.Bounded"],t=PS["Data.Ord"],r=(PS["Data.Ordering"],PS["Data.Unit"],function(n,e,t){this.Ord0=n,this.bottom=e,this.top=t}),a=new r(function(){return t.ordInt},e.bottomInt,e.topInt),o=new r(function(){return t.ordChar},e.bottomChar,e.topChar);n.Bounded=r,n.bottom=function(n){return n.bottom},n.top=function(n){return n.top},n.boundedInt=a,n.boundedChar=o}(PS["Data.Bounded"]=PS["Data.Bounded"]||{}),function(n){"use strict";n.intDegree=function(n){return Math.min(Math.abs(n),2147483647)},n.intDiv=function(n){return function(e){return 0===e?0:e>0?Math.floor(n/e):-Math.floor(n/-e)}},n.intMod=function(n){return function(e){if(0===e)return 0;var t=Math.abs(e);return(n%t+t)%t}}}(PS["Data.EuclideanRing"]=PS["Data.EuclideanRing"]||{}),function(n){"use strict";var e=PS["Data.Ring"],t=(PS["Data.Semiring"],PS["Data.Symbol"],PS["Data.Unit"],function(n){this.Ring0=n}),r=new t(function(){return e.ringInt});n.CommutativeRing=t,n.commutativeRingInt=r}(PS["Data.CommutativeRing"]=PS["Data.CommutativeRing"]||{}),function(n){"use strict";var e=PS["Data.EuclideanRing"],t=(PS["Data.BooleanAlgebra"],PS["Data.CommutativeRing"]),r=(PS["Data.Eq"],PS["Data.HeytingAlgebra"],PS["Data.Ring"],PS["Data.Semiring"],function(n,e,t,r){this.CommutativeRing0=n,this.degree=e,this.div=t,this.mod=r}),a=new r(function(){return t.commutativeRingInt},e.intDegree,e.intDiv,e.intMod);n.EuclideanRing=r,n.degree=function(n){return n.degree},n.div=function(n){return n.div},n.mod=function(n){return n.mod},n.euclideanRingInt=a}(PS["Data.EuclideanRing"]=PS["Data.EuclideanRing"]||{}),function(n){"use strict";PS["Data.Boolean"],PS["Data.Eq"],PS["Data.EuclideanRing"],PS["Data.Ord"],PS["Data.Ordering"];var e=PS["Data.Semigroup"],t=(PS["Data.Symbol"],PS["Data.Unit"],PS["Record.Unsafe"],PS["Type.Data.RowList"],function(n,e){this.Semigroup0=n,this.mempty=e}),r=new t(function(){return e.semigroupString},""),a=new t(function(){return e.semigroupArray},[]),o=function(n){return n.mempty};n.Monoid=t,n.mempty=o,n.guard=function(n){return function(e){return function(t){if(e)return t;if(!e)return o(n);throw new Error("Failed pattern match at Data.Monoid (line 74, column 1 - line 74, column 49): "+[e.constructor.name,t.constructor.name])}}},n.monoidFn=function(n){return new t(function(){return e.semigroupFn(n.Semigroup0())},function(e){return o(n)})},n.monoidString=r,n.monoidArray=a}(PS["Data.Monoid"]=PS["Data.Monoid"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"];var e=PS["Control.Apply"],t=PS["Control.Bind"],r=PS["Control.Category"],a=(PS["Control.Extend"],PS["Control.Monad"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Data.Bounded"],PS["Data.Eq"],PS["Data.Function"]),o=PS["Data.Functor"],u=(PS["Data.Functor.Invariant"],PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.Unit"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),i=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),l=function(n){return function(e){return function(t){if(t instanceof u)return n;if(t instanceof i)return e(t.value0);throw new Error("Failed pattern match at Data.Maybe (line 217, column 1 - line 217, column 51): "+[n.constructor.name,e.constructor.name,t.constructor.name])}}},c=l(!0)(a.const(!1)),f=l(!1)(a.const(!0)),s=new o.Functor(function(n){return function(e){return e instanceof i?new i(n(e.value0)):u.value}}),d=new e.Apply(function(){return s},function(n){return function(e){if(n instanceof i)return o.map(s)(n.value0)(e);if(n instanceof u)return u.value;throw new Error("Failed pattern match at Data.Maybe (line 67, column 1 - line 67, column 35): "+[n.constructor.name,e.constructor.name])}}),S=new t.Bind(function(){return d},function(n){return function(e){if(n instanceof i)return e(n.value0);if(n instanceof u)return u.value;throw new Error("Failed pattern match at Data.Maybe (line 125, column 1 - line 125, column 33): "+[n.constructor.name,e.constructor.name])}});n.Nothing=u,n.Just=i,n.maybe=l,n.fromMaybe=function(n){return l(n)(r.identity(r.categoryFn))},n.isJust=f,n.isNothing=c,n.fromJust=function(n){return function(n){if(n instanceof i)return n.value0;throw new Error("Failed pattern match at Data.Maybe (line 268, column 1 - line 268, column 46): "+[n.constructor.name])}},n.functorMaybe=s,n.applyMaybe=d,n.bindMaybe=S}(PS["Data.Maybe"]=PS["Data.Maybe"]||{}),function(n){"use strict";n.empty={},n._lookup=function(n,e,t,r){return t in r?e(r[t]):n}}(PS["Foreign.Object"]=PS["Foreign.Object"]||{}),function(n){"use strict";n.length=function(n){return n.length},n.cons=function(n){return function(e){return[n].concat(e)}},n.snoc=function(n){return function(e){var t=n.slice();return t.push(e),t}},n.concat=function(n){if(n.length<=1e4)return Array.prototype.concat.apply([],n);for(var e=[],t=0,r=n.length;t<r;t++)for(var a=n[t],o=0,u=a.length;o<u;o++)e.push(a[o]);return e},n.filter=function(n){return function(e){return e.filter(n)}},n.slice=function(n){return function(e){return function(t){return t.slice(n,e)}}},n.drop=function(n){return function(e){return n<1?e:e.slice(n)}}}(PS["Data.Array"]=PS["Data.Array"]||{}),function(n){"use strict";var e=PS["Control.Category"],t=function(n){return n.bimap};n.bimap=t,n.Bifunctor=function(n){this.bimap=n},n.rmap=function(n){return t(n)(e.identity(e.categoryFn))}}(PS["Data.Bifunctor"]=PS["Data.Bifunctor"]||{}),function(n){"use strict";n.foldrArray=function(n){return function(e){return function(t){for(var r=e,a=t.length-1;a>=0;a--)r=n(t[a])(r);return r}}},n.foldlArray=function(n){return function(e){return function(t){for(var r=e,a=t.length,o=0;o<a;o++)r=n(r)(t[o]);return r}}}}(PS["Data.Foldable"]=PS["Data.Foldable"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Monad"],PS["Data.Bounded"],PS["Data.Eq"],PS["Data.Functor"];var e=PS["Data.HeytingAlgebra"],t=PS["Data.Monoid"],r=(PS["Data.Ord"],PS["Data.Semigroup"]),a=(PS["Data.Semiring"],PS["Data.Show"],PS.Prelude,function(n){return new r.Semigroup(function(t){return function(r){return e.disj(n)(t)(r)}})});n.Disj=function(n){return n},n.semigroupDisj=a,n.monoidDisj=function(n){return new t.Monoid(function(){return a(n)},e.ff(n))}}(PS["Data.Monoid.Disj"]=PS["Data.Monoid.Disj"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Function"];var e=PS["Data.Functor"],t=(PS["Data.Monoid.Additive"],PS["Data.Monoid.Conj"],PS["Data.Monoid.Disj"]),r=(PS["Data.Monoid.Dual"],PS["Data.Monoid.Endo"],PS["Data.Monoid.Multiplicative"],PS["Data.Semigroup.First"],PS["Data.Semigroup.Last"],PS.Prelude,function(n,e){this.unwrap=n,this.wrap=e}),a=function(n){return n.wrap},o=function(n){return n.unwrap},u=new r(function(n){return n},t.Disj);n.unwrap=o,n.wrap=a,n.Newtype=r,n.alaF=function(n){return function(t){return function(r){return function(u){return function(i){return function(i){return function(l){return e.map(t)(o(u))(i(e.map(n)(a(r))(l)))}}}}}}},n.newtypeDisj=u}(PS["Data.Newtype"]=PS["Data.Newtype"]||{}),function(n){"use strict";var e=PS["Data.Foldable"],t=(PS["Control.Alt"],PS["Control.Applicative"]),r=PS["Control.Apply"],a=(PS["Control.Bind"],PS["Control.Category"]),o=(PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Function"]),u=PS["Data.Functor"],i=(PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),l=(PS["Data.Maybe.First"],PS["Data.Maybe.Last"],PS["Data.Monoid"]),c=(PS["Data.Monoid.Additive"],PS["Data.Monoid.Conj"],PS["Data.Monoid.Disj"]),f=(PS["Data.Monoid.Dual"],PS["Data.Monoid.Endo"],PS["Data.Monoid.Multiplicative"],PS["Data.Newtype"]),s=(PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"]),d=(PS["Data.Semiring"],PS["Data.Unit"]),S=(PS.Prelude,function(n,e,t){this.foldMap=n,this.foldl=e,this.foldr=t}),P=function(n){return n.foldr},v=function(n){return function(e){return function(a){return P(e)(function(e){return r.applySecond(n.Apply0())(a(e))})(t.pure(n)(d.unit))}}},p=function(n){return n.foldl},m=new S(function(n){return function(e){return function(t){if(t instanceof i.Nothing)return l.mempty(n);if(t instanceof i.Just)return e(t.value0);throw new Error("Failed pattern match at Data.Foldable (line 129, column 1 - line 129, column 41): "+[e.constructor.name,t.constructor.name])}}},function(n){return function(e){return function(t){if(t instanceof i.Nothing)return e;if(t instanceof i.Just)return n(e)(t.value0);throw new Error("Failed pattern match at Data.Foldable (line 129, column 1 - line 129, column 41): "+[n.constructor.name,e.constructor.name,t.constructor.name])}}},function(n){return function(e){return function(t){if(t instanceof i.Nothing)return e;if(t instanceof i.Just)return n(t.value0)(e);throw new Error("Failed pattern match at Data.Foldable (line 129, column 1 - line 129, column 41): "+[n.constructor.name,e.constructor.name,t.constructor.name])}}}),g=function(n){return function(e){return function(t){return P(n)(function(n){return function(r){return s.append(e.Semigroup0())(t(n))(r)}})(l.mempty(e))}}},D=new S(function(n){return g(D)(n)},e.foldlArray,e.foldrArray),b=function(n){return n.foldMap};n.Foldable=S,n.foldr=P,n.foldl=p,n.foldMap=b,n.foldMapDefaultR=g,n.traverse_=v,n.for_=function(n){return function(e){return o.flip(v(n)(e))}},n.sequence_=function(n){return function(e){return v(n)(e)(a.identity(a.categoryFn))}},n.any=function(n){return function(e){return f.alaF(u.functorFn)(u.functorFn)(f.newtypeDisj)(f.newtypeDisj)(c.Disj)(b(n)(c.monoidDisj(e)))}},n.find=function(n){return function(e){return p(n)(function(n){return function(t){return n instanceof i.Nothing&&e(t)?new i.Just(t):n}})(i.Nothing.value)}},n.foldableArray=D,n.foldableMaybe=m}(PS["Data.Foldable"]=PS["Data.Foldable"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Applicative"];var e=PS["Control.Apply"],t=(PS["Control.Bind"],PS["Control.Extend"],PS["Control.Monad"],PS["Control.Semigroupoid"],PS["Data.Bifoldable"],PS["Data.Bifunctor"]),r=(PS["Data.Bitraversable"],PS["Data.Bounded"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.FoldableWithIndex"],PS["Data.Function"],PS["Data.Functor"]),a=(PS["Data.Functor.Invariant"],PS["Data.FunctorWithIndex"],PS["Data.Maybe"],PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Unit"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),o=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),u=new r.Functor(function(n){return function(e){if(e instanceof a)return new a(e.value0);if(e instanceof o)return new o(n(e.value0));throw new Error("Failed pattern match at Data.Either (line 38, column 8 - line 38, column 52): "+[e.constructor.name])}}),i=new t.Bifunctor(function(n){return function(e){return function(t){if(t instanceof a)return new a(n(t.value0));if(t instanceof o)return new o(e(t.value0));throw new Error("Failed pattern match at Data.Either (line 46, column 1 - line 46, column 45): "+[n.constructor.name,e.constructor.name,t.constructor.name])}}}),l=new e.Apply(function(){return u},function(n){return function(e){if(n instanceof a)return new a(n.value0);if(n instanceof o)return r.map(u)(n.value0)(e);throw new Error("Failed pattern match at Data.Either (line 82, column 1 - line 82, column 41): "+[n.constructor.name,e.constructor.name])}});n.Left=a,n.Right=o,n.either=function(n){return function(e){return function(t){if(t instanceof a)return n(t.value0);if(t instanceof o)return e(t.value0);throw new Error("Failed pattern match at Data.Either (line 238, column 1 - line 238, column 64): "+[n.constructor.name,e.constructor.name,t.constructor.name])}}},n.functorEither=u,n.bifunctorEither=i,n.applyEither=l}(PS["Data.Either"]=PS["Data.Either"]||{}),function(n){"use strict";PS["Control.Alt"];var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=(PS["Control.Comonad"],PS["Control.Extend"],PS["Control.Lazy"],PS["Control.Monad"]),o=(PS["Data.BooleanAlgebra"],PS["Data.Bounded"],PS["Data.CommutativeRing"],PS["Data.Eq"],PS["Data.EuclideanRing"],PS["Data.Foldable"],PS["Data.FoldableWithIndex"],PS["Data.Functor"]),u=(PS["Data.Functor.Invariant"],PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.Monoid"],PS["Data.Newtype"]),i=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semigroup.Foldable"],PS["Data.Semigroup.Traversable"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Unit"],PS.Prelude,function(n){return n}),l=new u.Newtype(function(n){return n},i),c=new o.Functor(function(n){return function(e){return n(e)}}),f=new t.Apply(function(){return c},function(n){return function(e){return n(e)}}),s=new r.Bind(function(){return f},function(n){return function(e){return e(n)}}),d=new e.Applicative(function(){return f},i),S=new a.Monad(function(){return d},function(){return s});n.Identity=i,n.newtypeIdentity=l,n.functorIdentity=c,n.applyIdentity=f,n.applicativeIdentity=d,n.bindIdentity=s,n.monadIdentity=S}(PS["Data.Identity"]=PS["Data.Identity"]||{}),function(n){"use strict";n.pureE=function(n){return function(){return n}},n.bindE=function(n){return function(e){return function(){return e(n())()}}},n.foreachE=function(n){return function(e){return function(){for(var t=0,r=n.length;t<r;t++)e(n[t])()}}}}(PS.Effect=PS.Effect||{}),function(n){"use strict";var e=PS.Effect,t=PS["Control.Applicative"],r=PS["Control.Apply"],a=PS["Control.Bind"],o=PS["Control.Monad"],u=PS["Data.Functor"],i=(PS["Data.Monoid"],PS["Data.Semigroup"],PS.Prelude,new o.Monad(function(){return f},function(){return l})),l=new a.Bind(function(){return c},e.bindE),c=new r.Apply(function(){return s},o.ap(i)),f=new t.Applicative(function(){return c},e.pureE),s=new u.Functor(t.liftA1(f));n.functorEffect=s,n.applyEffect=c,n.applicativeEffect=f,n.bindEffect=l,n.monadEffect=i,n.foreachE=e.foreachE}(PS.Effect=PS.Effect||{}),function(n){"use strict";n.new=function(n){return function(){return{value:n}}},n.read=function(n){return function(){return n.value}},n["modify'"]=function(n){return function(e){return function(){var t=n(e.value);return e.value=t.state,t.value}}},n.write=function(n){return function(e){return function(){return e.value=n,{}}}}}(PS["Effect.Ref"]=PS["Effect.Ref"]||{}),function(n){"use strict";var e=PS["Effect.Ref"],t=(PS["Data.Function"],PS["Data.Functor"]),r=PS.Effect,a=(PS.Prelude,function(n){return e["modify'"](function(e){var t=n(e);return{state:t,value:t}})});n.modify=a,n.modify_=function(n){return function(e){return t.void(r.functorEffect)(a(n)(e))}},n.new=e.new,n.read=e.read,n["modify'"]=e["modify'"],n.write=e.write}(PS["Effect.Ref"]=PS["Effect.Ref"]||{}),function(n){"use strict";(PS["Partial.Unsafe"]=PS["Partial.Unsafe"]||{}).unsafePartial=function(n){return n()}}(),function(n){"use strict";(PS["Partial"]=PS["Partial"]||{}).crashWith=function(){return function(n){throw new Error(n)}}}(),function(n){"use strict";var e=PS.Partial;n.crashWith=e.crashWith}(PS.Partial=PS.Partial||{}),function(n){"use strict";var e=PS["Partial.Unsafe"],t=PS.Partial;n.unsafeCrashWith=function(n){return e.unsafePartial(function(e){return t.crashWith(e)(n)})}}(PS["Partial.Unsafe"]=PS["Partial.Unsafe"]||{}),function(n){"use strict";PS["Control.Applicative"];var e=PS["Control.Bind"],t=(PS["Control.Monad"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Either"],PS["Data.Functor"]),r=(PS["Data.Identity"],PS["Data.Maybe"],PS["Data.Unit"],PS.Effect),a=PS["Effect.Ref"],o=(PS["Partial.Unsafe"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),u=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),i=function(n,e){this.Monad0=n,this.tailRecM=e},l=new i(function(){return r.monadEffect},function(n){return function(i){var l=function(n){if(n instanceof u)return n.value0;throw new Error("Failed pattern match at Control.Monad.Rec.Class (line 111, column 30 - line 111, column 44): "+[n.constructor.name])};return function(){var c=e.bindFlipped(r.bindEffect)(a.new)(n(i))();return function(){for(;!function(){var e=a.read(c)();if(e instanceof o){var t=n(e.value0)();a.write(t)(c)();return!1}if(e instanceof u)return!0;throw new Error("Failed pattern match at Control.Monad.Rec.Class (line 102, column 22 - line 107, column 28): "+[e.constructor.name])}(););}(),t.map(r.functorEffect)(l)(a.read(c))()}}});n.Loop=o,n.Done=u,n.MonadRec=i,n.tailRecM=function(n){return n.tailRecM},n.monadRecEffect=l}(PS["Control.Monad.Rec.Class"]=PS["Control.Monad.Rec.Class"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Biapplicative"],PS["Control.Biapply"],PS["Control.Bind"],PS["Control.Comonad"],PS["Control.Extend"],PS["Control.Lazy"],PS["Control.Monad"],PS["Control.Semigroupoid"],PS["Data.Bifoldable"],PS["Data.Bifunctor"],PS["Data.Bitraversable"],PS["Data.BooleanAlgebra"],PS["Data.Bounded"],PS["Data.CommutativeRing"],PS["Data.Distributive"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.FoldableWithIndex"],PS["Data.Function"];var e=PS["Data.Functor"],t=(PS["Data.Functor.Invariant"],PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Maybe.First"],PS["Data.Monoid"],PS["Data.Newtype"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semigroup.Foldable"],PS["Data.Semigroup.Traversable"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Unit"],PS.Prelude,PS["Type.Equality"],function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),r=new e.Functor(function(n){return function(e){return new t(e.value0,n(e.value1))}});n.Tuple=t,n.fst=function(n){return n.value0},n.snd=function(n){return n.value1},n.functorTuple=r}(PS["Data.Tuple"]=PS["Data.Tuple"]||{}),function(n){"use strict";(PS["Data.Unfoldable"]=PS["Data.Unfoldable"]||{}).unfoldrArrayImpl=function(n){return function(e){return function(t){return function(r){return function(a){return function(o){for(var u=[],i=o;;){var l=a(i);if(n(l))return u;var c=e(l);u.push(t(c)),i=r(c)}}}}}}}}(),function(n){"use strict";(PS["Data.Unfoldable1"]=PS["Data.Unfoldable1"]||{}).unfoldr1ArrayImpl=function(n){return function(e){return function(t){return function(r){return function(a){return function(o){for(var u=[],i=o;;){var l=a(i);u.push(t(l));var c=r(l);if(n(c))return u;i=e(c)}}}}}}}}(),function(n){"use strict";var e=PS["Data.Unfoldable1"],t=(PS["Data.Boolean"],PS["Data.Eq"],PS["Data.Maybe"]),r=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semigroup.Traversable"],PS["Data.Semiring"],PS["Data.Tuple"]),a=(PS["Partial.Unsafe"],PS.Prelude,function(n){this.unfoldr1=n}),o=new a(e.unfoldr1ArrayImpl(t.isNothing)(t.fromJust())(r.fst)(r.snd));n.Unfoldable1=a,n.unfoldr1=function(n){return n.unfoldr1},n.unfoldable1Array=o}(PS["Data.Unfoldable1"]=PS["Data.Unfoldable1"]||{}),function(n){"use strict";var e=PS["Data.Unfoldable"],t=(PS["Data.Function"],PS["Data.Functor"],PS["Data.Maybe"]),r=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Traversable"],PS["Data.Tuple"]),a=PS["Data.Unfoldable1"],o=(PS["Data.Unit"],PS["Partial.Unsafe"],PS.Prelude,function(n,e){this.Unfoldable10=n,this.unfoldr=e}),u=new o(function(){return a.unfoldable1Array},e.unfoldrArrayImpl(t.isNothing)(t.fromJust())(r.fst)(r.snd));n.Unfoldable=o,n.unfoldr=function(n){return n.unfoldr},n.unfoldableArray=u}(PS["Data.Unfoldable"]=PS["Data.Unfoldable"]||{}),function(n){"use strict";(PS["Unsafe.Coerce"]=PS["Unsafe.Coerce"]||{}).unsafeCoerce=function(n){return n}}(),function(n){"use strict";var e=PS["Unsafe.Coerce"];n.unsafeCoerce=e.unsafeCoerce}(PS["Unsafe.Coerce"]=PS["Unsafe.Coerce"]||{}),function(n){"use strict";var e=PS["Data.Array"],t=(PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"]),r=(PS["Control.Category"],PS["Control.Lazy"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.ST"],PS["Control.Monad.ST.Internal"],PS["Control.Semigroupoid"],PS["Data.Array.NonEmpty.Internal"],PS["Data.Array.ST"],PS["Data.Array.ST.Iterator"],PS["Data.Boolean"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"]),a=(PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),o=(PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Traversable"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Partial.Unsafe"],PS.Prelude,PS["Unsafe.Coerce"],function(n){return[n]}),u=r.flip(t.bind(t.bindArray));n.singleton=o,n.concatMap=u,n.mapMaybe=function(n){return u(function(e){return a.maybe([])(o)(n(e))})},n.length=e.length,n.cons=e.cons,n.snoc=e.snoc,n.filter=e.filter,n.drop=e.drop}(PS["Data.Array"]=PS["Data.Array"]||{}),function(n){"use strict";(PS["Foreign.Object.ST"]=PS["Foreign.Object.ST"]||{}).new=function(){return{}}}(),function(n){"use strict";var e=PS["Foreign.Object.ST"];PS["Control.Monad.ST"],PS["Data.Maybe"];n.new=e.new}(PS["Foreign.Object.ST"]=PS["Foreign.Object.ST"]||{}),function(n){"use strict";var e=PS["Foreign.Object"],t=(PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Category"],PS["Control.Monad.ST"],PS["Control.Monad.ST.Internal"],PS["Control.Semigroupoid"],PS["Data.Array"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.FoldableWithIndex"],PS["Data.Function"],PS["Data.Function.Uncurried"]),r=(PS["Data.Functor"],PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),a=(PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Foreign.Object.ST"],PS.Prelude,PS["Type.Row.Homogeneous"],PS["Unsafe.Coerce"],t.runFn4(e._lookup)(r.Nothing.value)(r.Just.create));n.lookup=a,n.empty=e.empty}(PS["Foreign.Object"]=PS["Foreign.Object"]||{}),function(n){"use strict";var e=PS["Data.Argonaut.Core"],t=(PS["Data.Eq"],PS["Data.Function"],PS["Data.Function.Uncurried"],PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ordering"],PS["Foreign.Object"]),r=(PS.Prelude,e.fromObject(t.empty));n.jsonEmptyObject=r,n.stringify=e.stringify}(PS["Data.Argonaut.Core"]=PS["Data.Argonaut.Core"]||{}),function(n){"use strict";n.replace=function(n){return function(e){return function(t){return t.replace(n,e)}}},n.replaceAll=function(n){return function(e){return function(t){return t.replace(new RegExp(n.replace(/[-\/\\^$*+?.()|[\]{}]/g,"\\$&"),"g"),e)}}},n.split=function(n){return function(e){return e.split(n)}},n.joinWith=function(n){return function(e){return e.join(n)}}}(PS["Data.String.Common"]=PS["Data.String.Common"]||{}),function(n){"use strict";var e=PS["Data.String.Common"];PS["Data.Eq"],PS["Data.Ordering"],PS["Data.String.Pattern"],PS.Prelude;n.null=function(n){return""===n},n.replaceAll=e.replaceAll,n.split=e.split,n.joinWith=e.joinWith}(PS["Data.String.Common"]=PS["Data.String.Common"]||{}),function(n){"use strict";n.unsafeStringify=function(n){return JSON.stringify(n)},n.unsafeDecodeURIComponent=decodeURIComponent,n.unsafeEncodeURIComponent=encodeURIComponent}(PS["Global.Unsafe"]=PS["Global.Unsafe"]||{}),function(n){"use strict";var e=PS["Global.Unsafe"];n.unsafeStringify=e.unsafeStringify,n.unsafeDecodeURIComponent=e.unsafeDecodeURIComponent,n.unsafeEncodeURIComponent=e.unsafeEncodeURIComponent}(PS["Global.Unsafe"]=PS["Global.Unsafe"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Eq"];var e,t=PS["Data.Functor"],r=PS["Data.Maybe"],a=(PS["Data.Monoid"],PS["Data.Newtype"],PS["Data.Ord"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.String"],PS["Data.String.Common"]),o=(PS["Data.Tuple"],PS["Global.Unsafe"]),u=(PS.Prelude,function(n){return n}),i=(e=function(n){if(n.value1 instanceof r.Nothing)return o.unsafeEncodeURIComponent(n.value0);if(n.value1 instanceof r.Just)return o.unsafeEncodeURIComponent(n.value0)+"="+o.unsafeEncodeURIComponent(n.value1.value0);throw new Error("Failed pattern match at Data.FormURLEncoded (line 35, column 18 - line 37, column 89): "+[n.constructor.name])},function(n){return a.joinWith("&")(t.map(t.functorArray)(e)(u(n)))});n.toArray=u,n.encode=i}(PS["Data.FormURLEncoded"]=PS["Data.FormURLEncoded"]||{}),function(n){"use strict";PS["Data.Eq"];var e=PS["Data.Newtype"],t=(PS["Data.Ord"],PS["Data.Semigroup"],PS["Data.Show"],PS.Prelude,function(n){return n}),r=new e.Newtype(function(n){return n},t);n.MediaType=t,n.newtypeMediaType=r}(PS["Data.MediaType"]=PS["Data.MediaType"]||{}),function(n){"use strict";PS["Data.MediaType"];n.applicationFormURLEncoded="application/x-www-form-urlencoded",n.applicationJSON="application/json"}(PS["Data.MediaType.Common"]=PS["Data.MediaType.Common"]||{}),function(n){"use strict";PS["Data.Argonaut.Core"],PS["Data.ArrayBuffer.Types"],PS["Data.FormURLEncoded"];var e=PS["Data.Maybe"],t=(PS["Data.MediaType"],PS["Data.MediaType.Common"]),r=(PS["Web.DOM.Document"],PS["Web.File.Blob"],PS["Web.XHR.FormData"],function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),a=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),o=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),u=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),i=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),l=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),c=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),f=u.create;n.ArrayView=r,n.Blob=a,n.Document=o,n.String=u,n.FormData=i,n.FormURLEncoded=l,n.Json=c,n.string=f,n.toMediaType=function(n){return n instanceof l?new e.Just(t.applicationFormURLEncoded):n instanceof c?new e.Just(t.applicationJSON):e.Nothing.value}}(PS["Affjax.RequestBody"]=PS["Affjax.RequestBody"]||{}),function(n){"use strict";PS["Data.Eq"],PS["Data.HeytingAlgebra"];var e=PS["Data.MediaType"],t=PS["Data.Newtype"],r=(PS["Data.Semigroup"],PS["Data.Show"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),a=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),o=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}();n.Accept=r,n.ContentType=a,n.RequestHeader=o,n.requestHeaderName=function(n){if(n instanceof r)return"Accept";if(n instanceof a)return"Content-Type";if(n instanceof o)return n.value0;throw new Error("Failed pattern match at Affjax.RequestHeader (line 24, column 1 - line 24, column 45): "+[n.constructor.name])},n.requestHeaderValue=function(n){if(n instanceof r)return t.unwrap(e.newtypeMediaType)(n.value0);if(n instanceof a)return t.unwrap(e.newtypeMediaType)(n.value0);if(n instanceof o)return n.value1;throw new Error("Failed pattern match at Affjax.RequestHeader (line 29, column 1 - line 29, column 46): "+[n.constructor.name])}}(PS["Affjax.RequestHeader"]=PS["Affjax.RequestHeader"]||{}),function(n){"use strict";n.unsafeToForeign=function(n){return n},n.unsafeFromForeign=function(n){return n},n.typeOf=function(n){return typeof n},n.tagOf=function(n){return Object.prototype.toString.call(n).slice(8,-1)}}(PS.Foreign=PS.Foreign||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=(PS["Control.Bind"],PS["Control.Semigroupoid"],PS["Data.Either"]),r=(PS["Data.Function"],PS["Data.Functor"]),a=(PS["Data.Maybe"],PS["Data.Unit"],PS.Prelude,function(n){return n.catchError});n.catchError=a,n.throwError=function(n){return n.throwError},n.MonadThrow=function(n,e){this.Monad0=n,this.throwError=e},n.MonadError=function(n,e){this.MonadThrow0=n,this.catchError=e},n.try=function(n){return function(o){return a(n)(r.map(n.MonadThrow0().Monad0().Bind1().Apply0().Functor0())(t.Right.create)(o))(function(r){return e.pure(n.MonadThrow0().Monad0().Applicative0())(t.Left.create(r))})}}}(PS["Control.Monad.Error.Class"]=PS["Control.Monad.Error.Class"]||{}),function(n){"use strict";var e=PS["Data.Tuple"],t=PS["Data.Unit"],r=(PS.Prelude,function(n){return n.state});n.state=r,n.MonadState=function(n,e){this.Monad0=n,this.state=e},n.get=function(n){return r(n)(function(n){return new e.Tuple(n,n)})},n.gets=function(n){return function(t){return r(n)(function(n){return new e.Tuple(t(n),n)})}},n.modify=function(n){return function(t){return r(n)(function(n){var r=t(n);return new e.Tuple(r,r)})}},n.modify_=function(n){return function(a){return r(n)(function(n){return new e.Tuple(t.unit,a(n))})}}}(PS["Control.Monad.State.Class"]=PS["Control.Monad.State.Class"]||{}),function(n){"use strict";PS.Prelude;n.lift=function(n){return n.lift},n.MonadTrans=function(n){this.lift=n}}(PS["Control.Monad.Trans.Class"]=PS["Control.Monad.Trans.Class"]||{}),function(n){"use strict";PS["Control.Category"],PS["Control.Monad"],PS.Effect;n.liftEffect=function(n){return n.liftEffect},n.MonadEffect=function(n,e){this.Monad0=n,this.liftEffect=e}}(PS["Effect.Class"]=PS["Effect.Class"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"];var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=(PS["Control.Category"],PS["Control.Monad"]),o=(PS["Control.Monad.Cont.Class"],PS["Control.Monad.Error.Class"]),u=(PS["Control.Monad.Reader.Class"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.State.Class"],PS["Control.Monad.Trans.Class"],PS["Control.Monad.Writer.Class"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Either"]),i=(PS["Data.Function"],PS["Data.Functor"]),l=(PS["Data.Monoid"],PS["Data.Newtype"],PS["Data.Semigroup"],PS["Data.Tuple"],PS["Effect.Class"],PS.Prelude,function(n){return n}),c=function(n){return function(e){return n(e)}},f=function(n){return new i.Functor(function(e){return c(i.map(n)(i.map(u.functorEither)(e)))})},s=function(n){return new a.Monad(function(){return P(n)},function(){return d(n)})},d=function(n){return new r.Bind(function(){return S(n)},function(t){return function(a){return r.bind(n.Bind1())(t)(u.either(function(t){return e.pure(n.Applicative0())(u.Left.create(t))})(function(n){return a(n)}))}})},S=function(n){return new t.Apply(function(){return f(n.Bind1().Apply0().Functor0())},a.ap(s(n)))},P=function(n){return new e.Applicative(function(){return S(n)},function(t){return l(e.pure(n.Applicative0())(u.Right.create(t)))})};n.ExceptT=l,n.runExceptT=function(n){return n},n.mapExceptT=c,n.functorExceptT=f,n.applyExceptT=S,n.applicativeExceptT=P,n.bindExceptT=d,n.monadExceptT=s,n.monadThrowExceptT=function(n){return new o.MonadThrow(function(){return s(n)},function(t){return l(e.pure(n.Applicative0())(u.Left.create(t)))})}}(PS["Control.Monad.Except.Trans"]=PS["Control.Monad.Except.Trans"]||{}),function(n){"use strict";PS["Control.Monad.Error.Class"];var e=PS["Control.Monad.Except.Trans"],t=(PS["Control.Semigroupoid"],PS["Data.Either"],PS["Data.Identity"]),r=PS["Data.Newtype"];PS.Prelude;n.runExcept=function(n){return r.unwrap(t.newtypeIdentity)(e.runExceptT(n))}}(PS["Control.Monad.Except"]=PS["Control.Monad.Except"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Category"];var e=PS["Control.Plus"],t=(PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.FoldableWithIndex"],PS["Data.Function"],PS["Data.Functor"],PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Semigroup.Foldable"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS.Prelude,function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}());n.NonEmpty=t,n.singleton=function(n){return function(r){return new t(r,e.empty(n))}}}(PS["Data.NonEmpty"]=PS["Data.NonEmpty"]||{}),function(n){"use strict";var e=PS["Control.Alt"],t=(PS["Control.Alternative"],PS["Control.Applicative"]),r=PS["Control.Apply"],a=(PS["Control.Bind"],PS["Control.Category"],PS["Control.Comonad"],PS["Control.Extend"],PS["Control.Monad"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"]),o=(PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Foldable"]),u=(PS["Data.FoldableWithIndex"],PS["Data.Function"]),i=PS["Data.Functor"],l=(PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Monoid"]),c=(PS["Data.Newtype"],PS["Data.NonEmpty"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"]),f=(PS["Data.Semigroup.Foldable"],PS["Data.Semigroup.Traversable"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),s=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),d=new o.Foldable(function(n){return function(e){return o.foldl(d)(function(t){return function(r){return c.append(n.Semigroup0())(t)(e(r))}})(l.mempty(n))}},function(n){return function(e){return function(t){var r,a=e,o=!1;function u(e,r){if(r instanceof f)return o=!0,e;if(r instanceof s)return a=n(e)(r.value0),void(t=r.value1);throw new Error("Failed pattern match at Data.List.Types (line 81, column 12 - line 83, column 30): "+[r.constructor.name])}for(;!o;)r=u(a,t);return r}}},function(n){return function(e){var t=o.foldl(d)(u.flip(s.create))(f.value);return function(r){return o.foldl(d)(u.flip(n))(e)(t(r))}}}),S=new i.Functor(function(n){return o.foldr(d)(function(e){return function(t){return new s(n(e),t)}})(f.value)}),P=new c.Semigroup(function(n){return function(e){return o.foldr(d)(s.create)(e)(n)}}),v=new r.Apply(function(){return S},function(n){return function(e){if(n instanceof f)return f.value;if(n instanceof s)return c.append(P)(i.map(S)(n.value0)(e))(r.apply(v)(n.value1)(e));throw new Error("Failed pattern match at Data.List.Types (line 127, column 1 - line 127, column 33): "+[n.constructor.name,e.constructor.name])}}),p=new t.Applicative(function(){return v},function(n){return new s(n,f.value)}),m=new e.Alt(function(){return S},c.append(P)),g=new a.Plus(function(){return m},f.value);n.Nil=f,n.Cons=s,n.NonEmptyList=function(n){return n},n.semigroupList=P,n.functorList=S,n.foldableList=d,n.applyList=v,n.applicativeList=p,n.altList=m,n.plusList=g}(PS["Data.List.Types"]=PS["Data.List.Types"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Category"],PS["Control.Lazy"],PS["Control.Monad.Rec.Class"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Boolean"],PS["Data.Eq"];var e,t=PS["Data.Foldable"],r=(PS["Data.Function"],PS["Data.Functor"],PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.List.Types"]),a=(PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.NonEmpty"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Data.Unit"],PS.Prelude,e=r.Nil.value,function(n){var t,a=e,o=!1;function u(e,t){if(t instanceof r.Nil)return o=!0,e;if(t instanceof r.Cons)return a=new r.Cons(t.value0,e),void(n=t.value1);throw new Error("Failed pattern match at Data.List (line 368, column 3 - line 368, column 19): "+[e.constructor.name,t.constructor.name])}for(;!o;)t=u(a,n);return t});n.fromFoldable=function(n){return t.foldr(n)(r.Cons.create)(r.Nil.value)},n.null=function(n){return n instanceof r.Nil},n.reverse=a}(PS["Data.List"]=PS["Data.List"]||{}),function(n){"use strict";PS["Control.Bind"],PS["Control.Category"],PS["Control.Semigroupoid"],PS["Data.Boolean"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"],PS["Data.FunctorWithIndex"],PS["Data.List"];var e=PS["Data.List.Types"],t=(PS["Data.Maybe"],PS["Data.NonEmpty"]);PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semigroup.Foldable"],PS["Data.Semigroup.Traversable"],PS["Data.Semiring"],PS["Data.Traversable"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Partial.Unsafe"],PS.Prelude;n.singleton=function(n){return e.NonEmptyList(t.singleton(e.plusList)(n))},n.cons=function(n){return function(r){return new t.NonEmpty(n,new e.Cons(r.value0,r.value1))}},n.head=function(n){return n.value0}}(PS["Data.List.NonEmpty"]=PS["Data.List.NonEmpty"]||{}),function(n){"use strict";n.singleton=function(n){return n},n.length=function(n){return n.length},n.drop=function(n){return function(e){return e.substring(n)}}}(PS["Data.String.CodeUnits"]=PS["Data.String.CodeUnits"]||{}),function(n){"use strict";(PS["Data.String.Unsafe"]=PS["Data.String.Unsafe"]||{}).charAt=function(n){return function(e){if(n>=0&&n<e.length)return e.charAt(n);throw new Error("Data.String.Unsafe.charAt: Invalid index.")}}}(),function(n){"use strict";var e=PS["Data.String.Unsafe"];n.charAt=e.charAt}(PS["Data.String.Unsafe"]=PS["Data.String.Unsafe"]||{}),function(n){"use strict";var e=PS["Data.String.CodeUnits"];PS["Control.Semigroupoid"],PS["Data.Boolean"],PS["Data.Eq"],PS["Data.Function"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semiring"],PS["Data.String.Pattern"],PS["Data.String.Unsafe"],PS.Prelude;n.singleton=e.singleton,n.length=e.length,n.drop=e.drop}(PS["Data.String.CodeUnits"]=PS["Data.String.CodeUnits"]||{}),function(n){"use strict";var e=PS.Foreign,t=PS["Control.Applicative"],r=PS["Control.Monad.Error.Class"],a=(PS["Control.Monad.Except"],PS["Control.Monad.Except.Trans"]),o=(PS["Control.Semigroupoid"],PS["Data.Boolean"]),u=(PS["Data.Either"],PS["Data.Eq"],PS["Data.Function"],PS["Data.HeytingAlgebra"],PS["Data.Identity"]),i=(PS["Data.Int"],PS["Data.List.NonEmpty"]),l=(PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Show"],PS["Data.String.CodeUnits"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),c=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),f=function(n){return r.throwError(a.monadThrowExceptT(u.monadIdentity))(i.singleton(n))},s=function(n){return function(r){if(e.tagOf(r)===n)return t.pure(a.applicativeExceptT(u.monadIdentity))(e.unsafeFromForeign(r));if(o.otherwise)return f(new c(n,e.tagOf(r)));throw new Error("Failed pattern match at Foreign (line 106, column 1 - line 106, column 55): "+[n.constructor.name,r.constructor.name])}},d=s("Boolean"),S=s("String");n.ForeignError=l,n.TypeMismatch=c,n.unsafeReadTagged=s,n.readString=S,n.readBoolean=d,n.fail=f,n.unsafeToForeign=e.unsafeToForeign,n.typeOf=e.typeOf}(PS.Foreign=PS.Foreign||{}),function(n){"use strict";var e=PS["Control.Category"],t=(PS["Data.Argonaut.Core"],PS["Data.ArrayBuffer.Types"],PS["Data.Maybe"]),r=(PS["Data.MediaType"],PS["Data.MediaType.Common"]),a=(PS.Foreign,PS.Prelude,PS["Web.DOM.Document"],PS["Web.File.Blob"],function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),o=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),u=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),i=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),l=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),c=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),f=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),s=new l(e.identity(e.categoryFn)),d=new f(e.identity(e.categoryFn));n.ArrayBuffer=o,n.Blob=u,n.Document=i,n.Json=l,n.String=c,n.Ignore=f,n.json=s,n.ignore=d,n.toResponseType=function(n){if(n instanceof o)return"arraybuffer";if(n instanceof u)return"blob";if(n instanceof i)return"document";if(n instanceof l)return"text";if(n instanceof c)return"text";if(n instanceof f)return"";throw new Error("Failed pattern match at Affjax.ResponseFormat (line 46, column 3 - line 54, column 1): "+[n.constructor.name])},n.toMediaType=function(n){return n instanceof l?new t.Just(r.applicationJSON):t.Nothing.value},n.ResponseFormatError=a}(PS["Affjax.ResponseFormat"]=PS["Affjax.ResponseFormat"]||{}),function(n){"use strict";PS["Data.Eq"],PS["Data.HeytingAlgebra"],PS["Data.Semigroup"],PS["Data.Show"],PS.Prelude;var e=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}();n.responseHeader=function(n){return function(t){return new e(n,t)}}}(PS["Affjax.ResponseHeader"]=PS["Affjax.ResponseHeader"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Monad.Cont.Trans"],PS["Control.Monad.Except.Trans"],PS["Control.Monad.Maybe.Trans"],PS["Control.Monad.Reader.Trans"],PS["Control.Monad.Writer.Trans"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Either"],PS["Data.Function"],PS["Data.Functor"],PS["Data.Functor.Compose"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Unit"],PS["Effect.Class"],PS["Effect.Ref"],PS.Prelude;n.parallel=function(n){return n.parallel},n.sequential=function(n){return n.sequential},n.Parallel=function(n,e,t,r){this.Applicative1=n,this.Monad0=e,this.parallel=t,this.sequential=r}}(PS["Control.Parallel.Class"]=PS["Control.Parallel.Class"]||{}),function(n){"use strict";PS["Control.Alternative"],PS["Control.Apply"];var e=PS["Control.Category"],t=PS["Control.Parallel.Class"],r=(PS["Control.Semigroupoid"],PS["Data.Foldable"]),a=(PS["Data.Traversable"],PS.Prelude,function(n){return function(e){return function(a){return function(o){return t.sequential(n)(r.traverse_(n.Applicative1())(e)(function(e){return t.parallel(n)(a(e))})(o))}}}});n.parTraverse_=a,n.parSequence_=function(n){return function(t){return a(n)(t)(e.identity(e.categoryFn))}}}(PS["Control.Parallel"]=PS["Control.Parallel"]||{}),function(n){"use strict";(PS["Data.Argonaut.Parser"]=PS["Data.Argonaut.Parser"]||{})._jsonParser=function(n,e,t){try{return e(JSON.parse(t))}catch(e){return n(e.message)}}}(),function(n){"use strict";var e=PS["Data.Argonaut.Parser"],t=(PS["Data.Argonaut.Core"],PS["Data.Either"]);PS["Data.Function.Uncurried"];n.jsonParser=function(n){return e._jsonParser(t.Left.create,t.Right.create,n)}}(PS["Data.Argonaut.Parser"]=PS["Data.Argonaut.Parser"]||{}),function(n){"use strict";var e=PS["Data.Either"],t=(PS["Data.Eq"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Show"]),r=(PS["Data.String"],PS["Data.String.Common"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),a=function(){function n(){}return n.value=new n,n}(),o=function(){function n(){}return n.value=new n,n}(),u=function(){function n(){}return n.value=new n,n}(),i=function(){function n(){}return n.value=new n,n}(),l=function(){function n(){}return n.value=new n,n}(),c=function(){function n(){}return n.value=new n,n}(),f=function(){function n(){}return n.value=new n,n}(),s=function(){function n(){}return n.value=new n,n}(),d=function(){function n(){}return n.value=new n,n}(),S=function(){function n(){}return n.value=new n,n}(),P=function(){function n(){}return n.value=new n,n}(),v=function(){function n(){}return n.value=new n,n}(),p=function(){function n(){}return n.value=new n,n}(),m=function(){function n(){}return n.value=new n,n}(),g=function(){function n(){}return n.value=new n,n}(),D=function(n){return n},b=new t.Show(function(n){if(n instanceof r)return"OPTIONS";if(n instanceof a)return"GET";if(n instanceof o)return"HEAD";if(n instanceof u)return"POST";if(n instanceof i)return"PUT";if(n instanceof l)return"DELETE";if(n instanceof c)return"TRACE";if(n instanceof f)return"CONNECT";if(n instanceof s)return"PROPFIND";if(n instanceof d)return"PROPPATCH";if(n instanceof S)return"MKCOL";if(n instanceof P)return"COPY";if(n instanceof v)return"MOVE";if(n instanceof p)return"LOCK";if(n instanceof m)return"UNLOCK";if(n instanceof g)return"PATCH";throw new Error("Failed pattern match at Data.HTTP.Method (line 40, column 1 - line 40, column 35): "+[n.constructor.name])}),h=e.either(t.show(b))(D);n.OPTIONS=r,n.GET=a,n.HEAD=o,n.POST=u,n.PUT=i,n.DELETE=l,n.TRACE=c,n.CONNECT=f,n.PROPFIND=s,n.PROPPATCH=d,n.MKCOL=S,n.COPY=P,n.MOVE=v,n.LOCK=p,n.UNLOCK=m,n.PATCH=g,n.unCustomMethod=D,n.print=h,n.showMethod=b}(PS["Data.HTTP.Method"]=PS["Data.HTTP.Method"]||{}),function(n){"use strict";n.null=null,n.nullable=function(n,e,t){return null==n?e:t(n)},n.notNull=function(n){return n}}(PS["Data.Nullable"]=PS["Data.Nullable"]||{}),function(n){"use strict";var e=PS["Data.Nullable"],t=(PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Function"],PS["Data.Function.Uncurried"],PS["Data.Maybe"]),r=(PS["Data.Ord"],PS["Data.Show"],PS.Prelude,t.maybe(e.null)(e.notNull));n.toMaybe=function(n){return e.nullable(n,t.Nothing.value,t.Just.create)},n.toNullable=r}(PS["Data.Nullable"]=PS["Data.Nullable"]||{}),function(n){"use strict";var e=function(){var n={},e="Pure",t="Throw",r="Catch",a="Sync",o="Async",u="Bind",i="Bracket",l="Fork",c="Sequential",f="Map",s="Apply",d="Alt",S="Cons",P="Resume",v="Release",p="Finalizer",m="Finalized",g="Forked";function D(n,e,t,r){this.tag=n,this._1=e,this._2=t,this._3=r}function b(n){var e=function(e,t,r){return new D(n,e,t,r)};return e.tag=n,e}function h(n){return new D(e,void 0)}function w(n){try{n()}catch(n){setTimeout(function(){throw n},0)}}function y(n,e,t){try{return e(t())}catch(e){return n(e)}}function M(n,e,t){try{return e(t)()}catch(e){return t(n(e))(),h}}var E=function(){var n=1024,e=0,t=0,r=new Array(n),a=!1;function o(){var o;for(a=!0;0!==e;)e--,o=r[t],r[t]=void 0,t=(t+1)%n,o();a=!1}return{isDraining:function(){return a},enqueue:function(u){var i;e===n&&(i=a,o(),a=i),r[(t+e)%n]=u,e++,a||o()}}}();var C=0,A=1,T=2,F=3,H=4,L=5,_=6;function I(n,f,s){var d=0,g=C,b=s,h=null,U=null,k=null,O=null,W=null,R=0,N=0,B=null,q=!0;function j(s){for(var N,V,J;;)switch(N=null,V=null,J=null,g){case T:g=A,b=k(b),null===O?k=null:(k=O._1,O=O._2);break;case F:n.isLeft(b)?(g=L,h=b,b=null):null===k?g=L:(g=T,b=n.fromRight(b));break;case A:switch(b.tag){case u:k&&(O=new D(S,k,O)),k=b._2,g=A,b=b._1;break;case e:null===k?(g=L,b=n.right(b._1)):(g=T,b=b._1);break;case a:g=F,b=y(n.left,n.right,b._1);break;case o:return g=H,void(b=M(n.left,b._1,function(n){return function(){d===s&&(d++,E.enqueue(function(){d===s+1&&(g=F,b=n,j(d))}))}}));case t:g=L,h=n.left(b._1),b=null;break;case r:W=new D(S,b,null===k?W:new D(S,new D(P,k,O),W,U),U),k=null,O=null,g=A,b=b._1;break;case i:R++,W=new D(S,b,null===k?W:new D(S,new D(P,k,O),W,U),U),k=null,O=null,g=A,b=b._1;break;case l:g=F,N=I(n,f,b._2),f&&f.register(N),b._1&&N.run(),b=n.right(N);break;case c:g=A,b=x(n,f,b._1)}break;case L:if(k=null,O=null,null===W)g=_,b=U||h||b;else switch(N=W._3,J=W._1,W=W._2,J.tag){case r:U&&U!==N?g=L:h&&(g=A,b=J._2(n.fromLeft(h)),h=null);break;case P:U&&U!==N||h?g=L:(k=J._1,O=J._2,g=T,b=n.fromRight(b));break;case i:R--,null===h&&(V=n.fromRight(b),W=new D(S,new D(v,J._2,V),W,N),(U===N||R>0)&&(g=A,b=J._3(V)));break;case v:R++,W=new D(S,new D(m,b,h),W,U),g=A,b=U&&U!==N?J._1.killed(n.fromLeft(U))(J._2):h?J._1.failed(n.fromLeft(h))(J._2):J._1.completed(n.fromRight(b))(J._2),h=null;break;case p:R++,W=new D(S,new D(m,b,h),W,U),g=A,b=J._1;break;case m:R--,g=L,b=J._1,h=J._2}break;case _:for(var Q in B)B.hasOwnProperty(Q)&&(q=q&&B[Q].rethrow,w(B[Q].handler(b)));return B=null,void(U&&h?setTimeout(function(){throw n.fromLeft(h)},0):n.isLeft(b)&&q&&setTimeout(function(){if(q)throw n.fromLeft(b)},0));case C:g=A;break;case H:return}}function V(n){return function(){if(g===_)return q=q&&n.rethrow,n.handler(b)(),function(){};var e=N++;return(B=B||{})[e]=n,function(){null!==B&&delete B[e]}}}return{kill:function(e,t){return function(){if(g===_)return t(n.right(void 0))(),function(){};var r=V({rethrow:!1,handler:function(){return t(n.right(void 0))}})();switch(g){case C:U=n.left(e),g=_,b=U,j(d);break;case H:null===U&&(U=n.left(e)),0===R&&(g===H&&(W=new D(S,new D(p,b(e)),W,U)),g=L,b=null,h=null,j(++d));break;default:null===U&&(U=n.left(e)),0===R&&(g=L,b=null,h=null)}return r}},join:function(n){return function(){var e=V({rethrow:!1,handler:n})();return g===C&&j(d),e}},onComplete:V,isSuspended:function(){return g===C},run:function(){g===C&&(E.isDraining()?j(d):E.enqueue(function(){j(d)}))}}}function U(e,t,r,a){var u=0,i={},l=0,c={},P=new Error("[ParAff] Early exit"),v=null,p=n;function m(t,r,a){var o,u,l=r,c=null,P=null,v=0,p={};n:for(;;)switch(o=null,l.tag){case g:if(l._3===n&&(o=i[l._1],p[v++]=o.kill(t,function(n){return function(){0===--v&&a(n)()}})),null===c)break n;l=c._2,null===P?c=null:(c=P._1,P=P._2);break;case f:l=l._2;break;case s:case d:c&&(P=new D(S,c,P)),c=l,l=l._1}if(0===v)a(e.right(void 0))();else for(u=0,o=v;u<o;u++)p[u]=p[u]();return p}function b(t){return function(r){return function(){delete i[t._1],t._3=r,function t(r,o,u){var i,S,p,g,D,b;for(e.isLeft(r)?(i=r,S=null):(S=r,i=null);;){if(p=null,g=null,D=null,b=null,null!==v)return;if(null===o)return void a(i||S)();if(o._3!==n)return;switch(o.tag){case f:null===i?(o._3=e.right(o._1(e.fromRight(S))),S=o._3):o._3=i;break;case s:if(p=o._1._3,g=o._2._3,i){if(o._3=i,D=!0,b=l++,c[b]=m(P,i===p?o._2:o._1,function(){return function(){delete c[b],D?D=!1:null===u?t(i,null,null):t(i,u._1,u._2)}}),D)return void(D=!1)}else{if(p===n||g===n)return;S=e.right(e.fromRight(p)(e.fromRight(g))),o._3=S}break;case d:if(p=o._1._3,g=o._2._3,p===n&&e.isLeft(g)||g===n&&e.isLeft(p))return;if(p!==n&&e.isLeft(p)&&g!==n&&e.isLeft(g))i=S===p?g:p,S=null,o._3=i;else if(o._3=S,D=!0,b=l++,c[b]=m(P,S===p?o._2:o._1,function(){return function(){delete c[b],D?D=!1:null===u?t(S,null,null):t(S,u._1,u._2)}}),D)return void(D=!1)}null===u?o=null:(o=u._1,u=u._2)}}(r,t._2._1,t._2._2)}}}return function(){var a,o,l=A,c=r,P=null,v=null;n:for(;;)switch(a=null,o=null,l){case A:switch(c.tag){case f:P&&(v=new D(S,P,v)),P=new D(f,c._1,n,n),c=c._2;break;case s:P&&(v=new D(S,P,v)),P=new D(s,n,c._2,n),c=c._1;break;case d:P&&(v=new D(S,P,v)),P=new D(d,n,c._2,n),c=c._1;break;default:o=u++,l=L,a=c,c=new D(g,o,new D(S,P,v),n),(a=I(e,t,a)).onComplete({rethrow:!1,handler:b(c)})(),i[o]=a,t&&t.register(a)}break;case L:if(null===P)break n;P._1===n?(P._1=c,l=A,c=P._2,P._2=n):(P._2=c,c=P,null===v?P=null:(P=v._1,v=v._2))}for(p=c,o=0;o<u;o++)i[o].run()}(),function(n){return new D(o,function(t){return function(){return function(n,t){var r;for(var a in v=e.left(n),c)if(c.hasOwnProperty(a))for(a in r=c[a])r.hasOwnProperty(a)&&r[a]();c=null;var u=m(n,p,t);return function(n){return new D(o,function(n){return function(){for(var n in u)u.hasOwnProperty(n)&&u[n]();return h}})}}(n,t)}})}}function x(n,e,t){return new D(o,function(r){return function(){return U(n,e,t,r)}})}return D.EMPTY=n,D.Pure=b(e),D.Throw=b(t),D.Catch=b(r),D.Sync=b(a),D.Async=b(o),D.Bind=b(u),D.Bracket=b(i),D.Fork=b(l),D.Seq=b(c),D.ParMap=b(f),D.ParApply=b(s),D.ParAlt=b(d),D.Fiber=I,D.Supervisor=function(n){var e={},t=0,r=0;return{register:function(n){var a=t++;n.onComplete({rethrow:!0,handler:function(n){return function(){r--,delete e[a]}}}),e[a]=n,r++},isEmpty:function(){return 0===r},killAll:function(o,u){return function(){var i=0,l={};function c(t){l[t]=e[t].kill(o,function(e){return function(){delete l[t],i--,n.isLeft(e)&&n.fromLeft(e)&&setTimeout(function(){throw n.fromLeft(e)},0),0===i&&u()}})()}for(var f in e)e.hasOwnProperty(f)&&(i++,c(f));return e={},t=0,r=0,function(n){return new D(a,function(){for(var n in l)l.hasOwnProperty(n)&&l[n]()})}}}}},D.Scheduler=E,D.nonCanceler=h,D}();n._pure=e.Pure,n._throwError=e.Throw,n._catchError=function(n){return function(t){return e.Catch(n,t)}},n._map=function(n){return function(t){return t.tag===e.Pure.tag?e.Pure(n(t._1)):e.Bind(t,function(t){return e.Pure(n(t))})}},n._bind=function(n){return function(t){return e.Bind(n,t)}},n._fork=function(n){return function(t){return e.Fork(n,t)}},n._liftEffect=e.Sync,n._parAffMap=function(n){return function(t){return e.ParMap(n,t)}},n._parAffApply=function(n){return function(t){return e.ParApply(n,t)}},n.makeAff=e.Async,n._makeFiber=function(n,t){return function(){return e.Fiber(n,null,t)}},n._sequential=e.Seq}(PS["Effect.Aff"]=PS["Effect.Aff"]||{}),function(n){"use strict";n.error=function(n){return new Error(n)},n.throwException=function(n){return function(){throw n}}}(PS["Effect.Exception"]=PS["Effect.Exception"]||{}),function(n){"use strict";var e=PS["Effect.Exception"];PS["Control.Applicative"],PS["Control.Semigroupoid"],PS["Data.Either"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Show"],PS.Effect,PS.Prelude;n.throw=function(n){return e.throwException(e.error(n))},n.error=e.error,n.throwException=e.throwException}(PS["Effect.Exception"]=PS["Effect.Exception"]||{}),function(n){"use strict";(PS["Effect.Unsafe"]=PS["Effect.Unsafe"]||{}).unsafePerformEffect=function(n){return n()}}(),function(n){"use strict";var e=PS["Effect.Unsafe"];PS.Effect;n.unsafePerformEffect=e.unsafePerformEffect}(PS["Effect.Unsafe"]=PS["Effect.Unsafe"]||{}),function(n){"use strict";var e=PS["Effect.Aff"],t=(PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"]),r=PS["Control.Apply"],a=PS["Control.Bind"],o=(PS["Control.Lazy"],PS["Control.Monad"]),u=PS["Control.Monad.Error.Class"],i=PS["Control.Monad.Rec.Class"],l=(PS["Control.Parallel"],PS["Control.Parallel.Class"]),c=(PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Either"]),f=(PS["Data.Foldable"],PS["Data.Function"]),s=(PS["Data.Function.Uncurried"],PS["Data.Functor"]),d=(PS["Data.Monoid"],PS["Data.Newtype"],PS["Data.Semigroup"],PS["Data.Time.Duration"],PS["Data.Unit"]),S=PS.Effect,P=PS["Effect.Class"],v=(PS["Effect.Exception"],PS["Effect.Unsafe"]),p=PS["Partial.Unsafe"],m=(PS.Prelude,PS["Unsafe.Coerce"]),g=function(n){return n},D=e._fork(!1),b=new s.Functor(e._parAffMap),h=new s.Functor(e._map),w=e._fork(!0),y={isLeft:function(n){if(n instanceof c.Left)return!0;if(n instanceof c.Right)return!1;throw new Error("Failed pattern match at Effect.Aff (line 390, column 12 - line 392, column 20): "+[n.constructor.name])},fromLeft:function(n){if(n instanceof c.Left)return n.value0;if(n instanceof c.Right)return p.unsafeCrashWith("unsafeFromLeft: Right");throw new Error("Failed pattern match at Effect.Aff (line 395, column 20 - line 399, column 3): "+[n.constructor.name])},fromRight:function(n){if(n instanceof c.Right)return n.value0;if(n instanceof c.Left)return p.unsafeCrashWith("unsafeFromRight: Left");throw new Error("Failed pattern match at Effect.Aff (line 400, column 21 - line 402, column 31): "+[n.constructor.name])},left:c.Left.create,right:c.Right.create},M=function(n){return e._makeFiber(y,n)},E=function(n){return function(){var e=M(n)();return e.run(),e}},C=new r.Apply(function(){return b},e._parAffApply),A=new o.Monad(function(){return H},function(){return T}),T=new a.Bind(function(){return F},e._bind),F=new r.Apply(function(){return h},o.ap(A)),H=new t.Applicative(function(){return F},e._pure),L=new P.MonadEffect(function(){return A},e._liftEffect),_=function(n){return g(f.const(P.liftEffect(L)(n)))},I=function(n){return e.makeAff(function(e){return s.map(S.functorEffect)(_)(n.join(e))})},U=new s.Functor(function(n){return function(e){return v.unsafePerformEffect(M(s.map(h)(n)(I(e))))}}),x=new u.MonadThrow(function(){return A},e._throwError),k=new u.MonadError(function(){return x},e._catchError),O=function(n){return function(e){return E(a.bindFlipped(T)(function(e){return P.liftEffect(L)(n(e))})(u.try(k)(e)))}},W=new l.Parallel(function(){return R},function(){return A},m.unsafeCoerce,e._sequential),R=new t.Applicative(function(){return C},function(n){return l.parallel(W)(t.pure(H)(n))}),N=new i.MonadRec(function(){return A},function(n){var e=function(r){return a.bind(T)(n(r))(function(n){if(n instanceof i.Done)return t.pure(H)(n.value0);if(n instanceof i.Loop)return e(n.value0);throw new Error("Failed pattern match at Effect.Aff (line 100, column 7 - line 102, column 22): "+[n.constructor.name])})};return e}),B=f.const(t.pure(H)(d.unit));n.Canceler=g,n.launchAff=E,n.runAff=O,n.runAff_=function(n){return function(e){return s.void(S.functorEffect)(O(n)(e))}},n.forkAff=w,n.suspendAff=D,n.killFiber=function(n){return function(r){return a.bind(T)(P.liftEffect(L)(r.isSuspended))(function(a){return a?P.liftEffect(L)(s.void(S.functorEffect)(r.kill(n,f.const(t.pure(S.applicativeEffect)(d.unit))))):e.makeAff(function(e){return s.map(S.functorEffect)(_)(r.kill(n,e))})})}},n.joinFiber=I,n.nonCanceler=B,n.effectCanceler=_,n.functorAff=h,n.applyAff=F,n.applicativeAff=H,n.bindAff=T,n.monadAff=A,n.monadRecAff=N,n.monadThrowAff=x,n.monadErrorAff=k,n.monadEffectAff=L,n.functorParAff=b,n.applyParAff=C,n.applicativeParAff=R,n.parallelAff=W,n.functorFiber=U,n.makeAff=e.makeAff}(PS["Effect.Aff"]=PS["Effect.Aff"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Semigroupoid"];var e=PS["Data.Either"],t=(PS["Data.Function"],PS.Effect,PS["Effect.Aff"]);PS["Effect.Exception"],PS["Effect.Uncurried"],PS.Prelude;n.fromEffectFnAff=function(n){return t.makeAff(function(r){return function(){var a=n(function(n){return r(e.Left.create(n))()},function(n){return r(e.Right.create(n))()});return function(n){return t.makeAff(function(r){return function(){return a(n,function(n){return r(e.Left.create(n))()},function(n){return r(e.Right.create(n))()}),t.nonCanceler}})}}})}}(PS["Effect.Aff.Compat"]=PS["Effect.Aff.Compat"]||{}),function(n){"use strict";var e=PS.Affjax,t=PS["Affjax.RequestBody"],r=PS["Affjax.RequestHeader"],a=PS["Affjax.ResponseFormat"],o=PS["Affjax.ResponseHeader"],u=(PS["Affjax.StatusCode"],PS["Control.Applicative"]),i=PS["Control.Bind"],l=(PS["Control.Monad.Error.Class"],PS["Control.Monad.Except"]),c=PS["Control.Monad.Except.Trans"],f=(PS["Control.Parallel"],PS["Control.Semigroupoid"],PS["Data.Argonaut.Core"]),s=PS["Data.Argonaut.Parser"],d=PS["Data.Array"],S=PS["Data.Either"],P=PS["Data.Eq"],v=PS["Data.Foldable"],p=PS["Data.FormURLEncoded"],m=PS["Data.Function"],g=(PS["Data.Function.Uncurried"],PS["Data.Functor"]),D=PS["Data.HTTP.Method"],b=PS["Data.HeytingAlgebra"],h=PS["Data.Identity"],w=(PS["Data.Int"],PS["Data.List.NonEmpty"]),y=PS["Data.Maybe"],M=PS["Data.Nullable"],E=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semiring"],PS["Data.Time.Duration"],PS["Data.Unit"]),C=PS["Effect.Aff"],A=PS["Effect.Aff.Compat"],T=(PS["Effect.Class"],PS["Effect.Exception"],PS["Effect.Ref"],PS.Foreign),F=(PS.Math,PS.Prelude,{method:new S.Left(D.GET.value),url:"/",headers:[],content:y.Nothing.value,username:y.Nothing.value,password:y.Nothing.value,withCredentials:!1,responseFormat:a.ignore});n.defaultRequest=F,n.request=function(n){var F,H=function(){if(n.responseFormat instanceof a.ArrayBuffer)return T.unsafeReadTagged("ArrayBuffer");if(n.responseFormat instanceof a.Blob)return T.unsafeReadTagged("Blob");if(n.responseFormat instanceof a.Document)return T.unsafeReadTagged("Document");if(n.responseFormat instanceof a.Json)return i.composeKleisliFlipped(c.bindExceptT(h.monadIdentity))(function(e){return n.responseFormat.value0(""===(t=e)?u.pure(c.applicativeExceptT(h.monadIdentity))(f.jsonEmptyObject):S.either(function(n){return T.fail(T.ForeignError.create(n))})(u.pure(c.applicativeExceptT(h.monadIdentity)))(s.jsonParser(t)));var t})(T.unsafeReadTagged("String"));if(n.responseFormat instanceof a.String)return T.unsafeReadTagged("String");if(n.responseFormat instanceof a.Ignore)return m.const(n.responseFormat.value0(u.pure(c.applicativeExceptT(h.monadIdentity))(E.unit)));throw new Error("Failed pattern match at Affjax (line 292, column 19 - line 298, column 57): "+[n.responseFormat.constructor.name])}(),L=function(n){return function(e){return n instanceof y.Just&&!v.any(v.foldableArray)(b.heytingAlgebraBoolean)(m.on(P.eq(P.eqString))(r.requestHeaderName)(n.value0))(e)?d.snoc(e)(n.value0):e}},_={method:D.print(n.method),url:n.url,headers:g.map(g.functorArray)(function(n){return{field:r.requestHeaderName(n),value:r.requestHeaderValue(n)}})((F=n.content,L(g.map(y.functorMaybe)(r.ContentType.create)(i.bindFlipped(y.bindMaybe)(t.toMediaType)(F)))(L(g.map(y.functorMaybe)(r.Accept.create)(a.toMediaType(n.responseFormat)))(n.headers)))),content:M.toNullable(g.map(y.functorMaybe)(function(n){if(n instanceof t.ArrayView)return n.value0(T.unsafeToForeign);if(n instanceof t.Blob)return T.unsafeToForeign(n.value0);if(n instanceof t.Document)return T.unsafeToForeign(n.value0);if(n instanceof t.String)return T.unsafeToForeign(n.value0);if(n instanceof t.FormData)return T.unsafeToForeign(n.value0);if(n instanceof t.FormURLEncoded)return T.unsafeToForeign(p.encode(n.value0));if(n instanceof t.Json)return T.unsafeToForeign(f.stringify(n.value0));throw new Error("Failed pattern match at Affjax (line 266, column 20 - line 273, column 57): "+[n.constructor.name])})(n.content)),responseType:a.toResponseType(n.responseFormat),username:M.toNullable(n.username),password:M.toNullable(n.password),withCredentials:n.withCredentials};return i.bind(C.bindAff)(A.fromEffectFnAff(e._ajax(o.responseHeader,_)))(function(n){var e=l.runExcept(H(n.body));if(e instanceof S.Left)return u.pure(C.applicativeAff)({body:new S.Left(new a.ResponseFormatError(w.head(e.value0),n.body)),headers:n.headers,status:n.status,statusText:n.statusText});if(e instanceof S.Right)return u.pure(C.applicativeAff)({body:new S.Right(e.value0),headers:n.headers,status:n.status,statusText:n.statusText});throw new Error("Failed pattern match at Affjax (line 246, column 3 - line 250, column 39): "+[e.constructor.name])})}}(PS.Affjax=PS.Affjax||{}),function(n){"use strict";n._app=function(){return app},n._mmoment8601=function(n,e,t,r){try{var a=moment(r,moment.ISO_8601),o=a.fromNow(),u=a.format("MMMM D YYYY, h:mm a")+" ("+a.format()+") ";return n(t(o)(u))}catch(n){return e}},n._closeWindow=function(n){n.close()}}(PS.Globals=PS.Globals||{}),function(n){"use strict";(PS["Foreign.Index"]=PS["Foreign.Index"]||{}).unsafeReadPropImpl=function(n,e,t,r){return null==r?n:e(r[t])}}(),function(n){"use strict";var e=PS["Foreign.Index"],t=PS["Control.Applicative"],r=(PS["Control.Bind"],PS["Control.Monad.Except.Trans"]),a=(PS["Data.Eq"],PS["Data.Function"],PS["Data.Function.Uncurried"],PS["Data.HeytingAlgebra"],PS["Data.Identity"]),o=(PS["Data.List.NonEmpty"],PS.Foreign),u=(PS.Prelude,function(n){return function(u){return e.unsafeReadPropImpl(o.fail(new o.TypeMismatch("object",o.typeOf(u))),t.pure(r.applicativeExceptT(a.monadIdentity)),n,u)}});n.readProp=u}(PS["Foreign.Index"]=PS["Foreign.Index"]||{}),function(n){"use strict";PS["Type.Data.Boolean"],PS["Type.Data.Symbol"],PS["Type.Equality"];var e=function(){function n(){}return n.value=new n,n}();n.RLProxy=e}(PS["Type.Row"]=PS["Type.Row"]||{}),function(n){"use strict";PS["Data.Eq"],PS["Data.Function.Uncurried"],PS["Data.HeytingAlgebra"];var e=PS["Data.Symbol"],t=(PS.Prelude,PS["Record.Unsafe"]);PS["Record.Unsafe.Union"],PS["Type.Row"],PS["Unsafe.Coerce"];n.get=function(n){return function(r){return function(r){return function(a){return t.unsafeGet(e.reflectSymbol(n)(r))(a)}}}}}(PS.Record=PS.Record||{}),function(n){"use strict";n.copyRecord=function(n){var e={};for(var t in n)({}).hasOwnProperty.call(n,t)&&(e[t]=n[t]);return e},n.unsafeInsert=function(n){return function(e){return function(t){return t[n]=e,t}}}}(PS["Record.Builder"]=PS["Record.Builder"]||{}),function(n){"use strict";var e=PS["Record.Builder"],t=PS["Control.Category"],r=PS["Control.Semigroupoid"],a=(PS["Data.Function.Uncurried"],PS["Data.Symbol"]),o=(PS.Prelude,PS["Record.Unsafe.Union"],PS["Type.Row"],PS["Unsafe.Coerce"],r.semigroupoidFn),u=t.categoryFn;n.build=function(n){return function(t){return n(e.copyRecord(t))}},n.insert=function(n){return function(n){return function(n){return function(t){return function(r){return function(o){return e.unsafeInsert(a.reflectSymbol(n)(t))(r)(o)}}}}}},n.semigroupoidBuilder=o,n.categoryBuilder=u}(PS["Record.Builder"]=PS["Record.Builder"]||{}),function(n){"use strict";PS["Simple.JSON"],PS["Control.Alt"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"];var e=PS["Control.Category"],t=(PS["Control.Monad.Except"],PS["Control.Monad.Except.Trans"],PS["Control.Semigroupoid"]),r=(PS["Data.Bifunctor"],PS["Data.Boolean"],PS["Data.Either"],PS["Data.Eq"],PS["Data.Function"],PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.Identity"],PS["Data.List.Types"],PS["Data.Maybe"]),a=PS["Data.Nullable"],o=(PS["Data.Semigroup"],PS["Data.Symbol"]),u=(PS["Data.Traversable"],PS["Data.Variant"],PS["Effect.Exception"],PS["Effect.Uncurried"],PS["Effect.Unsafe"],PS.Foreign),i=(PS["Foreign.Index"],PS["Foreign.Object"],PS["Global.Unsafe"]),l=(PS["Partial.Unsafe"],PS.Prelude,PS.Record),c=PS["Record.Builder"],f=(PS["Type.Prelude"],PS["Type.Row"]),s=function(n){this.writeImpl=n},d=function(n){this.writeImplFields=n},S=function(n){return n.writeImplFields},P=function(n){return n.writeImpl},v=new s(u.unsafeToForeign),p=new s(u.unsafeToForeign),m=new s(u.unsafeToForeign),g=new d(function(n){return function(n){return e.identity(c.categoryBuilder)}});n.writeJSON=function(n){return function(e){return i.unsafeStringify(P(n)(e))}},n.WriteForeign=s,n.writeImpl=P,n.WriteForeignFields=d,n.writeImplFields=S,n.writeForeignString=v,n.writeForeignInt=p,n.writeForeignBoolean=m,n.writeForeignNullable=function(n){return new s(function(e){return r.maybe(u.unsafeToForeign(a.toNullable(r.Nothing.value)))(P(n))(a.toMaybe(e))})},n.recordWriteForeign=function(n){return function(n){return new s(function(e){var t=S(n)(f.RLProxy.value)(e);return u.unsafeToForeign(c.build(t)({}))})}},n.consWriteForeignFields=function(n){return function(e){return function(r){return function(a){return function(u){return function(i){return new d(function(s){return function(s){var d=S(r)(f.RLProxy.value)(s),v=P(e)(l.get(n)(a)(o.SProxy.value)(s));return t.compose(c.semigroupoidBuilder)(c.insert(i)(u)(n)(o.SProxy.value)(v))(d)}})}}}}}},n.nilWriteForeignFields=g}(PS["Simple.JSON"]=PS["Simple.JSON"]||{}),function(n){"use strict";PS["Data.Nullable"];var e=PS["Data.Symbol"],t=PS["Simple.JSON"],r=t.recordWriteForeign()(t.consWriteForeignFields(new e.IsSymbol(function(){return"archiveDefault"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"privacyLock"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"privateDefault"}))(t.writeForeignBoolean)(t.nilWriteForeignFields)()()())()()())()()()),a=t.recordWriteForeign()(t.consWriteForeignFields(new e.IsSymbol(function(){return"created"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"id"}))(t.writeForeignInt)(t.consWriteForeignFields(new e.IsSymbol(function(){return"isMarkdown"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"length"}))(t.writeForeignInt)(t.consWriteForeignFields(new e.IsSymbol(function(){return"slug"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"text"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"title"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"updated"}))(t.writeForeignString)(t.nilWriteForeignFields)()()())()()())()()())()()())()()())()()())()()())()()()),o=t.recordWriteForeign()(t.consWriteForeignFields(new e.IsSymbol(function(){return"archiveUrl"}))(t.writeForeignNullable(t.writeForeignString))(t.consWriteForeignFields(new e.IsSymbol(function(){return"bid"}))(t.writeForeignInt)(t.consWriteForeignFields(new e.IsSymbol(function(){return"description"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"private"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"selected"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"slug"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"tags"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"time"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"title"}))(t.writeForeignString)(t.consWriteForeignFields(new e.IsSymbol(function(){return"toread"}))(t.writeForeignBoolean)(t.consWriteForeignFields(new e.IsSymbol(function(){return"url"}))(t.writeForeignString)(t.nilWriteForeignFields)()()())()()())()()())()()())()()())()()())()()())()()())()()())()()())()()());n.bookmark_wfI=o,n.note_wfI=a,n.usersettings_wfI=r}(PS.Model=PS.Model||{}),function(n){"use strict";(PS["Web.HTML"]=PS["Web.HTML"]||{}).window=function(){return window}}(),function(n){"use strict";(PS["Web.DOM.ParentNode"]=PS["Web.DOM.ParentNode"]||{})._querySelector=function(n){return function(e){return function(){return e.querySelector(n)}}}}(),function(n){"use strict";var e=PS["Web.DOM.ParentNode"],t=(PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Functor"]),r=(PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Nullable"]),a=(PS["Data.Ord"],PS.Effect);PS.Prelude,PS["Web.DOM.HTMLCollection"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NodeList"];n.querySelector=function(n){return function(o){return t.map(a.functorEffect)(r.toMaybe)(e._querySelector(n)(o))}}}(PS["Web.DOM.ParentNode"]=PS["Web.DOM.ParentNode"]||{}),function(n){"use strict";(PS["Web.Event.EventTarget"]=PS["Web.Event.EventTarget"]||{}).eventListener=function(n){return function(){return function(e){return n(e)()}}}}(),function(n){"use strict";n._currentTarget=function(n){return n.currentTarget},n.preventDefault=function(n){return function(){return n.preventDefault()}}}(PS["Web.Event.Event"]=PS["Web.Event.Event"]||{}),function(n){"use strict";n.toCharCode=function(n){return n.charCodeAt(0)},n.fromCharCode=function(n){return String.fromCharCode(n)}}(PS["Data.Enum"]=PS["Data.Enum"]||{}),function(n){"use strict";var e=PS["Data.Enum"],t=(PS["Control.Apply"],PS["Control.Bind"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Semigroupoid"],PS["Data.Boolean"],PS["Data.Bounded"]),r=(PS["Data.Either"],PS["Data.Eq"],PS["Data.Function"],PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),a=(PS["Data.Newtype"],PS["Data.Ord"]),o=(PS["Data.Ordering"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Tuple"],PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS["Data.Unit"],PS["Partial.Unsafe"],PS.Prelude,function(n,e,t){this.Ord0=n,this.pred=e,this.succ=t}),u=function(n,e,t,r,a){this.Bounded0=n,this.Enum1=e,this.cardinality=t,this.fromEnum=r,this.toEnum=a},i=function(n){return n.toEnum},l=function(n){return n.fromEnum},c=function(n){return function(e){return function(t){return n(e(t)+1|0)}}},f=function(n){return function(e){return function(t){return n(e(t)-1|0)}}},s=function(n){return n>=t.bottom(t.boundedInt)&&n<=t.top(t.boundedInt)?new r.Just(e.fromCharCode(n)):r.Nothing.value},d=new o(function(){return a.ordChar},f(s)(e.toCharCode),c(s)(e.toCharCode)),S=new u(function(){return t.boundedChar},function(){return d},e.toCharCode(t.top(t.boundedChar))-e.toCharCode(t.bottom(t.boundedChar))|0,e.toCharCode,s);n.Enum=o,n.succ=function(n){return n.succ},n.pred=function(n){return n.pred},n.BoundedEnum=u,n.cardinality=function(n){return n.cardinality},n.toEnum=i,n.fromEnum=l,n.toEnumWithDefaults=function(n){return function(e){return function(a){return function(o){var u=i(n)(o);if(u instanceof r.Just)return u.value0;if(u instanceof r.Nothing)return o<l(n)(t.bottom(n.Bounded0()))?e:a;throw new Error("Failed pattern match at Data.Enum (line 158, column 33 - line 160, column 62): "+[u.constructor.name])}}}},n.defaultSucc=c,n.defaultPred=f,n.enumChar=d,n.boundedEnumChar=S}(PS["Data.Enum"]=PS["Data.Enum"]||{}),function(n){"use strict";var e=PS["Web.Event.Event"],t=(PS["Control.Semigroupoid"],PS["Data.DateTime.Instant"],PS["Data.Enum"],PS["Data.Eq"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Nullable"]);PS["Data.Ord"],PS.Effect,PS.Prelude,PS["Web.Event.EventPhase"],PS["Web.Event.Internal.Types"];n.currentTarget=function(n){return t.toMaybe(e._currentTarget(n))},n.preventDefault=e.preventDefault}(PS["Web.Event.Event"]=PS["Web.Event.Event"]||{}),function(n){"use strict";var e=PS["Web.Event.EventTarget"];PS.Effect,PS.Prelude,PS["Web.Event.Event"],PS["Web.Event.Internal.Types"];n.eventListener=e.eventListener}(PS["Web.Event.EventTarget"]=PS["Web.Event.EventTarget"]||{}),function(n){"use strict";(PS["Web.HTML.HTMLElement"]=PS["Web.HTML.HTMLElement"]||{})._read=function(n,e,t){var r=Object.prototype.toString.call(t);return 0===r.indexOf("[object HTML")&&r.indexOf("Element]")===r.length-8?e(t):n}}(),function(n){"use strict";(PS["Web.DOM.Element"]=PS["Web.DOM.Element"]||{}).removeAttribute=function(n){return function(e){return function(){return e.removeAttribute(n),{}}}}}(),function(n){"use strict";var e=PS["Web.DOM.Element"],t=(PS["Control.Semigroupoid"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Nullable"],PS.Effect,PS.Prelude,PS["Unsafe.Coerce"]),r=(PS["Web.DOM.ChildNode"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NonDocumentTypeChildNode"],PS["Web.DOM.ParentNode"],PS["Web.Event.EventTarget"],PS["Web.Internal.FFI"],t.unsafeCoerce);n.toNode=r,n.removeAttribute=e.removeAttribute}(PS["Web.DOM.Element"]=PS["Web.DOM.Element"]||{}),function(n){"use strict";var e=PS["Web.HTML.HTMLElement"],t=(PS["Control.Semigroupoid"],PS["Data.Function.Uncurried"],PS["Data.Functor"],PS["Data.Maybe"]),r=(PS["Data.Nullable"],PS.Effect,PS.Prelude,PS["Unsafe.Coerce"]),a=(PS["Web.DOM"],PS["Web.DOM.DOMTokenList"],PS["Web.DOM.Element"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NonDocumentTypeChildNode"],PS["Web.DOM.ParentNode"],PS["Web.Event.EventTarget"],r.unsafeCoerce),o=r.unsafeCoerce;n.fromElement=function(n){return e._read(t.Nothing.value,t.Just.create,n)},n.toElement=o,n.toNode=a}(PS["Web.HTML.HTMLElement"]=PS["Web.HTML.HTMLElement"]||{}),function(n){"use strict";PS["Web.HTML.HTMLDocument"],PS["Control.Semigroupoid"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Nullable"],PS.Effect,PS.Prelude;var e=PS["Unsafe.Coerce"],t=(PS["Web.DOM.Document"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NonElementParentNode"],PS["Web.DOM.ParentNode"],PS["Web.Event.EventTarget"],PS["Web.HTML.HTMLDocument.ReadyState"],PS["Web.HTML.HTMLElement"],PS["Web.HTML.HTMLScriptElement"],PS["Web.Internal.FFI"],e.unsafeCoerce),r=e.unsafeCoerce;n.toDocument=r,n.toParentNode=t}(PS["Web.HTML.HTMLDocument"]=PS["Web.HTML.HTMLDocument"]||{}),function(n){"use strict";n.href=function(n){return function(){return n.href}},n.setHref=function(n){return function(e){return function(){e.href=n}}},n.search=function(n){return function(){return n.search}},n.reload=function(n){return function(){n.reload()}}}(PS["Web.HTML.Location"]=PS["Web.HTML.Location"]||{}),function(n){"use strict";var e=PS["Web.HTML.Location"];PS.Effect,PS.Prelude;n.setHref=e.setHref,n.search=e.search,n.reload=e.reload}(PS["Web.HTML.Location"]=PS["Web.HTML.Location"]||{}),function(n){"use strict";n.document=function(n){return function(){return n.document}},n.location=function(n){return function(){return n.location}}}(PS["Web.HTML.Window"]=PS["Web.HTML.Window"]||{}),function(n){"use strict";var e=PS["Web.HTML.Window"];PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Nullable"],PS["Data.Ord"],PS.Effect,PS.Prelude,PS["Unsafe.Coerce"],PS["Web.Event.EventTarget"],PS["Web.HTML.HTMLDocument"],PS["Web.HTML.History"],PS["Web.HTML.Location"],PS["Web.HTML.Navigator"],PS["Web.Storage.Storage"];n.document=e.document,n.location=e.location}(PS["Web.HTML.Window"]=PS["Web.HTML.Window"]||{}),function(n){"use strict";var e=PS["Web.HTML"];PS.Effect,PS["Web.HTML.HTMLAnchorElement"],PS["Web.HTML.HTMLAreaElement"],PS["Web.HTML.HTMLAudioElement"],PS["Web.HTML.HTMLBRElement"],PS["Web.HTML.HTMLBaseElement"],PS["Web.HTML.HTMLBodyElement"],PS["Web.HTML.HTMLButtonElement"],PS["Web.HTML.HTMLCanvasElement"],PS["Web.HTML.HTMLDListElement"],PS["Web.HTML.HTMLDataElement"],PS["Web.HTML.HTMLDataListElement"],PS["Web.HTML.HTMLDivElement"],PS["Web.HTML.HTMLDocument"],PS["Web.HTML.HTMLElement"],PS["Web.HTML.HTMLEmbedElement"],PS["Web.HTML.HTMLFieldSetElement"],PS["Web.HTML.HTMLFormElement"],PS["Web.HTML.HTMLHRElement"],PS["Web.HTML.HTMLHeadElement"],PS["Web.HTML.HTMLHeadingElement"],PS["Web.HTML.HTMLIFrameElement"],PS["Web.HTML.HTMLImageElement"],PS["Web.HTML.HTMLInputElement"],PS["Web.HTML.HTMLKeygenElement"],PS["Web.HTML.HTMLLIElement"],PS["Web.HTML.HTMLLabelElement"],PS["Web.HTML.HTMLLegendElement"],PS["Web.HTML.HTMLLinkElement"],PS["Web.HTML.HTMLMapElement"],PS["Web.HTML.HTMLMediaElement"],PS["Web.HTML.HTMLMetaElement"],PS["Web.HTML.HTMLMeterElement"],PS["Web.HTML.HTMLModElement"],PS["Web.HTML.HTMLOListElement"],PS["Web.HTML.HTMLObjectElement"],PS["Web.HTML.HTMLOptGroupElement"],PS["Web.HTML.HTMLOptionElement"],PS["Web.HTML.HTMLOutputElement"],PS["Web.HTML.HTMLParagraphElement"],PS["Web.HTML.HTMLParamElement"],PS["Web.HTML.HTMLPreElement"],PS["Web.HTML.HTMLProgressElement"],PS["Web.HTML.HTMLQuoteElement"],PS["Web.HTML.HTMLScriptElement"],PS["Web.HTML.HTMLSelectElement"],PS["Web.HTML.HTMLSourceElement"],PS["Web.HTML.HTMLSpanElement"],PS["Web.HTML.HTMLStyleElement"],PS["Web.HTML.HTMLTableCaptionElement"],PS["Web.HTML.HTMLTableCellElement"],PS["Web.HTML.HTMLTableColElement"],PS["Web.HTML.HTMLTableDataCellElement"],PS["Web.HTML.HTMLTableElement"],PS["Web.HTML.HTMLTableHeaderCellElement"],PS["Web.HTML.HTMLTableRowElement"],PS["Web.HTML.HTMLTableSectionElement"],PS["Web.HTML.HTMLTemplateElement"],PS["Web.HTML.HTMLTextAreaElement"],PS["Web.HTML.HTMLTimeElement"],PS["Web.HTML.HTMLTitleElement"],PS["Web.HTML.HTMLTrackElement"],PS["Web.HTML.HTMLUListElement"],PS["Web.HTML.HTMLVideoElement"],PS["Web.HTML.History"],PS["Web.HTML.Location"],PS["Web.HTML.Navigator"],PS["Web.HTML.Window"];n.window=e.window}(PS["Web.HTML"]=PS["Web.HTML"]||{}),function(n){"use strict";var e=PS.Globals,t=PS["Control.Applicative"],r=(PS["Data.Function"],PS["Data.Function.Uncurried"],PS["Data.Maybe"]),a=(PS["Data.Newtype"],PS["Data.Nullable"],PS["Data.Tuple"]),o=PS.Effect;PS.Model,PS.Prelude,PS["Web.DOM"],PS["Web.HTML"],PS["Web.XHR.FormData"];n["app'"]=function(n){return e._app()},n.mmoment8601=function(n){return e._mmoment8601(r.Just.create,r.Nothing.value,a.Tuple.create,n)},n.closeWindow=function(n){return t.pure(o.applicativeEffect)(e._closeWindow(n))},n.RawHTML=function(n){return n}}(PS.Globals=PS.Globals||{}),function(n){"use strict";var e=PS.Affjax,t=PS["Affjax.RequestBody"],r=PS["Affjax.RequestHeader"],a=PS["Affjax.ResponseFormat"],o=PS["Control.Bind"],u=(PS["Control.Semigroupoid"],PS["Data.Argonaut"],PS["Data.Array"]),i=PS["Data.Either"],l=(PS["Data.FormURLEncoded"],PS["Data.Functor"]),c=PS["Data.HTTP.Method"],f=PS["Data.Maybe"],s=PS["Data.MediaType.Common"],d=(PS["Data.Semigroup"],PS["Data.Show"]),S=PS["Data.Unit"],P=PS.Effect,v=PS["Effect.Aff"],p=PS["Effect.Class"],m=PS.Globals,g=PS.Model,D=(PS.Prelude,PS["Simple.JSON"]),b=PS["Web.HTML"],h=PS["Web.HTML.Location"],w=PS["Web.HTML.Window"],y=function(){function n(){}return n.value=new n,n}(),M=function(){function n(){}return n.value=new n,n}(),E=new d.Show(function(n){if(n instanceof y)return"star";if(n instanceof M)return"unstar";throw new Error("Failed pattern match at App (line 28, column 1 - line 28, column 37): "+[n.constructor.name])}),C=function(n){return function(t){return function(a){return function(o){return function(l){var c=m["app'"](S.unit);return e.request({method:new i.Left(n),url:t,headers:u.cons(new r.RequestHeader(c.csrfHeaderName,c.csrfToken))(a),content:o,username:e.defaultRequest.username,password:e.defaultRequest.password,withCredentials:e.defaultRequest.withCredentials,responseFormat:l})}}}}},A=function(n){return function(e){return function(t){return function(r){return function(a){return C(n)(m["app'"](S.unit).homeR+e)(t)(r)(a)}}}}},T=function(n){return function(e){return function(a){return function(o){return A(n)(e)([new r.ContentType(s.applicationFormURLEncoded)])(l.map(f.functorMaybe)(t.FormURLEncoded.create)(a))(o)}}}},F=function(n){return function(e){return function(a){return function(o){return function(u){return A(e)(a)([new r.ContentType(s.applicationJSON)])(l.map(f.functorMaybe)(function(e){return t.string(D.writeJSON(n)(e))})(o))(u)}}}}};n.Star=y,n.UnStar=M,n.toggleStar=function(n){return function(e){var t="bm/"+d.show(d.showInt)(n)+"/"+d.show(E)(e);return l.void(v.functorAff)(T(c.POST.value)(t)(f.Nothing.value)(a.ignore))}},n.destroy=function(n){return T(c.DELETE.value)("bm/"+d.show(d.showInt)(n))(f.Nothing.value)(a.ignore)},n.markRead=function(n){var e="bm/"+d.show(d.showInt)(n)+"/read";return T(c.POST.value)(e)(f.Nothing.value)(a.ignore)},n.editBookmark=function(n){return F(g.bookmark_wfI)(c.POST.value)("api/add")(new f.Just(n))(a.ignore)},n.editNote=function(n){return F(g.note_wfI)(c.POST.value)("api/note/add")(new f.Just(n))(a.json)},n.destroyNote=function(n){return T(c.DELETE.value)("api/note/"+d.show(d.showInt)(n))(f.Nothing.value)(a.ignore)},n.editAccountSettings=function(n){return F(g.usersettings_wfI)(c.POST.value)("api/accountSettings")(new f.Just(n))(a.ignore)},n.logout=function(n){var e=m["app'"](n);return o.discard(o.discardUnit)(v.bindAff)(l.void(v.functorAff)(C(c.POST.value)(e.authRlogoutR)([])(f.Nothing.value)(a.ignore)))(function(){return p.liftEffect(v.monadEffectAff)(o.bind(P.bindEffect)(o.bind(P.bindEffect)(b.window)(w.location))(h.reload))})},n.fetchJson=F,n.fetchUrlEnc=T,n.fetchPath=A,n.fetchUrl=C,n.showStar=E}(PS.App=PS.App||{}),function(n){"use strict";var e=function(){function n(){}return n.value=new n,n}(),t=function(){function n(){}return n.value=new n,n}(),r=function(){function n(){}return n.value=new n,n}(),a=function(){function n(){}return n.value=new n,n}(),o=function(){function n(){}return n.value=new n,n}(),u=function(){function n(){}return n.value=new n,n}(),i=function(){function n(){}return n.value=new n,n}(),l=function(){function n(){}return n.value=new n,n}(),c=function(){function n(){}return n.value=new n,n}(),f=function(){function n(){}return n.value=new n,n}(),s=function(){function n(){}return n.value=new n,n}(),d=function(){function n(){}return n.value=new n,n}(),S=function(){function n(){}return n.value=new n,n}(),P=function(){function n(){}return n.value=new n,n}(),v=function(){function n(){}return n.value=new n,n}(),p=function(){function n(){}return n.value=new n,n}(),m=function(){function n(){}return n.value=new n,n}(),g=function(){function n(){}return n.value=new n,n}(),D=function(){function n(){}return n.value=new n,n}(),b=function(){function n(){}return n.value=new n,n}(),h=function(){function n(){}return n.value=new n,n}(),w=function(){function n(){}return n.value=new n,n}();n.InputButton=e,n.InputCheckbox=t,n.InputColor=r,n.InputDate=a,n.InputDatetimeLocal=o,n.InputEmail=u,n.InputFile=i,n.InputHidden=l,n.InputImage=c,n.InputMonth=f,n.InputNumber=s,n.InputPassword=d,n.InputRadio=S,n.InputRange=P,n.InputReset=v,n.InputSearch=p,n.InputSubmit=m,n.InputTel=g,n.InputText=D,n.InputTime=b,n.InputUrl=h,n.InputWeek=w,n.renderInputType=function(n){if(n instanceof e)return"button";if(n instanceof t)return"checkbox";if(n instanceof r)return"color";if(n instanceof a)return"date";if(n instanceof o)return"datetime-local";if(n instanceof u)return"email";if(n instanceof i)return"file";if(n instanceof l)return"hidden";if(n instanceof c)return"image";if(n instanceof f)return"month";if(n instanceof s)return"number";if(n instanceof d)return"password";if(n instanceof S)return"radio";if(n instanceof P)return"range";if(n instanceof v)return"reset";if(n instanceof p)return"search";if(n instanceof m)return"submit";if(n instanceof g)return"tel";if(n instanceof D)return"text";if(n instanceof b)return"time";if(n instanceof h)return"url";if(n instanceof w)return"week";throw new Error("Failed pattern match at DOM.HTML.Indexed.InputType (line 28, column 19 - line 50, column 16): "+[n.constructor.name])}}(PS["DOM.HTML.Indexed.InputType"]=PS["DOM.HTML.Indexed.InputType"]||{}),function(n){"use strict";var e=PS["Control.Category"],t=(PS["Control.Semigroupoid"],PS["Data.Newtype"],PS.Prelude,function(n){this.dimap=n}),r=new t(function(n){return function(e){return function(t){return function(r){return e(t(n(r)))}}}}),a=function(n){return n.dimap};n.dimap=a,n.Profunctor=t,n.rmap=function(n){return function(t){return a(n)(e.identity(e.categoryFn))(t)}},n.profunctorFn=r}(PS["Data.Profunctor"]=PS["Data.Profunctor"]||{}),function(n){"use strict";PS["Control.Category"],PS["Control.Semigroupoid"];var e=PS["Data.Functor"],t=PS["Data.Profunctor"],r=PS["Data.Tuple"],a=(PS.Prelude,function(n,e,t){this.Profunctor0=n,this.first=e,this.second=t}),o=new a(function(){return t.profunctorFn},function(n){return function(e){return new r.Tuple(n(e.value0),e.value1)}},e.map(r.functorTuple));n.first=function(n){return n.first},n.second=function(n){return n.second},n.Strong=a,n.strongFn=o}(PS["Data.Profunctor.Strong"]=PS["Data.Profunctor.Strong"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Const"],PS["Data.Either"],PS["Data.Functor"],PS["Data.Lens.Internal.Wander"],PS["Data.Monoid"];var e=PS["Data.Newtype"],t=PS["Data.Profunctor"],r=(PS["Data.Profunctor.Choice"],PS["Data.Profunctor.Cochoice"],PS["Data.Profunctor.Strong"]),a=(PS["Data.Semigroup"],PS["Data.Tuple"]),o=(PS.Prelude,function(n){return n}),u=new t.Profunctor(function(n){return function(e){return function(e){return function(t){return e(n(t))}}}}),i=new r.Strong(function(){return u},function(n){return function(e){return n(a.fst(e))}},function(n){return function(e){return n(a.snd(e))}}),l=new e.Newtype(function(n){return n},o);n.Forget=o,n.newtypeForget=l,n.profunctorForget=u,n.strongForget=i}(PS["Data.Lens.Internal.Forget"]=PS["Data.Lens.Internal.Forget"]||{}),function(n){"use strict";var e=PS["Control.Category"],t=PS["Control.Monad.State.Class"],r=(PS["Control.Semigroupoid"],PS["Data.Function"],PS["Data.Lens.Internal.Forget"]),a=(PS["Data.Lens.Internal.Indexed"],PS["Data.Lens.Types"],PS["Data.Newtype"]),o=(PS["Data.Profunctor.Strong"],PS["Data.Tuple"],PS.Prelude,function(n){return a.unwrap(r.newtypeForget)(n(e.identity(e.categoryFn)))}),u=function(n){return function(e){return o(e)(n)}};n.viewOn=u,n.view=o,n.use=function(n){return function(e){return t.gets(n)(function(n){return u(n)(e)})}}}(PS["Data.Lens.Getter"]=PS["Data.Lens.Getter"]||{}),function(n){"use strict";PS["Control.Category"],PS["Data.Lens.Internal.Indexed"],PS["Data.Lens.Internal.Shop"],PS["Data.Lens.Types"],PS["Data.Newtype"];var e=PS["Data.Profunctor"],t=PS["Data.Profunctor.Strong"],r=PS["Data.Tuple"];PS.Prelude;n.lens=function(n){return function(a){return function(o){return(u=function(e){return new r.Tuple(n(e),function(n){return a(e)(n)})},function(n){return function(r){return e.dimap(n.Profunctor0())(u)(function(n){return n.value1(n.value0)})(t.first(n)(r))}})(o);var u}}}}(PS["Data.Lens.Lens"]=PS["Data.Lens.Lens"]||{}),function(n){"use strict";var e=PS["Control.Monad.State.Class"],t=(PS["Control.Semigroupoid"],PS["Data.EuclideanRing"],PS["Data.Function"]),r=PS["Data.Functor"],a=(PS["Data.HeytingAlgebra"],PS["Data.Lens.Internal.Indexed"],PS["Data.Lens.Types"],PS["Data.Maybe"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Tuple"],PS.Prelude,function(n){return n}),o=function(n){return function(e){return a(n)(t.const(e))}};n.over=a,n.set=o,n.assign=function(n){return function(t){return function(a){return r.void(n.Monad0().Bind1().Apply0().Functor0())(e.modify(n)(o(t)(a)))}}},n.modifying=function(n){return function(t){return function(o){return r.void(n.Monad0().Bind1().Apply0().Functor0())(e.modify(n)(a(t)(o)))}}}}(PS["Data.Lens.Setter"]=PS["Data.Lens.Setter"]||{}),function(n){"use strict";var e=PS["Control.Category"],t=(PS["Control.Monad.Cont.Trans"],PS["Control.Monad.Except.Trans"],PS["Control.Monad.List.Trans"],PS["Control.Monad.Maybe.Trans"],PS["Control.Monad.RWS.Trans"],PS["Control.Monad.Reader.Trans"],PS["Control.Monad.State.Trans"],PS["Control.Monad.Trans.Class"],PS["Control.Monad.Writer.Trans"],PS["Control.Semigroupoid"],PS["Effect.Aff"]),r=(PS["Effect.Class"],PS.Prelude,function(n,e){this.MonadEffect0=n,this.liftAff=e}),a=new r(function(){return t.monadEffectAff},e.identity(e.categoryFn));n.liftAff=function(n){return n.liftAff},n.MonadAff=r,n.monadAffAff=a}(PS["Effect.Aff.Class"]=PS["Effect.Aff.Class"]||{}),function(n){"use strict";var e=PS["Data.Eq"],t=PS["Data.Ord"],r=(PS.Prelude,function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}()),a=new e.Eq(function(n){return function(e){return n.value0(n.value2)(e.value2)}}),o=new t.Ord(function(){return a},function(n){return function(e){return n.value1(n.value2)(e.value2)}});n.mkOrdBox=function(n){return r.create(e.eq(n.Eq0()))(t.compare(n))},n.unOrdBox=function(n){return n.value2},n.eqOrdBox=a,n.ordOrdBox=o}(PS["Halogen.Data.OrdBox"]=PS["Halogen.Data.OrdBox"]||{}),function(n){"use strict";var e=function(){function n(){}return n.value=new n,n}(),t=function(){function n(){}return n.value=new n,n}(),r=function(){function n(){}return n.value=new n,n}();n.ButtonButton=e,n.ButtonSubmit=t,n.ButtonReset=r,n.renderButtonType=function(n){if(n instanceof e)return"button";if(n instanceof t)return"submit";if(n instanceof r)return"reset";throw new Error("Failed pattern match at DOM.HTML.Indexed.ButtonType (line 9, column 20 - line 12, column 18): "+[n.constructor.name])}}(PS["DOM.HTML.Indexed.ButtonType"]=PS["DOM.HTML.Indexed.ButtonType"]||{}),function(n){"use strict";var e=function(){function n(){}return n.value=new n,n}(),t=function(){function n(){}return n.value=new n,n}();n.On=e,n.Off=t,n.renderOnOff=function(n){if(n instanceof e)return"on";if(n instanceof t)return"off";throw new Error("Failed pattern match at DOM.HTML.Indexed.OnOff (line 8, column 15 - line 10, column 10): "+[n.constructor.name])}}(PS["DOM.HTML.Indexed.OnOff"]=PS["DOM.HTML.Indexed.OnOff"]||{}),function(n){"use strict";var e=PS["Data.Bifunctor"],t=(PS["Data.Eq"],PS["Data.Functor"]),r=(PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Ord"],PS.Prelude,PS["Web.DOM"],function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}()),a=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),o=new e.Bifunctor(function(n){return function(e){return function(t){if(t instanceof r)return new r(t.value0,t.value1,n(t.value2));if(t instanceof a)return new a(e(t.value0));throw new Error("Failed pattern match at Halogen.Query.InputF (line 21, column 15 - line 23, column 27): "+[t.constructor.name])}}}),u=new t.Functor(e.rmap(o));n.RefUpdate=r,n.Query=a,n.bifunctorInputF=o,n.functorInputF=u}(PS["Halogen.Query.InputF"]=PS["Halogen.Query.InputF"]||{}),function(n){"use strict";PS.Effect,PS["Effect.Uncurried"],PS.Prelude;var e=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}();n.Step=e,n.extract=function(n){return n.value0},n.step=function(n){return n.value1},n.halt=function(n){return n.value2}}(PS["Halogen.VDom.Machine"]=PS["Halogen.VDom.Machine"]||{}),function(n){"use strict";PS["Control.Category"],PS["Control.Semigroupoid"];var e=PS["Data.Bifunctor"],t=(PS["Data.Eq"],PS["Data.Functor"]),r=(PS["Data.HeytingAlgebra"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Tuple"]),a=(PS.Prelude,PS["Unsafe.Coerce"]),o=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),u=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),i=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),l=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),c=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),f=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),s=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),d=function(n){return function(e){return n(e)}},S=a.unsafeCoerce,P=new t.Functor(function(n){return function(e){return new o(e.value0,e.value1,n(e.value2))}}),v=new e.Bifunctor(function(n){return function(e){return d(function(t){return S(new s(function(e){return n(t.value0(e))},function(n){return e(t.value1(n))},t.value2))})}}),p=new e.Bifunctor(function(n){return function(t){return function(r){return r instanceof u?new u(r.value0):new f(r instanceof f?e.bimap(v)(n)(t)(r.value0):S(new s(n,t,r)))}}}),m=d(function(n){var a=function(o){if(o instanceof u)return new u(o.value0);if(o instanceof i)return new i(t.map(P)(n.value0)(o.value0),t.map(t.functorArray)(a)(o.value1));if(o instanceof l)return new l(t.map(P)(n.value0)(o.value0),t.map(t.functorArray)(t.map(r.functorTuple)(a))(o.value1));if(o instanceof c)return new c(n.value1(o.value0));if(o instanceof f)return new f(e.bimap(v)(n.value0)(n.value1)(o.value0));throw new Error("Failed pattern match at Halogen.VDom.Types (line 74, column 7 - line 74, column 27): "+[o.constructor.name])};return a(n.value2)});n.Text=u,n.Elem=i,n.Keyed=l,n.Widget=c,n.Grafted=f,n.Graft=s,n.graft=S,n.unGraft=d,n.runGraft=m,n.ElemSpec=o,n.bifunctorVDom=p,n.bifunctorGraft=v,n.functorElemSpec=P}(PS["Halogen.VDom.Types"]=PS["Halogen.VDom.Types"]||{}),function(n){"use strict";n.unsafeGetAny=function(n,e){return e[n]},n.unsafeHasAny=function(n,e){return e.hasOwnProperty(n)},n.unsafeSetAny=function(n,e,t){t[n]=e},n.forE=function(n,e){for(var t=[],r=0;r<n.length;r++)t.push(e(r,n[r]));return t},n.forInE=function(n,e){for(var t=Object.keys(n),r=0;r<t.length;r++){var a=t[r];e(a,n[a])}},n.diffWithIxE=function(n,e,t,r,a){for(var o=[],u=n.length,i=e.length,l=0;;){if(l<u)l<i?o.push(t(l,n[l],e[l])):r(l,n[l]);else{if(!(l<i))break;o.push(a(l,e[l]))}l++}return o},n.strMapWithIxE=function(n,e,t){for(var r={},a=0;a<n.length;a++){var o=n[a],u=e(o);r[u]=t(u,a,o)}return r},n.diffWithKeyAndIxE=function(n,e,t,r,a,o){for(var u={},i=0;i<e.length;i++){var l=e[i],c=t(l);n.hasOwnProperty(c)?u[c]=r(c,i,n[c],l):u[c]=o(c,i,l)}for(var c in n)c in u||a(c,n[c]);return u},n.refEq=function(n,e){return n===e},n.createTextNode=function(n,e){return e.createTextNode(n)},n.setTextContent=function(n,e){e.textContent=n},n.createElement=function(n,e,t){return null!=n?t.createElementNS(n,e):t.createElement(e)},n.insertChildIx=function(n,e,t){var r=t.childNodes.item(n)||null;r!==e&&t.insertBefore(e,r)},n.removeChild=function(n,e){e&&n.parentNode===e&&e.removeChild(n)},n.parentNode=function(n){return n.parentNode},n.setAttribute=function(n,e,t,r){null!=n?r.setAttributeNS(n,e,t):r.setAttribute(e,t)},n.removeAttribute=function(n,e,t){null!=n?t.removeAttributeNS(n,e):t.removeAttribute(e)},n.addEventListener=function(n,e,t){t.addEventListener(n,e,!1)},n.removeEventListener=function(n,e,t){t.removeEventListener(n,e,!1)},n.jsUndefined=void 0}(PS["Halogen.VDom.Util"]=PS["Halogen.VDom.Util"]||{}),function(n){"use strict";var e=function(n){return function(e){return function(){return e[n]}}};n._parentNode=e("parentNode"),n._nextSibling=e("nextSibling"),n.insertBefore=function(n){return function(e){return function(t){return function(){return t.insertBefore(n,e)}}}},n.appendChild=function(n){return function(e){return function(){return e.appendChild(n)}}},n.removeChild=function(n){return function(e){return function(){return e.removeChild(n)}}}}(PS["Web.DOM.Node"]=PS["Web.DOM.Node"]||{}),function(n){"use strict";var e=PS["Web.DOM.Node"],t=(PS["Control.Semigroupoid"],PS["Data.Enum"],PS["Data.Functor"]),r=(PS["Data.Maybe"],PS["Data.Nullable"]),a=PS.Effect;PS.Prelude,PS["Unsafe.Coerce"],PS["Web.DOM.Document"],PS["Web.DOM.Element"],PS["Web.DOM.Internal.Types"],PS["Web.DOM.NodeType"],PS["Web.Event.EventTarget"],PS["Web.Internal.FFI"];n.parentNode=function(n){return t.map(a.functorEffect)(r.toMaybe)(e._parentNode(n))},n.nextSibling=function(n){return t.map(a.functorEffect)(r.toMaybe)(e._nextSibling(n))},n.insertBefore=e.insertBefore,n.appendChild=e.appendChild,n.removeChild=e.removeChild}(PS["Web.DOM.Node"]=PS["Web.DOM.Node"]||{}),function(n){"use strict";var e=PS["Halogen.VDom.Util"],t=PS["Control.Applicative"],r=(PS["Data.Function.Uncurried"],PS["Data.Nullable"],PS["Data.Unit"]),a=PS.Effect,o=(PS["Effect.Uncurried"],PS["Foreign.Object"],PS["Foreign.Object.ST"]),u=(PS["Halogen.VDom.Types"],PS.Prelude,PS["Unsafe.Coerce"]),i=(PS["Web.DOM.Document"],PS["Web.DOM.Element"],PS["Web.DOM.Node"],PS["Web.Event.EventTarget"],e.unsafeGetAny),l=u.unsafeCoerce,c=e.unsafeSetAny,f=o.new,s=t.pure(a.applicativeEffect)(r.unit);n.effectUnit=s,n.newMutMap=f,n.pokeMutMap=c,n.unsafeFreeze=l,n.unsafeLookup=i,n.unsafeGetAny=e.unsafeGetAny,n.unsafeHasAny=e.unsafeHasAny,n.unsafeSetAny=e.unsafeSetAny,n.forE=e.forE,n.forInE=e.forInE,n.diffWithIxE=e.diffWithIxE,n.diffWithKeyAndIxE=e.diffWithKeyAndIxE,n.strMapWithIxE=e.strMapWithIxE,n.refEq=e.refEq,n.createTextNode=e.createTextNode,n.setTextContent=e.setTextContent,n.createElement=e.createElement,n.insertChildIx=e.insertChildIx,n.removeChild=e.removeChild,n.parentNode=e.parentNode,n.setAttribute=e.setAttribute,n.removeAttribute=e.removeAttribute,n.addEventListener=e.addEventListener,n.removeEventListener=e.removeEventListener,n.jsUndefined=e.jsUndefined}(PS["Halogen.VDom.Util"]=PS["Halogen.VDom.Util"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Data.Eq"],PS["Data.Function.Uncurried"];var e=PS["Data.Functor"],t=PS["Data.Maybe"],r=PS["Data.Nullable"],a=(PS["Data.Semigroup"],PS["Data.Tuple"]),o=PS["Data.Unit"],u=(PS.Effect,PS["Effect.Ref"]),i=(PS["Effect.Uncurried"],PS.Foreign),l=PS["Foreign.Object"],c=(PS["Halogen.VDom"],PS["Halogen.VDom.Machine"]),f=(PS["Halogen.VDom.Types"],PS["Halogen.VDom.Util"]),s=(PS.Prelude,PS["Unsafe.Coerce"]),d=(PS["Web.DOM.Element"],PS["Web.Event.Event"],PS["Web.Event.EventTarget"]),S=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),P=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),v=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),p=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),m=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),g=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),D=f.unsafeGetAny,b=f.unsafeSetAny,h=function(n){if(n instanceof v&&n.value0 instanceof t.Just)return"attr/"+n.value0.value0+":"+n.value1;if(n instanceof v)return"attr/:"+n.value1;if(n instanceof p)return"prop/"+n.value0;if(n instanceof m)return"handler/"+n.value0;if(n instanceof g)return"ref";throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop (line 178, column 16 - line 185, column 1): "+[n.constructor.name])},w=s.unsafeCoerce,y=s.unsafeCoerce,M=s.unsafeCoerce,E=new e.Functor(function(n){return function(r){return r instanceof m?new m(r.value0,e.map(e.functorFn)(e.map(t.functorMaybe)(n))(r.value1)):r instanceof g?new g(e.map(e.functorFn)(e.map(t.functorMaybe)(n))(r.value0)):r}});n.Attribute=v,n.Property=p,n.Handler=m,n.Ref=g,n.Created=S,n.Removed=P,n.propFromString=w,n.propFromBoolean=M,n.propFromInt=y,n.buildProp=function(n){return function(e){var s=function(n){return function(t,u){if(u instanceof v)return f.removeAttribute(r.toNullable(u.value0),u.value1,e);if(u instanceof p)return function(n,e){return"string"===i.typeOf(f.unsafeGetAny(n,e))?f.unsafeSetAny(n,"",e):"rowSpan"===n?f.unsafeSetAny(n,1,e):"colSpan"===n?f.unsafeSetAny(n,1,e):f.unsafeSetAny(n,f.jsUndefined,e)}(u.value0,e);if(u instanceof m){var l=f.unsafeLookup(u.value0,n);return f.removeEventListener(u.value0,a.fst(l),e)}if(u instanceof g)return o.unit;throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop (line 165, column 5 - line 175, column 18): "+[u.constructor.name])}},w=function(e){return e instanceof t.Just?n(e.value0)():o.unit},y=function(n){var r=l.lookup("ref")(n);return r instanceof t.Just&&r.value0 instanceof g?function(){return w(r.value0.value0(new P(e)))}:f.effectUnit},M=function(n){return function(t,o,i){if(i instanceof v)return f.setAttribute(r.toNullable(i.value0),i.value1,i.value2,e),i;if(i instanceof p)return b(i.value0,i.value1,e),i;if(i instanceof m){var l=f.unsafeGetAny(i.value0,n);if(f.unsafeHasAny(i.value0,n))return u.write(i.value1)(a.snd(l))(),i;var c=u.new(i.value1)(),s=d.eventListener(function(n){return function(){var e=u.read(c)();return w(e(n))}})();return f.pokeMutMap(i.value0,new a.Tuple(s,c),n),f.addEventListener(i.value0,s,e),i}if(i instanceof g)return w(i.value0(new S(e))),i;throw new Error("Failed pattern match at Halogen.VDom.DOM.Prop (line 109, column 5 - line 131, column 15): "+[i.constructor.name])}},E=function(n,t){return function(i){var l=f.newMutMap(),d=s(n),S=function(n,t){return function(o,i,l,c){if(l instanceof v&&c instanceof v)return l.value2===c.value2?c:(f.setAttribute(r.toNullable(c.value0),c.value1,c.value2,e),c);if(l instanceof p&&c instanceof p){if(f.refEq(l.value1,c.value1))return c;if("value"===c.value0){var s=D("value",e);return f.refEq(s,c.value1)?c:(b(c.value0,c.value1,e),c)}return b(c.value0,c.value1,e),c}if(l instanceof m&&c instanceof m){var d=f.unsafeLookup(c.value0,n);return u.write(c.value1)(a.snd(d))(),f.pokeMutMap(c.value0,d,t),c}return c}}(n,l),P=M(l),g=f.diffWithKeyAndIxE(t,i,h,S,d,P);return new c.Step(o.unit,E(f.unsafeFreeze(l),g),y(g))}};return function(n){var e=f.newMutMap(),t=f.strMapWithIxE(n,h,M(e));return new c.Step(o.unit,E(f.unsafeFreeze(e),t),y(t))}}},n.functorProp=E}(PS["Halogen.VDom.DOM.Prop"]=PS["Halogen.VDom.DOM.Prop"]||{}),function(n){"use strict";PS["Control.Semigroupoid"];var e=PS["DOM.HTML.Indexed.ButtonType"],t=(PS["DOM.HTML.Indexed.CrossOriginValue"],PS["DOM.HTML.Indexed.DirValue"],PS["DOM.HTML.Indexed.FormMethod"],PS["DOM.HTML.Indexed.InputType"]),r=(PS["DOM.HTML.Indexed.KindValue"],PS["DOM.HTML.Indexed.MenuType"],PS["DOM.HTML.Indexed.MenuitemType"],PS["DOM.HTML.Indexed.OnOff"]),a=(PS["DOM.HTML.Indexed.OrderedListType"],PS["DOM.HTML.Indexed.PreloadValue"],PS["DOM.HTML.Indexed.ScopeValue"],PS["DOM.HTML.Indexed.StepValue"],PS["DOM.HTML.Indexed.WrapValue"],PS["Data.Bifunctor"]),o=(PS["Data.Eq"],PS["Data.Function"],PS["Data.Functor"]),u=PS["Data.Maybe"],i=(PS["Data.MediaType"],PS["Data.Newtype"]),l=(PS["Data.Ord"],PS["Data.Semigroup"],PS["Data.Tuple"],PS["Halogen.Query.InputF"]),c=(PS["Halogen.VDom"],PS["Halogen.VDom.DOM.Prop"]),f=PS["Halogen.VDom.Types"],s=(PS.Prelude,PS["Unsafe.Coerce"],PS["Web.DOM.Element"],PS["Web.Event.Event"],function(n){return n}),d=function(n){return n},S=function(n){this.toPropValue=n},P=function(n){return n.toPropValue},v=new S(c.propFromString),p=new S(function(n){return c.propFromString(r.renderOnOff(n))}),m=new i.Newtype(function(n){return n},d),g=new S(c.propFromInt),D=new S(function(n){return c.propFromString(t.renderInputType(n))}),b=c.Handler.create,h=new S(function(n){return c.propFromString(e.renderButtonType(n))}),w=new S(c.propFromBoolean),y=new a.Bifunctor(function(n){return function(e){return function(t){return a.bimap(f.bifunctorVDom)(o.map(o.functorArray)(o.map(c.functorProp)(o.map(l.functorInputF)(e))))(n)(t)}}});n.HTML=s,n.slot=function(n){return s(f.Widget.create(n))},n.text=function(n){return s(f.Text.create(n))},n.element=function(n){return function(e){return function(t){return function(r){return new f.Elem(new f.ElemSpec(n,e,t),r)}}}},n.prop=function(n){return function(e){return function(t){return c.Property.create(e)(P(n)(t))}}},n.attr=function(n){return function(e){return c.Attribute.create(n)(e)}},n.handler=b,n.ref=function(n){return c.Ref.create(function(e){return n(function(n){if(n instanceof c.Created)return new u.Just(n.value0);if(n instanceof c.Removed)return u.Nothing.value;throw new Error("Failed pattern match at Halogen.HTML.Core (line 103, column 21 - line 105, column 23): "+[n.constructor.name])}(e))})},n.IsProp=S,n.toPropValue=P,n.ClassName=d,n.bifunctorHTML=y,n.stringIsProp=v,n.intIsProp=g,n.booleanIsProp=w,n.buttonTypeIsProp=h,n.inputTypeIsProp=D,n.onOffIsProp=p,n.newtypeClassName=m}(PS["Halogen.HTML.Core"]=PS["Halogen.HTML.Core"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Category"],a=(PS["Control.Semigroupoid"],PS["Data.Const"],PS["Data.Either"]),o=(PS["Data.Eq"],PS["Data.Function"],PS["Data.Functor"]),u=(PS["Data.List"],PS["Data.List.NonEmpty"]),i=PS["Data.List.Types"],l=(PS["Data.Newtype"],PS["Data.NonEmpty"]),c=(PS["Data.Ring"],PS["Data.Semiring"],PS["Data.Tuple"]),f=(PS.Prelude,PS["Unsafe.Coerce"],function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),s=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),d=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),S=function(n){return function(e){return new d(n,e)}},P=s.create,v=function(n){return function(t){return function(r){return function(a){return function(o){return function(l){var S,P=n,v=t,p=r,m=a,g=o,D=!1;function b(n,t,r,a,o,S){if(o instanceof f)return D=!0,new c.Tuple(new i.Cons({func:e.pure(n)(o.value0),count:S},t),r);if(o instanceof s)return D=!0,new c.Tuple(new i.Cons({func:a(o.value0),count:S},t),r);if(o instanceof d)return P=n,v=t,p=u.cons(o.value1)(r),m=a,g=o.value0,void(l=S+1|0);throw new Error("Failed pattern match at Control.Applicative.Free (line 102, column 41 - line 105, column 81): "+[o.constructor.name])}for(;!D;)S=b(P,v,p,m,g,l);return S}}}}}},p=function(n){return function(e){return function(r){return function(o){var u,f=n,s=e,d=r,S=!1;function P(n,e,r,u){if(e instanceof i.Nil)return S=!0,new a.Left(u);if(e instanceof i.Cons){var P=t.apply(n.Apply0())(e.value0.func)(u);if(1===e.value0.count)return e.value1 instanceof i.Nil?(S=!0,new a.Left(P)):(f=n,s=e.value1,d=r,void(o=P));if(r instanceof i.Nil)return S=!0,new a.Left(P);if(r instanceof i.Cons)return S=!0,a.Right.create(new c.Tuple(new i.Cons({func:P,count:e.value0.count-1|0},e.value1),new l.NonEmpty(r.value0,r.value1)));throw new Error("Failed pattern match at Control.Applicative.Free (line 83, column 11 - line 88, column 50): "+[r.constructor.name])}throw new Error("Failed pattern match at Control.Applicative.Free (line 72, column 3 - line 88, column 50): "+[e.constructor.name])}for(;!S;)u=P(f,s,d,o);return u}}}},m=new o.Functor(function(n){return function(e){return S(new f(n))(e)}}),g=function(n){return function(t){return function(r){return function(r){var o,u=!1;function i(o){if(o.value1.value0 instanceof f){if((i=p(n)(o.value0)(o.value1.value1)(e.pure(n)(o.value1.value0.value0)))instanceof a.Left)return u=!0,i.value0;if(i instanceof a.Right)return void(r=i.value0);throw new Error("Failed pattern match at Control.Applicative.Free (line 54, column 17 - line 56, column 24): "+[i.constructor.name])}if(o.value1.value0 instanceof s){var i;if((i=p(n)(o.value0)(o.value1.value1)(t(o.value1.value0.value0)))instanceof a.Left)return u=!0,i.value0;if(i instanceof a.Right)return void(r=i.value0);throw new Error("Failed pattern match at Control.Applicative.Free (line 57, column 17 - line 59, column 24): "+[i.constructor.name])}if(!(o.value1.value0 instanceof d))throw new Error("Failed pattern match at Control.Applicative.Free (line 53, column 5 - line 64, column 1): "+[o.value1.value0.constructor.name]);var c=new l.NonEmpty(o.value1.value0.value1,o.value1.value1);r=v(n)(o.value0)(c)(t)(o.value1.value0.value0)(1)}for(;!u;)o=i(r);return o}(new c.Tuple(i.Nil.value,u.singleton(r)))}}},D=new t.Apply(function(){return m},function(n){return function(e){return S(n)(e)}}),b=new e.Applicative(function(){return D},f.create);n.liftFreeAp=P,n.retractFreeAp=function(n){return g(n)(r.identity(r.categoryFn))},n.foldFreeAp=g,n.hoistFreeAp=function(n){return g(b)(function(e){return P(n(e))})},n.functorFreeAp=m,n.applyFreeAp=D,n.applicativeFreeAp=b}(PS["Control.Applicative.Free"]=PS["Control.Applicative.Free"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Monad"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"];var e=PS["Data.List"],t=PS["Data.List.Types"],r=PS["Data.Maybe"],a=(PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.Tuple"]),o=(PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS.Prelude,function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),u=new o(t.Nil.value,t.Nil.value);n.CatQueue=o,n.empty=u,n.null=function(n){return n.value0 instanceof t.Nil&&n.value1 instanceof t.Nil},n.snoc=function(n){return function(e){return new o(n.value0,new t.Cons(e,n.value1))}},n.uncons=function(n){var u,i=!1;function l(u){if(u.value0 instanceof t.Nil&&u.value1 instanceof t.Nil)return i=!0,r.Nothing.value;if(!(u.value0 instanceof t.Nil)){if(u.value0 instanceof t.Cons)return i=!0,new r.Just(new a.Tuple(u.value0.value0,new o(u.value0.value1,u.value1)));throw new Error("Failed pattern match at Data.CatQueue (line 83, column 1 - line 83, column 63): "+[u.constructor.name])}n=new o(e.reverse(u.value1),t.Nil.value)}for(;!i;)u=l(n);return u}}(PS["Data.CatQueue"]=PS["Data.CatQueue"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Monad"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"];var e=PS["Data.CatQueue"],t=(PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"],PS["Data.List"],PS["Data.List.Types"]),r=PS["Data.Maybe"],a=(PS["Data.Monoid"],PS["Data.Semigroup"]),o=(PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.Tuple"]),u=(PS["Data.Unfoldable"],PS["Data.Unfoldable1"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),i=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),l=function(n){return function(t){if(n instanceof u)return t;if(n instanceof i)return new i(n.value0,e.snoc(n.value1)(t));throw new Error("Failed pattern match at Data.CatList (line 111, column 1 - line 111, column 54): "+[n.constructor.name,t.constructor.name])}},c=u.value,f=function(n){return function(e){return e instanceof u?n:n instanceof u?e:l(n)(e)}},s=new a.Semigroup(f);n.CatNil=u,n.CatCons=i,n.empty=c,n.append=f,n.snoc=function(n){return function(t){return f(n)(new i(t,e.empty))}},n.uncons=function(n){if(n instanceof u)return r.Nothing.value;if(n instanceof i)return new r.Just(new o.Tuple(n.value0,e.null(n.value1)?u.value:(a=l,function(n){return function(o){var u,i=function(n){return function(e){return function(r){var a,o=n,u=e,i=!1;function l(n,e,a){if(a instanceof t.Nil)return i=!0,e;if(a instanceof t.Cons)return o=n,u=n(e)(a.value0),void(r=a.value1);throw new Error("Failed pattern match at Data.CatList (line 126, column 3 - line 126, column 59): "+[n.constructor.name,e.constructor.name,a.constructor.name])}for(;!i;)a=l(o,u,r);return a}}};return(u=o,function(o){var l,c=u,f=!1;function s(u,l){var s=e.uncons(u);if(s instanceof r.Nothing)return f=!0,i(function(n){return function(e){return e(n)}})(n)(l);if(s instanceof r.Just)return c=s.value0.value1,void(o=new t.Cons(a(s.value0.value0),l));throw new Error("Failed pattern match at Data.CatList (line 122, column 14 - line 124, column 67): "+[s.constructor.name])}for(;!f;)l=s(c,o);return l})(t.Nil.value)}})(u.value)(n.value1)));var a;throw new Error("Failed pattern match at Data.CatList (line 102, column 1 - line 102, column 61): "+[n.constructor.name])},n.semigroupCatList=s}(PS["Data.CatList"]=PS["Data.CatList"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=(PS["Control.Category"],PS["Control.Monad"]),o=PS["Control.Monad.Rec.Class"],u=(PS["Control.Monad.Trans.Class"],PS["Control.Semigroupoid"],PS["Data.CatList"]),i=(PS["Data.Either"],PS["Data.Eq"],PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"]),l=PS["Data.Maybe"],c=(PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"]),f=(PS["Data.Traversable"],PS["Data.Tuple"],PS.Prelude,PS["Unsafe.Coerce"],function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),s=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),d=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),S=function(n){return new f(n,u.empty)},P=new a.Monad(function(){return g},function(){return p}),v=new i.Functor(function(n){return function(t){return r.bindFlipped(p)(function(t){return e.pure(g)(n(t))})(t)}}),p=new r.Bind(function(){return m},function(n){return function(e){return new f(n.value0,u.snoc(n.value1)(e))}}),m=new t.Apply(function(){return v},a.ap(P)),g=new e.Applicative(function(){return m},function(n){return S(s.create(n))});n.liftF=function(n){return S(new d(n,function(n){return e.pure(g)(n)}))},n.foldFree=function(n){return function(t){return o.tailRecM(n)(function(r){var a=function(n){var e,t=!1;function r(e){var r=function(n){return function(e){return new f(n.value0,c.append(u.semigroupCatList)(n.value1)(e))}};if(e.value0 instanceof s){var a=u.uncons(e.value1);if(a instanceof l.Nothing)return t=!0,new s(e.value0.value0);if(a instanceof l.Just)return void(n=r(function(n){return n}(a.value0.value0)(e.value0.value0))(a.value0.value1));throw new Error("Failed pattern match at Control.Monad.Free (line 220, column 7 - line 224, column 64): "+[a.constructor.name])}if(e.value0 instanceof d)return t=!0,new d(e.value0.value0,function(n){return r(e.value0.value1(n))(e.value1)});throw new Error("Failed pattern match at Control.Monad.Free (line 218, column 3 - line 226, column 56): "+[e.value0.constructor.name])}for(;!t;)e=r(n);return e}(r);if(a instanceof s)return i.map(n.Monad0().Bind1().Apply0().Functor0())(o.Done.create)(e.pure(n.Monad0().Applicative0())(a.value0));if(a instanceof d)return i.map(n.Monad0().Bind1().Apply0().Functor0())(function(n){return o.Loop.create(a.value1(n))})(t(a.value0));throw new Error("Failed pattern match at Control.Monad.Free (line 151, column 10 - line 153, column 37): "+[a.constructor.name])})}},n.freeFunctor=v,n.freeBind=p,n.freeApplicative=g,n.freeApply=m,n.freeMonad=P}(PS["Control.Monad.Free"]=PS["Control.Monad.Free"]||{}),function(n){"use strict";var e=PS["Unsafe.Coerce"],t=e.unsafeCoerce,r=e.unsafeCoerce;n.mkExists=r,n.runExists=t}(PS["Data.Exists"]=PS["Data.Exists"]||{}),function(n){"use strict";PS["Control.Alt"],PS["Control.Alternative"],PS["Control.Applicative"],PS["Control.Apply"],PS["Control.Bind"],PS["Control.Category"],PS["Control.Comonad"],PS["Control.Extend"],PS["Control.Monad"],PS["Control.Monad.Trans.Class"],PS["Control.MonadPlus"],PS["Control.MonadZero"],PS["Control.Plus"],PS["Control.Semigroupoid"],PS["Data.Distributive"],PS["Data.Eq"];var e=PS["Data.Exists"];PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"],PS["Data.Functor.Invariant"],PS["Data.Ord"],PS["Data.Semigroup.Foldable"],PS["Data.Semigroup.Traversable"],PS["Data.Traversable"],PS.Prelude;n.unCoyoneda=function(n){return function(t){return e.runExists(function(e){return n(e.value0)(e.value1)})(t)}}}(PS["Data.Coyoneda"]=PS["Data.Coyoneda"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=(PS["Control.Category"],PS["Control.Monad"]),o=(PS["Control.Monad.Error.Class"],PS["Control.Monad.Reader.Class"],PS["Control.Monad.Rec.Class"]),u=(PS["Control.Monad.State.Class"],PS["Control.Monad.Trans.Class"]),i=(PS["Control.Monad.Writer.Class"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"]),l=PS["Data.Either"],c=PS["Data.Exists"],f=PS["Data.Functor"],s=(PS["Data.Monoid"],PS["Data.Semigroup"],PS["Data.Unit"]),d=(PS["Effect.Class"],PS.Prelude,function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),S=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),P=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),v=S.create,p=function(n){return function(e){return new P(c.mkExists(new d(n,e)))}},m=function(n){return function(e){return new f.Functor(function(t){return function(r){if(r instanceof S)return new S(function(a){return f.map(e)(i.bimap(l.bifunctorEither)(t)(f.map(n)(f.map(m(n)(e))(t))))(r.value0(s.unit))});if(r instanceof P)return c.runExists(function(r){return p(r.value0)(function(a){return f.map(m(n)(e))(t)(r.value1(a))})})(r.value0);throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 57, column 1 - line 57, column 71): "+[t.constructor.name,r.constructor.name])}})}},g=function(n){return function(e){return new a.Monad(function(){return h(n)(e)},function(){return D(n)(e)})}},D=function(n){return function(e){return new r.Bind(function(){return b(n)(e)},function(n){return function(e){return n instanceof P?c.runExists(function(n){return p(n.value0)(function(t){return p(function(e){return n.value1(t)})(e)})})(n.value0):p(function(e){return n})(e)}})}},b=function(n){return function(e){return new t.Apply(function(){return m(n)(e.Bind1().Apply0().Functor0())},a.ap(g(n)(e)))}},h=function(n){return function(t){return new e.Applicative(function(){return b(n)(t)},function(n){return new S(function(r){return e.pure(t.Applicative0())(new l.Left(n))})})}},w=function(n){return function(t){return o.tailRecM(t)(function(a){if(a instanceof S)return f.map(t.Monad0().Bind1().Apply0().Functor0())(o.Done.create)(a.value0(s.unit));if(a instanceof P)return c.runExists(function(a){var u=a.value0(s.unit);if(u instanceof S)return r.bind(t.Monad0().Bind1())(u.value0(s.unit))(function(u){if(u instanceof l.Left)return e.pure(t.Monad0().Applicative0())(new o.Loop(a.value1(u.value0)));if(u instanceof l.Right)return e.pure(t.Monad0().Applicative0())(new o.Done(new l.Right(f.map(n)(function(e){return r.bind(D(n)(t.Monad0()))(e)(a.value1)})(u.value0))));throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 52, column 20 - line 54, column 67): "+[u.constructor.name])});if(u instanceof P)return c.runExists(function(u){return e.pure(t.Monad0().Applicative0())(new o.Loop(r.bind(D(n)(t.Monad0()))(u.value0(s.unit))(function(e){return r.bind(D(n)(t.Monad0()))(u.value1(e))(a.value1)})))})(u.value0);throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 50, column 5 - line 55, column 98): "+[u.constructor.name])})(a.value0);throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 47, column 3 - line 47, column 75): "+[a.constructor.name])})}};n.freeT=v,n.liftFreeT=function(n){return function(t){return function(r){return new S(function(a){return e.pure(t.Applicative0())(new l.Right(f.map(n)(e.pure(h(n)(t)))(r)))})}}},n.resume=w,n.runFreeT=function(n){return function(t){return function(a){return o.tailRecM(t)(r.composeKleisliFlipped(t.Monad0().Bind1())(function(n){if(n instanceof l.Left)return e.pure(t.Monad0().Applicative0())(new o.Done(n.value0));if(n instanceof l.Right)return f.map(t.Monad0().Bind1().Apply0().Functor0())(o.Loop.create)(a(n.value0));throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 126, column 3 - line 126, column 63): "+[n.constructor.name])})(w(n)(t)))}}},n.functorFreeT=m,n.applyFreeT=b,n.applicativeFreeT=h,n.bindFreeT=D,n.monadFreeT=g,n.monadTransFreeT=function(n){return new u.MonadTrans(function(n){return function(e){return new S(function(t){return f.map(n.Bind1().Apply0().Functor0())(l.Left.create)(e)})}})},n.monadRecFreeT=function(n){return function(t){return new o.MonadRec(function(){return g(n)(t)},function(a){var u=function(i){return r.bind(D(n)(t))(a(i))(function(r){if(r instanceof o.Loop)return u(r.value0);if(r instanceof o.Done)return e.pure(h(n)(t))(r.value0);throw new Error("Failed pattern match at Control.Monad.Free.Trans (line 80, column 15 - line 82, column 25): "+[r.constructor.name])})};return u})}}}(PS["Control.Monad.Free.Trans"]=PS["Control.Monad.Free.Trans"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Apply"],r=PS["Control.Bind"],a=PS["Control.Category"],o=(PS["Control.Monad.Except"],PS["Control.Monad.Except.Trans"]),u=PS["Control.Monad.Free.Trans"],i=PS["Control.Monad.Rec.Class"],l=PS["Control.Monad.Trans.Class"],c=(PS["Control.Parallel"],PS["Control.Parallel.Class"]),f=(PS["Control.Semigroupoid"],PS["Data.Bifunctor"]),s=PS["Data.Either"],d=(PS["Data.Function"],PS["Data.Functor"]),S=PS["Data.Identity"],P=PS["Data.Maybe"],v=PS["Data.Newtype"],p=PS["Data.Profunctor"],m=PS["Data.Tuple"],g=PS["Data.Unit"],D=(PS.Prelude,function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}()),b=new p.Profunctor(function(n){return function(e){return function(t){return p.dimap(p.profunctorFn)(n)(e)(t)}}}),h=function(n){return function(e){return function(t){return i.tailRecM(u.monadRecFreeT(n)(e))(function(r){return d.map(u.functorFreeT(n)(e.Bind1().Apply0().Functor0()))(P.maybe(new i.Loop(g.unit))(i.Done.create))(t)})(g.unit)}}},w=function(n){return function(t){return function(a){return function(i){return function(l){return function(c){return function(f){var s=function(c){return o.runExceptT(r.bind(o.bindExceptT(i.Monad0()))(o.ExceptT(u.resume(n)(i)(c.value0)))(function(n){return r.bind(o.bindExceptT(i.Monad0()))(o.ExceptT(u.resume(t)(i)(c.value1)))(function(t){return e.pure(o.applicativeExceptT(i.Monad0()))(d.map(a)(function(n){return u.freeT(function(e){return s(n)})})(l(m.Tuple.create)(n)(t)))})}))};return u.freeT(function(n){return s(new m.Tuple(c,f))})}}}}}}},y=function(n){return function(a){return function(o){return function(i){return function(l){return function(f){return function(S){return function(P){var v=function(S){return r.bind(i.Monad0().Bind1())(c.sequential(l)(t.apply(l.Applicative1().Apply0())(d.map(l.Applicative1().Apply0().Functor0())(t.lift2(s.applyEither)(f(m.Tuple.create)))(c.parallel(l)(u.resume(n)(i)(S.value0))))(c.parallel(l)(u.resume(a)(i)(S.value1)))))(function(n){if(n instanceof s.Left)return e.pure(i.Monad0().Applicative0())(new s.Left(n.value0));if(n instanceof s.Right)return e.pure(i.Monad0().Applicative0())(new s.Right(d.map(o)(function(n){return u.freeT(function(e){return v(n)})})(n.value0)));throw new Error("Failed pattern match at Control.Coroutine (line 79, column 5 - line 81, column 63): "+[n.constructor.name])})};return u.freeT(function(n){return v(new m.Tuple(S,P))})}}}}}}}},M=new d.Functor(p.rmap(b)),E=new f.Bifunctor(function(n){return function(e){return function(t){return new D(n(t.value0),e(t.value1))}}}),C=new d.Functor(f.rmap(E)),A=function(n){return function(e){return u.liftFreeT(C)(n)(new D(e,g.unit))}};n.loop=h,n.runProcess=function(n){return u.runFreeT(S.functorIdentity)(n)(function(t){return e.pure(n.Monad0().Applicative0())(v.unwrap(S.newtypeIdentity)(t))})},n.fuseWith=y,n.fuseWithL=w,n.Emit=D,n.emit=A,n.producer=function(n){return function(t){return h(C)(n)(r.bind(u.bindFreeT(C)(n))(l.lift(u.monadTransFreeT(C))(n)(t))(function(t){if(t instanceof s.Left)return d.voidLeft(u.functorFreeT(C)(n.Bind1().Apply0().Functor0()))(A(n)(t.value0))(P.Nothing.value);if(t instanceof s.Right)return e.pure(u.applicativeFreeT(C)(n))(new P.Just(t.value0));throw new Error("Failed pattern match at Control.Coroutine (line 125, column 3 - line 127, column 29): "+[t.constructor.name])}))}},n.await=function(n){return u.liftFreeT(M)(n)(a.identity(a.categoryFn))},n.connect=function(n){return function(e){return y(C)(M)(S.functorIdentity)(n)(e)(function(n){return function(e){return function(t){return n(e.value1)(t(e.value0))}}})}},n.pullFrom=function(n){return w(M)(C)(S.functorIdentity)(n)(function(n){return function(t){return function(r){return e.pure(S.applicativeIdentity)(n(t(r.value0))(r.value1))}}})},n.bifunctorEmit=E,n.functorEmit=C,n.profunctorAwait=b,n.functorAwait=M}(PS["Control.Coroutine"]=PS["Control.Coroutine"]||{}),function(n){"use strict";var e=function(){function n(){this.head=null,this.last=null,this.size=0}function e(n,e){this.queue=n,this.value=e,this.next=null,this.prev=null}function t(e){this.draining=!1,this.error=null,this.value=e,this.takes=new n,this.reads=new n,this.puts=new n}var r={};function a(n){try{n()}catch(n){setTimeout(function(){throw n},0)}}function o(n){var e;switch(n.size){case 0:return null;case 1:e=n.head,n.head=null;break;case 2:e=n.last,n.head.next=null,n.last=null;break;default:e=n.last,n.last=e.prev,n.last.next=null}return e.prev=null,e.queue=null,n.size--,e.value}function u(n){var e;switch(n.size){case 0:return null;case 1:e=n.head,n.head=null;break;case 2:e=n.head,n.last.prev=null,n.head=n.last,n.last=null;break;default:e=n.head,n.head=e.next,n.head.prev=null}return e.next=null,e.queue=null,n.size--,e.value}return t.EMPTY=r,t.putLast=function(n,t){var r=new e(n,t);switch(n.size){case 0:n.head=r;break;case 1:r.prev=n.head,n.head.next=r,n.last=r;break;default:r.prev=n.last,n.last.next=r,n.last=r}return n.size++,r},t.takeLast=o,t.takeHead=u,t.deleteCell=function(n){null!==n.queue&&(n.queue.last!==n?n.queue.head!==n?(n.prev&&(n.prev.next=n.next),n.next&&(n.next.prev=n.prev),n.queue.size--,n.queue=null,n.value=null,n.next=null,n.prev=null):u(n.queue):o(n.queue))},t.drainVar=function(n,e){if(!e.draining){var t,o,i,l,c,f=e.puts,s=e.takes,d=e.reads;for(e.draining=!0;;){if(t=null,o=null,i=null,l=e.value,c=d.size,null!==e.error){for(l=n.left(e.error);t=u(f);)a(t.cb(l));for(;o=u(d);)a(o(l));for(;i=u(s);)a(i(l));break}if(l===r&&(t=u(f))&&(e.value=l=t.value),l!==r){for(i=u(s);c--&&(o=u(d));)a(o(n.right(l)));null!==i&&(e.value=r,a(i(n.right(l))))}if(null!==t&&a(t.cb(n.right(void 0))),e.value===r&&0===f.size||e.value!==r&&0===s.size)break}e.draining=!1}},t}();n.empty=function(){return new e(e.EMPTY)},n._killVar=function(n,t,r){return function(){null===r.error&&(r.error=t,r.value=e.EMPTY,e.drainVar(n,r))}},n._putVar=function(n,t,r,a){return function(){var o=e.putLast(r.puts,{cb:a,value:t});return e.drainVar(n,r),function(){e.deleteCell(o)}}},n._takeVar=function(n,t,r){return function(){var a=e.putLast(t.takes,r);return e.drainVar(n,t),function(){e.deleteCell(a)}}}}(PS["Effect.AVar"]=PS["Effect.AVar"]||{}),function(n){"use strict";var e=PS["Effect.AVar"],t=PS["Data.Either"],r=(PS["Data.Function.Uncurried"],PS["Data.Maybe"]),a=(PS.Effect,PS["Effect.Exception"],PS.Prelude,function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),o=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),u=function(){function n(){}return n.value=new n,n}(),i={left:t.Left.create,right:t.Right.create,nothing:r.Nothing.value,just:r.Just.create,killed:a.create,filled:o.create,empty:u.value};n.Killed=a,n.Filled=o,n.Empty=u,n.take=function(n){return function(t){return e._takeVar(i,n,t)}},n.put=function(n){return function(t){return function(r){return e._putVar(i,n,t,r)}}},n.kill=function(n){return function(t){return e._killVar(i,n,t)}},n.empty=e.empty}(PS["Effect.AVar"]=PS["Effect.AVar"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Semigroupoid"],PS["Data.Maybe"],PS.Effect;var e=PS["Effect.AVar"],t=PS["Effect.Aff"],r=PS["Effect.Class"],a=(PS["Effect.Exception"],PS.Prelude,r.liftEffect(t.monadEffectAff)(e.empty));n.empty=a,n.take=function(n){return t.makeAff(function(r){return function(){var a=e.take(n)(r)();return t.effectCanceler(a)}})},n.put=function(n){return function(r){return t.makeAff(function(a){return function(){var o=e.put(n)(r)(a)();return t.effectCanceler(o)}})}},n.kill=function(n){return function(a){return r.liftEffect(t.monadEffectAff)(e.kill(n)(a))}}}(PS["Effect.Aff.AVar"]=PS["Effect.Aff.AVar"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Coroutine"],PS["Control.Monad.Free.Trans"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.Trans.Class"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Either"];var e=PS["Data.Eq"],t=(PS["Data.Foldable"],PS["Data.Function"],PS["Data.Functor"],PS["Data.Maybe"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Unit"],PS.Effect,PS["Effect.Aff"],PS["Effect.Aff.AVar"],PS["Effect.Aff.Class"],PS["Effect.Class"],PS["Effect.Exception"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),r=function(){function n(){}return n.value=new n,n}(),a=new e.Eq(function(n){return function(e){return n instanceof t&&e instanceof t||n instanceof r&&e instanceof r}});n.Listening=t,n.Done=r,n.unEventSource=function(n){return n},n.eqSubscribeStatus=a}(PS["Halogen.Query.EventSource"]=PS["Halogen.Query.EventSource"]||{}),function(n){"use strict";PS["Control.Category"],PS["Data.Function"],PS["Data.Functor"],PS["Effect.Aff"],PS["Effect.Exception"],PS.Prelude;var e=PS["Unsafe.Coerce"].unsafeCoerce;n.unFork=e}(PS["Halogen.Query.ForkF"]=PS["Halogen.Query.ForkF"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=(PS["Control.Applicative.Free"],PS["Control.Apply"]),r=PS["Control.Bind"],a=PS["Control.Category"],o=PS["Control.Monad"],u=PS["Control.Monad.Free"],i=(PS["Control.Monad.Reader.Class"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.State.Class"]),l=(PS["Control.Monad.Trans.Class"],PS["Control.Monad.Writer.Class"],PS["Control.Parallel.Class"],PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Coyoneda"],PS["Data.Function"],PS["Data.Functor"]),c=(PS["Data.List"],PS["Data.List.Types"],PS["Data.Maybe"],PS["Data.Newtype"],PS["Data.Tuple"],PS["Data.Unit"]),f=PS["Effect.Aff.Class"],s=PS["Effect.Class"],d=(PS["Effect.Exception"],PS["Halogen.Query.EventSource"],PS["Halogen.Query.ForkF"],PS["Halogen.Query.InputF"],PS.Prelude,PS["Web.DOM"],function(n){return n}),S=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),P=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),v=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),p=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),m=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),g=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),D=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),b=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),h=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),w=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),y=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),M=new l.Functor(function(n){return function(e){return l.map(u.freeFunctor)(n)(e)}}),E=new t.Apply(function(){return M},function(n){return function(e){return t.apply(u.freeApply)(n)(e)}}),C=new r.Bind(function(){return E},function(n){return function(e){return r.bind(u.freeBind)(n)(function(n){return e(n)})}}),A=new e.Applicative(function(){return E},function(n){return e.pure(u.freeApplicative)(n)}),T=new o.Monad(function(){return A},function(){return C}),F=function(n){return new s.MonadEffect(function(){return T},function(e){return d(u.liftF(v.create(s.liftEffect(n)(e))))})},H=new i.MonadState(function(){return T},function(n){return d(u.liftF(S.create(n)))});n.State=S,n.Subscribe=P,n.Lift=v,n.Halt=p,n.GetSlots=m,n.CheckSlot=g,n.ChildQuery=D,n.Raise=b,n.Par=h,n.Fork=w,n.GetRef=y,n.HalogenM=d,n.getRef=function(n){return d(u.liftF(new y(n,a.identity(a.categoryFn))))},n.raise=function(n){return d(u.liftF(new b(n,c.unit)))},n.functorHalogenM=M,n.applyHalogenM=E,n.applicativeHalogenM=A,n.bindHalogenM=C,n.monadHalogenM=T,n.monadEffectHalogenM=F,n.monadAffHalogenM=function(n){return new f.MonadAff(function(){return F(n.MonadEffect0())},function(e){return d(u.liftF(v.create(f.liftAff(n)(e))))})},n.monadStateHalogenM=H}(PS["Halogen.Query.HalogenM"]=PS["Halogen.Query.HalogenM"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Bifunctor"],PS["Data.Const"],PS["Data.Functor"];var e=PS["Data.Maybe"],t=PS["Data.Ord"],r=PS["Halogen.Data.OrdBox"],a=(PS["Halogen.HTML.Core"],PS["Halogen.Query.HalogenM"],PS.Prelude,PS["Unsafe.Coerce"]),o=function(){function n(n,e,t,r,a,o){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=o}return n.create=function(e){return function(t){return function(r){return function(a){return function(o){return function(u){return new n(e,t,r,a,o,u)}}}}}},n}(),u=a.unsafeCoerce,i=o.create,l=a.unsafeCoerce,c=function(n){return function(n){return l({initialState:n.initialState,render:n.render,eval:n.eval,receiver:n.receiver,initializer:n.initializer,finalizer:n.finalizer,mkOrdBox:r.mkOrdBox(t.ordVoid)})}};n.mkComponent=l,n.unComponent=u,n.component=function(n){return function(n){return c()({initialState:n.initialState,render:n.render,eval:n.eval,receiver:n.receiver,initializer:e.Nothing.value,finalizer:e.Nothing.value})}},n.lifecycleComponent=c,n.parentComponent=function(n){return function(t){return l({initialState:t.initialState,render:t.render,eval:t.eval,receiver:t.receiver,initializer:e.Nothing.value,finalizer:e.Nothing.value,mkOrdBox:r.mkOrdBox(n)})}},n.mkComponentSlot=i,n.unComponentSlot=function(n){return function(e){return n(e.value0)(e.value1)(e.value2)(e.value3)(e.value4)(e.value5)}}}(PS["Halogen.Component"]=PS["Halogen.Component"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed"],PS["DOM.HTML.Indexed.ButtonType"],PS["DOM.HTML.Indexed.FormMethod"],PS["DOM.HTML.Indexed.InputType"],PS["DOM.HTML.Indexed.MenuType"],PS["DOM.HTML.Indexed.MenuitemType"];var e=PS["DOM.HTML.Indexed.OnOff"],t=(PS["DOM.HTML.Indexed.OrderedListType"],PS["DOM.HTML.Indexed.PreloadValue"],PS["DOM.HTML.Indexed.StepValue"],PS["Data.Function"],PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),r=(PS["Data.MediaType"],PS["Data.Newtype"]),a=(PS["Data.String"],PS["Data.String.Common"],PS["Data.Unit"]),o=PS["Halogen.HTML.Core"],u=PS["Halogen.Query.InputF"],i=(PS["Halogen.VDom.DOM.Prop"],PS.Prelude,PS["Unsafe.Coerce"],PS["Web.DOM.Element"],function(n){return o.ref((e=n,function(n){return new t.Just(new u.RefUpdate(e,n,a.unit))}));var e}),l=function(n){return o.prop(n)},c=l(o.booleanIsProp)("required"),f=l(o.intIsProp)("rows"),s=l(o.stringIsProp)("target"),d=l(o.stringIsProp)("title"),S=l(o.stringIsProp)("value"),P=l(o.stringIsProp)("name"),v=l(o.stringIsProp)("id"),p=l(o.stringIsProp)("href"),m=l(o.stringIsProp)("htmlFor"),g=l(o.booleanIsProp)("checked"),D=l(o.booleanIsProp)("autofocus"),b=o.attr(t.Nothing.value);n.prop=l,n.attr=b,n.ref=i,n.class_=function(n){return l(o.stringIsProp)("className")(r.unwrap(o.newtypeClassName)(n))},n.rows=f,n.for=m,n.href=p,n.id_=v,n.name=P,n.target=s,n.title=d,n.type_=function(n){return l(n)("type")},n.value=S,n.required=c,n.checked=g,n.autocomplete=function(n){return l(o.onOffIsProp)("autocomplete")(n?e.On.value:e.Off.value)},n.autofocus=D}(PS["Halogen.HTML.Properties"]=PS["Halogen.HTML.Properties"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed"],PS["Data.Function"];var e=PS["Data.Maybe"],t=(PS["Data.Tuple"],PS["Halogen.HTML.Core"]),r=(PS["Halogen.HTML.Properties"],PS["Halogen.Query.InputF"],PS["Halogen.VDom"],PS["Halogen.VDom.Types"],PS.Prelude,PS["Unsafe.Coerce"],t.element(e.Nothing.value)),a=r("form"),o=r("label"),u=r("p"),i=r("span"),l=r("table"),c=r("tbody"),f=c([]),s=r("td"),d=s([]),S=r("tr"),P=S([]),v=r("div"),p=v([]),m=r("button"),g=function(n){return r("br")(n)([])},D=g([]),b=r("a");n.element=r,n.a=b,n.br=g,n.br_=D,n.button=m,n.div=v,n.div_=p,n.form=a,n.input=function(n){return r("input")(n)([])},n.label=o,n.p=u,n.span=i,n.table=l,n.tbody=c,n.tbody_=f,n.td=s,n.td_=d,n.textarea=function(n){return r("textarea")(n)([])},n.tr=S,n.tr_=P}(PS["Halogen.HTML.Elements"]=PS["Halogen.HTML.Elements"]||{}),function(n){"use strict";PS["Control.Semigroupoid"],PS["Data.Functor"];var e=PS["Data.Maybe"],t=PS["Halogen.Component"],r=(PS["Halogen.Component.ChildPath"],PS["Halogen.HTML.Core"]);PS["Halogen.HTML.Elements"],PS["Halogen.HTML.Properties"],PS.Prelude,PS["Unsafe.Coerce"];n.slot=function(n){return function(a){return function(o){return function(u){var i=t.unComponent(function(n){return n.receiver})(a);return r.slot(t.mkComponentSlot(n)(a)(o)(i)(u)(e.Just.create))}}}}}(PS["Halogen.HTML"]=PS["Halogen.HTML"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=(PS["Control.Apply"],PS["Control.Category"],PS["Control.Semigroupoid"],PS["Data.Eq"],PS["Data.Foldable"]),r=(PS["Data.FoldableWithIndex"],PS["Data.Function"],PS["Data.Functor"]),a=(PS["Data.FunctorWithIndex"],PS["Data.HeytingAlgebra"],PS["Data.List"],PS["Data.List.Lazy"],PS["Data.List.Lazy.Types"],PS["Data.List.Types"]),o=PS["Data.Maybe"],u=(PS["Data.Monoid"],PS["Data.Ord"]),i=PS["Data.Ordering"],l=PS["Data.Semigroup"],c=(PS["Data.Semiring"],PS["Data.Show"],PS["Data.Traversable"],PS["Data.TraversableWithIndex"],PS["Data.Tuple"]),f=(PS["Data.Unfoldable"],PS["Partial.Unsafe"],PS.Prelude,function(){function n(){}return n.value=new n,n}()),s=function(){function n(n,e,t,r){this.value0=n,this.value1=e,this.value2=t,this.value3=r}return n.create=function(e){return function(t){return function(r){return function(a){return new n(e,t,r,a)}}}},n}(),d=function(){function n(n,e,t,r,a,o,u){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=o,this.value6=u}return n.create=function(e){return function(t){return function(r){return function(a){return function(o){return function(u){return function(i){return new n(e,t,r,a,o,u,i)}}}}}}},n}(),S=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),P=function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}(),v=function(){function n(n,e,t,r,a,o){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=o}return n.create=function(e){return function(t){return function(r){return function(a){return function(o){return function(u){return new n(e,t,r,a,o,u)}}}}}},n}(),p=function(){function n(n,e,t,r,a,o){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=o}return n.create=function(e){return function(t){return function(r){return function(a){return function(o){return function(u){return new n(e,t,r,a,o,u)}}}}}},n}(),m=function(){function n(n,e,t,r,a,o){this.value0=n,this.value1=e,this.value2=t,this.value3=r,this.value4=a,this.value5=o}return n.create=function(e){return function(t){return function(r){return function(a){return function(o){return function(u){return new n(e,t,r,a,o,u)}}}}}},n}(),g=function(){function n(n,e,t,r){this.value0=n,this.value1=e,this.value2=t,this.value3=r}return n.create=function(e){return function(t){return function(r){return function(a){return new n(e,t,r,a)}}}},n}(),D=function(n){if(n instanceof f)return a.Nil.value;if(n instanceof s)return l.append(a.semigroupList)(D(n.value0))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value2))(D(n.value3)));if(n instanceof d)return l.append(a.semigroupList)(D(n.value0))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value2))(l.append(a.semigroupList)(D(n.value3))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value5))(D(n.value6)))));throw new Error("Failed pattern match at Data.Map.Internal (line 602, column 1 - line 602, column 40): "+[n.constructor.name])},b=function(n){return function(e){var t=u.compare(n);return function(n){var r,a=!1;function u(r){if(r instanceof f)return a=!0,o.Nothing.value;if(r instanceof s){var u=t(e)(r.value1);return u instanceof i.EQ?(a=!0,new o.Just(r.value2)):u instanceof i.LT?void(n=r.value0):void(n=r.value3)}if(r instanceof d){var l=t(e)(r.value1);if(l instanceof i.EQ)return a=!0,new o.Just(r.value2);var c=t(e)(r.value4);return c instanceof i.EQ?(a=!0,new o.Just(r.value5)):l instanceof i.LT?void(n=r.value0):c instanceof i.GT?void(n=r.value6):void(n=r.value3)}throw new Error("Failed pattern match at Data.Map.Internal (line 197, column 5 - line 197, column 22): "+[r.constructor.name])}for(;!a;)r=u(n);return r}}},h=function(n){if(n instanceof f)return a.Nil.value;if(n instanceof s)return l.append(a.semigroupList)(h(n.value0))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value1))(h(n.value3)));if(n instanceof d)return l.append(a.semigroupList)(h(n.value0))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value1))(l.append(a.semigroupList)(h(n.value3))(l.append(a.semigroupList)(e.pure(a.applicativeList)(n.value4))(h(n.value6)))));throw new Error("Failed pattern match at Data.Map.Internal (line 596, column 1 - line 596, column 38): "+[n.constructor.name])},w=new r.Functor(function(n){return function(e){if(e instanceof f)return f.value;if(e instanceof s)return new s(r.map(w)(n)(e.value0),e.value1,n(e.value2),r.map(w)(n)(e.value3));if(e instanceof d)return new d(r.map(w)(n)(e.value0),e.value1,n(e.value2),r.map(w)(n)(e.value3),e.value4,n(e.value5),r.map(w)(n)(e.value6));throw new Error("Failed pattern match at Data.Map.Internal (line 93, column 1 - line 93, column 39): "+[n.constructor.name,e.constructor.name])}}),y=function(n){return function(e){return function(t){var r,o=n,u=e,i=!1;function l(n,e,r){if(e instanceof a.Nil)return i=!0,r;if(e instanceof a.Cons){if(e.value0 instanceof S)return o=n,u=e.value1,void(t=new s(r,e.value0.value0,e.value0.value1,e.value0.value2));if(e.value0 instanceof P)return o=n,u=e.value1,void(t=new s(e.value0.value0,e.value0.value1,e.value0.value2,r));if(e.value0 instanceof v)return o=n,u=e.value1,void(t=new d(r,e.value0.value0,e.value0.value1,e.value0.value2,e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p)return o=n,u=e.value1,void(t=new d(e.value0.value0,e.value0.value1,e.value0.value2,r,e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof m)return o=n,u=e.value1,void(t=new d(e.value0.value0,e.value0.value1,e.value0.value2,e.value0.value3,e.value0.value4,e.value0.value5,r));throw new Error("Failed pattern match at Data.Map.Internal (line 415, column 3 - line 420, column 88): "+[e.value0.constructor.name])}throw new Error("Failed pattern match at Data.Map.Internal (line 412, column 1 - line 412, column 80): "+[e.constructor.name,r.constructor.name])}for(;!i;)r=l(o,u,t);return r}}},M=function(n){return function(e){return function(t){var r,o=function(e){return function(t){var r,o=e,u=!1;function i(e,r){if(e instanceof a.Nil)return u=!0,new s(r.value0,r.value1,r.value2,r.value3);if(e instanceof a.Cons){if(e.value0 instanceof S)return u=!0,y(n)(e.value1)(new d(r.value0,r.value1,r.value2,r.value3,e.value0.value0,e.value0.value1,e.value0.value2));if(e.value0 instanceof P)return u=!0,y(n)(e.value1)(new d(e.value0.value0,e.value0.value1,e.value0.value2,r.value0,r.value1,r.value2,r.value3));if(e.value0 instanceof v)return o=e.value1,void(t=new g(new s(r.value0,r.value1,r.value2,r.value3),e.value0.value0,e.value0.value1,new s(e.value0.value2,e.value0.value3,e.value0.value4,e.value0.value5)));if(e.value0 instanceof p)return o=e.value1,void(t=new g(new s(e.value0.value0,e.value0.value1,e.value0.value2,r.value0),r.value1,r.value2,new s(r.value3,e.value0.value3,e.value0.value4,e.value0.value5)));if(e.value0 instanceof m)return o=e.value1,void(t=new g(new s(e.value0.value0,e.value0.value1,e.value0.value2,e.value0.value3),e.value0.value4,e.value0.value5,new s(r.value0,r.value1,r.value2,r.value3)));throw new Error("Failed pattern match at Data.Map.Internal (line 451, column 5 - line 456, column 108): "+[e.value0.constructor.name,r.constructor.name])}throw new Error("Failed pattern match at Data.Map.Internal (line 448, column 3 - line 448, column 56): "+[e.constructor.name,r.constructor.name])}for(;!u;)r=i(o,t);return r}},l=u.compare(n);return r=a.Nil.value,function(u){var c,D=r,b=!1;function h(r,c){if(c instanceof f)return b=!0,o(r)(new g(f.value,e,t,f.value));if(c instanceof s){var h=l(e)(c.value1);return h instanceof i.EQ?(b=!0,y(n)(r)(new s(c.value0,e,t,c.value3))):h instanceof i.LT?(D=new a.Cons(new S(c.value1,c.value2,c.value3),r),void(u=c.value0)):(D=new a.Cons(new P(c.value0,c.value1,c.value2),r),void(u=c.value3))}if(c instanceof d){var w=l(e)(c.value1);if(w instanceof i.EQ)return b=!0,y(n)(r)(new d(c.value0,e,t,c.value3,c.value4,c.value5,c.value6));var M=l(e)(c.value4);return M instanceof i.EQ?(b=!0,y(n)(r)(new d(c.value0,c.value1,c.value2,c.value3,e,t,c.value6))):w instanceof i.LT?(D=new a.Cons(new v(c.value1,c.value2,c.value3,c.value4,c.value5,c.value6),r),void(u=c.value0)):w instanceof i.GT&&M instanceof i.LT?(D=new a.Cons(new p(c.value0,c.value1,c.value2,c.value4,c.value5,c.value6),r),void(u=c.value3)):(D=new a.Cons(new m(c.value0,c.value1,c.value2,c.value3,c.value4,c.value5),r),void(u=c.value6))}throw new Error("Failed pattern match at Data.Map.Internal (line 431, column 3 - line 431, column 55): "+[r.constructor.name,c.constructor.name])}for(;!b;)c=h(D,u);return c}}}},E=function(n){return function(e){var t,r=function(e){return function(t){var r,o=e,u=!1;function i(e,r){if(e instanceof a.Nil)return u=!0,r;if(e instanceof a.Cons){if(e.value0 instanceof S&&e.value0.value2 instanceof f&&r instanceof f)return u=!0,y(n)(e.value1)(new s(f.value,e.value0.value0,e.value0.value1,f.value));if(e.value0 instanceof P&&e.value0.value0 instanceof f&&r instanceof f)return u=!0,y(n)(e.value1)(new s(f.value,e.value0.value1,e.value0.value2,f.value));if(e.value0 instanceof S&&e.value0.value2 instanceof s)return o=e.value1,void(t=new d(r,e.value0.value0,e.value0.value1,e.value0.value2.value0,e.value0.value2.value1,e.value0.value2.value2,e.value0.value2.value3));if(e.value0 instanceof P&&e.value0.value0 instanceof s)return o=e.value1,void(t=new d(e.value0.value0.value0,e.value0.value0.value1,e.value0.value0.value2,e.value0.value0.value3,e.value0.value1,e.value0.value2,r));if(e.value0 instanceof S&&e.value0.value2 instanceof d)return u=!0,y(n)(e.value1)(new s(new s(r,e.value0.value0,e.value0.value1,e.value0.value2.value0),e.value0.value2.value1,e.value0.value2.value2,new s(e.value0.value2.value3,e.value0.value2.value4,e.value0.value2.value5,e.value0.value2.value6)));if(e.value0 instanceof P&&e.value0.value0 instanceof d)return u=!0,y(n)(e.value1)(new s(new s(e.value0.value0.value0,e.value0.value0.value1,e.value0.value0.value2,e.value0.value0.value3),e.value0.value0.value4,e.value0.value0.value5,new s(e.value0.value0.value6,e.value0.value1,e.value0.value2,r)));if(e.value0 instanceof v&&e.value0.value2 instanceof f&&e.value0.value5 instanceof f&&r instanceof f)return u=!0,y(n)(e.value1)(new d(f.value,e.value0.value0,e.value0.value1,f.value,e.value0.value3,e.value0.value4,f.value));if(e.value0 instanceof p&&e.value0.value0 instanceof f&&e.value0.value5 instanceof f&&r instanceof f)return u=!0,y(n)(e.value1)(new d(f.value,e.value0.value1,e.value0.value2,f.value,e.value0.value3,e.value0.value4,f.value));if(e.value0 instanceof m&&e.value0.value0 instanceof f&&e.value0.value3 instanceof f&&r instanceof f)return u=!0,y(n)(e.value1)(new d(f.value,e.value0.value1,e.value0.value2,f.value,e.value0.value4,e.value0.value5,f.value));if(e.value0 instanceof v&&e.value0.value2 instanceof s)return u=!0,y(n)(e.value1)(new s(new d(r,e.value0.value0,e.value0.value1,e.value0.value2.value0,e.value0.value2.value1,e.value0.value2.value2,e.value0.value2.value3),e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p&&e.value0.value0 instanceof s)return u=!0,y(n)(e.value1)(new s(new d(e.value0.value0.value0,e.value0.value0.value1,e.value0.value0.value2,e.value0.value0.value3,e.value0.value1,e.value0.value2,r),e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p&&e.value0.value5 instanceof s)return u=!0,y(n)(e.value1)(new s(e.value0.value0,e.value0.value1,e.value0.value2,new d(r,e.value0.value3,e.value0.value4,e.value0.value5.value0,e.value0.value5.value1,e.value0.value5.value2,e.value0.value5.value3)));if(e.value0 instanceof m&&e.value0.value3 instanceof s)return u=!0,y(n)(e.value1)(new s(e.value0.value0,e.value0.value1,e.value0.value2,new d(e.value0.value3.value0,e.value0.value3.value1,e.value0.value3.value2,e.value0.value3.value3,e.value0.value4,e.value0.value5,r)));if(e.value0 instanceof v&&e.value0.value2 instanceof d)return u=!0,y(n)(e.value1)(new d(new s(r,e.value0.value0,e.value0.value1,e.value0.value2.value0),e.value0.value2.value1,e.value0.value2.value2,new s(e.value0.value2.value3,e.value0.value2.value4,e.value0.value2.value5,e.value0.value2.value6),e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p&&e.value0.value0 instanceof d)return u=!0,y(n)(e.value1)(new d(new s(e.value0.value0.value0,e.value0.value0.value1,e.value0.value0.value2,e.value0.value0.value3),e.value0.value0.value4,e.value0.value0.value5,new s(e.value0.value0.value6,e.value0.value1,e.value0.value2,r),e.value0.value3,e.value0.value4,e.value0.value5));if(e.value0 instanceof p&&e.value0.value5 instanceof d)return u=!0,y(n)(e.value1)(new d(e.value0.value0,e.value0.value1,e.value0.value2,new s(r,e.value0.value3,e.value0.value4,e.value0.value5.value0),e.value0.value5.value1,e.value0.value5.value2,new s(e.value0.value5.value3,e.value0.value5.value4,e.value0.value5.value5,e.value0.value5.value6)));if(e.value0 instanceof m&&e.value0.value3 instanceof d)return u=!0,y(n)(e.value1)(new d(e.value0.value0,e.value0.value1,e.value0.value2,new s(e.value0.value3.value0,e.value0.value3.value1,e.value0.value3.value2,e.value0.value3.value3),e.value0.value3.value4,e.value0.value3.value5,new s(e.value0.value3.value6,e.value0.value4,e.value0.value5,r)));throw new Error("Failed pattern match at Data.Map.Internal (line 501, column 9 - line 518, column 136): "+[e.value0.constructor.name,r.constructor.name])}throw new Error("Failed pattern match at Data.Map.Internal (line 498, column 5 - line 518, column 136): "+[e.constructor.name])}for(;!u;)r=i(o,t);return r}},l=function(n){return function(e){var t,o=n,u=!1;function i(n,t){if(t instanceof s&&t.value0 instanceof f&&t.value3 instanceof f)return u=!0,r(n)(f.value);if(t instanceof s)return o=new a.Cons(new P(t.value0,t.value1,t.value2),n),void(e=t.value3);if(t instanceof d&&t.value0 instanceof f&&t.value3 instanceof f&&t.value6 instanceof f)return u=!0,r(new a.Cons(new P(f.value,t.value1,t.value2),n))(f.value);if(t instanceof d)return o=new a.Cons(new m(t.value0,t.value1,t.value2,t.value3,t.value4,t.value5),n),void(e=t.value6);throw new Error("Failed pattern match at Data.Map.Internal (line 530, column 5 - line 534, column 107): "+[t.constructor.name])}for(;!u;)t=i(o,e);return t}},g=function(n){var e,t=!1;function r(e){if(e instanceof s&&e.value3 instanceof f)return t=!0,{key:e.value1,value:e.value2};if(e instanceof s)n=e.value3;else{if(e instanceof d&&e.value6 instanceof f)return t=!0,{key:e.value4,value:e.value5};if(!(e instanceof d))throw new Error("Failed pattern match at Data.Map.Internal (line 521, column 33 - line 525, column 45): "+[e.constructor.name]);n=e.value6}}for(;!t;)e=r(n);return e},D=u.compare(n);return t=a.Nil.value,function(u){var b,h=t,w=!1;function M(t,b){if(b instanceof f)return w=!0,o.Nothing.value;if(b instanceof s){var M=D(e)(b.value1);if(b.value3 instanceof f&&M instanceof i.EQ)return w=!0,new o.Just(new c.Tuple(b.value2,r(t)(f.value)));if(M instanceof i.EQ){var E=g(b.value0);return w=!0,new o.Just(new c.Tuple(b.value2,l(new a.Cons(new S(E.key,E.value,b.value3),t))(b.value0)))}return M instanceof i.LT?(h=new a.Cons(new S(b.value1,b.value2,b.value3),t),void(u=b.value0)):(h=new a.Cons(new P(b.value0,b.value1,b.value2),t),void(u=b.value3))}if(b instanceof d){var C=b.value0 instanceof f&&b.value3 instanceof f&&b.value6 instanceof f,A=(M=D(e)(b.value4),D(e)(b.value1));return C&&A instanceof i.EQ?(w=!0,new o.Just(new c.Tuple(b.value2,y(n)(t)(new s(f.value,b.value4,b.value5,f.value))))):C&&M instanceof i.EQ?(w=!0,new o.Just(new c.Tuple(b.value5,y(n)(t)(new s(f.value,b.value1,b.value2,f.value))))):A instanceof i.EQ?(E=g(b.value0),w=!0,new o.Just(new c.Tuple(b.value2,l(new a.Cons(new v(E.key,E.value,b.value3,b.value4,b.value5,b.value6),t))(b.value0)))):M instanceof i.EQ?(E=g(b.value3),w=!0,new o.Just(new c.Tuple(b.value5,l(new a.Cons(new p(b.value0,b.value1,b.value2,E.key,E.value,b.value6),t))(b.value3)))):A instanceof i.LT?(h=new a.Cons(new v(b.value1,b.value2,b.value3,b.value4,b.value5,b.value6),t),void(u=b.value0)):A instanceof i.GT&&M instanceof i.LT?(h=new a.Cons(new p(b.value0,b.value1,b.value2,b.value4,b.value5,b.value6),t),void(u=b.value3)):(h=new a.Cons(new m(b.value0,b.value1,b.value2,b.value3,b.value4,b.value5),t),void(u=b.value6))}throw new Error("Failed pattern match at Data.Map.Internal (line 471, column 34 - line 494, column 80): "+[b.constructor.name])}for(;!w;)b=M(h,u);return b}}},C=new t.Foldable(function(n){return function(e){return function(r){return t.foldMap(a.foldableList)(n)(e)(D(r))}}},function(n){return function(e){return function(r){return t.foldl(a.foldableList)(n)(e)(D(r))}}},function(n){return function(e){return function(r){return t.foldr(a.foldableList)(n)(e)(D(r))}}}),A=f.value,T=function(n){return function(e){return function(t){return o.maybe(t)(c.snd)(E(n)(e)(t))}}};n.empty=A,n.insert=M,n.lookup=b,n.delete=T,n.pop=E,n.member=function(n){return function(e){return function(t){return o.isJust(b(n)(e)(t))}}},n.alter=function(n){return function(e){return function(t){return function(r){var a=e(b(n)(t)(r));if(a instanceof o.Nothing)return T(n)(t)(r);if(a instanceof o.Just)return M(n)(t)(a.value0)(r);throw new Error("Failed pattern match at Data.Map.Internal (line 539, column 15 - line 541, column 25): "+[a.constructor.name])}}}},n.keys=h,n.values=D,n.functorMap=w,n.foldableMap=C}(PS["Data.Map.Internal"]=PS["Data.Map.Internal"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"],PS["Control.Monad.Rec.Class"],PS["Control.Monad.ST"],PS["Control.Monad.ST.Internal"],PS["Control.Semigroupoid"],PS["Data.Array"],PS["Data.Array.ST"],PS["Data.Eq"];var e=PS["Data.Foldable"],t=(PS["Data.Function"],PS["Data.Functor"],PS["Data.HeytingAlgebra"],PS["Data.List"],PS["Data.List.Types"]),r=PS["Data.Map.Internal"],a=(PS["Data.Maybe"],PS["Data.Monoid"],PS["Data.Ord"],PS["Data.Ordering"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.Unfoldable"],PS["Data.Unit"],PS["Partial.Unsafe"],PS.Prelude,function(n){return r.keys(n)}),o=new e.Foldable(function(n){return function(r){return function(o){return e.foldMap(t.foldableList)(n)(r)(a(o))}}},function(n){return function(r){return function(o){return e.foldl(t.foldableList)(n)(r)(a(o))}}},function(n){return function(r){return function(o){return e.foldr(t.foldableList)(n)(r)(a(o))}}});n.foldableSet=o}(PS["Data.Set"]=PS["Data.Set"]||{}),function(n){"use strict";PS["Control.Semigroupoid"];var e=PS["Data.Functor"],t=PS["Data.Map.Internal"];PS["Data.Set"],PS.Prelude,PS["Unsafe.Coerce"];n.keys=function(n){return e.void(t.functorMap)(n)}}(PS["Data.Map"]=PS["Data.Map"]||{}),function(n){"use strict";PS["Control.Applicative"];var e=PS["Control.Bind"],t=(PS["Control.Category"],PS["Control.Monad.State.Class"],PS["Control.Monad.Trans.Class"],PS["Control.Parallel"],PS["Control.Semigroupoid"],PS["Data.Functor"]),r=(PS["Data.List"],PS["Data.List.Types"],PS["Data.Map"],PS["Data.Map.Internal"],PS["Data.Maybe"]),a=(PS["Data.Tuple"],PS["Data.Unit"]),o=(PS["Effect.Aff.Class"],PS["Effect.Class"],PS["Halogen.Component.ChildPath"],PS["Halogen.Query.EventSource"],PS["Halogen.Query.HalogenM"]),u=(PS["Halogen.Query.InputF"],PS.Prelude,PS["Web.HTML.HTMLElement"]);n.action=function(n){return n(a.unit)},n.getHTMLElementRef=function(n){return t.map(o.functorHalogenM)(function(n){return e.bindFlipped(r.bindMaybe)(u.fromElement)(n)})(o.getRef(n))}}(PS["Halogen.Query"]=PS["Halogen.Query"]||{}),function(n){"use strict";PS["Web.Event.Event"];n.change="change"}(PS["Web.HTML.Event.EventTypes"]=PS["Web.HTML.Event.EventTypes"]||{}),function(n){"use strict";PS["Web.Event.Event"];n.click="click"}(PS["Web.UIEvent.MouseEvent.EventTypes"]=PS["Web.UIEvent.MouseEvent.EventTypes"]||{}),function(n){"use strict";var e=PS["Control.Bind"],t=PS["Control.Monad.Except"],r=PS["Control.Monad.Except.Trans"],a=(PS["Control.Semigroupoid"],PS["Data.Either"]),o=PS["Data.Function"],u=PS["Data.Functor"],i=PS["Data.Identity"],l=PS["Data.Maybe"],c=PS.Foreign,f=PS["Foreign.Index"],s=PS["Halogen.HTML.Core"],d=(PS["Halogen.HTML.Properties"],PS["Halogen.Query"]),S=PS["Halogen.Query.InputF"],P=(PS.Prelude,PS["Unsafe.Coerce"]),v=(PS["Web.Clipboard.ClipboardEvent"],PS["Web.Clipboard.ClipboardEvent.EventTypes"],PS["Web.Event.Event"]),p=(PS["Web.HTML.Event.DragEvent"],PS["Web.HTML.Event.DragEvent.EventTypes"],PS["Web.HTML.Event.EventTypes"]),m=(PS["Web.TouchEvent.TouchEvent"],PS["Web.UIEvent.FocusEvent"],PS["Web.UIEvent.FocusEvent.EventTypes"],PS["Web.UIEvent.KeyboardEvent"],PS["Web.UIEvent.KeyboardEvent.EventTypes"],PS["Web.UIEvent.MouseEvent"],PS["Web.UIEvent.MouseEvent.EventTypes"]),g=(PS["Web.UIEvent.WheelEvent"],PS["Web.UIEvent.WheelEvent.EventTypes"],P.unsafeCoerce),D=function(n){return function(e){return s.handler(n)(u.map(u.functorFn)(u.map(l.functorMaybe)(S.Query.create))(e))}},b=D("submit"),h=function(n){return function(u){return function(s){return function(d){return D(n)(e.composeKleisli(l.bindMaybe)(v.currentTarget)(function(n){return a.either(o.const(l.Nothing.value))(d)(t.runExcept((S=n,e.composeKleisliFlipped(r.bindExceptT(i.monadIdentity))(s)(f.readProp(u))(c.unsafeToForeign(S)))));var S}))}}}},w=h(p.change)("checked")(c.readBoolean),y=h(p.change)("value")(c.readString);n.input=function(n){return function(e){return l.Just.create(d.action(n(e)))}},n.input_=function(n){return function(e){return l.Just.create(d.action(n))}},n.handler=D,n.onSubmit=b,n.onClick=function(n){return D(m.click)(g(n))},n.onValueChange=y,n.onChecked=w}(PS["Halogen.HTML.Events"]=PS["Halogen.HTML.Events"]||{}),function(n){"use strict";var e="function"==typeof Array.from,t="undefined"!=typeof Symbol&&null!=Symbol&&void 0!==Symbol.iterator&&"function"==typeof String.prototype[Symbol.iterator],r="function"==typeof String.prototype.fromCodePoint,a="function"==typeof String.prototype.codePointAt;n._unsafeCodePointAt0=function(n){return a?function(n){return n.codePointAt(0)}:n},n._singleton=function(n){return r?String.fromCodePoint:n},n._take=function(n){return function(e){return t?function(n){for(var t="",r=n[Symbol.iterator](),a=0;a<e;++a){var o=r.next();if(o.done)return t;t+=o.value}return t}:n(e)}},n._toCodePointArray=function(n){return function(t){return e?function(n){return Array.from(n,t)}:n}}}(PS["Data.String.CodePoints"]=PS["Data.String.CodePoints"]||{}),function(n){"use strict";var e=PS["Data.String.CodePoints"],t=(PS["Control.Semigroupoid"],PS["Data.Array"]),r=(PS["Data.Boolean"],PS["Data.Bounded"]),a=PS["Data.Enum"],o=(PS["Data.Eq"],PS["Data.EuclideanRing"]),u=PS["Data.Functor"],i=(PS["Data.HeytingAlgebra"],PS["Data.Int"],PS["Data.Maybe"]),l=(PS["Data.Ord"],PS["Data.Ring"],PS["Data.Semigroup"],PS["Data.Semiring"],PS["Data.Show"],PS["Data.String.CodeUnits"]),c=(PS["Data.String.Common"],PS["Data.String.Pattern"],PS["Data.String.Unsafe"]),f=PS["Data.Tuple"],s=PS["Data.Unfoldable"],d=(PS.Prelude,function(n){return function(e){return 65536+((1024*(n-55296|0)|0)+(e-56320|0)|0)|0}}),S=function(n){return 56320<=n&&n<=57343},P=function(n){return 55296<=n&&n<=56319},v=function(n){var e=l.length(n);if(0===e)return i.Nothing.value;if(1===e)return new i.Just({head:a.fromEnum(a.boundedEnumChar)(c.charAt(0)(n)),tail:""});var t=a.fromEnum(a.boundedEnumChar)(c.charAt(1)(n)),r=a.fromEnum(a.boundedEnumChar)(c.charAt(0)(n));return P(r)&&S(t)?new i.Just({head:d(r)(t),tail:l.drop(2)(n)}):new i.Just({head:r,tail:l.drop(1)(n)})},p=function(n){return u.map(i.functorMaybe)(function(n){return new f.Tuple(n.head,n.tail)})(v(n))},m=e._unsafeCodePointAt0(function(n){var e=a.fromEnum(a.boundedEnumChar)(c.charAt(0)(n));if(P(e)&&l.length(n)>1){var t=a.fromEnum(a.boundedEnumChar)(c.charAt(1)(n));return S(t)?d(e)(t):e}return e}),g=e._toCodePointArray(function(n){return s.unfoldr(s.unfoldableArray)(p)(n)})(m),D=function(n){return l.singleton(a.toEnumWithDefaults(a.boundedEnumChar)(r.bottom(r.boundedChar))(r.top(r.boundedChar))(n))},b=e._singleton(function(n){if(n<=65535)return D(n);var e=o.div(o.euclideanRingInt)(n-65536|0)(1024)+55296|0,t=o.mod(o.euclideanRingInt)(n-65536|0)(1024)+56320|0;return D(e)+D(t)}),h=function(n){return function(e){if(n<1)return"";var t=v(e);return t instanceof i.Just?b(t.value0.head)+h(n-1|0)(t.value0.tail):e}},w=e._take(h);n.singleton=b,n.toCodePointArray=g,n.uncons=v,n.length=function(n){return t.length(g(n))},n.take=w,n.drop=function(n){return function(e){return l.drop(l.length(w(n)(e)))(e)}}}(PS["Data.String.CodePoints"]=PS["Data.String.CodePoints"]||{}),function(n){"use strict";PS["Control.Applicative"];var e=PS["Control.Bind"],t=(PS["Control.Monad.Maybe.Trans"],PS["Control.Semigroupoid"],PS["Data.Array"]),r=(PS["Data.Eq"],PS["Data.Foldable"]),a=(PS["Data.Function"],PS["Data.Functor"]),o=(PS["Data.HeytingAlgebra"],PS["Data.Maybe"]),u=PS["Data.Nullable"],i=(PS["Data.String"],PS["Data.String.CodePoints"]),l=PS["Data.String.Common"],c=(PS["Data.String.Pattern"],PS["Data.Tuple"]),f=(PS["Data.Unit"],PS.Effect),s=PS["Global.Unsafe"],d=(PS.Halogen,PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),S=PS["Halogen.HTML.Properties"],P=(PS["Partial.Unsafe"],PS.Prelude,PS["Web.DOM"],PS["Web.DOM.Document"],PS["Web.DOM.Element"],PS["Web.DOM.NodeList"],PS["Web.DOM.NonElementParentNode"],PS["Web.DOM.ParentNode"],PS["Web.HTML"]),v=(PS["Web.HTML.HTMLDocument"],PS["Web.HTML.HTMLElement"],PS["Web.HTML.Location"]),p=PS["Web.HTML.Window"],m=function(n){var e,r=function(n){return s.unsafeDecodeURIComponent(l.replaceAll("+")(" ")(n))},a="#"===(e=i.take(1)(n))||"?"===e?i.drop(1)(n):n;return t.mapMaybe(function(n){var e=l.split("=")(n);return 1===e.length?new o.Just(new c.Tuple(r(e[0]),o.Nothing.value)):2===e.length?new o.Just(new c.Tuple(r(e[0]),new o.Just(r(e[1])))):o.Nothing.value})(t.filter(function(n){return""!==n})(l.split("&")(a)))},g=e.bindFlipped(f.bindEffect)(p.location)(P.window);n.class_=function(n){return S.class_(d.ClassName(n))},n.attr=function(n){return S.attr(n)},n._loc=g,n._curQuerystring=function(){var n=g(),e=v.search(n)();return m(e)},n._parseQueryString=m,n._lookupQueryStringValue=function(n){return function(t){return e.join(o.bindMaybe)(a.map(o.functorMaybe)(c.snd)(r.find(r.foldableArray)(function(n){return c.fst(n)===t})(n)))}},n.fromNullableStr=function(n){return o.fromMaybe("")(u.toMaybe(n))}}(PS.Util=PS.Util||{}),function(n){"use strict";var e=PS.App,t=PS["Control.Applicative"],r=PS["Control.Bind"],a=(PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed.InputType"]),o=PS["Data.Function"],u=PS["Data.Functor"],i=(PS["Data.Lens"],PS["Data.Lens.Getter"]),l=PS["Data.Lens.Internal.Forget"],c=PS["Data.Lens.Lens"],f=PS["Data.Lens.Setter"],s=PS["Data.Maybe"],d=PS["Data.Profunctor.Strong"],S=PS["Data.Unit"],P=(PS["Effect.Aff"],PS["Effect.Aff.Class"]),v=PS.Globals,p=(PS.Halogen,PS["Halogen.Component"]),m=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),g=PS["Halogen.HTML.Elements"],D=PS["Halogen.HTML.Events"],b=PS["Halogen.HTML.Properties"],h=PS["Halogen.Query.HalogenM"],w=(PS.Model,PS.Prelude,PS.Util),y=(PS["Web.Event.Event"],function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),M=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),E=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),C=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),A=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),T=function(n){return c.lens(function(n){return n.us})(function(n){return function(n){return{us:n}}})(n)};n._us=T,n.UEditField=C,n.USubmit=A,n.EarchiveDefault=y,n.EprivateDefault=M,n.EprivacyLock=E,n.usetting=function(n){var c;v["app'"](S.unit);return p.component(m.bifunctorHTML)({initialState:o.const((c=n,{us:c})),render:function(n){var e=function(n){return function(e){return D.input(C.create)(n(e))}};return g.div([w.class_("settings-form")])([g.div([w.class_("fw7 mb2")])([m.text("Account Settings")]),g.div([w.class_("flex items-center mb2")])([g.input([b.type_(m.inputTypeIsProp)(a.InputCheckbox.value),w.class_("pointer mr2"),b.id_("archiveDefault"),b.name("archiveDefault"),b.checked(n.us.archiveDefault),D.onChecked(e(y.create))]),g.label([b.for("archiveDefault"),w.class_("lh-copy")])([m.text("Archive Non-Private Bookmarks (archive.li)")])]),g.div([w.class_("flex items-center mb2")])([g.input([b.type_(m.inputTypeIsProp)(a.InputCheckbox.value),w.class_("pointer mr2"),b.id_("privateDefault"),b.name("privateDefault"),b.checked(n.us.privateDefault),D.onChecked(e(M.create))]),g.label([b.for("privateDefault"),w.class_("lh-copy")])([m.text("Default new bookmarks to Private")])]),g.div([w.class_("flex items-center mb2")])([g.input([b.type_(m.inputTypeIsProp)(a.InputCheckbox.value),w.class_("pointer mr2"),b.id_("privacyLock"),b.name("privacyLock"),b.checked(n.us.privacyLock),D.onChecked(e(E.create))]),g.label([b.for("privacyLock"),w.class_("lh-copy")])([m.text("Privacy Lock (Private Account)")])])])},eval:function(n){if(n instanceof C)return r.discard(r.discardUnit)(h.bindHalogenM)(f.modifying(h.monadStateHalogenM)(T(d.strongFn))(function(){if(n.value0 instanceof y)return function(e){return{archiveDefault:n.value0.value0,privateDefault:e.privateDefault,privacyLock:e.privacyLock}};if(n.value0 instanceof M)return function(e){return{archiveDefault:e.archiveDefault,privateDefault:n.value0.value0,privacyLock:e.privacyLock}};if(n.value0 instanceof E)return function(e){return{archiveDefault:e.archiveDefault,privateDefault:e.privateDefault,privacyLock:n.value0.value0}};throw new Error("Failed pattern match at Component.AccountSettings (line 82, column 12 - line 85, column 46): "+[n.value0.constructor.name])}()))(function(){return t.pure(h.applicativeHalogenM)(n.value1)});if(n instanceof A)return r.bind(h.bindHalogenM)(i.use(h.monadStateHalogenM)(T(l.strongForget)))(function(a){return r.discard(r.discardUnit)(h.bindHalogenM)(u.void(h.functorHalogenM)(P.liftAff(h.monadAffHalogenM(P.monadAffAff))(e.editAccountSettings(a))))(function(){return t.pure(h.applicativeHalogenM)(n.value1)})});throw new Error("Failed pattern match at Component.AccountSettings (line 80, column 3 - line 80, column 58): "+[n.constructor.name])},receiver:o.const(s.Nothing.value)})}}(PS["Component.AccountSettings"]=PS["Component.AccountSettings"]||{}),function(n){"use strict";var e=PS.App,t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.State.Class"],o=(PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed.ButtonType"]),u=PS["DOM.HTML.Indexed.InputType"],i=(PS["Data.Array"],PS["Data.Foldable"],PS["Data.Function"]),l=PS["Data.Functor"],c=(PS["Data.HeytingAlgebra"],PS["Data.Lens"],PS["Data.Lens.Getter"]),f=PS["Data.Lens.Internal.Forget"],s=PS["Data.Lens.Lens"],d=PS["Data.Lens.Setter"],S=PS["Data.Maybe"],P=PS["Data.Monoid"],v=(PS["Data.Ord"],PS["Data.Profunctor.Strong"]),p=PS["Data.Semigroup"],m=(PS["Data.String"],PS["Data.String.Common"]),g=(PS["Data.String.Pattern"],PS["Data.Tuple"]),D=PS["Data.Unit"],b=PS["Effect.Aff"],h=PS["Effect.Aff.Class"],w=PS["Effect.Class"],y=PS.Globals,M=(PS.Halogen,PS["Halogen.Component"]),E=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),C=PS["Halogen.HTML.Elements"],A=PS["Halogen.HTML.Events"],T=PS["Halogen.HTML.Properties"],F=PS["Halogen.Query.HalogenM"],H=(PS.Model,PS.Prelude,PS.Util),L=PS["Web.Event.Event"],_=PS["Web.HTML"],I=PS["Web.HTML.Location"],U=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),x=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),k=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),O=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),W=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),R=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),N=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),B=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),q=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),j=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),V=function(n){return s.lens(function(n){return n.edit_bm})(function(n){return function(e){return{edit_bm:e,bm:n.bm,deleteAsk:n.deleteAsk,destroyed:n.destroyed}}})(n)},J=function(n){return s.lens(function(n){return n.bm})(function(n){return function(e){return{bm:e,deleteAsk:n.deleteAsk,destroyed:n.destroyed,edit_bm:n.edit_bm}}})(n)};n.BEditField=N,n.BEditSubmit=B,n.BDeleteAsk=q,n.BDestroy=j,n.Eurl=U,n.Etitle=x,n.Edescription=k,n.Etags=O,n.Eprivate=W,n.Etoread=R,n._bm=J,n._edit_bm=V,n.addbmark=function(n){var s;y["app'"](D.unit);return M.component(E.bifunctorHTML)({initialState:i.const((s=n,{bm:s,edit_bm:s,deleteAsk:!1,destroyed:!1})),render:function(n){var e=y.mmoment8601(n.bm.time),t=function(n){return function(e){return A.input(N.create)(n(e))}},r=C.div([H.class_("alert")])([E.text("previously saved "),C.span([H.class_("link f7 dib gray pr3"),T.title(S.maybe(n.bm.time)(g.snd)(e))])([E.text(S.maybe(" ")(g.fst)(e))]),C.div([H.class_("edit_links dib ml1")])([C.div([H.class_("delete_link di")])([C.button(p.append(p.semigroupArray)([T.type_(E.buttonTypeIsProp)(o.ButtonButton.value),A.onClick(A.input_(q.create(!0))),H.class_("delete")])(P.guard(P.monoidArray)(n.deleteAsk)([H.attr("hidden")("hidden")])))([E.text("delete")]),C.span(p.append(p.semigroupArray)([H.class_("confirm red")])(P.guard(P.monoidArray)(!n.deleteAsk)([H.attr("hidden")("hidden")])))([C.button([T.type_(E.buttonTypeIsProp)(o.ButtonButton.value),A.onClick(A.input_(q.create(!1)))])([E.text("cancel / ")]),C.button([T.type_(E.buttonTypeIsProp)(o.ButtonButton.value),A.onClick(A.input_(j.create)),H.class_("red")])([E.text("destroy")])])])])]),a=C.form([A.onSubmit(A.input(B.create))])([C.table([H.class_("w-100")])([C.tbody_([C.tr_([C.td([H.class_("w1")])([]),C.td_(P.guard(P.monoidArray)(n.bm.bid>0)([r]))]),C.tr_([C.td_([C.label([T.for("url")])([E.text("URL")])]),C.td_([C.input([T.type_(E.inputTypeIsProp)(u.InputUrl.value),T.id_("url"),H.class_("w-100 mv1"),T.required(!0),T.name("url"),T.autofocus(m.null(n.bm.url)),T.value(n.edit_bm.url),A.onValueChange(t(U.create))])])]),C.tr_([C.td_([C.label([T.for("title")])([E.text("title")])]),C.td_([C.input([T.type_(E.inputTypeIsProp)(u.InputText.value),T.id_("title"),H.class_("w-100 mv1"),T.name("title"),T.value(n.edit_bm.title),A.onValueChange(t(x.create))])])]),C.tr_([C.td_([C.label([T.for("description")])([E.text("description")])]),C.td_([C.textarea([H.class_("w-100 mt1 mid-gray"),T.id_("description"),T.name("description"),T.rows(4),T.value(n.edit_bm.description),A.onValueChange(t(k.create))])])]),C.tr_([C.td_([C.label([T.for("tags")])([E.text("tags")])]),C.td_([C.input([T.type_(E.inputTypeIsProp)(u.InputText.value),T.id_("tags"),H.class_("w-100 mv1"),T.name("tags"),T.autocomplete(!1),H.attr("autocapitalize")("off"),T.autofocus(!m.null(n.bm.url)),T.value(n.edit_bm.tags),A.onValueChange(t(O.create))])])]),C.tr_([C.td_([C.label([T.for("private")])([E.text("private")])]),C.td_([C.input([T.type_(E.inputTypeIsProp)(u.InputCheckbox.value),T.id_("private"),H.class_("private pointer"),T.name("private"),T.checked(n.edit_bm.private),A.onChecked(t(W.create))])])]),C.tr_([C.td_([C.label([T.for("toread")])([E.text("read later")])]),C.td_([C.input([T.type_(E.inputTypeIsProp)(u.InputCheckbox.value),T.id_("toread"),H.class_("toread pointer"),T.name("toread"),T.checked(n.edit_bm.toread),A.onChecked(t(R.create))])])]),C.tr_([C.td_([]),C.td_([C.input([T.type_(E.inputTypeIsProp)(u.InputSubmit.value),H.class_("ph3 pv2 input-reset ba b--navy bg-transparent pointer f6 dib mt1 dim"),T.value(n.bm.bid>0?"update bookmark":"add bookmark")])])])])])]),i=C.p([H.class_("red")])([E.text("you killed this bookmark")]);return C.div_([n.destroyed?i:a])},eval:function(n){if(n instanceof q)return r.discard(r.discardUnit)(F.bindHalogenM)(a.modify_(F.monadStateHalogenM)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.deleteAsk=n.value0,t}))(function(){return t.pure(F.applicativeHalogenM)(n.value1)});if(n instanceof j)return r.bind(F.bindHalogenM)(a.gets(F.monadStateHalogenM)(function(n){return n.bm.bid}))(function(o){return r.discard(r.discardUnit)(F.bindHalogenM)(l.void(F.functorHalogenM)(h.liftAff(F.monadAffHalogenM(h.monadAffAff))(e.destroy(o))))(function(){return r.discard(r.discardUnit)(F.bindHalogenM)(a.modify_(F.monadStateHalogenM)(function(n){var e={};for(var t in n)({}).hasOwnProperty.call(n,t)&&(e[t]=n[t]);return e.destroyed=!0,e}))(function(){return t.pure(F.applicativeHalogenM)(n.value0)})})});if(n instanceof N)return r.discard(r.discardUnit)(F.bindHalogenM)(d.modifying(F.monadStateHalogenM)(V(v.strongFn))(function(){if(n.value0 instanceof U)return function(e){return{url:n.value0.value0,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof x)return function(e){return{url:e.url,title:n.value0.value0,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof k)return function(e){return{url:e.url,title:e.title,description:n.value0.value0,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof O)return function(e){return{url:e.url,title:e.title,description:e.description,tags:n.value0.value0,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof W)return function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:n.value0.value0,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof R)return function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:n.value0.value0,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};throw new Error("Failed pattern match at Component.Add (line 160, column 17 - line 166, column 36): "+[n.value0.constructor.name])}()))(function(){return t.pure(F.applicativeHalogenM)(n.value1)});if(n instanceof B)return r.discard(r.discardUnit)(F.bindHalogenM)(w.liftEffect(F.monadEffectHalogenM(b.monadEffectAff))(L.preventDefault(n.value0)))(function(){return r.bind(F.bindHalogenM)(c.use(F.monadStateHalogenM)(V(f.strongForget)))(function(a){return r.discard(r.discardUnit)(F.bindHalogenM)(l.void(F.functorHalogenM)(h.liftAff(F.monadAffHalogenM(h.monadAffAff))(e.editBookmark(a))))(function(){return r.discard(r.discardUnit)(F.bindHalogenM)(d.assign(F.monadStateHalogenM)(J(v.strongFn))(a))(function(){return r.bind(F.bindHalogenM)(w.liftEffect(F.monadEffectHalogenM(b.monadEffectAff))(H._loc))(function(e){return r.bind(F.bindHalogenM)(w.liftEffect(F.monadEffectHalogenM(b.monadEffectAff))(_.window))(function(a){return r.bind(F.bindHalogenM)(w.liftEffect(F.monadEffectHalogenM(b.monadEffectAff))(H._curQuerystring))(function(o){return r.discard(r.discardUnit)(F.bindHalogenM)((u=H._lookupQueryStringValue(o)("next"))instanceof S.Just?w.liftEffect(F.monadEffectHalogenM(b.monadEffectAff))(I.setHref(u.value0)(e)):w.liftEffect(F.monadEffectHalogenM(b.monadEffectAff))(y.closeWindow(a)))(function(){return t.pure(F.applicativeHalogenM)(n.value1)});var u})})})})})})});throw new Error("Failed pattern match at Component.Add (line 150, column 3 - line 150, column 58): "+[n.constructor.name])},receiver:i.const(S.Nothing.value)})}}(PS["Component.Add"]=PS["Component.Add"]||{}),function(n){"use strict";var e=PS.App,t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.State.Class"],o=(PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed.ButtonType"]),u=PS["DOM.HTML.Indexed.InputType"],i=PS["Data.Array"],l=(PS["Data.Eq"],PS["Data.Foldable"]),c=PS["Data.Function"],f=PS["Data.Functor"],s=(PS["Data.HeytingAlgebra"],PS["Data.Lens"],PS["Data.Lens.Getter"]),d=PS["Data.Lens.Internal.Forget"],S=PS["Data.Lens.Lens"],P=PS["Data.Lens.Setter"],v=PS["Data.Maybe"],p=PS["Data.Monoid"],m=PS["Data.Nullable"],g=PS["Data.Profunctor.Strong"],D=PS["Data.Semigroup"],b=PS["Data.Show"],h=(PS["Data.String"],PS["Data.String.CodePoints"]),w=PS["Data.String.Common"],y=(PS["Data.String.Pattern"],PS["Data.Tuple"]),M=PS["Data.Unit"],E=PS["Effect.Aff"],C=PS["Effect.Aff.Class"],A=PS["Effect.Class"],T=PS.Globals,F=(PS.Halogen,PS["Halogen.Component"]),H=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),L=PS["Halogen.HTML.Elements"],_=PS["Halogen.HTML.Events"],I=PS["Halogen.HTML.Properties"],U=PS["Halogen.Query.HalogenM"],x=(PS.Model,PS.Prelude,PS.Util),k=PS["Web.Event.Event"],O=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),W=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),R=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),N=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),B=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),q=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),j=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),V=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),J=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),Q=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),G=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),z=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),K=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),X=function(){function n(){}return n.value=new n,n}(),Y=function(n){return S.lens(function(n){return n.edit_bm})(function(n){return function(e){return{edit_bm:e,bm:n.bm,deleteAsk:n.deleteAsk,edit:n.edit}}})(n)},Z=function(n){return S.lens(function(n){return n.edit})(function(n){return function(e){return{edit:e,bm:n.bm,deleteAsk:n.deleteAsk,edit_bm:n.edit_bm}}})(n)},$=function(n){return S.lens(function(n){return n.bm})(function(n){return function(e){return{bm:e,deleteAsk:n.deleteAsk,edit:n.edit,edit_bm:n.edit_bm}}})(n)};n.BStar=j,n.BDeleteAsk=V,n.BDestroy=J,n.BEdit=Q,n.BEditField=G,n.BEditSubmit=z,n.BMarkRead=K,n.Eurl=O,n.Etitle=W,n.Edescription=R,n.Etags=N,n.Eprivate=B,n.Etoread=q,n.BNotifyRemove=X,n._bm=$,n._edit_bm=Y,n._edit=Z,n.bmark=function(n){var S,nn=T["app'"](M.unit);return F.component(H.bifunctorHTML)({initialState:c.const((S=n,{bm:S,edit_bm:S,deleteAsk:!1,edit:!1})),render:function(n){var e,t,r=p.guard(p.monoidArray)(nn.dat.isowner)([L.div([x.class_("star fl pointer"+p.guard(p.monoidString)(n.bm.selected)(" selected"))])([L.button([x.class_("moon-gray"),_.onClick(_.input_(j.create(!n.bm.selected)))])([H.text("✭")])])]),a=T.mmoment8601(n.bm.time),c=p.guard(p.monoidArray)(nn.dat.isowner)([L.div([x.class_("edit_links di")])([L.button([I.type_(H.buttonTypeIsProp)(o.ButtonButton.value),_.onClick(_.input_(Q.create(!0))),x.class_("edit light-silver hover-blue")])([H.text("edit ")]),L.div([x.class_("delete_link di")])([L.button([I.type_(H.buttonTypeIsProp)(o.ButtonButton.value),_.onClick(_.input_(V.create(!0))),x.class_("delete light-silver hover-blue"+p.guard(p.monoidString)(n.deleteAsk)(" dn"))])([H.text("delete")]),L.span([x.class_("confirm red"+p.guard(p.monoidString)(!n.deleteAsk)(" dn"))])([L.button([I.type_(H.buttonTypeIsProp)(o.ButtonButton.value),_.onClick(_.input_(V.create(!1)))])([H.text("cancel / ")]),L.button([I.type_(H.buttonTypeIsProp)(o.ButtonButton.value),_.onClick(_.input_(J.create)),x.class_("red")])([H.text("destroy")])])])]),L.div([x.class_("read di")])(p.guard(p.monoidArray)(n.bm.toread)([H.text(" "),L.button([_.onClick(_.input_(K.create)),x.class_("mark_read")])([H.text("mark as read")])]))]),s=function(n){return x.fromNullableStr(nn.userR)+"/t:"+n},d=function(n){return function(e){return _.input(G.create)(n(e))}},S=[L.div([x.class_("edit_bookmark_form pa2 pt0 bg-white")])([L.form([_.onSubmit(_.input(z.create))])([L.div_([H.text("url")]),L.input([I.type_(H.inputTypeIsProp)(u.InputUrl.value),x.class_("url w-100 mb2 pt1 f7 edit_form_input"),I.required(!0),I.name("url"),I.value(n.edit_bm.url),_.onValueChange(d(O.create))]),L.br_,L.div_([H.text("title")]),L.input([I.type_(H.inputTypeIsProp)(u.InputText.value),x.class_("title w-100 mb2 pt1 f7 edit_form_input"),I.name("title"),I.value(n.edit_bm.title),_.onValueChange(d(W.create))]),L.br_,L.div_([H.text("description")]),L.textarea([x.class_("description w-100 mb1 pt1 f7 edit_form_input"),I.name("description"),I.rows(5),I.value(n.edit_bm.description),_.onValueChange(d(R.create))]),L.br_,L.div([I.id_("tags_input_box")])([L.div_([H.text("tags")]),L.input([I.type_(H.inputTypeIsProp)(u.InputText.value),x.class_("tags w-100 mb1 pt1 f7 edit_form_input"),I.name("tags"),I.autocomplete(!1),x.attr("autocapitalize")("off"),I.value(n.edit_bm.tags),_.onValueChange(d(N.create))]),L.br_]),L.div([x.class_("edit_form_checkboxes mv3")])([L.input([I.type_(H.inputTypeIsProp)(u.InputCheckbox.value),x.class_("private pointer"),I.id_("edit_private"),I.name("private"),I.checked(n.edit_bm.private),_.onChecked(d(B.create))]),H.text(" "),L.label([I.for("edit_private"),x.class_("mr2")])([H.text("private")]),H.text(" "),L.input([I.type_(H.inputTypeIsProp)(u.InputCheckbox.value),x.class_("toread pointer"),I.id_("edit_toread"),I.name("toread"),I.checked(n.edit_bm.toread),_.onChecked(d(q.create))]),H.text(" "),L.label([I.for("edit_toread")])([H.text("to-read")]),L.br_]),L.input([I.type_(H.inputTypeIsProp)(u.InputSubmit.value),x.class_("mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"),I.value("save")]),H.text(" "),L.input([I.type_(H.inputTypeIsProp)(u.InputReset.value),x.class_("pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"),I.value("cancel"),_.onClick(_.input_(Q.create(!1)))])])])],P=[L.div([x.class_("display")])(D.append(D.semigroupArray)([L.a([I.href(n.bm.url),I.target("_blank"),x.class_("link f5 lh-title"+p.guard(p.monoidString)(n.bm.toread)(" unread"))])([H.text(w.null(n.bm.title)?"[no title]":n.bm.title)]),L.br_,L.a([I.href(n.bm.url),x.class_("link f7 gray hover-blue")])([H.text(n.bm.url)]),L.a([I.href(v.fromMaybe("http://archive.is/"+n.bm.url)(m.toMaybe(n.bm.archiveUrl))),x.class_("link f7 gray hover-blue ml2"+p.guard(p.monoidString)(v.isJust(m.toMaybe(n.bm.archiveUrl)))(" green")),I.target("_blank"),I.title("archive link")])([v.isJust(m.toMaybe(n.bm.archiveUrl))?H.text("☑"):H.text("☐")]),L.br_,L.div([x.class_("description mt1 mid-gray")])((t=n.bm.description,i.drop(1)(l.foldMap(l.foldableArray)(p.monoidArray)(function(n){return[L.br_,H.text(n)]})(w.split("\n")(t))))),L.div([x.class_("tags")])(p.guard(p.monoidFn(p.monoidFn(p.monoidArray)))(!w.null(n.bm.tags))(f.map(f.functorArray))(function(n){return L.a([x.class_("link tag mr1"+p.guard(p.monoidString)("."===h.take(1)(n))(" private")),I.href(s(n))])([H.text(n)])})(w.split(" ")(n.bm.tags))),L.a([x.class_("link f7 dib gray w4"),I.title(v.maybe(n.bm.time)(y.snd)(a)),I.href((e=n.bm.slug,x.fromNullableStr(nn.userR)+"/b:"+e))])([H.text(v.maybe(" ")(y.fst)(a))])])(c))];return L.div([I.id_(b.show(b.showInt)(n.bm.bid)),x.class_("bookmark w-100 mw7 pa1 mb3"+p.guard(p.monoidString)(n.bm.private)(" private"))])(D.append(D.semigroupArray)(r)(n.edit?S:P))},eval:function(n){if(n instanceof j)return r.bind(U.bindHalogenM)(s.use(U.monadStateHalogenM)($(d.strongForget)))(function(a){return r.discard(r.discardUnit)(U.bindHalogenM)(C.liftAff(U.monadAffHalogenM(C.monadAffAff))(e.toggleStar(a.bid)(n.value0?e.Star.value:e.UnStar.value)))(function(){return r.discard(r.discardUnit)(U.bindHalogenM)(P.modifying(U.monadStateHalogenM)($(g.strongFn))(function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:n.value0,time:e.time,archiveUrl:e.archiveUrl}}))(function(){return r.discard(r.discardUnit)(U.bindHalogenM)(P.modifying(U.monadStateHalogenM)(Y(g.strongFn))(function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:n.value0,time:e.time,archiveUrl:e.archiveUrl}}))(function(){return t.pure(U.applicativeHalogenM)(n.value1)})})})});if(n instanceof V)return r.discard(r.discardUnit)(U.bindHalogenM)(a.modify_(U.monadStateHalogenM)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.deleteAsk=n.value0,t}))(function(){return t.pure(U.applicativeHalogenM)(n.value1)});if(n instanceof J)return r.bind(U.bindHalogenM)(s.use(U.monadStateHalogenM)($(d.strongForget)))(function(a){return r.discard(r.discardUnit)(U.bindHalogenM)(f.void(U.functorHalogenM)(C.liftAff(U.monadAffHalogenM(C.monadAffAff))(e.destroy(a.bid))))(function(){return r.discard(r.discardUnit)(U.bindHalogenM)(U.raise(X.value))(function(){return t.pure(U.applicativeHalogenM)(n.value0)})})});if(n instanceof K)return r.bind(U.bindHalogenM)(s.use(U.monadStateHalogenM)($(d.strongForget)))(function(a){return r.discard(r.discardUnit)(U.bindHalogenM)(f.void(U.functorHalogenM)(C.liftAff(U.monadAffHalogenM(C.monadAffAff))(e.markRead(a.bid))))(function(){return r.discard(r.discardUnit)(U.bindHalogenM)(P.modifying(U.monadStateHalogenM)($(g.strongFn))(function(n){return{url:n.url,title:n.title,description:n.description,tags:n.tags,private:n.private,toread:!1,bid:n.bid,slug:n.slug,selected:n.selected,time:n.time,archiveUrl:n.archiveUrl}}))(function(){return t.pure(U.applicativeHalogenM)(n.value0)})})});if(n instanceof Q)return r.bind(U.bindHalogenM)(s.use(U.monadStateHalogenM)($(d.strongForget)))(function(e){return r.discard(r.discardUnit)(U.bindHalogenM)(P.assign(U.monadStateHalogenM)(Y(g.strongFn))(e))(function(){return r.discard(r.discardUnit)(U.bindHalogenM)(P.assign(U.monadStateHalogenM)(Z(g.strongFn))(n.value0))(function(){return t.pure(U.applicativeHalogenM)(n.value1)})})});if(n instanceof G)return r.discard(r.discardUnit)(U.bindHalogenM)(P.modifying(U.monadStateHalogenM)(Y(g.strongFn))(function(){if(n.value0 instanceof O)return function(e){return{url:n.value0.value0,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof W)return function(e){return{url:e.url,title:n.value0.value0,description:e.description,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof R)return function(e){return{url:e.url,title:e.title,description:n.value0.value0,tags:e.tags,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof N)return function(e){return{url:e.url,title:e.title,description:e.description,tags:n.value0.value0,private:e.private,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof B)return function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:n.value0.value0,toread:e.toread,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};if(n.value0 instanceof q)return function(e){return{url:e.url,title:e.title,description:e.description,tags:e.tags,private:e.private,toread:n.value0.value0,bid:e.bid,slug:e.slug,selected:e.selected,time:e.time,archiveUrl:e.archiveUrl}};throw new Error("Failed pattern match at Component.BMark (line 231, column 17 - line 237, column 36): "+[n.value0.constructor.name])}()))(function(){return t.pure(U.applicativeHalogenM)(n.value1)});if(n instanceof z)return r.discard(r.discardUnit)(U.bindHalogenM)(A.liftEffect(U.monadEffectHalogenM(E.monadEffectAff))(k.preventDefault(n.value0)))(function(){return r.bind(U.bindHalogenM)(s.use(U.monadStateHalogenM)(Y(d.strongForget)))(function(a){return r.discard(r.discardUnit)(U.bindHalogenM)(f.void(U.functorHalogenM)(C.liftAff(U.monadAffHalogenM(C.monadAffAff))(e.editBookmark(a))))(function(){return r.discard(r.discardUnit)(U.bindHalogenM)(P.assign(U.monadStateHalogenM)($(g.strongFn))(a))(function(){return r.discard(r.discardUnit)(U.bindHalogenM)(P.assign(U.monadStateHalogenM)(Z(g.strongFn))(!1))(function(){return t.pure(U.applicativeHalogenM)(n.value1)})})})})});throw new Error("Failed pattern match at Component.BMark (line 193, column 3 - line 193, column 62): "+[n.constructor.name])},receiver:c.const(v.Nothing.value)})}}(PS["Component.BMark"]=PS["Component.BMark"]||{}),function(n){"use strict";var e=PS["Component.BMark"],t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.State.Class"],o=PS["Data.Array"],u=(PS["Data.Eq"],PS["Data.Function"]),i=PS["Data.Functor"],l=PS["Data.Maybe"],c=PS["Data.Ord"],f=PS["Data.Unit"],s=(PS["Effect.Aff"],PS.Halogen,PS["Halogen.Component"]),d=PS["Halogen.HTML"],S=PS["Halogen.HTML.Elements"],P=PS["Halogen.HTML.Events"],v=PS["Halogen.Query.HalogenM"],p=(PS.Model,PS.Prelude,function(){function n(n,e,t){this.value0=n,this.value1=e,this.value2=t}return n.create=function(e){return function(t){return function(r){return new n(e,t,r)}}},n}());n.HandleBMessage=p,n.blist=function(n){return s.parentComponent(c.ordInt)({initialState:u.const(n),render:function(n){return S.div_(i.map(i.functorArray)(function(n){return d.slot(n.bid)(e.bmark(n))(f.unit)(P.input(p.create(n.bid)))})(n))},eval:function(n){var e;return r.discard(r.discardUnit)(v.bindHalogenM)(a.modify_(v.monadStateHalogenM)((e=n.value0,o.filter(function(n){return n.bid!==e}))))(function(){return t.pure(v.applicativeHalogenM)(n.value2)})},receiver:u.const(l.Nothing.value)})}}(PS["Component.BList"]=PS["Component.BList"]||{}),(PS["Component.RawHtml"]=PS["Component.RawHtml"]||{}).unsafeSetInnerHTML=function(n){return function(e){return function(){n.innerHTML=e}}},function(n){"use strict";var e=PS["Component.RawHtml"],t=PS["Control.Applicative"],r=PS["Control.Bind"],a=PS["Control.Monad.State.Class"],o=PS["Data.Foldable"],u=(PS["Data.Function"],PS["Data.Maybe"]),i=(PS.Effect,PS["Effect.Aff"]),l=PS["Effect.Class"],c=(PS.Globals,PS.Halogen,PS["Halogen.Component"]),f=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),s=PS["Halogen.HTML.Elements"],d=PS["Halogen.HTML.Events"],S=PS["Halogen.HTML.Properties"],P=PS["Halogen.Query"],v=PS["Halogen.Query.HalogenM"],p=(PS["Halogen.Query.InputF"],PS.Prelude,PS["Web.HTML"],function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}()),m=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}();n.SetInnerHTML=p,n.Receive=m,n.mkComponent=function(n){var g=function(u){if(u instanceof p)return r.bind(v.bindHalogenM)(a.get(v.monadStateHalogenM))(function(c){return r.bind(v.bindHalogenM)(P.getHTMLElementRef(c.elRef))(function(c){return r.discard(r.discardUnit)(v.bindHalogenM)(o.for_(v.applicativeHalogenM)(o.foldableMaybe)(c)(function(t){return r.bind(v.bindHalogenM)(a.get(v.monadStateHalogenM))(function(r){return l.liftEffect(v.monadEffectHalogenM(i.monadEffectAff))(e.unsafeSetInnerHTML(t)(n(r.inputval)))})}))(function(){return t.pure(v.applicativeHalogenM)(u.value0)})})});if(u instanceof m)return r.discard(r.discardUnit)(v.bindHalogenM)(a.modify_(v.monadStateHalogenM)(function(n){var e={};for(var t in n)({}).hasOwnProperty.call(n,t)&&(e[t]=n[t]);return e.inputval=u.value0,e}))(function(){return g(new p(u.value1))});throw new Error("Failed pattern match at Component.RawHtml (line 51, column 10 - line 62, column 27): "+[u.constructor.name])};return c.lifecycleComponent(f.bifunctorHTML)({initialState:function(n){return{elRef:"inputval",inputval:n}},render:function(n){return s.div([S.ref(n.elRef)])([])},eval:g,receiver:d.input(m.create),initializer:u.Just.create(P.action(p.create)),finalizer:u.Nothing.value})}}(PS["Component.RawHtml"]=PS["Component.RawHtml"]||{}),(PS["Foreign.Marked"]=PS["Foreign.Marked"]||{}).markedImpl=function(n){return marked.setOptions({pedantic:!1,gfm:!0}),marked(n)},function(n){"use strict";var e=PS["Foreign.Marked"],t=(PS["Control.Semigroupoid"],PS.Globals);PS.Prelude;n.marked=function(n){return t.RawHTML(e.markedImpl(n))}}(PS["Foreign.Marked"]=PS["Foreign.Marked"]||{}),function(n){"use strict";var e=PS["Component.RawHtml"],t=(PS["Effect.Aff"],PS["Foreign.Marked"]),r=(PS.Halogen,PS["Halogen.HTML"],e.mkComponent(t.marked));n.component=r}(PS["Component.Markdown"]=PS["Component.Markdown"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Data.Array"],r=PS["Data.Foldable"],a=PS["Data.Function"],o=PS["Data.Functor"],u=PS["Data.Maybe"],i=PS["Data.Monoid"],l=(PS["Data.Semigroup"],PS["Data.Show"]),c=(PS["Data.String"],PS["Data.String.CodePoints"]),f=PS["Data.String.Common"],s=(PS["Data.String.Pattern"],PS["Data.Tuple"]),d=PS["Data.Unit"],S=(PS["Effect.Aff"],PS.Globals),P=(PS.Halogen,PS["Halogen.Component"]),v=(PS["Halogen.HTML"],PS["Halogen.HTML.Core"]),p=PS["Halogen.HTML.Elements"],m=PS["Halogen.HTML.Properties"],g=PS["Halogen.Query.HalogenM"],D=(PS.Model,PS.Prelude,PS.Util);n.nlist=function(n){var b,h=function(n){return S.mmoment8601(n.created)},w=S["app'"](d.unit),y=function(n){return D.fromNullableStr(w.userR)+"/notes/"+n};return P.component(v.bifunctorHTML)({initialState:a.const((b=n,{notes:b,cur:u.Nothing.value,deleteAsk:!1,edit:!1})),render:function(n){return p.div_(o.map(o.functorArray)(function(n){return p.div([m.id_(l.show(l.showInt)(n.id)),D.class_("note w-100 mw7 pa1 mb2")])([p.div([D.class_("display")])([p.a([m.href(y(n.slug)),D.class_("link f5 lh-title")])([v.text(f.null(n.title)?"[no title]":n.title)]),p.br_,p.div([D.class_("description mt1 mid-gray")])((e=c.take(200)(n.text),t.drop(1)(r.foldMap(r.foldableArray)(i.monoidArray)(function(n){return[p.br_,v.text(n)]})(f.split("\n")(e))))),p.a([D.class_("link f7 dib gray w4"),m.title(u.maybe(n.created)(s.snd)(h(n))),m.href(y(n.slug))])([v.text(u.maybe(" ")(s.fst)(h(n)))])])]);var e})(n.notes))},eval:function(n){return e.pure(g.applicativeHalogenM)(n.value0)},receiver:a.const(u.Nothing.value)})}}(PS["Component.NList"]=PS["Component.NList"]||{}),function(n){"use strict";var e=PS.App,t=PS["Component.Markdown"],r=PS["Control.Applicative"],a=PS["Control.Bind"],o=PS["Control.Monad.State.Class"],u=(PS["Control.Semigroupoid"],PS["DOM.HTML.Indexed.ButtonType"]),i=PS["DOM.HTML.Indexed.InputType"],l=PS["Data.Array"],c=PS["Data.Either"],f=(PS["Data.Eq"],PS["Data.Foldable"]),s=PS["Data.Function"],d=PS["Data.Functor"],S=(PS["Data.HeytingAlgebra"],PS["Data.Lens"],PS["Data.Lens.Getter"]),P=PS["Data.Lens.Internal.Forget"],v=PS["Data.Lens.Lens"],p=PS["Data.Lens.Setter"],m=PS["Data.Maybe"],g=PS["Data.Monoid"],D=PS["Data.Ord"],b=PS["Data.Profunctor.Strong"],h=PS["Data.Semigroup"],w=PS["Data.Show"],y=(PS["Data.String"],PS["Data.String.Common"]),M=(PS["Data.String.Pattern"],PS["Data.Tuple"]),E=PS["Data.Unit"],C=PS["Data.Void"],A=PS.Effect,T=PS["Effect.Aff"],F=PS["Effect.Aff.Class"],H=PS["Effect.Class"],L=PS.Globals,_=(PS.Halogen,PS["Halogen.Component"]),I=PS["Halogen.HTML"],U=PS["Halogen.HTML.Core"],x=PS["Halogen.HTML.Elements"],k=PS["Halogen.HTML.Events"],O=PS["Halogen.HTML.Properties"],W=PS["Halogen.Query.HalogenM"],R=(PS.Model,PS.Prelude,PS.Util),N=PS["Web.Event.Event"],B=PS["Web.HTML.Location"],q=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),j=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),V=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),J=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),Q=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),G=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),z=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),K=function(){function n(n,e){this.value0=n,this.value1=e}return n.create=function(e){return function(t){return new n(e,t)}},n}(),X=function(){function n(n){this.value0=n}return n.create=function(e){return new n(e)},n}(),Y=function(n){return v.lens(function(n){return n.note})(function(n){return function(e){return{note:e,deleteAsk:n.deleteAsk,destroyed:n.destroyed,edit:n.edit,edit_note:n.edit_note}}})(n)},Z=function(n){return v.lens(function(n){return n.edit_note})(function(n){return function(e){return{edit_note:e,deleteAsk:n.deleteAsk,destroyed:n.destroyed,edit:n.edit,note:n.note}}})(n)},$=function(n){return v.lens(function(n){return n.edit})(function(n){return function(e){return{edit:e,deleteAsk:n.deleteAsk,destroyed:n.destroyed,edit_note:n.edit_note,note:n.note}}})(n)};n.NNop=J,n.NEditField=Q,n.NEditSubmit=G,n.NEdit=z,n.NDeleteAsk=K,n.NDestroy=X,n._note=Y,n._edit_note=Z,n._edit=$,n.Etitle=q,n.Etext=j,n.EisMarkdown=V,n.nnote=function(n){var v,nn=L["app'"](E.unit);return _.parentComponent(D.ordUnit)({initialState:s.const((v=n,{note:v,edit_note:v,deleteAsk:!1,edit:v.id<=0,destroyed:!1})),render:function(n){var e,r=function(n){return L.mmoment8601(n.created)},a=x.div([O.id_(w.show(w.showInt)(n.note.id)),R.class_("note w-100 mw7 pa1 mb2")])(h.append(h.semigroupArray)([x.div([R.class_("display")])([x.div([R.class_("link f5 lh-title")])([U.text(y.null(n.note.title)?"[no title]":n.note.title)]),x.br_,n.note.isMarkdown?x.div([R.class_("description mt1")])([I.slot(E.unit)(t.component)(n.note.text)(C.absurd)]):x.div([R.class_("description mt1 mid-gray")])((e=n.note.text,l.drop(1)(f.foldMap(f.foldableArray)(g.monoidArray)(function(n){return[x.br_,U.text(n)]})(y.split("\n")(e))))),x.div([R.class_("link f7 dib gray w4"),O.title(m.maybe(n.note.created)(M.snd)(r(n.note)))])([U.text(m.maybe(" ")(M.fst)(r(n.note)))])])])([x.div([R.class_("edit_links db mt3")])([x.button([O.type_(U.buttonTypeIsProp)(u.ButtonButton.value),k.onClick(k.input_(z.create(!0))),R.class_("edit light-silver hover-blue")])([U.text("edit ")]),x.div([R.class_("delete_link di")])([x.button([O.type_(U.buttonTypeIsProp)(u.ButtonButton.value),k.onClick(k.input_(K.create(!0))),R.class_("delete light-silver hover-blue"+g.guard(g.monoidString)(n.deleteAsk)(" dn"))])([U.text("delete")]),x.span([R.class_("confirm red"+g.guard(g.monoidString)(!n.deleteAsk)(" dn"))])([x.button([O.type_(U.buttonTypeIsProp)(u.ButtonButton.value),k.onClick(k.input_(K.create(!1)))])([U.text("cancel / ")]),x.button([O.type_(U.buttonTypeIsProp)(u.ButtonButton.value),k.onClick(k.input_(X.create)),R.class_("red")])([U.text("destroy")])])])])])),o=function(n){return function(e){return k.input(Q.create)(n(e))}},c=x.form([k.onSubmit(k.input(G.create))])([x.p([R.class_("mt2 mb1")])([U.text("title:")]),x.input([O.type_(U.inputTypeIsProp)(i.InputText.value),R.class_("title w-100 mb1 pt1 f7 edit_form_input"),O.name("title"),O.value(n.edit_note.title),k.onValueChange(o(q.create))]),x.br_,x.p([R.class_("mt2 mb1")])([U.text("description:")]),x.textarea([R.class_("description w-100 mb1 pt1 f7 edit_form_input"),O.name("text"),O.rows(30),O.value(n.edit_note.text),k.onValueChange(o(j.create))]),x.div([R.class_("edit_form_checkboxes mb3")])([x.input([O.type_(U.inputTypeIsProp)(i.InputCheckbox.value),R.class_("is-markdown pointer"),O.id_("edit_ismarkdown"),O.name("ismarkdown"),O.checked(n.edit_note.isMarkdown),k.onChecked(o(V.create))]),U.text(" "),x.label([O.for("edit_ismarkdown"),R.class_("mr2")])([U.text("use markdown?")]),x.br_]),x.input([O.type_(U.inputTypeIsProp)(i.InputSubmit.value),R.class_("mr1 pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"),O.value("save")]),U.text(" "),x.input([O.type_(U.inputTypeIsProp)(i.InputReset.value),R.class_("pv1 ph2 dark-gray ba b--moon-gray bg-near-white pointer rdim"),O.value("cancel"),k.onClick(k.input_(z.create(!1)))])]),s=x.p([R.class_("red")])([U.text("you killed this note")]);return n.destroyed?s:n.edit?c:a},eval:function(n){if(n instanceof J)return r.pure(W.applicativeHalogenM)(n.value0);if(n instanceof Q)return a.discard(a.discardUnit)(W.bindHalogenM)(p.modifying(W.monadStateHalogenM)(Z(b.strongFn))(function(){if(n.value0 instanceof q)return function(e){return{id:e.id,slug:e.slug,title:n.value0.value0,text:e.text,length:e.length,isMarkdown:e.isMarkdown,created:e.created,updated:e.updated}};if(n.value0 instanceof j)return function(e){return{id:e.id,slug:e.slug,title:e.title,text:n.value0.value0,length:e.length,isMarkdown:e.isMarkdown,created:e.created,updated:e.updated}};if(n.value0 instanceof V)return function(e){return{id:e.id,slug:e.slug,title:e.title,text:e.text,length:e.length,isMarkdown:n.value0.value0,created:e.created,updated:e.updated}};throw new Error("Failed pattern match at Component.NNote (line 158, column 19 - line 161, column 44): "+[n.value0.constructor.name])}()))(function(){return r.pure(W.applicativeHalogenM)(n.value1)});if(n instanceof K)return a.discard(a.discardUnit)(W.bindHalogenM)(o.modify_(W.monadStateHalogenM)(function(e){var t={};for(var r in e)({}).hasOwnProperty.call(e,r)&&(t[r]=e[r]);return t.deleteAsk=n.value0,t}))(function(){return r.pure(W.applicativeHalogenM)(n.value1)});if(n instanceof X)return a.bind(W.bindHalogenM)(S.use(W.monadStateHalogenM)(Y(P.strongForget)))(function(t){return a.discard(a.discardUnit)(W.bindHalogenM)(d.void(W.functorHalogenM)(F.liftAff(W.monadAffHalogenM(F.monadAffAff))(e.destroyNote(t.id))))(function(){return a.discard(a.discardUnit)(W.bindHalogenM)(o.modify_(W.monadStateHalogenM)(function(n){var e={};for(var t in n)({}).hasOwnProperty.call(n,t)&&(e[t]=n[t]);return e.destroyed=!0,e}))(function(){return r.pure(W.applicativeHalogenM)(n.value0)})})});if(n instanceof z)return a.bind(W.bindHalogenM)(S.use(W.monadStateHalogenM)(Y(P.strongForget)))(function(e){return a.discard(a.discardUnit)(W.bindHalogenM)(p.assign(W.monadStateHalogenM)(Z(b.strongFn))(e))(function(){return a.discard(a.discardUnit)(W.bindHalogenM)(p.assign(W.monadStateHalogenM)($(b.strongFn))(n.value0))(function(){return r.pure(W.applicativeHalogenM)(n.value1)})})});if(n instanceof G)return a.discard(a.discardUnit)(W.bindHalogenM)(H.liftEffect(W.monadEffectHalogenM(T.monadEffectAff))(N.preventDefault(n.value0)))(function(){return a.bind(W.bindHalogenM)(S.use(W.monadStateHalogenM)(Z(P.strongForget)))(function(t){return a.bind(W.bindHalogenM)(F.liftAff(W.monadAffHalogenM(F.monadAffAff))(e.editNote(t)))(function(e){if(e.body instanceof c.Left)return r.pure(W.applicativeHalogenM)(n.value1);if(e.body instanceof c.Right)return a.discard(a.discardUnit)(W.bindHalogenM)(0===t.id?H.liftEffect(W.monadEffectHalogenM(T.monadEffectAff))(a.bindFlipped(A.bindEffect)(B.setHref(R.fromNullableStr(nn.noteR)))(R._loc)):a.discard(a.discardUnit)(W.bindHalogenM)(p.assign(W.monadStateHalogenM)(Y(b.strongFn))(t))(function(){return p.assign(W.monadStateHalogenM)($(b.strongFn))(!1)}))(function(){return r.pure(W.applicativeHalogenM)(n.value1)});throw new Error("Failed pattern match at Component.NNote (line 188, column 5 - line 197, column 14): "+[e.body.constructor.name])})})});throw new Error("Failed pattern match at Component.NNote (line 153, column 3 - line 153, column 72): "+[n.constructor.name])},receiver:s.const(m.Nothing.value)})}}(PS["Component.NNote"]=PS["Component.NNote"]||{}),function(n){"use strict";PS["Control.Monad.Error.Class"],PS["Control.Monad.Reader.Trans"],PS["Control.Monad.Trans.Class"],PS["Control.Semigroupoid"];var e=PS["Effect.Aff"],t=(PS.Prelude,function(n,e,t,r,a){this.Functor1=n,this.Monad0=e,this.fork=t,this.join=r,this.suspend=a}),r=new t(function(){return e.functorFiber},function(){return e.monadAff},e.forkAff,e.joinFiber,e.suspendAff);n.fork=function(n){return n.fork},n.join=function(n){return n.join},n.suspend=function(n){return n.suspend},n.MonadFork=t,n.monadForkAff=r}(PS["Control.Monad.Fork.Class"]=PS["Control.Monad.Fork.Class"]||{}),function(n){"use strict";(PS["Effect.Console"]=PS["Effect.Console"]||{}).warn=function(n){return function(){return console.warn(n),{}}}}(),function(n){"use strict";var e=PS["Effect.Console"];PS["Data.Show"],PS["Data.Unit"],PS.Effect;n.warn=e.warn}(PS["Effect.Console"]=PS["Effect.Console"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"];var e=PS["Data.Foldable"],t=(PS["Data.Function"],PS["Data.Functor"]),r=(PS["Data.List"],PS["Data.List.Types"]),a=(PS["Data.Map"],PS["Data.Map.Internal"]),o=PS["Data.Maybe"],u=(PS["Data.Traversable"],PS.Effect,PS["Effect.Aff"],PS["Effect.Ref"]),i=(PS["Halogen.Component"],PS["Halogen.Data.OrdBox"],PS.Prelude,PS["Unsafe.Coerce"]),l=(PS["Web.DOM"],i.unsafeCoerce),c=i.unsafeCoerce,f=i.unsafeCoerce;n.unDriverStateX=c,n.mkDriverStateXRef=f,n.renderStateX=function(n){return function(n){return c(function(e){return(e.prjQuery,i.unsafeCoerce)(n(e.rendering))})}},n.renderStateX_=function(n){return function(t){return c(function(r){return e.traverse_(n)(e.foldableMaybe)(t)(r.rendering)})}},n.unRenderStateX=l,n.initDriverState=function(n){return function(e){return function(i){return function(l){return function(c){return function(){var s=u.new({})(),d=u.new(a.empty)(),S=u.new(a.empty)(),P=u.new(t.voidLeft(o.functorMaybe)(n.initializer)(r.Nil.value))(),v=u.new(new o.Just(r.Nil.value))(),p=u.new(o.Nothing.value)(),m=u.new(0)(),g=u.new(new o.Just(a.empty))(),D={component:n,state:n.initialState(e),refs:a.empty,children:a.empty,childrenIn:d,childrenOut:S,selfRef:s,handler:i,pendingQueries:P,pendingOuts:v,pendingHandlers:p,rendering:o.Nothing.value,prjQuery:l,fresh:m,subscriptions:g,lifecycleHandlers:c};return u.write(D)(s)(),f(s)}}}}}}}(PS["Halogen.Aff.Driver.State"]=PS["Halogen.Aff.Driver.State"]||{}),function(n){"use strict";(PS["Unsafe.Reference"]=PS["Unsafe.Reference"]||{}).reallyUnsafeRefEq=function(n){return function(e){return n===e}}}(),function(n){"use strict";var e=PS["Unsafe.Reference"].reallyUnsafeRefEq;n.unsafeRefEq=e}(PS["Unsafe.Reference"]=PS["Unsafe.Reference"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Applicative.Free"],r=PS["Control.Bind"],a=PS["Control.Coroutine"],o=PS["Control.Monad.Error.Class"],u=PS["Control.Monad.Fork.Class"],i=PS["Control.Monad.Free"],l=PS["Control.Monad.Free.Trans"],c=PS["Control.Monad.Trans.Class"],f=PS["Control.Parallel"],s=PS["Control.Parallel.Class"],d=(PS["Control.Semigroupoid"],PS["Data.Boolean"]),S=PS["Data.Coyoneda"],P=PS["Data.Eq"],v=PS["Data.Foldable"],p=PS["Data.Function"],m=PS["Data.Functor"],g=PS["Data.List"],D=PS["Data.List.Types"],b=PS["Data.Map"],h=PS["Data.Map.Internal"],w=PS["Data.Maybe"],y=PS["Data.Ord"],M=(PS["Data.Semiring"],PS["Data.Set"]),E=(PS["Data.Tuple"],PS.Effect,PS["Effect.Aff"]),C=PS["Effect.Class"],A=PS["Effect.Exception"],T=PS["Effect.Ref"],F=PS["Halogen.Aff.Driver.State"],H=PS["Halogen.Data.OrdBox"],L=PS["Halogen.Query.EventSource"],_=PS["Halogen.Query.ForkF"],I=PS["Halogen.Query.HalogenM"],U=PS["Halogen.Query.InputF"],x=(PS.Prelude,PS["Unsafe.Reference"]),k=function(n){return function(e){return function(t){return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(e)))(function(r){if(r instanceof w.Nothing)return n(t);if(r instanceof w.Just)return C.liftEffect(E.monadEffectAff)(T.write(new w.Just(new D.Cons(n(t),r.value0)))(e));throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 171, column 3 - line 175, column 59): "+[r.constructor.name])})}}},O=function(n){return function(t){return r.discard(r.discardUnit)(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.write({initializers:D.Nil.value,finalizers:D.Nil.value})(n)))(function(){return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(t))(function(t){return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(n)))(function(n){return r.discard(r.discardUnit)(E.bindAff)(v.traverse_(E.applicativeAff)(D.foldableList)(u.fork(u.monadForkAff))(n.finalizers))(function(){return r.discard(r.discardUnit)(E.bindAff)(f.parSequence_(E.parallelAff)(D.foldableList)(n.initializers))(function(){return e.pure(E.applicativeAff)(t)})})})})})}};n.handleLifecycle=O,n.eval=function(n){return function(f){var v=function(i){return function(f){if(f instanceof I.State)return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(i)))(function(t){var a=f.value0(t.state);if(x.unsafeRefEq(t.state)(a.value1))return e.pure(E.applicativeAff)(a.value0);if(d.otherwise)return r.discard(r.discardUnit)(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.write({component:t.component,state:a.value1,refs:t.refs,children:t.children,childrenIn:t.childrenIn,childrenOut:t.childrenOut,selfRef:t.selfRef,handler:t.handler,pendingQueries:t.pendingQueries,pendingOuts:t.pendingOuts,pendingHandlers:t.pendingHandlers,rendering:t.rendering,prjQuery:t.prjQuery,fresh:t.fresh,subscriptions:t.subscriptions,lifecycleHandlers:t.lifecycleHandlers})(i)))(function(){return r.discard(r.discardUnit)(E.bindAff)(O(t.lifecycleHandlers)(n(t.lifecycleHandlers)(i)))(function(){return e.pure(E.applicativeAff)(a.value0)})});throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 76, column 7 - line 82, column 21): "+[a.constructor.name])});if(f instanceof I.Subscribe)return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(i)))(function(n){return r.bind(E.bindAff)(u.fork(u.monadForkAff)(r.bind(E.bindAff)(L.unEventSource(f.value0))(function(t){return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T["modify'"](function(n){return{state:n+1|0,value:n}})(n.fresh)))(function(o){var u=r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(n.subscriptions)))(function(t){return e.when(E.applicativeAff)(w.maybe(!1)(h.member(y.ordInt)(o))(t))(C.liftEffect(E.monadEffectAff)(T.modify_(m.map(w.functorMaybe)(h.delete(y.ordInt)(o)))(n.subscriptions)))});return r.discard(r.discardUnit)(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.modify_(m.map(w.functorMaybe)(h.insert(y.ordInt)(o)(u)))(n.subscriptions)))(function(){var o=r.bind(l.bindFreeT(a.functorAwait)(E.monadAff))(a.await(E.monadAff))(function(t){return r.bind(l.bindFreeT(a.functorAwait)(E.monadAff))(c.lift(l.monadTransFreeT(a.functorAwait))(E.monadAff)(C.liftEffect(E.monadEffectAff)(T.read(n.subscriptions))))(function(n){return e.when(l.applicativeFreeT(a.functorAwait)(E.monadAff))(w.isJust(n))(r.bind(l.bindFreeT(a.functorAwait)(E.monadAff))(c.lift(l.monadTransFreeT(a.functorAwait))(E.monadAff)(R(i)(t)))(function(n){return e.when(l.applicativeFreeT(a.functorAwait)(E.monadAff))(P.eq(L.eqSubscribeStatus)(n)(L.Listening.value))(o)}))})});return r.discard(r.discardUnit)(E.bindAff)(a.runProcess(E.monadRecAff)(a.pullFrom(E.monadRecAff)(o)(t.producer)))(function(){return u})})})})))(function(n){return e.pure(E.applicativeAff)(f.value1)})});if(f instanceof I.Lift)return f.value0;if(f instanceof I.Halt)return o.throwError(E.monadThrowAff)(A.error(f.value0));if(f instanceof I.GetSlots)return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(i)))(function(n){return e.pure(E.applicativeAff)(f.value0(m.map(D.functorList)(H.unOrdBox)(g.fromFoldable(M.foldableSet)(b.keys(n.children)))))});if(f instanceof I.CheckSlot)return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(i)))(function(n){return e.pure(E.applicativeAff)(f.value1(h.member(H.ordOrdBox)(n.component.mkOrdBox(f.value0))(n.children)))});if(f instanceof I.ChildQuery)return N(i)(f.value0)(f.value1);if(f instanceof I.Raise)return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(i)))(function(n){return r.discard(r.discardUnit)(E.bindAff)(k(n.handler)(n.pendingOuts)(f.value0))(function(){return e.pure(E.applicativeAff)(f.value1)})});if(f instanceof I.Par)return s.sequential(E.parallelAff)(t.retractFreeAp(E.applicativeParAff)(t.hoistFreeAp(function(n){return s.parallel(E.parallelAff)(W(i)(n))})(f.value0)));if(f instanceof I.Fork)return _.unFork(function(n){return r.bind(E.bindAff)(u.fork(u.monadForkAff)(W(i)(n.value0)))(function(t){return e.pure(E.applicativeAff)(n.value1(p.flip(E.killFiber)(t)))})})(f.value0);if(f instanceof I.GetRef)return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(i)))(function(n){return e.pure(E.applicativeAff)(f.value1(h.lookup(y.ordString)(f.value0)(n.refs)))});throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 73, column 12 - line 128, column 33): "+[f.constructor.name])}},W=function(n){return function(e){return i.foldFree(E.monadRecAff)(v(n))(e)}},R=function(n){return function(e){return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(n)))(function(t){var r=t.component.eval(e);return i.foldFree(E.monadRecAff)(v(n))(r)})}},N=function(n){return function(e){return S.unCoyoneda(function(t){return function(a){return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(n)))(function(n){var u=h.lookup(H.ordOrdBox)(n.component.mkOrdBox(e))(n.children);if(u instanceof w.Just)return r.bind(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.read(u.value0)))(function(n){return F.unDriverStateX(function(n){var e=n.prjQuery(a);if(e instanceof w.Just)return m.map(E.functorAff)(t)(R(n.selfRef)(e.value0));if(e instanceof w.Nothing)return o.throwError(E.monadThrowAff)(A.error("Query projection failed for child query"));throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 141, column 32 - line 143, column 82): "+[e.constructor.name])})(n)});if(u instanceof w.Nothing)return o.throwError(E.monadThrowAff)(A.error("Slot lookup failed for child query"));throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 138, column 5 - line 144, column 73): "+[u.constructor.name])})}})}};return function(n){if(n instanceof U.RefUpdate)return r.discard(r.discardUnit)(E.bindAff)(C.liftEffect(E.monadEffectAff)(T.modify_(function(e){return{component:e.component,state:e.state,refs:h.alter(y.ordString)(p.const(n.value1))(n.value0)(e.refs),children:e.children,childrenIn:e.childrenIn,childrenOut:e.childrenOut,selfRef:e.selfRef,handler:e.handler,pendingQueries:e.pendingQueries,pendingOuts:e.pendingOuts,pendingHandlers:e.pendingHandlers,rendering:e.rendering,prjQuery:e.prjQuery,fresh:e.fresh,subscriptions:e.subscriptions,lifecycleHandlers:e.lifecycleHandlers}})(f)))(function(){return e.pure(E.applicativeAff)(n.value2)});if(n instanceof U.Query)return R(f)(n.value0);throw new Error("Failed pattern match at Halogen.Aff.Driver.Eval (line 59, column 3 - line 64, column 25): "+[n.constructor.name])}}},n.queuingHandler=k}(PS["Halogen.Aff.Driver.Eval"]=PS["Halogen.Aff.Driver.Eval"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Bind"],r=PS["Control.Coroutine"],a=PS["Control.Monad.Fork.Class"],o=PS["Control.Monad.Rec.Class"],u=PS["Control.Parallel"],i=(PS["Control.Semigroupoid"],PS["Data.Either"]),l=PS["Data.Foldable"],c=PS["Data.Function"],f=PS["Data.Functor"],s=PS["Data.List"],d=PS["Data.List.Types"],S=(PS["Data.Map"],PS["Data.Map.Internal"]),P=PS["Data.Maybe"],v=PS["Data.Ord"],p=(PS["Data.Semiring"],PS["Data.Traversable"],PS["Data.Tuple"],PS["Data.Unit"]),m=PS.Effect,g=PS["Effect.Aff"],D=PS["Effect.Aff.AVar"],b=PS["Effect.Class"],h=PS["Effect.Console"],w=PS["Effect.Exception"],y=PS["Effect.Ref"],M=(PS.Halogen,PS["Halogen.Aff.Driver.Eval"]),E=PS["Halogen.Aff.Driver.State"],C=PS["Halogen.Component"],A=PS["Halogen.Data.OrdBox"],T=PS["Halogen.Query.InputF"],F=(PS.Prelude,y.new({initializers:d.Nil.value,finalizers:d.Nil.value})),H=g.runAff_(i.either(w.throwException)(c.const(e.pure(m.applicativeEffect)(p.unit))));n.runUI=function(n){return function(L){return function(_){var I=function(n){return function(){var e=y.read(n)();return y.write(P.Nothing.value)(n)(),l.for_(m.applicativeEffect)(l.foldableMaybe)(e)(function(n){return H(l.traverse_(g.applicativeAff)(d.foldableList)(a.fork(a.monadForkAff))(s.reverse(n)))})()}},U=function(n){return function(e){return function(r){return function(a){return C.unComponent(function(o){return function(){var i=F(),c=E.initDriverState(o)(r)(e)(a)(i)(),S=y.read(n)();return y.write({initializers:d.Nil.value,finalizers:S.finalizers})(n)(),t.bindFlipped(m.bindEffect)(E.unDriverStateX(function(e){return x(n)(e.selfRef)}))(y.read(c))(),t.bindFlipped(m.bindEffect)(function(n){return function(e){return E.unDriverStateX(function(r){var a=f.map(P.functorMaybe)(function(n){return O(r.selfRef)(T.Query.create(n))})(r.component.initializer);return y.modify_(function(n){return{initializers:new d.Cons(t.discard(t.discardUnit)(g.bindAff)(u.parSequence_(g.parallelAff)(d.foldableList)(s.reverse(n.initializers)))(function(){return t.discard(t.discardUnit)(g.bindAff)(l.sequence_(g.applicativeAff)(l.foldableMaybe)(a))(function(){return b.liftEffect(g.monadEffectAff)(function(){return I(r.pendingQueries)(),I(r.pendingOuts)()})})}),e),finalizers:n.finalizers}})(n)})}}(n)(S.initializers))(y.read(c))(),c}})}}}},x=function(r){return function(u){return function(){var i=y.read(u)(),v=f.map(m.functorEffect)(P.isNothing)(y.read(i.pendingHandlers))();e.when(m.applicativeEffect)(v)(y.write(new P.Just(d.Nil.value))(i.pendingHandlers))(),y.write(S.empty)(i.childrenOut)(),y.write(i.children)(i.childrenIn)();var D=M.queuingHandler(function(n){return f.void(g.functorAff)(O(i.selfRef)(n))})(i.pendingHandlers),b=M.queuingHandler(function(n){return D(T.Query.create(n))})(i.pendingQueries),F=n.render(function(n){return H(D(n))})(function(r){return function(a){return function(o){return function(u){return function(i){return C.unComponentSlot(function(c){return function(s){return function(d){return function(v){return function(D){return function(b){var M=o(c);return function(){var o=y.read(u)(),c=function(){var n=S.pop(A.ordOrdBox)(M)(o);if(n instanceof P.Just)return y.write(n.value0.value1)(u)(),l.for_(m.applicativeEffect)(l.foldableMaybe)(v(d))(function(e){return function(){var t=y.read(n.value0.value0)();return E.unDriverStateX(function(n){return l.for_(m.applicativeEffect)(l.foldableMaybe)(n.prjQuery(e))(function(e){return H(O(n.selfRef)(T.Query.create(e)))})})(t)()}})(),n.value0.value0;if(n instanceof P.Nothing)return U(r)(function(n){return P.maybe(e.pure(g.applicativeAff)(p.unit))(a)(D(n))})(d)(b)(s)();throw new Error("Failed pattern match at Halogen.Aff.Driver (line 258, column 14 - line 266, column 92): "+[n.constructor.name])}(),C=f.map(m.functorEffect)(S.member(A.ordOrdBox)(M))(y.read(i))();return e.when(m.applicativeEffect)(C)(h.warn("Halogen: Duplicate slot address was detected during rendering, unexpected results may occur"))(),y.modify_(S.insert(A.ordOrdBox)(M)(c))(i)(),t.bind(m.bindEffect)(y.read(c))(E.renderStateX(m.functorEffect)(function(t){if(t instanceof P.Nothing)return w.throw("Halogen internal error: child was not initialized in renderChild");if(t instanceof P.Just)return e.pure(m.applicativeEffect)(n.renderChild(t.value0));throw new Error("Failed pattern match at Halogen.Aff.Driver (line 271, column 37 - line 273, column 50): "+[t.constructor.name])}))()}}}}}}})}}}}}(r)(b)(i.component.mkOrdBox)(i.childrenIn)(i.childrenOut))(i.component.render(i.state))(i.rendering)(),L=y.read(i.childrenOut)();return t.bind(m.bindEffect)(y.read(i.childrenIn))(l.traverse_(m.applicativeEffect)(S.foldableMap)(function(e){return function(){var t=y.read(e)();return E.renderStateX_(m.applicativeEffect)(n.removeChild)(t)(),k(r)(t)()}}))(),y.modify_(function(n){return{rendering:new P.Just(F),children:L,component:n.component,state:n.state,refs:n.refs,childrenIn:n.childrenIn,childrenOut:n.childrenOut,selfRef:n.selfRef,handler:n.handler,pendingQueries:n.pendingQueries,pendingOuts:n.pendingOuts,pendingHandlers:n.pendingHandlers,prjQuery:n.prjQuery,fresh:n.fresh,subscriptions:n.subscriptions,lifecycleHandlers:n.lifecycleHandlers}})(i.selfRef)(),e.when(m.applicativeEffect)(v)(c.flip(o.tailRecM(o.monadRecEffect))(p.unit)(function(n){return function(){var n=y.read(i.pendingHandlers)();y.write(new P.Just(d.Nil.value))(i.pendingHandlers)(),l.traverse_(m.applicativeEffect)(l.foldableMaybe)(function(n){return H(l.traverse_(g.applicativeAff)(d.foldableList)(a.fork(a.monadForkAff))(s.reverse(n)))})(n)();var e=y.read(i.pendingHandlers)();return P.maybe(!1)(s.null)(e)?f.voidLeft(m.functorEffect)(y.write(P.Nothing.value)(i.pendingHandlers))(new o.Done(p.unit))():new o.Loop(p.unit)}}))()}}},k=function(n){return E.unDriverStateX(function(e){return function(){var r;return(r=e,function(){return t.bindFlipped(m.bindEffect)(l.traverse_(m.applicativeEffect)(l.foldableMaybe)(function(n){return H(l.traverse_(g.applicativeAff)(S.foldableMap)(a.fork(a.monadForkAff))(n))}))(y.read(r.subscriptions))(),y.write(P.Nothing.value)(r.subscriptions)()})(),l.for_(m.applicativeEffect)(l.foldableMaybe)(f.map(P.functorMaybe)(function(n){return O(e.selfRef)(T.Query.create(n))})(e.component.finalizer))(function(e){return y.modify_(function(n){return{initializers:n.initializers,finalizers:new d.Cons(e,n.finalizers)}})(n)})(),l.for_(m.applicativeEffect)(S.foldableMap)(e.children)(t.composeKleisliFlipped(m.bindEffect)(k(n))(y.read))()}})},O=function(n){return M.eval(x)(n)};return t.bind(g.bindAff)(b.liftEffect(g.monadEffectAff)(F))(function(n){return t.bind(g.bindAff)(b.liftEffect(g.monadEffectAff)(y.new(0)))(function(o){return M.handleLifecycle(n)(function(){var u,c=y.new(S.empty)();return t.bind(m.bindEffect)(t.bind(m.bindEffect)(U(n)((u=c,function(n){return t.bind(g.bindAff)(b.liftEffect(g.monadEffectAff)(y.read(u)))(function(e){return l.traverse_(g.applicativeAff)(S.foldableMap)(a.fork(a.monadForkAff))(f.map(S.functorMap)(D.put(n))(e))})}))(_)(P.Just.create)(L))(y.read))(E.unDriverStateX(function(n){return e.pure(m.applicativeEffect)({query:(l=n.selfRef,function(n){return function(e){var t=n(e);if(t instanceof P.Just)return O(l)(new T.Query(t.value0));if(t instanceof P.Nothing)return b.liftEffect(g.monadEffectAff)(w.throwException(w.error("Halogen internal error: query projection failed in runUI'")));throw new Error("Failed pattern match at Halogen.Aff.Driver (line 136, column 5 - line 138, column 113): "+[t.constructor.name])}})(n.prjQuery),subscribe:(u=o,function(n){return function(e){return t.bind(g.bindAff)(D.empty)(function(o){return t.bind(g.bindAff)(b.liftEffect(g.monadEffectAff)(function(){var e=y.read(u)();return y.modify_(function(n){return n+1|0})(u)(),y.modify_(S.insert(v.ordInt)(e)(o))(n)(),e}))(function(u){var l=r.producer(g.monadAff)(f.map(g.functorAff)(i.Left.create)(D.take(o)));return f.void(g.functorAff)(a.fork(a.monadForkAff)(t.discard(t.discardUnit)(g.bindAff)(r.runProcess(g.monadRecAff)(r.connect(g.monadRecAff)(g.parallelAff)(l)(e)))(function(){return t.discard(t.discardUnit)(g.bindAff)(b.liftEffect(g.monadEffectAff)(y.modify_(S.delete(v.ordInt)(u))(n)))(function(){return D.kill(w.error("ended"))(o)})})))})})}})(c)});var u,l}))()})})})}}}}(PS["Halogen.Aff.Driver"]=PS["Halogen.Aff.Driver"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Bind"],r=(PS["Control.Monad.Error.Class"],PS["Control.Semigroupoid"],PS["Data.Either"]),a=PS["Data.Function"],o=(PS["Data.Functor"],PS["Data.Maybe"]),u=PS["Data.Unit"],i=PS.Effect,l=PS["Effect.Aff"],c=PS["Effect.Class"],f=PS["Effect.Exception"],s=(PS.Prelude,PS["Web.DOM.ParentNode"]),d=(PS["Web.Event.EventTarget"],PS["Web.HTML"]),S=(PS["Web.HTML.Event.EventTypes"],PS["Web.HTML.HTMLDocument"]),P=(PS["Web.HTML.HTMLDocument.ReadyState"],PS["Web.HTML.HTMLElement"]),v=PS["Web.HTML.Window"],p=l.runAff_(r.either(f.throwException)(a.const(e.pure(i.applicativeEffect)(u.unit))));n.selectElement=function(n){return t.bind(l.bindAff)(c.liftEffect(l.monadEffectAff)(t.bindFlipped(i.bindEffect)(t.composeKleisliFlipped(i.bindEffect)(function(e){return s.querySelector(n)(S.toParentNode(e))})(v.document))(d.window)))(function(n){return e.pure(l.applicativeAff)(t.bindFlipped(o.bindMaybe)(P.fromElement)(n))})},n.runHalogenAff=p}(PS["Halogen.Aff.Util"]=PS["Halogen.Aff.Util"]||{}),function(n){"use strict";PS["Control.Applicative"],PS["Control.Bind"];var e,t=PS["Data.Array"],r=(PS["Data.Eq"],PS["Data.Function.Uncurried"],PS["Data.Maybe"]),a=PS["Data.Nullable"],o=PS["Data.Tuple"],u=PS.Effect,i=(PS["Effect.Uncurried"],PS["Halogen.VDom.Machine"]),l=PS["Halogen.VDom.Types"],c=PS["Halogen.VDom.Util"],f=(PS.Prelude,PS["Web.DOM.Document"],PS["Web.DOM.Element"]),s=(PS["Web.DOM.Node"],function(n,e){return n.value1===e.value1&&(n.value0 instanceof r.Just&&e.value0 instanceof r.Just&&n.value0.value0===e.value0.value0||n.value0 instanceof r.Nothing&&e.value0 instanceof r.Nothing)}),d=(e=function(n,t){return function(r){if(r instanceof l.Grafted)return e(n,t)(l.runGraft(r.value0));if(r instanceof l.Widget){var a=t.value1(r.value0);return new i.Step(a.value0,e(n,a),a.value2)}return t.value2(),n(r)}},function(n,t,r){var a=n.buildWidget(n)(r);return new i.Step(a.value0,e(t,a),a.value2)}),S=function(){var n=function(e,t,r,a){return function(o){if(o instanceof l.Grafted)return n(e,t,r,a)(l.runGraft(o.value0));if(o instanceof l.Text){var u=new i.Step(r,n(e,t,r,o.value0),t);return a===o.value0?u:(c.setTextContent(o.value0,r),u)}return t(),e(o)}};return function(e,t,r){var a,o=c.createTextNode(r,e.document),u=(a=o,function(){var n=c.parentNode(a);return c.removeChild(a,n)});return new i.Step(o,n(t,u,o,r),u)}}(),P=function(){var n=function(n,e,t){return function(){var r=c.parentNode(n);return c.removeChild(n,r),c.forInE(t,function(n,e){return e.value2()}),i.halt(e)()}},e=function(r,a,u,f,d,S,P){return function(v){if(v instanceof l.Grafted)return e(r,a,u,f,d,S,P)(l.runGraft(v.value0));if(v instanceof l.Keyed&&s(d,v.value0)){var p=t.length(v.value1);if(0===P&&0===p){var m=i.step(f)(v.value0.value2),g=n(u,m,S);return new i.Step(u,e(r,g,u,m,v.value0,S,0),g)}m=c.diffWithKeyAndIxE(S,v.value1,o.fst,function(n,e,t,r){var a=t.value1(r.value1);return c.insertChildIx(e,a.value0,u),a},function(n,e){return e.value2()},function(n,e,t){var a=r(t.value1);return c.insertChildIx(e,a.value0,u),a});var D=i.step(f)(v.value0.value2);g=n(u,D,m);return new i.Step(u,e(r,g,u,D,v.value0,m,p),g)}return a(),r(v)}};return function(r,u,l,s){var d=c.createElement(a.toNullable(l.value0),l.value1,r.document),S=f.toNode(d),P=c.strMapWithIxE(s,o.fst,function(n,e,t){var r=u(t.value1);return c.insertChildIx(e,r.value0,S),r}),v=r.buildAttributes(d)(l.value2),p=n(S,v,P);return new i.Step(S,e(u,p,S,v,l,P,t.length(s)),p)}}(),v=function(){var n=function(n,e,t){return function(){var r=c.parentNode(n);return c.removeChild(n,r),u.foreachE(t)(i.halt)(),i.halt(e)()}},e=function(r,a,o,u,f,d){return function(S){if(S instanceof l.Grafted)return e(r,a,o,u,f,d)(l.runGraft(S.value0));if(S instanceof l.Elem&&s(f,S.value0)){var P=t.length(S.value1);if(0===t.length(d)&&0===P){var v=i.step(u)(S.value0.value2),p=n(o,v,d);return new i.Step(o,e(r,p,o,v,S.value0,d),p)}v=c.diffWithIxE(d,S.value1,function(n,e,t){var r=e.value1(t);return c.insertChildIx(n,r.value0,o),r},function(n,e){return e.value2()},function(n,e){var t=r(e);return c.insertChildIx(n,t.value0,o),t});var m=i.step(u)(S.value0.value2);p=n(o,m,v);return new i.Step(o,e(r,p,o,m,S.value0,v),p)}return a(),r(S)}};return function(t,r,o,u){var l=c.createElement(a.toNullable(o.value0),o.value1,t.document),s=f.toNode(l),d=c.forE(u,function(n,e){var t=r(e);return c.insertChildIx(n,t.value0,s),t}),S=t.buildAttributes(l)(o.value2),P=n(s,S,d);return new i.Step(s,e(r,P,s,S,o,d),P)}}();n.buildVDom=function(n){var e=function(t){if(t instanceof l.Text)return S(n,e,t.value0);if(t instanceof l.Elem)return v(n,e,t.value0,t.value1);if(t instanceof l.Keyed)return P(n,e,t.value0,t.value1);if(t instanceof l.Widget)return d(n,e,t.value0);if(t instanceof l.Grafted)return e(l.runGraft(t.value0));throw new Error("Failed pattern match at Halogen.VDom.DOM (line 58, column 27 - line 63, column 52): "+[t.constructor.name])};return e},n.buildText=S,n.buildElem=v,n.buildKeyed=P,n.buildWidget=d}(PS["Halogen.VDom.DOM"]=PS["Halogen.VDom.DOM"]||{}),function(n){"use strict";var e=PS["Control.Applicative"],t=PS["Control.Bind"],r=PS["Control.Category"],a=PS["Data.Foldable"],o=(PS["Data.Function"],PS["Data.Functor"]),u=PS["Data.HeytingAlgebra"],i=PS["Data.Maybe"],l=PS["Data.Unit"],c=PS.Effect,f=PS["Effect.Aff"],s=PS["Effect.Class"],d=PS["Effect.Ref"],S=(PS["Effect.Uncurried"],PS["Halogen.Aff.Driver"]),P=PS["Halogen.Aff.Driver.State"],v=(PS["Halogen.Component"],PS["Halogen.HTML.Core"],PS["Halogen.Query.InputF"],PS["Halogen.VDom"],PS["Halogen.VDom.DOM"]),p=PS["Halogen.VDom.DOM.Prop"],m=PS["Halogen.VDom.Machine"],g=(PS.Prelude,PS["Unsafe.Reference"]),D=(PS["Web.DOM.Document"],PS["Web.DOM.Element"],PS["Web.DOM.Node"]),b=PS["Web.HTML"],h=PS["Web.HTML.HTMLDocument"],w=PS["Web.HTML.HTMLElement"],y=PS["Web.HTML.Window"],M=function(n){return function(){var e=D.parentNode(n.node)();return a.traverse_(c.applicativeEffect)(a.foldableMaybe)(function(e){return D.removeChild(n.node)(e)})(e)()}},E=function(n){return function(t){return{render:function(r){return function(a){return function(f){return function(s){if(s instanceof i.Nothing)return function(){var u=d.new(a)(),i=function(n){return function(t){return function(r){var a=P.unRenderStateX(function(n){return n.node}),o=e.pure(c.applicativeEffect)(l.unit),u=function(n){var e=d.read(t)()(n)(),r=a(e);return new m.Step(r,u,o)};return{buildWidget:function(n){return function(n){var e=d.read(t)()(n)(),r=a(e);return new m.Step(r,u,o)}},buildAttributes:p.buildProp(n),document:r}}}}(r)(u)(n),s=v.buildVDom(i)(f),S=m.extract(s);return o.void(c.functorEffect)(D.appendChild(S)(w.toNode(t)))(),{machine:s,node:S,renderChildRef:u}};if(s instanceof i.Just)return function(){d.write(a)(s.value0.renderChildRef)();var n=D.parentNode(s.value0.node)(),t=D.nextSibling(s.value0.node)(),r=m.step(s.value0.machine)(f),S=m.extract(r);return e.when(c.applicativeEffect)(u.not(u.heytingAlgebraFunction(u.heytingAlgebraFunction(u.heytingAlgebraBoolean)))(g.unsafeRefEq)(s.value0.node)(S))(function(n){return function(t){return function(r){return t instanceof i.Just&&r instanceof i.Just?o.void(c.functorEffect)(D.insertBefore(n)(t.value0)(r.value0)):t instanceof i.Nothing&&r instanceof i.Just?o.void(c.functorEffect)(D.appendChild(n)(r.value0)):e.pure(c.applicativeEffect)(l.unit)}}}(S)(t)(n))(),{machine:r,node:S,renderChildRef:s.value0.renderChildRef}};throw new Error("Failed pattern match at Halogen.VDom.Driver (line 118, column 5 - line 134, column 80): "+[s.constructor.name])}}}},renderChild:r.identity(r.categoryFn),removeChild:M}}};n.runUI=function(n){return function(e){return function(r){return t.bind(f.bindAff)(s.liftEffect(f.monadEffectAff)(o.map(c.functorEffect)(h.toDocument)(t.bindFlipped(c.bindEffect)(y.document)(b.window))))(function(t){return S.runUI(E(t)(r))(n)(e)})}}}}(PS["Halogen.VDom.Driver"]=PS["Halogen.VDom.Driver"]||{}),function(n){"use strict";var e=PS.App,t=PS["Component.AccountSettings"],r=PS["Component.Add"],a=PS["Component.BList"],o=PS["Component.NList"],u=PS["Component.NNote"],i=PS["Control.Applicative"],l=PS["Control.Bind"],c=(PS["Control.Semigroupoid"],PS["Data.Foldable"]),f=(PS["Data.Function"],PS["Data.Functor"]),s=PS["Data.Unit"],d=PS.Effect,S=PS["Effect.Aff"],P=PS["Effect.Class"],v=(PS["Halogen.Aff"],PS["Halogen.Aff.Util"]),p=PS["Halogen.VDom.Driver"],m=(PS.Model,PS.Prelude,PS["Web.DOM.Element"]),g=(PS["Web.DOM.ParentNode"],PS["Web.Event.Event"]),D=PS["Web.HTML.HTMLElement"],b=l.bind(S.bindAff)(v.selectElement(".user_footer"))(c.traverse_(S.applicativeAff)(c.foldableMaybe)(function(n){return P.liftEffect(S.monadEffectAff)(m.removeAttribute("hidden")(D.toElement(n)))})),h=i.pure(d.applicativeEffect)(s.unit);n.main=h,n.logoutE=function(n){return l.bindFlipped(d.bindEffect)(function(n){return f.void(d.functorEffect)(S.launchAff(e.logout(n)))})(g.preventDefault(n))},n.renderBookmarks=function(n){return function(e){return v.runHalogenAff(l.bind(S.bindAff)(v.selectElement(n))(c.traverse_(S.applicativeAff)(c.foldableMaybe)(function(n){return l.discard(l.discardUnit)(S.bindAff)(f.void(S.functorAff)(p.runUI(a.blist(e))(s.unit)(n)))(function(){return b})})))}},n.renderAddForm=function(n){return function(e){return v.runHalogenAff(l.bind(S.bindAff)(v.selectElement(n))(c.traverse_(S.applicativeAff)(c.foldableMaybe)(function(n){return p.runUI(r.addbmark(e))(s.unit)(n)})))}},n.renderNotes=function(n){return function(e){return v.runHalogenAff(l.bind(S.bindAff)(v.selectElement(n))(c.traverse_(S.applicativeAff)(c.foldableMaybe)(function(n){return l.discard(l.discardUnit)(S.bindAff)(f.void(S.functorAff)(p.runUI(o.nlist(e))(s.unit)(n)))(function(){return b})})))}},n.renderNote=function(n){return function(e){return v.runHalogenAff(l.bind(S.bindAff)(v.selectElement(n))(c.traverse_(S.applicativeAff)(c.foldableMaybe)(function(n){return f.void(S.functorAff)(p.runUI(u.nnote(e))(s.unit)(n))})))}},n.renderAccountSettings=function(n){return function(e){return v.runHalogenAff(l.bind(S.bindAff)(v.selectElement(n))(c.traverse_(S.applicativeAff)(c.foldableMaybe)(function(n){return f.void(S.functorAff)(p.runUI(t.usetting(e))(s.unit)(n))})))}},n.showFooter=b}(PS.Main=PS.Main||{}),PS.Main.main();
static/js/app.min.js.gz view
binary file changed (46869 → 48172 bytes)
+ static/js/marked.min.js view
@@ -0,0 +1,6 @@+/**+ * marked - a markdown parser+ * Copyright (c) 2011-2018, Christopher Jeffrey. (MIT Licensed)+ * https://github.com/markedjs/marked+ */+!function(e){"use strict";var k={newline:/^\n+/,code:/^( {4}[^\n]+\n*)+/,fences:f,hr:/^ {0,3}((?:- *){3,}|(?:_ *){3,}|(?:\* *){3,})(?:\n+|$)/,heading:/^ *(#{1,6}) *([^\n]+?) *(?:#+ *)?(?:\n+|$)/,nptable:f,blockquote:/^( {0,3}> ?(paragraph|[^\n]*)(?:\n|$))+/,list:/^( {0,3})(bull) [\s\S]+?(?:hr|def|\n{2,}(?! )(?!\1bull )\n*|\s*$)/,html:"^ {0,3}(?:<(script|pre|style)[\\s>][\\s\\S]*?(?:</\\1>[^\\n]*\\n+|$)|comment[^\\n]*(\\n+|$)|<\\?[\\s\\S]*?\\?>\\n*|<![A-Z][\\s\\S]*?>\\n*|<!\\[CDATA\\[[\\s\\S]*?\\]\\]>\\n*|</?(tag)(?: +|\\n|/?>)[\\s\\S]*?(?:\\n{2,}|$)|<(?!script|pre|style)([a-z][\\w-]*)(?:attribute)*? */?>(?=\\h*\\n)[\\s\\S]*?(?:\\n{2,}|$)|</(?!script|pre|style)[a-z][\\w-]*\\s*>(?=\\h*\\n)[\\s\\S]*?(?:\\n{2,}|$))",def:/^ {0,3}\[(label)\]: *\n? *<?([^\s>]+)>?(?:(?: +\n? *| *\n *)(title))? *(?:\n+|$)/,table:f,lheading:/^([^\n]+)\n *(=|-){2,} *(?:\n+|$)/,paragraph:/^([^\n]+(?:\n(?!hr|heading|lheading| {0,3}>|<\/?(?:tag)(?: +|\n|\/?>)|<(?:script|pre|style|!--))[^\n]+)*)/,text:/^[^\n]+/};function a(e){this.tokens=[],this.tokens.links=Object.create(null),this.options=e||m.defaults,this.rules=k.normal,this.options.pedantic?this.rules=k.pedantic:this.options.gfm&&(this.options.tables?this.rules=k.tables:this.rules=k.gfm)}k._label=/(?!\s*\])(?:\\[\[\]]|[^\[\]])+/,k._title=/(?:"(?:\\"?|[^"\\])*"|'[^'\n]*(?:\n[^'\n]+)*\n?'|\([^()]*\))/,k.def=i(k.def).replace("label",k._label).replace("title",k._title).getRegex(),k.bullet=/(?:[*+-]|\d{1,9}\.)/,k.item=/^( *)(bull) ?[^\n]*(?:\n(?!\1bull ?)[^\n]*)*/,k.item=i(k.item,"gm").replace(/bull/g,k.bullet).getRegex(),k.list=i(k.list).replace(/bull/g,k.bullet).replace("hr","\\n+(?=\\1?(?:(?:- *){3,}|(?:_ *){3,}|(?:\\* *){3,})(?:\\n+|$))").replace("def","\\n+(?="+k.def.source+")").getRegex(),k._tag="address|article|aside|base|basefont|blockquote|body|caption|center|col|colgroup|dd|details|dialog|dir|div|dl|dt|fieldset|figcaption|figure|footer|form|frame|frameset|h[1-6]|head|header|hr|html|iframe|legend|li|link|main|menu|menuitem|meta|nav|noframes|ol|optgroup|option|p|param|section|source|summary|table|tbody|td|tfoot|th|thead|title|tr|track|ul",k._comment=/<!--(?!-?>)[\s\S]*?-->/,k.html=i(k.html,"i").replace("comment",k._comment).replace("tag",k._tag).replace("attribute",/ +[a-zA-Z:_][\w.:-]*(?: *= *"[^"\n]*"| *= *'[^'\n]*'| *= *[^\s"'=<>`]+)?/).getRegex(),k.paragraph=i(k.paragraph).replace("hr",k.hr).replace("heading",k.heading).replace("lheading",k.lheading).replace("tag",k._tag).getRegex(),k.blockquote=i(k.blockquote).replace("paragraph",k.paragraph).getRegex(),k.normal=d({},k),k.gfm=d({},k.normal,{fences:/^ {0,3}(`{3,}|~{3,})([^`\n]*)\n(?:|([\s\S]*?)\n)(?: {0,3}\1[~`]* *(?:\n+|$)|$)/,paragraph:/^/,heading:/^ *(#{1,6}) +([^\n]+?) *#* *(?:\n+|$)/}),k.gfm.paragraph=i(k.paragraph).replace("(?!","(?!"+k.gfm.fences.source.replace("\\1","\\2")+"|"+k.list.source.replace("\\1","\\3")+"|").getRegex(),k.tables=d({},k.gfm,{nptable:/^ *([^|\n ].*\|.*)\n *([-:]+ *\|[-| :]*)(?:\n((?:.*[^>\n ].*(?:\n|$))*)\n*|$)/,table:/^ *\|(.+)\n *\|?( *[-:]+[-| :]*)(?:\n((?: *[^>\n ].*(?:\n|$))*)\n*|$)/}),k.pedantic=d({},k.normal,{html:i("^ *(?:comment *(?:\\n|\\s*$)|<(tag)[\\s\\S]+?</\\1> *(?:\\n{2,}|\\s*$)|<tag(?:\"[^\"]*\"|'[^']*'|\\s[^'\"/>\\s]*)*?/?> *(?:\\n{2,}|\\s*$))").replace("comment",k._comment).replace(/tag/g,"(?!(?:a|em|strong|small|s|cite|q|dfn|abbr|data|time|code|var|samp|kbd|sub|sup|i|b|u|mark|ruby|rt|rp|bdi|bdo|span|br|wbr|ins|del|img)\\b)\\w+(?!:|[^\\w\\s@]*@)\\b").getRegex(),def:/^ *\[([^\]]+)\]: *<?([^\s>]+)>?(?: +(["(][^\n]+[")]))? *(?:\n+|$)/}),a.rules=k,a.lex=function(e,t){return new a(t).lex(e)},a.prototype.lex=function(e){return e=e.replace(/\r\n|\r/g,"\n").replace(/\t/g," ").replace(/\u00a0/g," ").replace(/\u2424/g,"\n"),this.token(e,!0)},a.prototype.token=function(e,t){var n,r,s,i,l,o,a,h,p,u,c,g,f,d,m,b;for(e=e.replace(/^ +$/gm,"");e;)if((s=this.rules.newline.exec(e))&&(e=e.substring(s[0].length),1<s[0].length&&this.tokens.push({type:"space"})),s=this.rules.code.exec(e))e=e.substring(s[0].length),s=s[0].replace(/^ {4}/gm,""),this.tokens.push({type:"code",text:this.options.pedantic?s:y(s,"\n")});else if(s=this.rules.fences.exec(e))e=e.substring(s[0].length),this.tokens.push({type:"code",lang:s[2]?s[2].trim():s[2],text:s[3]||""});else if(s=this.rules.heading.exec(e))e=e.substring(s[0].length),this.tokens.push({type:"heading",depth:s[1].length,text:s[2]});else if(t&&(s=this.rules.nptable.exec(e))&&(o={type:"table",header:x(s[1].replace(/^ *| *\| *$/g,"")),align:s[2].replace(/^ *|\| *$/g,"").split(/ *\| */),cells:s[3]?s[3].replace(/\n$/,"").split("\n"):[]}).header.length===o.align.length){for(e=e.substring(s[0].length),c=0;c<o.align.length;c++)/^ *-+: *$/.test(o.align[c])?o.align[c]="right":/^ *:-+: *$/.test(o.align[c])?o.align[c]="center":/^ *:-+ *$/.test(o.align[c])?o.align[c]="left":o.align[c]=null;for(c=0;c<o.cells.length;c++)o.cells[c]=x(o.cells[c],o.header.length);this.tokens.push(o)}else if(s=this.rules.hr.exec(e))e=e.substring(s[0].length),this.tokens.push({type:"hr"});else if(s=this.rules.blockquote.exec(e))e=e.substring(s[0].length),this.tokens.push({type:"blockquote_start"}),s=s[0].replace(/^ *> ?/gm,""),this.token(s,t),this.tokens.push({type:"blockquote_end"});else if(s=this.rules.list.exec(e)){for(e=e.substring(s[0].length),a={type:"list_start",ordered:d=1<(i=s[2]).length,start:d?+i:"",loose:!1},this.tokens.push(a),n=!(h=[]),f=(s=s[0].match(this.rules.item)).length,c=0;c<f;c++)u=(o=s[c]).length,~(o=o.replace(/^ *([*+-]|\d+\.) */,"")).indexOf("\n ")&&(u-=o.length,o=this.options.pedantic?o.replace(/^ {1,4}/gm,""):o.replace(new RegExp("^ {1,"+u+"}","gm"),"")),c!==f-1&&(l=k.bullet.exec(s[c+1])[0],(1<i.length?1===l.length:1<l.length||this.options.smartLists&&l!==i)&&(e=s.slice(c+1).join("\n")+e,c=f-1)),r=n||/\n\n(?!\s*$)/.test(o),c!==f-1&&(n="\n"===o.charAt(o.length-1),r||(r=n)),r&&(a.loose=!0),b=void 0,(m=/^\[[ xX]\] /.test(o))&&(b=" "!==o[1],o=o.replace(/^\[[ xX]\] +/,"")),p={type:"list_item_start",task:m,checked:b,loose:r},h.push(p),this.tokens.push(p),this.token(o,!1),this.tokens.push({type:"list_item_end"});if(a.loose)for(f=h.length,c=0;c<f;c++)h[c].loose=!0;this.tokens.push({type:"list_end"})}else if(s=this.rules.html.exec(e))e=e.substring(s[0].length),this.tokens.push({type:this.options.sanitize?"paragraph":"html",pre:!this.options.sanitizer&&("pre"===s[1]||"script"===s[1]||"style"===s[1]),text:s[0]});else if(t&&(s=this.rules.def.exec(e)))e=e.substring(s[0].length),s[3]&&(s[3]=s[3].substring(1,s[3].length-1)),g=s[1].toLowerCase().replace(/\s+/g," "),this.tokens.links[g]||(this.tokens.links[g]={href:s[2],title:s[3]});else if(t&&(s=this.rules.table.exec(e))&&(o={type:"table",header:x(s[1].replace(/^ *| *\| *$/g,"")),align:s[2].replace(/^ *|\| *$/g,"").split(/ *\| */),cells:s[3]?s[3].replace(/(?: *\| *)?\n$/,"").split("\n"):[]}).header.length===o.align.length){for(e=e.substring(s[0].length),c=0;c<o.align.length;c++)/^ *-+: *$/.test(o.align[c])?o.align[c]="right":/^ *:-+: *$/.test(o.align[c])?o.align[c]="center":/^ *:-+ *$/.test(o.align[c])?o.align[c]="left":o.align[c]=null;for(c=0;c<o.cells.length;c++)o.cells[c]=x(o.cells[c].replace(/^ *\| *| *\| *$/g,""),o.header.length);this.tokens.push(o)}else if(s=this.rules.lheading.exec(e))e=e.substring(s[0].length),this.tokens.push({type:"heading",depth:"="===s[2]?1:2,text:s[1]});else if(t&&(s=this.rules.paragraph.exec(e)))e=e.substring(s[0].length),this.tokens.push({type:"paragraph",text:"\n"===s[1].charAt(s[1].length-1)?s[1].slice(0,-1):s[1]});else if(s=this.rules.text.exec(e))e=e.substring(s[0].length),this.tokens.push({type:"text",text:s[0]});else if(e)throw new Error("Infinite loop on byte: "+e.charCodeAt(0));return this.tokens};var n={escape:/^\\([!"#$%&'()*+,\-./:;<=>?@\[\]\\^_`{|}~])/,autolink:/^<(scheme:[^\s\x00-\x1f<>]*|email)>/,url:f,tag:"^comment|^</[a-zA-Z][\\w:-]*\\s*>|^<[a-zA-Z][\\w-]*(?:attribute)*?\\s*/?>|^<\\?[\\s\\S]*?\\?>|^<![a-zA-Z]+\\s[\\s\\S]*?>|^<!\\[CDATA\\[[\\s\\S]*?\\]\\]>",link:/^!?\[(label)\]\(href(?:\s+(title))?\s*\)/,reflink:/^!?\[(label)\]\[(?!\s*\])((?:\\[\[\]]?|[^\[\]\\])+)\]/,nolink:/^!?\[(?!\s*\])((?:\[[^\[\]]*\]|\\[\[\]]|[^\[\]])*)\](?:\[\])?/,strong:/^__([^\s_])__(?!_)|^\*\*([^\s*])\*\*(?!\*)|^__([^\s][\s\S]*?[^\s])__(?!_)|^\*\*([^\s][\s\S]*?[^\s])\*\*(?!\*)/,em:/^_([^\s_])_(?!_)|^\*([^\s*"<\[])\*(?!\*)|^_([^\s][\s\S]*?[^\s_])_(?!_|[^\spunctuation])|^_([^\s_][\s\S]*?[^\s])_(?!_|[^\spunctuation])|^\*([^\s"<\[][\s\S]*?[^\s*])\*(?!\*)|^\*([^\s*"<\[][\s\S]*?[^\s])\*(?!\*)/,code:/^(`+)([^`]|[^`][\s\S]*?[^`])\1(?!`)/,br:/^( {2,}|\\)\n(?!\s*$)/,del:f,text:/^(`+|[^`])[\s\S]*?(?=[\\<!\[`*]|\b_| {2,}\n|$)/};function h(e,t){if(this.options=t||m.defaults,this.links=e,this.rules=n.normal,this.renderer=this.options.renderer||new r,this.renderer.options=this.options,!this.links)throw new Error("Tokens array requires a `links` property.");this.options.pedantic?this.rules=n.pedantic:this.options.gfm&&(this.options.breaks?this.rules=n.breaks:this.rules=n.gfm)}function r(e){this.options=e||m.defaults}function s(){}function p(e){this.tokens=[],this.token=null,this.options=e||m.defaults,this.options.renderer=this.options.renderer||new r,this.renderer=this.options.renderer,this.renderer.options=this.options,this.slugger=new t}function t(){this.seen={}}function u(e,t){if(t){if(u.escapeTest.test(e))return e.replace(u.escapeReplace,function(e){return u.replacements[e]})}else if(u.escapeTestNoEncode.test(e))return e.replace(u.escapeReplaceNoEncode,function(e){return u.replacements[e]});return e}function c(e){return e.replace(/&(#(?:\d+)|(?:#x[0-9A-Fa-f]+)|(?:\w+));?/gi,function(e,t){return"colon"===(t=t.toLowerCase())?":":"#"===t.charAt(0)?"x"===t.charAt(1)?String.fromCharCode(parseInt(t.substring(2),16)):String.fromCharCode(+t.substring(1)):""})}function i(n,e){return n=n.source||n,e=e||"",{replace:function(e,t){return t=(t=t.source||t).replace(/(^|[^\[])\^/g,"$1"),n=n.replace(e,t),this},getRegex:function(){return new RegExp(n,e)}}}function l(e,t,n){if(e){try{var r=decodeURIComponent(c(n)).replace(/[^\w:]/g,"").toLowerCase()}catch(e){return null}if(0===r.indexOf("javascript:")||0===r.indexOf("vbscript:")||0===r.indexOf("data:"))return null}t&&!g.test(n)&&(n=function(e,t){o[" "+e]||(/^[^:]+:\/*[^/]*$/.test(e)?o[" "+e]=e+"/":o[" "+e]=y(e,"/",!0));return e=o[" "+e],"//"===t.slice(0,2)?e.replace(/:[\s\S]*/,":")+t:"/"===t.charAt(0)?e.replace(/(:\/*[^/]*)[\s\S]*/,"$1")+t:e+t}(t,n));try{n=encodeURI(n).replace(/%25/g,"%")}catch(e){return null}return n}n._punctuation="!\"#$%&'()*+,\\-./:;<=>?@\\[^_{|}~",n.em=i(n.em).replace(/punctuation/g,n._punctuation).getRegex(),n._escapes=/\\([!"#$%&'()*+,\-./:;<=>?@\[\]\\^_`{|}~])/g,n._scheme=/[a-zA-Z][a-zA-Z0-9+.-]{1,31}/,n._email=/[a-zA-Z0-9.!#$%&'*+/=?^_`{|}~-]+(@)[a-zA-Z0-9](?:[a-zA-Z0-9-]{0,61}[a-zA-Z0-9])?(?:\.[a-zA-Z0-9](?:[a-zA-Z0-9-]{0,61}[a-zA-Z0-9])?)+(?![-_])/,n.autolink=i(n.autolink).replace("scheme",n._scheme).replace("email",n._email).getRegex(),n._attribute=/\s+[a-zA-Z:_][\w.:-]*(?:\s*=\s*"[^"]*"|\s*=\s*'[^']*'|\s*=\s*[^\s"'=<>`]+)?/,n.tag=i(n.tag).replace("comment",k._comment).replace("attribute",n._attribute).getRegex(),n._label=/(?:\[[^\[\]]*\]|\\[\[\]]?|`[^`]*`|[^\[\]\\])*?/,n._href=/\s*(<(?:\\[<>]?|[^\s<>\\])*>|(?:\\[()]?|\([^\s\x00-\x1f\\]*\)|[^\s\x00-\x1f()\\])*?)/,n._title=/"(?:\\"?|[^"\\])*"|'(?:\\'?|[^'\\])*'|\((?:\\\)?|[^)\\])*\)/,n.link=i(n.link).replace("label",n._label).replace("href",n._href).replace("title",n._title).getRegex(),n.reflink=i(n.reflink).replace("label",n._label).getRegex(),n.normal=d({},n),n.pedantic=d({},n.normal,{strong:/^__(?=\S)([\s\S]*?\S)__(?!_)|^\*\*(?=\S)([\s\S]*?\S)\*\*(?!\*)/,em:/^_(?=\S)([\s\S]*?\S)_(?!_)|^\*(?=\S)([\s\S]*?\S)\*(?!\*)/,link:i(/^!?\[(label)\]\((.*?)\)/).replace("label",n._label).getRegex(),reflink:i(/^!?\[(label)\]\s*\[([^\]]*)\]/).replace("label",n._label).getRegex()}),n.gfm=d({},n.normal,{escape:i(n.escape).replace("])","~|])").getRegex(),_extended_email:/[A-Za-z0-9._+-]+(@)[a-zA-Z0-9-_]+(?:\.[a-zA-Z0-9-_]*[a-zA-Z0-9])+(?![-_])/,url:/^((?:ftp|https?):\/\/|www\.)(?:[a-zA-Z0-9\-]+\.?)+[^\s<]*|^email/,_backpedal:/(?:[^?!.,:;*_~()&]+|\([^)]*\)|&(?![a-zA-Z0-9]+;$)|[?!.,:;*_~)]+(?!$))+/,del:/^~+(?=\S)([\s\S]*?\S)~+/,text:i(n.text).replace("]|","~]|").replace("|$","|https?://|ftp://|www\\.|[a-zA-Z0-9.!#$%&'*+/=?^_`{\\|}~-]+@|$").getRegex()}),n.gfm.url=i(n.gfm.url,"i").replace("email",n.gfm._extended_email).getRegex(),n.breaks=d({},n.gfm,{br:i(n.br).replace("{2,}","*").getRegex(),text:i(n.gfm.text).replace("{2,}","*").getRegex()}),h.rules=n,h.output=function(e,t,n){return new h(t,n).output(e)},h.prototype.output=function(e){for(var t,n,r,s,i,l,o="";e;)if(i=this.rules.escape.exec(e))e=e.substring(i[0].length),o+=u(i[1]);else if(i=this.rules.tag.exec(e))!this.inLink&&/^<a /i.test(i[0])?this.inLink=!0:this.inLink&&/^<\/a>/i.test(i[0])&&(this.inLink=!1),!this.inRawBlock&&/^<(pre|code|kbd|script)(\s|>)/i.test(i[0])?this.inRawBlock=!0:this.inRawBlock&&/^<\/(pre|code|kbd|script)(\s|>)/i.test(i[0])&&(this.inRawBlock=!1),e=e.substring(i[0].length),o+=this.options.sanitize?this.options.sanitizer?this.options.sanitizer(i[0]):u(i[0]):i[0];else if(i=this.rules.link.exec(e))e=e.substring(i[0].length),this.inLink=!0,r=i[2],this.options.pedantic?(t=/^([^'"]*[^\s])\s+(['"])(.*)\2/.exec(r))?(r=t[1],s=t[3]):s="":s=i[3]?i[3].slice(1,-1):"",r=r.trim().replace(/^<([\s\S]*)>$/,"$1"),o+=this.outputLink(i,{href:h.escapes(r),title:h.escapes(s)}),this.inLink=!1;else if((i=this.rules.reflink.exec(e))||(i=this.rules.nolink.exec(e))){if(e=e.substring(i[0].length),t=(i[2]||i[1]).replace(/\s+/g," "),!(t=this.links[t.toLowerCase()])||!t.href){o+=i[0].charAt(0),e=i[0].substring(1)+e;continue}this.inLink=!0,o+=this.outputLink(i,t),this.inLink=!1}else if(i=this.rules.strong.exec(e))e=e.substring(i[0].length),o+=this.renderer.strong(this.output(i[4]||i[3]||i[2]||i[1]));else if(i=this.rules.em.exec(e))e=e.substring(i[0].length),o+=this.renderer.em(this.output(i[6]||i[5]||i[4]||i[3]||i[2]||i[1]));else if(i=this.rules.code.exec(e))e=e.substring(i[0].length),o+=this.renderer.codespan(u(i[2].trim(),!0));else if(i=this.rules.br.exec(e))e=e.substring(i[0].length),o+=this.renderer.br();else if(i=this.rules.del.exec(e))e=e.substring(i[0].length),o+=this.renderer.del(this.output(i[1]));else if(i=this.rules.autolink.exec(e))e=e.substring(i[0].length),r="@"===i[2]?"mailto:"+(n=u(this.mangle(i[1]))):n=u(i[1]),o+=this.renderer.link(r,null,n);else if(this.inLink||!(i=this.rules.url.exec(e))){if(i=this.rules.text.exec(e))e=e.substring(i[0].length),this.inRawBlock?o+=this.renderer.text(i[0]):o+=this.renderer.text(u(this.smartypants(i[0])));else if(e)throw new Error("Infinite loop on byte: "+e.charCodeAt(0))}else{if("@"===i[2])r="mailto:"+(n=u(i[0]));else{for(;l=i[0],i[0]=this.rules._backpedal.exec(i[0])[0],l!==i[0];);n=u(i[0]),r="www."===i[1]?"http://"+n:n}e=e.substring(i[0].length),o+=this.renderer.link(r,null,n)}return o},h.escapes=function(e){return e?e.replace(h.rules._escapes,"$1"):e},h.prototype.outputLink=function(e,t){var n=t.href,r=t.title?u(t.title):null;return"!"!==e[0].charAt(0)?this.renderer.link(n,r,this.output(e[1])):this.renderer.image(n,r,u(e[1]))},h.prototype.smartypants=function(e){return this.options.smartypants?e.replace(/---/g,"—").replace(/--/g,"–").replace(/(^|[-\u2014/(\[{"\s])'/g,"$1‘").replace(/'/g,"’").replace(/(^|[-\u2014/(\[{\u2018\s])"/g,"$1“").replace(/"/g,"”").replace(/\.{3}/g,"…"):e},h.prototype.mangle=function(e){if(!this.options.mangle)return e;for(var t,n="",r=e.length,s=0;s<r;s++)t=e.charCodeAt(s),.5<Math.random()&&(t="x"+t.toString(16)),n+="&#"+t+";";return n},r.prototype.code=function(e,t,n){var r=(t||"").match(/\S*/)[0];if(this.options.highlight){var s=this.options.highlight(e,r);null!=s&&s!==e&&(n=!0,e=s)}return r?'<pre><code class="'+this.options.langPrefix+u(r,!0)+'">'+(n?e:u(e,!0))+"</code></pre>\n":"<pre><code>"+(n?e:u(e,!0))+"</code></pre>"},r.prototype.blockquote=function(e){return"<blockquote>\n"+e+"</blockquote>\n"},r.prototype.html=function(e){return e},r.prototype.heading=function(e,t,n,r){return this.options.headerIds?"<h"+t+' id="'+this.options.headerPrefix+r.slug(n)+'">'+e+"</h"+t+">\n":"<h"+t+">"+e+"</h"+t+">\n"},r.prototype.hr=function(){return this.options.xhtml?"<hr/>\n":"<hr>\n"},r.prototype.list=function(e,t,n){var r=t?"ol":"ul";return"<"+r+(t&&1!==n?' start="'+n+'"':"")+">\n"+e+"</"+r+">\n"},r.prototype.listitem=function(e){return"<li>"+e+"</li>\n"},r.prototype.checkbox=function(e){return"<input "+(e?'checked="" ':"")+'disabled="" type="checkbox"'+(this.options.xhtml?" /":"")+"> "},r.prototype.paragraph=function(e){return"<p>"+e+"</p>\n"},r.prototype.table=function(e,t){return t&&(t="<tbody>"+t+"</tbody>"),"<table>\n<thead>\n"+e+"</thead>\n"+t+"</table>\n"},r.prototype.tablerow=function(e){return"<tr>\n"+e+"</tr>\n"},r.prototype.tablecell=function(e,t){var n=t.header?"th":"td";return(t.align?"<"+n+' align="'+t.align+'">':"<"+n+">")+e+"</"+n+">\n"},r.prototype.strong=function(e){return"<strong>"+e+"</strong>"},r.prototype.em=function(e){return"<em>"+e+"</em>"},r.prototype.codespan=function(e){return"<code>"+e+"</code>"},r.prototype.br=function(){return this.options.xhtml?"<br/>":"<br>"},r.prototype.del=function(e){return"<del>"+e+"</del>"},r.prototype.link=function(e,t,n){if(null===(e=l(this.options.sanitize,this.options.baseUrl,e)))return n;var r='<a href="'+u(e)+'"';return t&&(r+=' title="'+t+'"'),r+=">"+n+"</a>"},r.prototype.image=function(e,t,n){if(null===(e=l(this.options.sanitize,this.options.baseUrl,e)))return n;var r='<img src="'+e+'" alt="'+n+'"';return t&&(r+=' title="'+t+'"'),r+=this.options.xhtml?"/>":">"},r.prototype.text=function(e){return e},s.prototype.strong=s.prototype.em=s.prototype.codespan=s.prototype.del=s.prototype.text=function(e){return e},s.prototype.link=s.prototype.image=function(e,t,n){return""+n},s.prototype.br=function(){return""},p.parse=function(e,t){return new p(t).parse(e)},p.prototype.parse=function(e){this.inline=new h(e.links,this.options),this.inlineText=new h(e.links,d({},this.options,{renderer:new s})),this.tokens=e.reverse();for(var t="";this.next();)t+=this.tok();return t},p.prototype.next=function(){return this.token=this.tokens.pop()},p.prototype.peek=function(){return this.tokens[this.tokens.length-1]||0},p.prototype.parseText=function(){for(var e=this.token.text;"text"===this.peek().type;)e+="\n"+this.next().text;return this.inline.output(e)},p.prototype.tok=function(){switch(this.token.type){case"space":return"";case"hr":return this.renderer.hr();case"heading":return this.renderer.heading(this.inline.output(this.token.text),this.token.depth,c(this.inlineText.output(this.token.text)),this.slugger);case"code":return this.renderer.code(this.token.text,this.token.lang,this.token.escaped);case"table":var e,t,n,r,s="",i="";for(n="",e=0;e<this.token.header.length;e++)n+=this.renderer.tablecell(this.inline.output(this.token.header[e]),{header:!0,align:this.token.align[e]});for(s+=this.renderer.tablerow(n),e=0;e<this.token.cells.length;e++){for(t=this.token.cells[e],n="",r=0;r<t.length;r++)n+=this.renderer.tablecell(this.inline.output(t[r]),{header:!1,align:this.token.align[r]});i+=this.renderer.tablerow(n)}return this.renderer.table(s,i);case"blockquote_start":for(i="";"blockquote_end"!==this.next().type;)i+=this.tok();return this.renderer.blockquote(i);case"list_start":i="";for(var l=this.token.ordered,o=this.token.start;"list_end"!==this.next().type;)i+=this.tok();return this.renderer.list(i,l,o);case"list_item_start":i="";var a=this.token.loose;for(this.token.task&&(i+=this.renderer.checkbox(this.token.checked));"list_item_end"!==this.next().type;)i+=a||"text"!==this.token.type?this.tok():this.parseText();return this.renderer.listitem(i);case"html":return this.renderer.html(this.token.text);case"paragraph":return this.renderer.paragraph(this.inline.output(this.token.text));case"text":return this.renderer.paragraph(this.parseText());default:var h='Token with "'+this.token.type+'" type was not found.';if(!this.options.silent)throw new Error(h);console.log(h)}},t.prototype.slug=function(e){var t=e.toLowerCase().trim().replace(/[\u2000-\u206F\u2E00-\u2E7F\\'!"#$%&()*+,./:;<=>?@[\]^`{|}~]/g,"").replace(/\s/g,"-");if(this.seen.hasOwnProperty(t))for(var n=t;this.seen[n]++,t=n+"-"+this.seen[n],this.seen.hasOwnProperty(t););return this.seen[t]=0,t},u.escapeTest=/[&<>"']/,u.escapeReplace=/[&<>"']/g,u.replacements={"&":"&","<":"<",">":">",'"':""","'":"'"},u.escapeTestNoEncode=/[<>"']|&(?!#?\w+;)/,u.escapeReplaceNoEncode=/[<>"']|&(?!#?\w+;)/g;var o={},g=/^$|^[a-z][a-z0-9+.-]*:|^[?#]/i;function f(){}function d(e){for(var t,n,r=1;r<arguments.length;r++)for(n in t=arguments[r])Object.prototype.hasOwnProperty.call(t,n)&&(e[n]=t[n]);return e}function x(e,t){var n=e.replace(/\|/g,function(e,t,n){for(var r=!1,s=t;0<=--s&&"\\"===n[s];)r=!r;return r?"|":" |"}).split(/ \|/),r=0;if(n.length>t)n.splice(t);else for(;n.length<t;)n.push("");for(;r<n.length;r++)n[r]=n[r].trim().replace(/\\\|/g,"|");return n}function y(e,t,n){if(0===e.length)return"";for(var r=0;r<e.length;){var s=e.charAt(e.length-r-1);if(s!==t||n){if(s===t||!n)break;r++}else r++}return e.substr(0,e.length-r)}function m(e,n,r){if(null==e)throw new Error("marked(): input parameter is undefined or null");if("string"!=typeof e)throw new Error("marked(): input parameter is of type "+Object.prototype.toString.call(e)+", string expected");if(r||"function"==typeof n){r||(r=n,n=null);var s,i,l=(n=d({},m.defaults,n||{})).highlight,t=0;try{s=a.lex(e,n)}catch(e){return r(e)}i=s.length;var o=function(t){if(t)return n.highlight=l,r(t);var e;try{e=p.parse(s,n)}catch(e){t=e}return n.highlight=l,t?r(t):r(null,e)};if(!l||l.length<3)return o();if(delete n.highlight,!i)return o();for(;t<s.length;t++)!function(n){"code"!==n.type?--i||o():l(n.text,n.lang,function(e,t){return e?o(e):null==t||t===n.text?--i||o():(n.text=t,n.escaped=!0,void(--i||o()))})}(s[t])}else try{return n&&(n=d({},m.defaults,n)),p.parse(a.lex(e,n),n)}catch(e){if(e.message+="\nPlease report this to https://github.com/markedjs/marked.",(n||m.defaults).silent)return"<p>An error occurred:</p><pre>"+u(e.message+"",!0)+"</pre>";throw e}}f.exec=f,m.options=m.setOptions=function(e){return d(m.defaults,e),m},m.getDefaults=function(){return{baseUrl:null,breaks:!1,gfm:!0,headerIds:!0,headerPrefix:"",highlight:null,langPrefix:"language-",mangle:!0,pedantic:!1,renderer:new r,sanitize:!1,sanitizer:null,silent:!1,smartLists:!1,smartypants:!1,tables:!0,xhtml:!1}},m.defaults=m.getDefaults(),m.Parser=p,m.parser=p.parse,m.Renderer=r,m.TextRenderer=s,m.Lexer=a,m.lexer=a.lex,m.InlineLexer=h,m.inlineLexer=h.output,m.Slugger=t,m.parse=m,"undefined"!=typeof module&&"object"==typeof exports?module.exports=m:"function"==typeof define&&define.amd?define(function(){return m}):e.marked=m}(this||("undefined"!=typeof window?window:global));
+ static/js/marked.min.js.gz view
binary file changed (absent → 7720 bytes)
+ templates/change-password.hamlet view
@@ -0,0 +1,18 @@+<main #main_column .pv2.ph3.mh1>+ <div .w-100.mw8.center>++ <div .measure.center.pa3.bg-white.ba.br2.b--black-10>++ <form method="post" action="@{ChangePasswordR}">+ $maybe token <- reqToken req+ <input type="hidden" name="#{defaultCsrfParamName}" value="#{token}">++ <div>+ <label .db.fw6.lh-copy.f6 for="oldpassword">Old Password+ <input #oldpasword .w-100.pa1.mb2.ba.b--black-20 autofocus required name="oldpassword" type="password" value="">++ <div>+ <label .db.fw6.lh-copy.f6 for="newpassword">New Password+ <input #newpassword .w-100.pa1.mb2.ba.b--black-20 required name="newpassword" type="password">+ + <input class="ph3 pv2 input-reset ba b--navy bg-transparent pointer f6 dib mt3 dim" type="submit" value="Save Changes">
templates/default-layout.hamlet view
@@ -6,6 +6,9 @@ $maybe userName <- musername <span> (<a class="link" data-username="#{userName}" href="@{UserR (UserNameP userName)}">#{userName}</a>)+ $maybe user <- muser+ $if (userPrivacyLock user)+ <a .dib.no-underline style="height:10px;width:10px" href="@{AccountSettingsR}" title="private profile enabled">🔒 <!-- <div #timer>#{pageLoadTime} s --> <div .top_menu.fr>@@ -13,10 +16,10 @@ $maybe userName <- musername $maybe currentroute <- mcurrentRoute <a .link href="@?{(AddViewR, [("next",urlrender currentroute)])}">add url - <a .link href="@{NotesR (UserNameP userName)}">notes <a .link href="@{AddNoteViewR (UserNameP userName)}">add note - <a .link href="@{UserSettingsR (UserNameP userName)}">settings - <a .link onclick="PS['App'].logoutE(event)()" href="@{AuthR LogoutR}">+ <a .link href="@{NotesR (UserNameP userName)}">notes + <a .link href="@{AccountSettingsR}">settings + <a .link onclick="PS['Main'].logoutE(event)()" href="@{AuthR LogoutR}"> log out $nothing <a .link href="@{AuthR LoginR}">
+ templates/docs-search.hamlet view
@@ -0,0 +1,86 @@+<main .pt2.pb5.mh1>+ <h1 lh-title.mt0 style="font-size:1.35rem">Understanding the Search Syntax+ + <h3>Page filters+ <p .ml3>Searches are scoped to the currently selected page filter. + <br>+ <span>So, given the possible page filters</span>+ <br><span class="code fw9 bg-light-gray">all ‧ private ‧ public ‧ unread ‧ untagged ‧ starred</span>+ <br><span>If <span class="code fw9 bg-light-gray">all</span> is currently selected, the search includes <span class="code fw9 bg-light-gray">all</span> bookmarks</span>+ <br><span>If <span class="code fw9 bg-light-gray">private</span> is currently selected, the search only includes <span class="code fw9 bg-light-gray">private</span> bookmarks, etc..</span>+ + <h3>Combine Searches (AND)+ <p .ml3>Separate terms by a space.+ <br>For example, <span class="code fw9 bg-light-gray">marathon race</span>+ + <h3>Combine Searches (OR)+ <p .ml3>Put <span class="code fw9 bg-light-gray">|</span> between each search query. + <br>For example, <span class="code fw9 bg-light-gray">marathon|race</span>+ + <h3>Exclude words from your search+ <p .ml3>Put <span class="code fw9 bg-light-gray">-</span> in front of a word you want to leave out. + <br>For example, <span class="code fw9 bg-light-gray">-car</span>+ + <h3>Search for an exact match+ <p .ml3>Put a word or phrase inside quotes. + <br>For example, <span class="code fw9 bg-light-gray">"tallest building"</span>+ + <h3>Search on a specific field+ <p .ml3>+ Put <span class="code fw9 bg-light-gray"><span class="i">field</span>:</span> in front of the term,+ where <span class="code fw9 bg-light-gray"><span class="i">field</span></span> is one of the options below+ <div .ml3>+ <div .f5.fw6.pb3.underline>Bookmark Search+ <table .collapse.ba.br2.b--black-10.pv2.ph3>+ <tbody>+ <tr .striped--light-gray>+ <td .pv2.ph3>FIELD+ <td .pv2.ph3>EXAMPLE+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">url+ <td .pv2.ph3><span class="code fw9">url:youtube.com+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">title+ <td .pv2.ph3><span class="code fw9">title:"hacker news"+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">description+ <td .pv2.ph3><span class="code fw9">description:surveys+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">tags+ <td .pv2.ph3><span class="code fw9">tags:learning+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">after+ <td .pv2.ph3><span class="code fw9">after:12/31/2018<br>after:2018-12-31+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">before+ <td .pv2.ph3><span class="code fw9">before:12/31/2019<br>before:2019-12-31+ + <div .f5.fw6.pv3.underline>Note Search+ <table .collapse.ba.br2.b--black-10.pv2.ph3>+ <tbody>+ <tr .striped--light-gray>+ <td .pv2.ph3>FIELD+ <td .pv2.ph3>EXAMPLE+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">title+ <td .pv2.ph3><span class="code fw9">title:"hacker news"+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">description+ <td .pv2.ph3><span class="code fw9">description:surveys+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">after+ <td .pv2.ph3><span class="code fw9">after:12/31/2018<br>after:2018-12-31+ <tr .striped--light-gray>+ <td .pv2.ph3><span class="code fw9">before+ <td .pv2.ph3><span class="code fw9">before:12/31/2019<br>before:2019-12-31++ <h3 .mb0>More Complex Examples+ <div .ml3.pt3>+ <span>"youtube" in url, and title of "haskell" or title of "python" and after 12/31/2017+ <br><span class="mw6 overflow-x-scroll nowrap db mt1 pa2 code fw9 bg-light-gray">url:youtube title:haskell|title:python after:12/31/2017+ + <div .ml3.pt3>+ <span>"hacker news" not in title, and "news", "cnn", "npr" anywhere, or "the guardian" in the description+ <br><span class="mw6 overflow-x-scroll nowrap db mt1 pa2 code fw9 bg-light-gray">-title:"hacker news" news|cnn|npr|description:"the guardian"++
templates/notes.hamlet view
@@ -1,7 +1,9 @@ <main #main_column .pv2.ph3.mh1> <div .w-100.mw8.center>+ <div .fr.nt1 style="margin-bottom:.7rem">+ ^{search} - <span .db .mb3>You have #{bcount} notes:+ <span .db .mb3>#{T.append "" (maybe "You have" (const "Found") mquery)} #{bcount} notes: ^{pager}
templates/pager.hamlet view
@@ -5,9 +5,9 @@ <tr> $if fromIntegral bcount >= (limit * page) <td width="80">- <a .link.gray #top_earlier href="@?{(route, [("page", pack $ show $ page + 1)])}">+ <a .link.gray #top_earlier href="@?{(route, catMaybes [Just ("page", pack (show (page + 1))), mqueryp])}"> « earlier $if page > 1 <td width="80">- <a .link.gray #top_later href="@?{(route, [("page", pack $ show $ page - 1)])}">+ <a .link.gray #top_later href="@?{(route, catMaybes [Just ("page", pack (show (page - 1))), mqueryp])}"> later »
templates/popup-layout.hamlet view
@@ -5,7 +5,7 @@ - (#{userName}) <div .fr> $maybe userName <- musername- <a .link onclick="PS['App'].logoutE(event)()" href="@{AuthR LogoutR}">+ <a .link onclick="PS['Main'].logoutE(event)()" href="@{AuthR LogoutR}"> [log out] $nothing <a .link href="@{AuthR LoginR}">
+ templates/search.hamlet view
@@ -0,0 +1,14 @@+$maybe route <- mroute+ <form method="get" action="@{route}" onsubmit="this.classList.add('submitting')">+ <div .relative>+ $maybe query <- mquery+ <a .close-x-wrap href="@{route}" title="clear search results">+ <svg viewbox="0 0 40 40">+ <path .close-x d="M 10,10 L 30,30 M 30,10 L 10,30" />+ <div .relative.fl>+ <input #queryInput type="text" name="query" placeholder="search" value="#{fromMaybe "" mquery}" + class="queryInput #{T.append "search-" (maybe "inactive" (const "active") mquery)}" />+ <button .queryIcon.hover-blue.gray type="submit" title="submit search">+ <svg focusable="false" xmlns="http://www.w3.org/2000/svg" viewBox="0 0 24 24">+ <path d="M15.5 14h-.79l-.28-.27A6.471 6.471 0 0 0 16 9.5 6.5 6.5 0 1 0 9.5 16c1.61 0 3.09-.59 4.23-1.57l.27.28v.79l5 4.99L20.49 19l-4.99-5zm-6 0C7.01 14 5 11.99 5 9.5S7.01 5 9.5 5 14 7.01 14 9.5 11.99 14 9.5 14z">+ <a .query-info-icon.fr.blue href="@{DocsSearchR}" title="search syntax" target=_blank>?
templates/user-settings.hamlet view
@@ -1,5 +1,8 @@ <main #main_column .pv2.ph3.mh1> <div .w-100.mw8.center>- <div>- <a .bookmarklet.link.f7.ba.b--dotted.b--light-silver href="javascript:q=location.href;if(document.getSelection){d=document.getSelection();}else{d='';};p=document.title;void(open('@{AddViewR}?_hasdata&url='+encodeURIComponent(q)+'&description='+encodeURIComponent(d)+'&title='+encodeURIComponent(p),'Espial','toolbar=no,width=700,height=350'));">add url bookmarklet+ <div .pa3>+ <a .bookmarklet.link.ba.b--dotted.b--light-silver href="javascript:q=location.href;if(document.getSelection){d=document.getSelection();}else{d='';};p=document.title;void(open('@{AddViewR}?_hasdata&url='+encodeURIComponent(q)+'&description='+encodeURIComponent(d)+'&title='+encodeURIComponent(p),'Espial','toolbar=no,width=700,height=350'));">add url bookmarklet + <a .pa3 href="@{ChangePasswordR}">Change Password++ <div ##{accountSettingsEl} .pa3>
templates/user.hamlet view
@@ -1,54 +1,56 @@-<main #main_column .pv2.ph3.mh1> - <div .w-100.mw8.center> - <div .mb2> - <div .fl.pr3.dib.mb2> - <b> - <a .link href="@{UserR unamep}">#{uname} - $forall tag <- pathtags - \ + # - <a .link href="@{UserTagsR unamep (TagsP [tag])}">#{tag} - <div .fl.pr3.dib.mb2> - <span .f7.silver>#{bcount}</span> - $if isowner - <div .filters.dib.mb2> - <a .link.silver.hover-blue :isAll:.nav-active - href="@{UserR unamep}">all - ‧ - <a .link.silver.hover-blue :sharedp == SharedPrivate:.nav-active - href="@{UserSharedR unamep SharedPrivate}">private - ‧ - <a .link.silver.hover-blue :sharedp == SharedPublic:.nav-active - href="@{UserSharedR unamep SharedPublic}">public - ‧ - <a .link.silver.hover-blue :filterp == FilterUnread:.nav-active - href="@{UserFilterR unamep FilterUnread}">unread - ‧ - <a .link.silver.hover-blue :filterp == FilterUntagged:.nav-active - href="@{UserFilterR unamep FilterUntagged}">untagged - ‧ - <a .link.silver.hover-blue :filterp == FilterStarred:.nav-active - href="@{UserFilterR unamep FilterStarred}">starred - +$maybe route <- mroute + <main #main_column .pv2.ph3.mh1> + <div .w-100.mw8.center> + <div .fr.nt1 style="margin-bottom:.7rem"> + ^{search} + <div .di> + <div .fl.pr3.dib.mb2> + <b> + <a .link href="@{UserR unamep}">#{uname} + $forall tag <- pathtags + \ + # + <a .link href="@{UserTagsR unamep (TagsP [tag])}">#{tag} + <div .fl.pr3.dib.mb2> + <span .f7.silver>#{bcount}</span> + $if isowner + <div .fl.pr3.dib.mb2> + <a .link.silver.hover-blue :isAll:.nav-active + href="@{UserR unamep}">all + ‧ + <a .link.silver.hover-blue :sharedp == SharedPrivate:.nav-active + href="@{UserSharedR unamep SharedPrivate}">private + ‧ + <a .link.silver.hover-blue :sharedp == SharedPublic:.nav-active + href="@{UserSharedR unamep SharedPublic}">public + ‧ + <a .link.silver.hover-blue :filterp == FilterUnread:.nav-active + href="@{UserFilterR unamep FilterUnread}">unread + ‧ + <a .link.silver.hover-blue :filterp == FilterUntagged:.nav-active + href="@{UserFilterR unamep FilterUntagged}">untagged + ‧ + <a .link.silver.hover-blue :filterp == FilterStarred:.nav-active + href="@{UserFilterR unamep FilterStarred}">starred + <div .cf> - - ^{pager} - - <div .cf> - - <div ##{renderEl} .mt3> - - <div .cf> - - <div .user_footer hidden> + ^{pager} - - $if (fromIntegral bcount >= limit) || (page > 1) - $maybe route <- mroute + + <div .cf> + + <div ##{renderEl} .mt3> + + <div .cf> + + <div .user_footer hidden> + ^{pager} + + $if (fromIntegral bcount >= limit) || (page > 1) <div .dib.ml5> <span .silver.mr1>per page: - <a .link.light-silver :limit == 20:.nav-active href="@?{(route, [("count", "20")])}"‧>20</a> ‧ - <a .link.light-silver :limit == 40:.nav-active href="@?{(route, [("count", "40")])}"‧>40</a> ‧ - <a .link.light-silver :limit == 80:.nav-active href="@?{(route, [("count", "80")])}"‧>80</a> ‧ - <a .link.light-silver :limit == 120:.nav-active href="@?{(route, [("count", "120")])}"‧>120</a> ‧ - <a .link.light-silver :limit == 160:.nav-active href="@?{(route, [("count", "160")])}"‧>160</a> - + <a .link.light-silver :limit == 20:.nav-active href="@?{(route, catMaybes [Just ("count", "20"), mqueryp])}"‧>20</a> ‧ + <a .link.light-silver :limit == 40:.nav-active href="@?{(route, catMaybes [Just ("count", "40"), mqueryp])}"‧>40</a> ‧ + <a .link.light-silver :limit == 80:.nav-active href="@?{(route, catMaybes [Just ("count", "80"), mqueryp])}"‧>80</a> ‧ + <a .link.light-silver :limit == 120:.nav-active href="@?{(route, catMaybes [Just ("count", "120"), mqueryp])}"‧>120</a> ‧ + <a .link.light-silver :limit == 160:.nav-active href="@?{(route, catMaybes [Just ("count", "160"), mqueryp])}"‧>160</a> +
test/Handler/HomeSpec.hs view
@@ -10,4 +10,4 @@ describe "Homepage" $ do it "loads the index and checks it looks right" $ do get HomeR- statusIs 200+ statusIs 303