Still even even more fixes after last update

metno · Jun 10, 2021 · c0ca302 · c0ca302
1 parent 7913a65
commit c0ca302
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/uEMEP_subgrid_EMEP.f90 b/uEMEP_subgrid_EMEP.f90
@@ -1029,7 +1029,7 @@ subroutine uEMEP_subgrid_EMEP
         count=0
         do i_source=1,n_source_index
         !do i_source=1,n_source_calculate_index
-        if (calculate_source(i_source).or.calculate_EMEP_source(i_source).or.save_EMEP_source(i_source)) then
+        if (calculate_source(i_source).or.calculate_EMEP_source(i_source)) then
 
             !Check values for local and totals for each source
             !write(*,*) trim(source_file_str(i_source))