From 10fdfe64e20d7b462988e24551b56eb252b3bd17 Mon Sep 17 00:00:00 2001
From: Craig Oates <craig@craigoates.net>
Date: Sat, 16 Jun 2018 00:18:27 +0100
Subject: [PATCH] Created the console program.

---
 Smouldering Beach Ball.sln                    | 25 ++++++
 Smouldering Beach Ball/App.config             |  6 ++
 Smouldering Beach Ball/AssemblyInfo.fs        | 41 +++++++++
 Smouldering Beach Ball/Program.fs             |  7 ++
 .../Smouldering Beach Ball.fsproj             | 84 +++++++++++++++++++
 Smouldering Beach Ball/packages.config        |  4 +
 6 files changed, 167 insertions(+)
 create mode 100644 Smouldering Beach Ball.sln
 create mode 100644 Smouldering Beach Ball/App.config
 create mode 100644 Smouldering Beach Ball/AssemblyInfo.fs
 create mode 100644 Smouldering Beach Ball/Program.fs
 create mode 100644 Smouldering Beach Ball/Smouldering Beach Ball.fsproj
 create mode 100644 Smouldering Beach Ball/packages.config

diff --git a/Smouldering Beach Ball.sln b/Smouldering Beach Ball.sln
new file mode 100644
index 0000000..4eadf32
--- /dev/null
+++ b/Smouldering Beach Ball.sln	
@@ -0,0 +1,25 @@
+
+Microsoft Visual Studio Solution File, Format Version 12.00
+# Visual Studio 15
+VisualStudioVersion = 15.0.27703.2026
+MinimumVisualStudioVersion = 10.0.40219.1
+Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "Smouldering Beach Ball", "Smouldering Beach Ball\Smouldering Beach Ball.fsproj", "{F7E9C02A-2ABF-49EA-A582-07EA7FA17EFE}"
+EndProject
+Global
+	GlobalSection(SolutionConfigurationPlatforms) = preSolution
+		Debug|Any CPU = Debug|Any CPU
+		Release|Any CPU = Release|Any CPU
+	EndGlobalSection
+	GlobalSection(ProjectConfigurationPlatforms) = postSolution
+		{F7E9C02A-2ABF-49EA-A582-07EA7FA17EFE}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{F7E9C02A-2ABF-49EA-A582-07EA7FA17EFE}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{F7E9C02A-2ABF-49EA-A582-07EA7FA17EFE}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{F7E9C02A-2ABF-49EA-A582-07EA7FA17EFE}.Release|Any CPU.Build.0 = Release|Any CPU
+	EndGlobalSection
+	GlobalSection(SolutionProperties) = preSolution
+		HideSolutionNode = FALSE
+	EndGlobalSection
+	GlobalSection(ExtensibilityGlobals) = postSolution
+		SolutionGuid = {B081B383-0027-4016-B9DA-B77383FA2E92}
+	EndGlobalSection
+EndGlobal
diff --git a/Smouldering Beach Ball/App.config b/Smouldering Beach Ball/App.config
new file mode 100644
index 0000000..787dcbe
--- /dev/null
+++ b/Smouldering Beach Ball/App.config	
@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="utf-8" ?>
+<configuration>
+    <startup> 
+        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.7.1" />
+    </startup>
+</configuration>
\ No newline at end of file
diff --git a/Smouldering Beach Ball/AssemblyInfo.fs b/Smouldering Beach Ball/AssemblyInfo.fs
new file mode 100644
index 0000000..f07f9a9
--- /dev/null
+++ b/Smouldering Beach Ball/AssemblyInfo.fs	
@@ -0,0 +1,41 @@
+namespace Smouldering_Beach_Ball.AssemblyInfo
+
+open System.Reflection
+open System.Runtime.CompilerServices
+open System.Runtime.InteropServices
+
+// General Information about an assembly is controlled through the following
+// set of attributes. Change these attribute values to modify the information
+// associated with an assembly.
+[<assembly: AssemblyTitle("Smouldering Beach Ball")>]
+[<assembly: AssemblyDescription("")>]
+[<assembly: AssemblyConfiguration("")>]
+[<assembly: AssemblyCompany("")>]
+[<assembly: AssemblyProduct("Smouldering Beach Ball")>]
+[<assembly: AssemblyCopyright("Copyright ©  2018")>]
+[<assembly: AssemblyTrademark("")>]
+[<assembly: AssemblyCulture("")>]
+
+// Setting ComVisible to false makes the types in this assembly not visible
+// to COM components.  If you need to access a type in this assembly from
+// COM, set the ComVisible attribute to true on that type.
+[<assembly: ComVisible(false)>]
+
+// The following GUID is for the ID of the typelib if this project is exposed to COM
+[<assembly: Guid("f7e9c02a-2abf-49ea-a582-07ea7fa17efe")>]
+
+// Version information for an assembly consists of the following four values:
+//
+//       Major Version
+//       Minor Version
+//       Build Number
+//       Revision
+//
+// You can specify all the values or you can default the Build and Revision Numbers
+// by using the '*' as shown below:
+// [<assembly: AssemblyVersion("1.0.*")>]
+[<assembly: AssemblyVersion("1.0.0.0")>]
+[<assembly: AssemblyFileVersion("1.0.0.0")>]
+
+do
+    ()
\ No newline at end of file
diff --git a/Smouldering Beach Ball/Program.fs b/Smouldering Beach Ball/Program.fs
new file mode 100644
index 0000000..2bcf7f9
--- /dev/null
+++ b/Smouldering Beach Ball/Program.fs	
@@ -0,0 +1,7 @@
+// Learn more about F# at http://fsharp.org
+// See the 'F# Tutorial' project for more help.
+
+[<EntryPoint>]
+let main argv = 
+    printfn "%A" argv
+    0 // return an integer exit code
diff --git a/Smouldering Beach Ball/Smouldering Beach Ball.fsproj b/Smouldering Beach Ball/Smouldering Beach Ball.fsproj
new file mode 100644
index 0000000..630a828
--- /dev/null
+++ b/Smouldering Beach Ball/Smouldering Beach Ball.fsproj	
@@ -0,0 +1,84 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="15.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
+  <PropertyGroup>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <SchemaVersion>2.0</SchemaVersion>
+    <ProjectGuid>f7e9c02a-2abf-49ea-a582-07ea7fa17efe</ProjectGuid>
+    <OutputType>Exe</OutputType>
+    <RootNamespace>Smouldering_Beach_Ball</RootNamespace>
+    <AssemblyName>Smouldering_Beach_Ball</AssemblyName>
+    <TargetFrameworkVersion>v4.7.1</TargetFrameworkVersion>
+    <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
+    <UseStandardResourceNames>true</UseStandardResourceNames>
+    <TargetFSharpCoreVersion>4.4.3.0</TargetFSharpCoreVersion>
+    <Name>Smouldering Beach Ball</Name>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <DebugSymbols>true</DebugSymbols>
+    <DebugType>full</DebugType>
+    <Optimize>false</Optimize>
+    <Tailcalls>false</Tailcalls>
+    <OutputPath>bin\$(Configuration)\</OutputPath>
+    <DefineConstants>DEBUG;TRACE</DefineConstants>
+    <WarningLevel>3</WarningLevel>
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DocumentationFile>bin\$(Configuration)\$(AssemblyName).XML</DocumentationFile>
+    <Prefer32Bit>true</Prefer32Bit>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <DebugType>pdbonly</DebugType>
+    <Optimize>true</Optimize>
+    <Tailcalls>true</Tailcalls>
+    <OutputPath>bin\$(Configuration)\</OutputPath>
+    <DefineConstants>TRACE</DefineConstants>
+    <WarningLevel>3</WarningLevel>
+    <PlatformTarget>AnyCPU</PlatformTarget>
+    <DocumentationFile>bin\$(Configuration)\$(AssemblyName).XML</DocumentationFile>
+    <Prefer32Bit>true</Prefer32Bit>
+  </PropertyGroup>
+  <PropertyGroup>
+    <MinimumVisualStudioVersion Condition="'$(MinimumVisualStudioVersion)' == ''">11</MinimumVisualStudioVersion>
+  </PropertyGroup>
+  <Choose>
+    <When Condition="'$(VisualStudioVersion)' == '11.0'">
+      <PropertyGroup Condition=" '$(FSharpTargetsPath)' == '' AND Exists('$(MSBuildExtensionsPath32)\..\Microsoft SDKs\F#\3.0\Framework\v4.0\Microsoft.FSharp.Targets') ">
+        <FSharpTargetsPath>$(MSBuildExtensionsPath32)\..\Microsoft SDKs\F#\3.0\Framework\v4.0\Microsoft.FSharp.Targets</FSharpTargetsPath>
+      </PropertyGroup>
+    </When>
+    <Otherwise>
+      <PropertyGroup Condition=" '$(FSharpTargetsPath)' == '' AND Exists('$(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)\FSharp\Microsoft.FSharp.Targets') ">
+        <FSharpTargetsPath>$(MSBuildExtensionsPath32)\Microsoft\VisualStudio\v$(VisualStudioVersion)\FSharp\Microsoft.FSharp.Targets</FSharpTargetsPath>
+      </PropertyGroup>
+    </Otherwise>
+  </Choose>
+  <Import Project="$(FSharpTargetsPath)" />
+  <ItemGroup>
+    <Compile Include="AssemblyInfo.fs" />
+    <Compile Include="Program.fs" />
+    <None Include="App.config" />
+    <Content Include="packages.config" />
+  </ItemGroup>
+  <ItemGroup>
+    <Reference Include="mscorlib" />
+    <Reference Include="FSharp.Core">
+      <Name>FSharp.Core</Name>
+      <AssemblyName>FSharp.Core.dll</AssemblyName>
+      <HintPath>$(MSBuildProgramFiles32)\Reference Assemblies\Microsoft\FSharp\.NETFramework\v4.0\$(TargetFSharpCoreVersion)\FSharp.Core.dll</HintPath>
+    </Reference>
+    <Reference Include="System" />
+    <Reference Include="System.Core" />
+    <Reference Include="System.Numerics" />
+    <Reference Include="System.ValueTuple">
+      <Private>True</Private>
+    </Reference>
+  </ItemGroup>
+  <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 
+       Other similar extension points exist, see Microsoft.Common.targets.
+  <Target Name="BeforeBuild">
+  </Target>
+  <Target Name="AfterBuild">
+  </Target>
+  -->
+</Project>
\ No newline at end of file
diff --git a/Smouldering Beach Ball/packages.config b/Smouldering Beach Ball/packages.config
new file mode 100644
index 0000000..b4aca10
--- /dev/null
+++ b/Smouldering Beach Ball/packages.config	
@@ -0,0 +1,4 @@
+<?xml version="1.0" encoding="utf-8"?>
+<packages>
+  <package id="System.ValueTuple" version="4.4.0" targetFramework="net471" />
+</packages>
\ No newline at end of file