<h2 id="heading-url">URL</h2>
<p><a href="https://leetcode.com/problems/longest-palindromic-substring/" class="autolinkedURL autolinkedURL-url" target="_blank">leetcode.com/problems/longest-palindromic-s..</a></p>
<h2 id="heading-code">Code</h2>
<p><a href="https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/problems/0005/main.fsx" class="autolinkedURL autolinkedURL-url" target="_blank">github.com/syohex/dotnet-study/blob/master/..</a></p>
<pre><code class="lang-fsharp">let longestPalindrome (s: string) : string =
    let len = s.Length
    let dp: bool [,] = Array2D.zeroCreate len len

    for i in 0 .. len - 1 do
        dp.[i, i] &lt;- true

    let mutable start = 0
    let mutable last = 0

    for i in 0 .. len - 2 do
        if s.[i] = s.[i + 1] then
            dp.[i, i + 1] &lt;- true
            start &lt;- i
            last &lt;- i + 1

    for i in 2 .. len do
        for j in 0 .. (len - i - 1) do
            if s.[j] = s.[j + i] &amp;&amp; dp.[j + 1, j + i - 1] then
                dp.[j, j + i] &lt;- true
                start &lt;- j
                last &lt;- j + i

    s.[start..last]
</code></pre>


## URL

https://leetcode.com/problems/longest-palindromic-substring/

## Code

https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/problems/0005/main.fsx

```fsharp
let longestPalindrome (s: string) : string =
    let len = s.Length
    let dp: bool [,] = Array2D.zeroCreate len len

    for i in 0 .. len - 1 do
        dp.[i, i] <- true

    let mutable start = 0
    let mutable last = 0

    for i in 0 .. len - 2 do
        if s.[i] = s.[i + 1] then
            dp.[i, i + 1] <- true
            start <- i
            last <- i + 1

    for i in 2 .. len do
        for j in 0 .. (len - i - 1) do
            if s.[j] = s.[j + i] && dp.[j + 1, j + i - 1] then
                dp.[j, j + i] <- true
                start <- j
                last <- j + i

    s.[start..last]
```

LeetCode 5. Longest Palindromic Substring in F#

URL

Code