You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
moduleDiamondletmake(target:char)=letwiteLine letterCount (line:int,letter:char)=letbeforeAndAfter="".PadRight(letterCount - line -1)letmiddleLenght=if line =0then0else(line *2-1)letmiddle="".PadRight(middleLenght)if letter ='A'then
sprintf "%s%c%s" beforeAndAfter letter beforeAndAfter
else
sprintf "%s%c%s%c%s" beforeAndAfter letter middle letter beforeAndAfter
letusedLetters=['A'..target]|> List.mapi (fun x y ->(x,y))
usedLetters
|> List.rev |> List.tail
|> List.append usedLetters
|> List.map (fun(line,letter)-> witeLine usedLetters.Length (line, letter))|> List.reduce (fun x y -> sprintf "%s\n%s" x y)
When I submit code
Then it fails with not informative error: