freplace.fs

  let FReplace (remove:string) (replace:string) (input:string) = input.Replace(remove, replace)

  let Insert sql s1 s2 =
    sql
    |> FReplace "step1" s1
    |> FReplace "step2" s2

  (* OR, possibly more concise: *) 

  let PipeInsert s1 s2 =
    FReplace "step1" s1
    >> FReplace "step2" s2
    >> FReplace "step3" "you could keep going"