Skip to content

Commit

Permalink
remove trailing ws
Browse files Browse the repository at this point in the history
  • Loading branch information
fabienpaulot committed Jan 28, 2025
1 parent 8ab758e commit 4d904bd
Showing 1 changed file with 4 additions and 3 deletions.
7 changes: 4 additions & 3 deletions full/atm_land_ice_flux_exchange.F90
Original file line number Diff line number Diff line change
Expand Up @@ -122,7 +122,8 @@ module atm_land_ice_flux_exchange_mod
! 2017/08/15 jgj added
integer :: id_co2_bot, id_co2_flux_pcair_atm, id_o2_flux_pcair_atm

integer, allocatable :: id_tr_atm(:), id_tr_surf(:), id_tr_flux(:), id_tr_mol_flux(:), id_tr_ref(:), id_tr_ref_land(:)
integer, allocatable :: id_tr_atm(:), id_tr_surf(:), id_tr_flux(:), &
id_tr_mol_flux(:), id_tr_ref(:), id_tr_ref_land(:)
integer, allocatable :: id_tr_mol_flux0(:) !f1p
integer, allocatable :: id_tr_flux_land(:), id_tr_mol_flux_land(:)
integer, allocatable :: id_tr_con_atm_land(:), & !< deposition velocity at bottom level (land)
Expand Down Expand Up @@ -251,9 +252,9 @@ module atm_land_ice_flux_exchange_mod
end type tracer_exch_ind_type
!map atm tracers to exchange, ice and land variables
type(tracer_exch_ind_type), allocatable :: tr_table_map(:)
integer :: isphum = NO_TRACER !< specific humidity index
integer :: isphum = NO_TRACER !< specific humidity index
integer :: ico2 = NO_TRACER !< co2 tracer index
integer :: inh3 = NO_TRACER !< nh3 tracer index
integer :: inh3 = NO_TRACER !< nh3 tracer index
type(FmsCoupler1dBC_type), pointer :: ex_gas_fields_atm=>NULL() !< gas fields in atm
!< Place holder for various atmospheric fields.
type(FmsCoupler1dBC_type), pointer :: ex_gas_fields_ice=>NULL() ! gas fields on ice
Expand Down

0 comments on commit 4d904bd

Please sign in to comment.