条件を満たす行を取り除く
条件を満たす行を取り除く
http://ja.doukaku.org/10/
今回も時間がないので簡単な問題を選択
namespace Doukakuorg open System open System.IO (* 条件を満たす行を取り除く http://ja.doukaku.org/10/ *) type C10 private () = static member Run path = if File.Exists(path) then let write texts = File.WriteAllLines(path, texts) File.ReadAllLines(path) |> Array.filter (fun a -> not(a.StartsWith("#"))) |> write ()