# cyingfan's solution

## to Two Fer in the F# Track

Published at Jun 10 2019 · 0 comments
Instructions
Test suite
Solution

`Two-fer` or `2-fer` is short for two for one. One for you and one for me.

Given a name, return a string with the message:

``````One for X, one for me.
``````

Where X is the given name.

However, if the name is missing, return the string:

``````One for you, one for me.
``````

Here are some examples:

Name String to return
Alice One for Alice, one for me.
Bob One for Bob, one for me.
One for you, one for me.
Zaphod One for Zaphod, one for me.

## Running the tests

To run the tests, run the command `dotnet test` from within the exercise directory.

## Further information

For more detailed information about the F# track, including how to get help if you're having trouble, please visit the exercism.io F# language page.

## Source

https://github.com/exercism/problem-specifications/issues/757

### TwoFerTest.fs

``````// This file was auto-generated based on version 1.2.0 of the canonical data.

module TwoFerTest

open FsUnit.Xunit
open Xunit

open TwoFer

[<Fact>]
let ``No name given`` () =
twoFer None |> should equal "One for you, one for me."

[<Fact(Skip = "Remove to run test")>]
let ``A name given`` () =
twoFer (Some "Alice") |> should equal "One for Alice, one for me."

[<Fact(Skip = "Remove to run test")>]
let ``Another name given`` () =
twoFer (Some "Bob") |> should equal "One for Bob, one for me."``````
``````﻿module TwoFer

let twoFer (input: string option): string =
"One for " + (
match input with
| None -> "you"
| Some input -> input
) + ", one for me."``````

### What can you learn from this solution?

A huge amount can be learned from reading other people’s code. This is why we wanted to give exercism users the option of making their solutions public.

Here are some questions to help you reflect on this solution and learn the most from it.

• What compromises have been made?