extinction function

Simulates extinction of a species from a bipartite network