complete.log.likelihood_Sj function

Complete log-likelihood function for xUx models.