Angel D. Munoz AngelMunoz

## Htmx.kt
package me.tunaxor.htmx

import io.ktor.server.application.*
import io.ktor.server.request.*
import io.ktor.server.response.*
import kotlinx.html.CommonAttributeGroupFacade

enum class HxSwap {
  InnerHTML,
  OuterHTML,

## blunt-url-parser.fsx
#r "nuget: TheBlunt"

open TheBlunt

module Common =
    let RequiedMark =
      pchar
        (fun c -> c = '!')
        (fun c -> $"$%c{c} is not a valid required mark.")

## media.service.ts
export interface ISwitchCameraArgs {
  deviceId?: string
}

export interface IStartCameraArgs {
  constraints?: MediaStreamConstraints;
  retryCount?: number;
}

export interface ICameraDevice extends MediaDeviceInfo {

## UrlParser.fs
namespace Routerish

type QueryValue =
    | String of string option
    | StringValues of string list

type RoutePart =
    | Segment of segment: string
    | ParamSegment of paramname: string
    | Query of query: Map<string, QueryValue>

## interfaces.ts
export interface ISwitchCameraArgs {
  deviceId?: string
}

export interface IStartCameraArgs {
  constraints?: MediaStreamConstraints;
  retryCount?: number;
}

export interface ICameraDevice extends MediaDeviceInfo {

## example.fsx
// differentiate the kind of payload you want to take
type AdditionPayload =
    | Integers of int * int
    | Strings of string * string

module Operations =
    // handle your integers
    let private addInts a b = a + b

    // handle your strings

## index.html
<!DOCTYPE html>
<html lang="en">
<head>
    <meta charset="UTF-8">
    <meta http-equiv="X-UA-Compatible" content="IE=edge">
    <meta name="viewport" content="width=device-width, initial-scale=1.0">
    <title>Document</title>
</head>
<body>
    <script>

## backup.fsx
#!/usr/bin/env -S dotnet fsi
#r "nuget: MongoDB.Driver"
#r "nuget: MongoDB.Driver.GridFS"
#r "nuget: Mondocks.Net"
#r "nuget: Spectre.Console"

open System
open System.IO
open Spectre.Console
open MongoDB.Driver

## Commands.fs


module Commands =

  open FSharp.SystemCommandLine
  open FSharp.SystemCommandLine.Aliases

  type RunConfiguration with

    static member FromString(value: string) =

## Functions.fs
module MyFunctions

let add a b = a + b

let printValue value = printfn "%s" value
	package me.tunaxor.htmx

	import io.ktor.server.application.*
	import io.ktor.server.request.*
	import io.ktor.server.response.*
	import kotlinx.html.CommonAttributeGroupFacade

	enum class HxSwap {
	InnerHTML,
	OuterHTML,
	#r "nuget: TheBlunt"

	open TheBlunt

	module Common =
	let RequiedMark =
	pchar
	(fun c -> c = '!')
	(fun c -> $"$%c{c} is not a valid required mark.")
	export interface ISwitchCameraArgs {
	deviceId?: string
	}

	export interface IStartCameraArgs {
	constraints?: MediaStreamConstraints;
	retryCount?: number;
	}

	export interface ICameraDevice extends MediaDeviceInfo {
	namespace Routerish

	type QueryValue =
	\| String of string option
	\| StringValues of string list

	type RoutePart =
	\| Segment of segment: string
	\| ParamSegment of paramname: string
	\| Query of query: Map<string, QueryValue>
	// differentiate the kind of payload you want to take
	type AdditionPayload =
	\| Integers of int * int
	\| Strings of string * string

	module Operations =
	// handle your integers
	let private addInts a b = a + b

	// handle your strings
	<!DOCTYPE html>
	<html lang="en">
	<head>
	<meta charset="UTF-8">
	<meta http-equiv="X-UA-Compatible" content="IE=edge">
	<meta name="viewport" content="width=device-width, initial-scale=1.0">
	<title>Document</title>
	</head>
	<body>
	<script>
	#!/usr/bin/env -S dotnet fsi
	#r "nuget: MongoDB.Driver"
	#r "nuget: MongoDB.Driver.GridFS"
	#r "nuget: Mondocks.Net"
	#r "nuget: Spectre.Console"

	open System
	open System.IO
	open Spectre.Console
	open MongoDB.Driver


	module Commands =

	open FSharp.SystemCommandLine
	open FSharp.SystemCommandLine.Aliases

	type RunConfiguration with

	static member FromString(value: string) =
	module MyFunctions

	let add a b = a + b

	let printValue value = printfn "%s" value