anchor.diff:      member x.AuthorisorIsEditable() = 
           let cam = x.CreateClaimsAuthManager()
           let authorisor = new WifAuthorizer(cam)
  -        let id = new IdentifierImpl(reflector, "ns.class1", "member2")
  +        let id = new IdentifierImpl(metadata, "ns.class1", "member2")
           let isUsable = authorisor.IsUsable(testSession, null, id)
           Assert.IsTrue(isUsable, "expect to be visible")
       
  
positive.code:     member x.AuthorisorActionIsVisible() = 
          let cam = x.CreateClaimsAuthManager()
          let authorisor = new WifAuthorizer(cam)
          let id = new IdentifierImpl(reflector, "ns.class1", "member3", [| "" |])
          let isVisible = authorisor.IsVisible(testSession, null, id)
          Assert.IsTrue(isVisible, "expect to be visible")
      
  
negative.code:     [<Test>]
      member x.NotAuthorisedViewPropertyWrongClaim() = 
          let cam = x.CreateClaimsAuthManager()
          let id = new IdentifierImpl(metadata, "ns.class2", "member1")
          let authContext = viewAuthContext id
          let auth = cam.CheckAccess authContext
          Assert.IsFalse(auth, "expect not to be authorised")
  