// #Conformance #ObjectOrientedTypes #TypeInference 
// Verify the use of Type Kind Attributes
module TypeInference 

[<Interface>]
type TK_I_000 =
 interface
 end
 
//[<Interface>]
//type TK_I_001 =

let mutable a = false

try 
  a <- (System.Reflection.Assembly.GetExecutingAssembly().GetTypes() |> Array.find (fun t -> t.FullName = "TypeInference+TK_I_000")).IsInterface
with 
  | _ as e -> 
    printfn "%A" e
    a <- false
    
(if (a) then 0 else 1) |> exit


