myType является Дискриминационным Союзом, поэтому вы должны выбрать один из вариантов.
type myType = GoodState | BadState
//using your syntax to create a sequence of BadState
let create1 = seq{for _ in 1 .. 100000 do BadState} //yield is not required anymore
//another syntax to create a list of GoodState
let create2 = List.init 100000 (fun _ -> GoodState)
Кстати, я использовал подчеркивание "_", потому что в этом примере я не использую индекс , но вы можете заменить имя переменной, если хотите использовать его для чего-либо.