A.Sub fl(By Val () As Integer)
B.Sub fl(n() As Integer)As Integer
C.Function fl(fl As Integer)As Integer
D.Function fl(By Val f As Integer)