#CentCount(L): returns the number of NE in a centipede game with structure L
CentCount:=proc(L) local i:
nops(CentipedeAll(L)):
end:

#PGFCent(n, round, K1, K2, M)
PGFCent:=proc(n, round, K1, K2, M) local i:
add(t^CentCount(RandGameCentB(n, round, K1, K2)),i=1...M)/M:
end: