H
This method dispatches on the type of model$human.
model$human
compute_H(model)
model
an object from make_MicroMoB
a vector of length n giving the size of each human population stratum
n