Skip to content

Conversation

@MikePuzanov
Copy link
Owner

No description provided.

@@ -0,0 +1,13 @@
module SeqTest
let seqMake () =
let rec seqCheck element i = i <> element

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

а зачем это вынесено в отдельную функцию? Она ещё и не рекурсивна (:


[<Test>]
let SeqTest () =
let first15Nums = [ for i in 0 .. 14 -> Seq.item i (seqMake()) ]

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Suggested change
let first15Nums = [ for i in 0 .. 14 -> Seq.item i (seqMake()) ]
let first15Nums = seqMake() |> Seq.take 15


open System

let buildSquare n =

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Не самое изящное решение, но засчитано.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment

Labels

None yet

Projects

None yet

Development

Successfully merging this pull request may close these issues.

3 participants