diff --git a/Model scripts/GloWPa.R b/Model scripts/GloWPa.R
index 5ad35fa9b0b529f87124dc5deed397976db976ff..57c05c1c3faf652b813e15efffe85ad3f3047ed8 100644
--- a/Model scripts/GloWPa.R	
+++ b/Model scripts/GloWPa.R	
@@ -134,7 +134,6 @@ glowpa.run <- function(scenario,human_data,isoraster,popurban,poprural,wwtp_inpu
     }
     else if(SCENARIO$loadings_module==2){
       totals <- pathogenflow.calc.totals(OUTPUT$emissions)
-      write.csv(OUTPUT$emissions,file.path(SCENARIO$model_output,sprintf("humanemissions_%s_%s_intermediate.csv",PATHOGEN$name,SCENARIO$run)))
       OUTPUT$emissions <<- totals
     }