1.3.0

.github/workflows/ci.yml

@@ -2,19 +2,26 @@ name: ci
 
 on: [push]
 
+# Allow one run of this workflow per branch and cancel existing runs if triggered again
+concurrency:
+  group: fruityfoundation-ci-${{ github.ref_name }}
+  cancel-in-progress: true
+
 jobs:
   build:
 
     runs-on: ubuntu-latest
     strategy:
       matrix:
-        dotnet-version: ['6.0.x']
+        dotnet-version: ['7.0.x', '6.0.x']
 
     steps:
       - uses: actions/checkout@v2
       - uses: actions/setup-dotnet@v1
         with:
-          dotnet-version: "6.0.x"
+          dotnet-version: |
+            6.0.x
+            7.0.x
       - name: Install dependencies
         run: dotnet restore
       - name: Build

.github/workflows/publish-release.yml

@@ -21,7 +21,7 @@ jobs:
           fetch-depth: '0' # Load entire history
       - uses: actions/setup-dotnet@v3
         with:
-          dotnet-version: '6.x'
+          dotnet-version: '7.x'
       - run: dotnet tool restore
       - name: Generate Version
         id: generate-version

Base.Tests/Base.Tests.csproj

@@ -1,10 +1,11 @@
 <Project Sdk="Microsoft.NET.Sdk">
 
     <PropertyGroup>
-        <TargetFramework>net6.0</TargetFramework>
         <Nullable>enable</Nullable>
 
         <IsPackable>false</IsPackable>
+
+        <TargetFrameworks>net6.0;net7.0</TargetFrameworks>
     </PropertyGroup>
 
     <ItemGroup>
@@ -21,4 +22,5 @@
       <ProjectReference Include="..\Base\Base.csproj" />
     </ItemGroup>
 
+
 </Project>

Base.Tests/Extensions/EnumerableExtensionTests.cs

@@ -1,45 +0,0 @@
-using System.Linq;
-using FruityFoundation.Base.Extensions;
-using NUnit.Framework;
-
-namespace Base.Tests.Extensions;
-
-public class EnumerableExtensionTests
-{
-	[TestCase(new object[] { 0, 1, 2 }, true, new object[] { 85 }, ExpectedResult = new object[] { 0, 1, 2, 85 })]
-	[TestCase(new object[] { "hi" }, false, new object[] { "there" }, ExpectedResult = new object[] { "hi" })]
-	public object[] TestConditionalConcat(object[] input, bool isConditionValid, object[] second) =>
-		input.ConditionalConcat(isConditionValid, second).ToArray();
-
-	[TestCase(new object[] { 0, 1, 2 }, true, 85, ExpectedResult = new object[0])]
-	[TestCase(new object[] { "hi", "there" }, false, "there", ExpectedResult = new object[] { "hi", "there" })]
-	public object[] TestConditionalWhere(object[] input, bool isConditionValid, object valueToKeep) =>
-		input.ConditionalWhere(isConditionValid, x => x.Equals(valueToKeep)).ToArray();
-
-	[Test]
-	public void TestChooseWithRefType()
-	{
-		var input = new [] { "one", null, "two" };
-
-		var result = input.Choose(x => x).ToArray();
-
-		Assert.That(result.GetType(), Is.EqualTo(typeof(string[])));
-		Assert.That(result.Length, Is.EqualTo(2));
-		Assert.That(result[0], Is.EqualTo("one"));
-		Assert.That(result[1], Is.EqualTo("two"));
-	}
-
-	[Test]
-	public void TestChooseWithValueType()
-	{
-		var input = new int?[] { 1, null, 2 };
-
-		var result = input.Choose(x => x).ToArray();
-
-		Assert.That(result.GetType(), Is.EqualTo(typeof(int[])));
-		Assert.That(result.GetType(), Is.Not.EqualTo(typeof(int?[])));
-		Assert.That(result.Length, Is.EqualTo(2));
-		Assert.That(result[0], Is.EqualTo(1));
-		Assert.That(result[1], Is.EqualTo(2));
-	}
-}

Base.Tests/Extensions/MaybeExtensionTests.cs

@@ -1,31 +0,0 @@
-using System;
-using FruityFoundation.Base.Extensions;
-using FruityFoundation.Base.Structures;
-using NUnit.Framework;
-
-namespace Base.Tests.Extensions;
-
-public class MaybeExtensionTests
-{
-	[Test]
-	public void EnumerableFirstOrEmptyTests()
-	{
-		Assert.AreEqual(Maybe<string>.Empty(), Array.Empty<string>().FirstOrEmpty());
-		Assert.AreEqual(Maybe<string>.Create("banana"), new[] { "banana" }.FirstOrEmpty());
-	}
-
-	[Test]
-	public void TestToMaybe()
-	{
-		Assert.AreEqual(Maybe<int>.Empty(), Maybe<int>.Empty());
-		Assert.AreEqual(Maybe<string>.Create("banana"), "banana".ToMaybe());
-		Assert.AreNotEqual(Maybe<int>.Create(293921), Maybe<int>.Create(2));
-	}
-
-	[Test]
-	public void MaybeNullableTests()
-	{
-		Assert.IsNull(Maybe<int>.Empty().ToNullable());
-		Assert.IsNull(Maybe<int>.Create(0, _ => false).ToNullable());
-	}
-}

Base.Tests/Extensions/NullableExtensionTests.cs

@@ -1,24 +0,0 @@
-using FruityFoundation.Base.Extensions;
-using FruityFoundation.Base.Structures;
-using NUnit.Framework;
-
-namespace Base.Tests.Extensions;
-
-public class NullableExtensionTests
-{
-	[Test]
-	public void TestNullableStructOfNullToMaybe() =>
-		Assert.AreEqual(Maybe<int>.Empty(), ((int?)null).ToMaybe());
-	
-	[Test]
-	public void TestNullableStructOfValueToMaybe() =>
-		Assert.AreEqual(Maybe<int>.Create(25), ((int?)25).ToMaybe());
-
-	[Test]
-	public void TestNullableRefOfNullToMaybe() =>
-		Assert.AreEqual(Maybe<object>.Empty(), ((object?)null).ToMaybe());
-	
-	[Test]
-	public void TestNullableRefOfValueToMaybe() =>
-		Assert.AreEqual(Maybe<object>.Create(new {}), ((object?)new {}).ToMaybe());
-}

Base.Tests/Structures/EnumerableExtensionTests.cs

@@ -0,0 +1,23 @@
+using System.Linq;
+using FruityFoundation.Base.Structures;
+using NUnit.Framework;
+
+namespace Base.Tests.Structures;
+
+public class EnumerableExtensionTests
+{
+	[TestCase(new object[] { 0, 1, 2 }, true, new object[] { 85 }, ExpectedResult = new object[] { 0, 1, 2, 85 })]
+	[TestCase(new object[] { "hi" }, false, new object[] { "there" }, ExpectedResult = new object[] { "hi" })]
+	public object[] TestConditionalConcat(object[] input, bool condition, object[] second) =>
+		input.ConditionalConcat(condition, second).ToArray();
+
+	[TestCase(new object[] { 0, 1, 2 }, true, 3, ExpectedResult = new object[] { 0, 1, 2, 3 })]
+	[TestCase(new object[] { 0, 1, 2 }, false, 3, ExpectedResult = new object[] { 0, 1, 2 })]
+	public object[] TestConditionalAppend(object[] input, bool condition, object second) =>
+		input.ConditionalAppend(condition, second).ToArray();
+
+	[TestCase(new object[] { 0, 1, 2 }, true, 85, ExpectedResult = new object[0])]
+	[TestCase(new object[] { "hi", "there" }, false, "there", ExpectedResult = new object[] { "hi", "there" })]
+	public object[] TestConditionalWhere(object[] input, bool condition, object valueToKeep) =>
+		input.ConditionalWhere(condition, x => x.Equals(valueToKeep)).ToArray();
+}

Base.Tests/Structures/MaybeExtensionTests.cs

@@ -0,0 +1,29 @@
+using System;
+using FruityFoundation.Base.Structures;
+using NUnit.Framework;
+
+namespace Base.Tests.Structures;
+
+public class MaybeExtensionTests
+{
+	[Test]
+	public void EnumerableFirstOrEmptyTests()
+	{
+		Assert.AreEqual(Maybe.Empty<string>(), Array.Empty<string>().FirstOrEmpty());
+		Assert.AreEqual(Maybe.Just<string>("banana"), new[] { "banana" }.FirstOrEmpty());
+	}
+
+	[Test]
+	public void TestToMaybe()
+	{
+		Assert.AreEqual(Maybe.Empty<int>(), Maybe.Empty<int>());
+		Assert.AreNotEqual(Maybe.Just(293921), Maybe.Just(2));
+	}
+
+	[Test]
+	public void MaybeNullableTests()
+	{
+		Assert.IsNull(Maybe.Empty<int>().ToNullable());
+		Assert.IsNull(Maybe.Just(0, hasValue: _ => false).ToNullable());
+	}
+}

Base.Tests/Structures/NullableExtensionTests.cs

@@ -0,0 +1,15 @@
+using FruityFoundation.Base.Structures;
+using NUnit.Framework;
+
+namespace Base.Tests.Structures;
+
+public class NullableExtensionTests
+{
+	[Test]
+	public void TestNullableStructOfNullToMaybe() =>
+		Assert.AreEqual(Maybe.Empty<int>(), ((int?)null).ToMaybe());
+	
+	[Test]
+	public void TestNullableStructOfValueToMaybe() =>
+		Assert.AreEqual(Maybe.Just(25), ((int?)25).ToMaybe());
+}

Base.Tests/Structures/StringExtensionTests.cs

@@ -1,37 +1,27 @@
-using FruityFoundation.Base.Extensions;
-using FruityFoundation.Base.Structures;
-using NUnit.Framework;
-
-namespace Base.Tests.Extensions;
-
-public class StringExtensionTests
-{
-	[Test]
-	[TestCase("banana", "banana", ExpectedResult = true)]
-	[TestCase("banana", "baNAnA", ExpectedResult = true)]
-	[TestCase("tuckerIsMyDog", "tuckerisMYdog", ExpectedResult = true)]
-	[TestCase("if I were a dog, I'd go insane", "how do dogs not get bored", ExpectedResult = false)]
-	public bool EqualsIgnoreCaseTests(string inputOne, string inputTwo) =>
-		inputOne.EqualsIgnoreCase(inputTwo);
-
-	[Test]
-	[TestCase("bananas have potassium", "banana", ExpectedResult = true)]
-	[TestCase("you can't spell trucker without ucker", "UCKER", ExpectedResult = true)]
-	public bool ContainsIgnoreCaseTests(string haystack, string needle) =>
-		haystack.ContainsIgnoreCase(needle);
-
-	[Test]
-	public void StringToCouldBeTests()
-	{
-#pragma warning disable CS8604
-		Assert.AreEqual(Maybe<string>.Empty(), (null as string).ToMaybe());
-#pragma warning restore CS8604
-		Assert.AreEqual(Maybe<string>.Create("banana"), "banana".ToMaybe());
-	}
-
-	[Test]
-	[TestCase("banana", 1, ExpectedResult = "b")]
-	[TestCase("This is a longer sentence. I would like it capped at 30 characters.", 30, ExpectedResult = "This is a longer sentence. I w")]
-	public string StringTruncateTests(string str, int maxLength) =>
-		str.Truncate(maxLength);
-}
+using FruityFoundation.Base.Structures;
+using NUnit.Framework;
+
+namespace Base.Tests.Structures;
+
+public class StringExtensionTests
+{
+	[Test]
+	[TestCase("banana", "banana", ExpectedResult = true)]
+	[TestCase("banana", "baNAnA", ExpectedResult = true)]
+	[TestCase("tuckerIsMyDog", "tuckerisMYdog", ExpectedResult = true)]
+	[TestCase("if I were a dog, I'd go insane", "how do dogs not get bored", ExpectedResult = false)]
+	public bool EqualsIgnoreCaseTests(string inputOne, string inputTwo) =>
+		inputOne.EqualsIgnoreCase(inputTwo);
+
+	[Test]
+	[TestCase("bananas have potassium", "banana", ExpectedResult = true)]
+	[TestCase("you can't spell trucker without ucker", "UCKER", ExpectedResult = true)]
+	public bool ContainsIgnoreCaseTests(string haystack, string needle) =>
+		haystack.ContainsIgnoreCase(needle);
+
+	[Test]
+	[TestCase("banana", 1, ExpectedResult = "b")]
+	[TestCase("This is a longer sentence. I would like it capped at 30 characters.", 30, ExpectedResult = "This is a longer sentence. I w")]
+	public string StringTruncateTests(string str, int maxLength) =>
+		str.Truncate(maxLength);
+}

Base/Base.csproj

@@ -15,6 +15,8 @@
       <Version>1.2.2</Version>
       <PackageRequireLicenseAcceptance>true</PackageRequireLicenseAcceptance>
       <PackageLicenseFile>LICENSE</PackageLicenseFile>
+      <AssemblyName>FruityFoundation.Base</AssemblyName>
+      <TargetFrameworks>net6.0;net7.0</TargetFrameworks>
   </PropertyGroup>
   <ItemGroup>
     <None Include="..\LICENSE" Pack="true" PackagePath="" />

Base/Extensions/EnumerableExtensions.cs

@@ -1,28 +0,0 @@
-using System;
-using System.Collections.Generic;
-using System.Linq;
-
-namespace FruityFoundation.Base.Extensions;
-
-public static class EnumerableExtensions
-{
-	public static IEnumerable<T> ConditionalConcat<T>(this IEnumerable<T> enumerable, bool isConditionValid, IEnumerable<T> second) =>
-		!isConditionValid ? enumerable : enumerable.Concat(second);
-
-	public static IEnumerable<T> ConditionalWhere<T>(this IEnumerable<T> enumerable, bool isConditionValid, Func<T, bool> pred) =>
-		!isConditionValid ? enumerable : enumerable.Where(pred);
-
-	public static IEnumerable<TOutput> Choose<TInput, TOutput>(this IEnumerable<TInput> enumerable, Func<TInput, TOutput?> mapper)
-		where TOutput : class? =>
-		enumerable
-			.Select(mapper)
-			.Where(x => x is not null)
-			.Cast<TOutput>();
-
-	public static IEnumerable<TOutput> Choose<TInput, TOutput>(this IEnumerable<TInput> enumerable, Func<TInput, TOutput?> mapper)
-		where TOutput : struct =>
-		enumerable
-			.Select(mapper)
-			.Where(x => x.HasValue)
-			.Select(x => x!.Value);
-}

Base/Extensions/NullableExtensions.cs

@@ -1,12 +0,0 @@
-using FruityFoundation.Base.Structures;
-
-namespace FruityFoundation.Base.Extensions;
-
-public static class NullableExtensions
-{
-	public static Maybe<T> ToMaybe<T>(this T? item) where T : struct =>
-		item ?? Maybe<T>.Empty();
-
-	public static Maybe<T> ToMaybe<T>(this T? item) where T : class =>
-		item ?? Maybe<T>.Empty();
-}

Base/Structures/DataReaderMaybeExtensions.cs

@@ -1,8 +1,7 @@
-using System;
+using System;
 using System.Data;
-using FruityFoundation.Base.Structures;
 
-namespace FruityFoundation.Base.Extensions;
+namespace FruityFoundation.Base.Structures;
 
 public static class DataReaderExtensions
 {
@@ -42,6 +41,6 @@ public static class DataReaderExtensions
 	public static Maybe<string> TryGetString(this IDataReader reader, int ord) =>
 		TryGet(reader, ord, reader.GetString);
 
-	private static Maybe<T> TryGet<T>(IDataReader reader, int ord, Func<int, T> valueGetter) =>
-		reader.IsDBNull(ord) ? Maybe<T>.Empty() : valueGetter(ord);
-}
+	private static Maybe<T> TryGet<T>(IDataRecord reader, int ord, Func<int, T> valueGetter) =>
+		reader.IsDBNull(ord) ? Maybe.Empty<T>() : valueGetter(ord);
+}

Base/Structures/EnumerableExtensions.cs

@@ -0,0 +1,20 @@
+using System;
+using System.Collections.Generic;
+using System.Linq;
+
+namespace FruityFoundation.Base.Structures;
+
+public static class EnumerableExtensions
+{
+	public static IEnumerable<T> ConditionalConcat<T>(this IEnumerable<T> enumerable, bool condition, IEnumerable<T> second) =>
+		!condition ? enumerable : enumerable.Concat(second);
+
+	public static IEnumerable<T> ConditionalAppend<T>(this IEnumerable<T> enumerable, bool condition, T second) =>
+		condition ? enumerable.Append(second) : enumerable;
+	
+	public static IEnumerable<T> ConditionalWhere<T>(this IEnumerable<T> enumerable, bool condition, Func<T, bool> pred) =>
+		!condition ? enumerable : enumerable.Where(pred);
+
+	public static IEnumerable<TOutput> Choose<TInput, TOutput>(this IEnumerable<TInput> enumerable, Func<TInput, Maybe<TOutput>> chooser) =>
+		enumerable.Select(chooser).Where(x => x.HasValue).Select(x => x.Value);
+}

Base/Structures/Maybe.cs

@@ -1,18 +1,20 @@
-// Normally we wouldn't want to disable Nullable references, but in this case we want to.
-// We're assuming that if you're following Maybe conventions, you won't be hitting null ref exceptions.
+namespace FruityFoundation.Base.Structures;
 
 using System;
 
-#pragma warning disable CS8601
-namespace FruityFoundation.Base.Structures;
+public static class Maybe
+{
+	public static Maybe<T> Just<T>(T value) => new(value, hasValue: true);
+	public static Maybe<T> Just<T>(T value, Func<T, bool> hasValue) => new(value, hasValue: hasValue(value));
+	public static Maybe<T> Empty<T>() => new(val: default!, hasValue: false);
+}
 
-[Serializable]
-public struct Maybe<T>
+public readonly struct Maybe<T>
 {
 	private readonly T _value;
 	public readonly bool HasValue;
 
-	private Maybe(T val = default!, bool hasValue = true)
+	internal Maybe(T val = default!, bool hasValue = true)
 	{
 		_value = val;
 		HasValue = hasValue;
@@ -29,12 +31,13 @@ public struct Maybe<T>
 		}
 	}
 
-	public T OrValue(T orVal) =>
-		HasValue ? Value : orVal;
+	public T OrValue(T orVal) => HasValue ? Value : orVal;
+
+	public T OrEval(Func<T> valueFactory) => HasValue ? Value : valueFactory();
 
 	public bool Try(out T val)
 	{
-		val = HasValue ? Value : default;
+		val = HasValue ? Value : default!;
 
 		return HasValue;
 	}
@@ -42,23 +45,34 @@ public struct Maybe<T>
 	public T OrThrow(string msg) =>
 		HasValue ? Value : throw new Exception(msg);
 
+	public T OrThrow(Func<string> messageFactory) =>
+		HasValue ? Value : throw new Exception(messageFactory());
+
+	public T OrThrow(Func<Exception> exFactory) =>
+		HasValue ? Value : throw exFactory();
+
 	public Maybe<TOutput> Map<TOutput>(Func<T, TOutput> transformer) =>
-		HasValue
-			? Maybe<TOutput>.Create(transformer(Value))
-			: Maybe<TOutput>.Empty();
+		HasValue ? Maybe.Just(transformer(Value)) : Maybe.Empty<TOutput>();
 
-	public object ToDbValue() =>
-		HasValue && Value is not null
-			? Value
-			: DBNull.Value;
+	public Maybe<TOutput> Bind<TOutput>(Func<T, TOutput> binder) =>
+		HasValue ? binder(Value) : Maybe.Empty<TOutput>();
 
-	public static Maybe<T> Create(T val, bool hasValue = true) => new(val, hasValue);
+	public Maybe<TOutput> Cast<TOutput>()
+	{
+		if (!HasValue)
+			return Maybe.Empty<TOutput>();
 
-	public static Maybe<T> Create(T val, Func<T, bool> hasValue) => new(val, hasValue(val));
+		try
+		{
+			return (TOutput)Convert.ChangeType(Value, typeof(TOutput))!;
+		}
+		catch (InvalidCastException)
+		{
+			return Maybe.Empty<TOutput>();
+		}
+	}
 
-	public static Maybe<T> Empty() => new(default!, hasValue: false);
-
-	public static implicit operator Maybe<T>(T val) => Create(val);
+	public static implicit operator Maybe<T>(T val) => Maybe.Just(val);
 
 	public static explicit operator T(Maybe<T> val) => val.Value;
 

Base/Structures/MaybeExtensions.cs

@@ -10,7 +10,7 @@ public static class MaybeExtensions
 	{
 		using var enumerator = collection.GetEnumerator();
 		
-		return !enumerator.MoveNext() ? Maybe<T>.Empty() : enumerator.Current;
+		return !enumerator.MoveNext() ? Maybe.Empty<T>() : enumerator.Current;
 	}
 
 	public static Maybe<T> FirstOrEmpty<T>(this IEnumerable<T> collection, Func<T, bool> pred)
@@ -19,9 +19,12 @@ public static class MaybeExtensions
 			if (pred(item))
 				return item;
 		
-		return Maybe<T>.Empty();
+		return Maybe.Empty<T>();
 	}
 
+	public static Maybe<TValue> TryGet<TKey, TValue>(this IReadOnlyDictionary<TKey, TValue> dict, TKey key) =>
+		dict.TryGetValue(key, out var value) ? Maybe.Just(value) : Maybe.Empty<TValue>();
+
 	public static T? ToNullable<T>(this Maybe<T> item) where T : struct =>
 		item.HasValue ? item.Value : null;
 
@@ -30,4 +33,4 @@ public static class MaybeExtensions
 			.Select(mapper)
 			.Where(x => x.HasValue)
 			.Select(x => x.Value);
-}
+}

Base/Structures/NullableExtensions.cs

@@ -0,0 +1,7 @@
+namespace FruityFoundation.Base.Structures;
+
+public static class NullableExtensions
+{
+	public static Maybe<T> ToMaybe<T>(this T? item) where T : struct =>
+		item ?? Maybe.Empty<T>();
+}

Base/Structures/Result.cs

@@ -0,0 +1,49 @@
+using System;
+
+namespace FruityFoundation.Base.Structures;
+
+public readonly struct Result<TSuccess, TFailure>
+{
+	private readonly Maybe<TSuccess> _successVal;
+	private readonly Maybe<TFailure> _failureVal;
+
+	private Result(Maybe<TSuccess> successVal, Maybe<TFailure> failureVal)
+	{
+		_successVal = successVal;
+		_failureVal = failureVal;
+	}
+
+	public static Result<TSuccess, TFailure> CreateSuccess(TSuccess val) =>
+		new(successVal: val, failureVal: Maybe.Empty<TFailure>());
+
+	public static Result<TSuccess, TFailure> CreateFailure(TFailure val) =>
+		new(successVal: Maybe.Empty<TSuccess>(), failureVal: val);
+
+	public bool IsSuccess => _successVal.HasValue;
+	public bool IsFailure => _failureVal.HasValue;
+
+	public bool TrySuccess(out TSuccess output)
+	{
+		if (!_successVal.Try(out output))
+		{
+			output = default!;
+			return false;
+		}
+
+		return true;
+	}
+
+	public bool TryFailure(out TFailure output)
+	{
+		if (!_failureVal.Try(out output))
+		{
+			output = default!;
+			return false;
+		}
+
+		return true;
+	}
+
+	public T Merge<T>(Func<TSuccess, T> onSuccess, Func<TFailure, T> onFailure) =>
+		IsSuccess ? onSuccess(_successVal.Value) : onFailure(_failureVal.Value);
+}

Base/Structures/StringExtensions.cs

@@ -1,20 +1,20 @@
-using System;
-
-namespace FruityFoundation.Base.Extensions;
-
-public static class StringExtensions
-{
-	public static bool EqualsIgnoreCase(this string str, string otherString) =>
-		str.Equals(otherString, StringComparison.OrdinalIgnoreCase);
-
-	public static bool ContainsIgnoreCase(this string str, string otherString) =>
-		str.IndexOf(otherString, StringComparison.OrdinalIgnoreCase) != -1;
-
-	/// <summary>
-	/// Truncate a string to exactly <paramref name="maxLength"/> characters.
-	/// </summary>
-	/// <param name="str"></param>
-	/// <param name="maxLength">The maximum number of characters. If <paramref name="str"/> has fewer characters, it will be truncated to the length of <paramref name="str"/>.</param>
-	public static string Truncate(this string str, int maxLength) =>
-		str.Substring(0, Math.Min(str.Length, maxLength));
-}
+using System;
+
+namespace FruityFoundation.Base.Structures;
+
+public static class StringExtensions
+{
+	public static bool EqualsIgnoreCase(this string str, string otherString) =>
+		str.Equals(otherString, StringComparison.OrdinalIgnoreCase);
+
+	public static bool ContainsIgnoreCase(this string str, string otherString) =>
+		str.IndexOf(otherString, StringComparison.OrdinalIgnoreCase) != -1;
+
+	/// <summary>
+	/// Truncate a string to exactly <paramref name="maxLength"/> characters.
+	/// </summary>
+	/// <param name="str"></param>
+	/// <param name="maxLength">The maximum number of characters. If <paramref name="str"/> has fewer characters, it will be truncated to the length of <paramref name="str"/>.</param>
+	public static string Truncate(this string str, int maxLength) =>
+		str[..Math.Min(str.Length, maxLength)];
+}

FsBase/Extensions.fs

@@ -3,7 +3,7 @@ open FruityFoundation.Base.Structures
 
 module Option =
     let toMaybe : 'a option -> Maybe<'a> = function
-        | Some x -> x |> Maybe.Create
+        | Some x -> x |> Maybe.Just
         | None -> Maybe.Empty ()
 
     let fromMaybe : Maybe<'a> -> 'a option = function

FsBase/FsBase.fsproj

@@ -29,7 +29,7 @@
     </ItemGroup>
 
     <ItemGroup>
-      <PackageReference Update="FSharp.Core" Version="7.0.0" />
+      <PackageReference Update="FSharp.Core" Version="7.0.300" />
     </ItemGroup>
 
     <ItemGroup>