Add biomass burning aerosols

[Marit Sandstad]

Fra gammel kode:

! --------------- BMB_AEROS ---------------
! Increase as a function of carbon-flux
! from deforestation until 1990, then constant.
! Historical emissions for BMB_AEROS = CO2 LUC

!Not in use due to RF close to zero.
!RBS
! trc_ix = trcID("BMB_AEROS")
! IF (yr_ix.LE.yr_1990) THEN
! IF (EM1990(trc_ix).GT.0) THEN
! FORC(yr_ix,trc_ix) = QBMB &
! * ((EMISSIONS(yr_ix,trc_ix)-EMISSIONS(1,trc_ix)) &
! / (EMISSIONS(yr_1990,trc_ix)-EMISSIONS(1,trc_ix)))
! END IF
! ELSE
! FORC(yr_ix,trc_ix) = QBMB
! END IF

[Marit Sandstad]

@ragnhibs : Vil du at vi skal implementere noe sånn som dette nå (i.e. en eller annen biomass burning aerosol forcing), eller at vi skal vente med det. Hvis vi kan ville jeg foretrekke at normeringen går mot referanseåret heller enn 1990 som i eksempelet? Løsningen her setter også konstant verdi etter 1990, men det er vel helelr ikke noe vi ønsker oss? Vi kan antagelig bruke den samme skaleringen med CO2 LUC som det var gjort tidligere, men uten å sette den konstant.

[Marit Sandstad]

BMB_AEROS_OC scaled with qbmb same way as other aerosols to match in the reference year