A.PrivateSubP(aAsInteger)
B.PrivateSubP(a()AsInteger)
C.PrivateSubP(a(10)AsInteger)
D.PrivateSubP(a(n)AsInteger)