From 262574f8bbd2bfca7c471296dc024a3656e116cb Mon Sep 17 00:00:00 2001 From: Heiko Klein Date: Wed, 22 Jan 2025 19:12:51 +0100 Subject: [PATCH] Update src/common/fldout_nc.f90 Co-authored-by: Magnus Ulimoen --- src/common/fldout_nc.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/common/fldout_nc.f90 b/src/common/fldout_nc.f90 index ff84fe4b..90c1b949 100644 --- a/src/common/fldout_nc.f90 +++ b/src/common/fldout_nc.f90 @@ -1456,7 +1456,7 @@ subroutine accumulate_fields(tf1, tf2, tnow, tstep, nsteph) ! Doses due to cloud immersion and deposition is neglected if (compute_aircraft_doserate) then block - ! use all running components separately since doses might be differnt + ! use all running components separately since doses might be different USE snapparML, only: ncomp, run_comp real, parameter :: regulatory_minimum_pressure = 750 ! hPa