diff --git a/RBBGCMuso/R/calibMuso.R b/RBBGCMuso/R/calibMuso.R
index 2d47511..2612fbd 100644
--- a/RBBGCMuso/R/calibMuso.R
+++ b/RBBGCMuso/R/calibMuso.R
@@ -36,7 +36,9 @@ calibMuso <- function(settings=NULL, calibrationPar=NULL,
 ########################################################################
 ###########################Set local variables and places###############
 ########################################################################
-    cat("Biome-BGC simulation started\n") # ZOLI
+    if(!silent){
+        cat("Biome-BGC simulation started\n") # ZOLI
+    }
     if(is.null(settings)){
         settings <- setupMuso()
     }