Inspection for cyclical use of object model

[ThunderFrame]

I just came across an SO question that did something similar to:

Dim app As Application
Set app = Application
Debug.Print app.Workbooks.Application.ActiveSheet.Name

Rubberduck should have an inspection that identifies redundant circular/cyclical object model usage, including extreme examples like:

Application.Application.Application.Application.Application.Application.Calculate