diff --git a/physics/smoke_dust/module_add_emiss_burn.F90 b/physics/smoke_dust/module_add_emiss_burn.F90 index 80d91bb0e..036ea8525 100755 --- a/physics/smoke_dust/module_add_emiss_burn.F90 +++ b/physics/smoke_dust/module_add_emiss_burn.F90 @@ -76,15 +76,6 @@ subroutine add_emis_burn(dtstep,dz8w,rho_phy,pi, & ! the eastern US, max_ti= 20.041288* 3600. ! else max_ti= 18.041288* 3600. ! endif -! RAR: for option #1 ebb and frp are ingested for 24 hours. No modification is -! applied! - if (ebb_dcycle==1) then - do k=kts,kte - do i=its,ite - ebu(i,k,1)=ebu_in(i,1) ! RAR: - enddo - enddo - endif if (ebb_dcycle==2) then