From 05159d0cba4baee1e8758b48614971bdc134729c Mon Sep 17 00:00:00 2001
From: Renaud Person <renaud.person@locean.ipsl.fr>
Date: Tue, 24 Jan 2023 11:25:21 +0000
Subject: [PATCH] Resolve "No reading of dust file in PISCES sediment module"
---
src/TOP/PISCES/P4Z/p4zbc.F90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/TOP/PISCES/P4Z/p4zbc.F90 b/src/TOP/PISCES/P4Z/p4zbc.F90
index f649f91f..6265cc35 100644
--- a/src/TOP/PISCES/P4Z/p4zbc.F90
+++ b/src/TOP/PISCES/P4Z/p4zbc.F90
@@ -291,7 +291,7 @@ CONTAINS
ENDIF
END IF
- ll_bc = ( ln_trcbc .AND. lltrcbc ) .OR. ln_hydrofe .OR. ln_ironsed .OR. ln_ironice
+ ll_bc = ( ln_trcbc .AND. lltrcbc ) .OR. ln_hydrofe .OR. ln_ironsed .OR. ln_ironice .OR. ln_sediment
ll_dust = ln_trc_sbc(jpfer) .OR. ln_trc_sbc(jppo4) .OR. ln_trc_sbc(jpsil) .OR. ln_sediment
ll_ndepo = ln_trc_sbc(jpno3) .OR. ln_trc_sbc(jpnh4)
ll_river = ln_trc_cbc(jpno3)
--
GitLab