R/mlnormal_verbose_f0.R

In alexanderrobitzsch/LAM: Some Latent Variable Models

## File Name: mlnormal_verbose_f0.R
## File Version: 0.05

mlnormal_verbose_f0 <- function(verbose, disp)
{
    if (verbose){
        cat(disp)
        cat("Preprocess data   ", paste( Sys.time() ), "\n" )
        utils::flush.console()
    }
}