propertyGet2 :: Member -> [VarIn] -> ArgOut a1 -> ArgOut a2 -> IDispatch d -> IO (a1,a2)
propertyGet2 member argsin argout1 argout2 obj
      = do dispid <- obj # getMemberID member
           propertyGet2ID dispid argsin argout1 argout2 obj
propertyGet2 :: Member -> [VarIn] -> ArgOut a1 -> ArgOut a2 -> IDispatch d -> IO (a1,a2)
propertyGet2 member argsin argout1 argout2 obj
      = do dispid <- obj # getMemberID member
           propertyGet2ID dispid argsin argout1 argout2 obj
propertyGet2 member argsin argout1 argout2 obj
      = do dispid <- obj # getMemberID member
           propertyGet2ID dispid argsin argout1 argout2 obj