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