yumura

# Load
Split-Path $MyInvocation.MyCommand.Path -Parent | Push-Location
Get-ChildItem poco_*.ps1 | %{. $_}
Pop-Location

function Select-Poco
{
  Param
  (
    [Object[]]$Property = $null,

yumura

$here = Split-Path -Parent $MyInvocation.MyCommand.Path
$sut = (Split-Path -Leaf $MyInvocation.MyCommand.Path).Replace(".Ex.Tests.", ".")
. "$here\$sut"

function json
{
    Begin {$w = @()}

    Process {$w += ,$_}

yumura

$here = Split-Path -Parent $MyInvocation.MyCommand.Path
$sut = (Split-Path -Leaf $MyInvocation.MyCommand.Path).Replace(".Converter.Tests.", ".")
$ConvertFromPomp = "$here\$sut"

Set-StrictMode -Version Latest

Describe "No Conversion" {
    It Table {
        $inJson = '{"Array":[{}]}'
        $inPomp = @"

yumura

[CmdletBinding()]
Param
(
    [ValidateNotNullOrEmpty()]
    [string] $Title = "",

    [parameter(ValueFromPipeline=$true)]
    $Value,

    [string] $PhotoURL,

yumura

$here = Split-Path -Parent $MyInvocation.MyCommand.Path
$sut = (Split-Path -Leaf $MyInvocation.MyCommand.Path) -replace '\.Tests\.', '.' -replace '\.ps1', '.psm1'
Import-Module "$here\$sut" -Force

Describe "Church Numerals" {
    $cSucc  = \ n f x . f (\ n f x)
    $cPlus  = \ m n . n $cSucc m
    $cMult  = \ m n f . m (\ n f)
    $cExp   = \ m n f x . (\ n m) f x
    $cPred  = \ n f x . n (\ g h . h (\ g f)) (\ u . x) (\ u . u)