npar function

Extract number of model parameters