[R] Log-likelihood for Multinominal Probit Regression Model

[S.C. Wong]

I use mnp to run a multinominal probit regression model, but the summary 
doesn't contain the model statistics, such as the log-likelihood and degree 
of freedom, for the assessment of the goodness-of-fit of the fitted model. 
Is there any way that I can generate these statistics for the fitted model 
in R?

Many thanks in advance!
SC