From 7663873bc581977dc049f37f7bb50e081950d418 Mon Sep 17 00:00:00 2001 From: Nick Wogan Date: Tue, 18 Jun 2024 16:37:55 -0700 Subject: [PATCH] link forwarddiff. fix cold trap --- src/adiabat/clima_adiabat_rc.f90 | 2 +- src/dependencies/CMakeLists.txt | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/src/adiabat/clima_adiabat_rc.f90 b/src/adiabat/clima_adiabat_rc.f90 index 22ab9be..cd94bdd 100644 --- a/src/adiabat/clima_adiabat_rc.f90 +++ b/src/adiabat/clima_adiabat_rc.f90 @@ -334,7 +334,7 @@ subroutine integrate(d, err) d%sp_type(d%ind_root) = CondensingSpeciesType elseif (d%sp_type(d%ind_root) == CondensingSpeciesType) then ! A gas has reached a cold trap - d%sp_type(:) = DrySpeciesType + d%sp_type(d%ind_root) = DrySpeciesType endif call update_f_i_dry(d, Pn, d%f_i_cur) d%stopping_reason = ReachedPtop diff --git a/src/dependencies/CMakeLists.txt b/src/dependencies/CMakeLists.txt index aacdbde..78ccb38 100644 --- a/src/dependencies/CMakeLists.txt +++ b/src/dependencies/CMakeLists.txt @@ -51,6 +51,7 @@ set(fppFiles ) fypp_f90("" "${fppFiles}" outFiles) add_library(finterp ${outFiles}) +target_link_libraries(finterp forwarddiff) CPMAddPackage( NAME dop853