diff --git a/chem/emissions_driver.F b/chem/emissions_driver.F
index 2394518d1a..04d28cf322 100644
--- a/chem/emissions_driver.F
+++ b/chem/emissions_driver.F
@@ -423,9 +423,8 @@ subroutine emissions_driver(id,ktau,dtstep,DX,DY,                      &
 
       ivolcano=0
       
-      !area=dx*dx
-      ! A. Ukhov 12 Oct 2024
-      area=(dx/mapfac_mx(i,j))*(dy/mapfac_my(i,j))
+      
+      area=dx*dx
 
       dust_emiss_active    = 0
       seasalt_emiss_active = 0
diff --git a/chem/module_emissions_anthropogenics.F b/chem/module_emissions_anthropogenics.F
index 5d0bae5e03..f570c78919 100755
--- a/chem/module_emissions_anthropogenics.F
+++ b/chem/module_emissions_anthropogenics.F
@@ -91,8 +91,8 @@ subroutine add_anthropogenics(id,dtstep,dz8w,config_flags,rho_phy,alt,  &
           chem(its:ite,k,j,p_no)  = chem(its:ite,k,j,p_no) + emis_ant(its:ite,k,j,p_e_no)*conv_rho(its:ite)
           chem(its:ite,k,j,p_no2) = chem(its:ite,k,j,p_no2) + emis_ant(its:ite,k,j,p_e_no2)*conv_rho(its:ite)
           chem(its:ite,k,j,p_nh3) = chem(its:ite,k,j,p_nh3) + emis_ant(its:ite,k,j,p_e_nh3)*conv_rho(its:ite)
-          chem(its:ite,k,j,p_hcl) = chem(its:ite,k,j,p_hcl) + emis_ant(its:ite,k,j,p_e_hcl)*conv_rho(its:ite)
-          chem(its:ite,k,j,p_ch3cl) = chem(its:ite,k,j,p_ch3cl) + emis_ant(its:ite,k,j,p_e_ch3cl)*conv_rho(its:ite)
+          if (p_e_hcl >= param_first_scalar .and. p_hcl >= param_first_scalar) chem(its:ite,k,j,p_hcl) = chem(its:ite,k,j,p_hcl) + emis_ant(its:ite,k,j,p_e_hcl)*conv_rho(its:ite)
+          if (p_e_ch3cl >= param_first_scalar .and. p_ch3cl >= param_first_scalar) chem(its:ite,k,j,p_ch3cl) = chem(its:ite,k,j,p_ch3cl) + emis_ant(its:ite,k,j,p_e_ch3cl)*conv_rho(its:ite)
 is_mozart:if( is_moz_chm ) then
             chem(its:ite,k,j,p_bigalk) = chem(its:ite,k,j,p_bigalk) + emis_ant(its:ite,k,j,p_e_bigalk)*conv_rho(its:ite)
             chem(its:ite,k,j,p_bigene) = chem(its:ite,k,j,p_bigene) + emis_ant(its:ite,k,j,p_e_bigene)*conv_rho(its:ite)