Set up negative log likelihood loss function
Negative log likelihood loss function
module function setup_loss_nll() result(loss) !! Set up negative log likelihood loss function type(nll_loss_type) :: loss !! Negative log likelihood loss function end function setup_loss_nll