F# - List Comprehension To Replace For-Loop

Question

I am trying to replace an existing for-loop with an equivalent loop-comprehension but I am struggling to get the expected result.

module SOQN =

    open System