From 0a96f02c7d7136f6d6fd0f07bde826039d801530 Mon Sep 17 00:00:00 2001 From: Sven Karsten Date: Thu, 16 Feb 2023 13:51:02 +0100 Subject: [PATCH] Albedo is now accounted for in MOM5 code --- src/flux_lib/radiation/distribute_radiation_flux.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/flux_lib/radiation/distribute_radiation_flux.F90 b/src/flux_lib/radiation/distribute_radiation_flux.F90 index 5b26f86..71b13f9 100644 --- a/src/flux_lib/radiation/distribute_radiation_flux.F90 +++ b/src/flux_lib/radiation/distribute_radiation_flux.F90 @@ -21,7 +21,7 @@ module distribute_radiation_flux_mod ! apply surface-type-dependent albedo and get rid of averaged albedo - flux_radiation_surface_type = flux_radiation_averaged * (1.0 - albedo_surface_type) / (1.0 - albedo_averaged) + flux_radiation_surface_type = flux_radiation_averaged ! * (1.0 - albedo_surface_type) ! / (1.0 - albedo_averaged) end subroutine distribute_radiation_flux