mirror of
https://github.com/Smaug123/WoofWare.PawPrint
synced 2025-10-16 19:08:40 +00:00
15 lines
325 B
Forth
15 lines
325 B
Forth
namespace WoofWare.PawPrint
|
|
|
|
open System.Collections.Immutable
|
|
|
|
[<RequireQualifiedAccess>]
|
|
module internal ImmutableArray =
|
|
|
|
let map (f : 'a -> 'b) (arr : ImmutableArray<'a>) : ImmutableArray<'b> =
|
|
let b = ImmutableArray.CreateBuilder ()
|
|
|
|
for i in arr do
|
|
b.Add (f i)
|
|
|
|
b.ToImmutable ()
|