From ca9e166c760d4caafe5b43b03facb55daeda3bb4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=D0=92=D0=B8=D0=BA=D1=82=D0=BE=D1=80=D0=B8=D1=8F=20=D0=A1?=
=?UTF-8?q?=D1=83=D1=8F=D0=B7=D0=BE=D0=B2=D0=B0?=
<viktoriasuazova@MacBook-Pro-Viktoria.local>
Date: Fri, 21 Feb 2025 19:27:16 +0300
Subject: [PATCH] coare run.f90 fix
---
srcF/sfx_run.f90 | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/srcF/sfx_run.f90 b/srcF/sfx_run.f90
index 6304f7d..784ecb8 100644
--- a/srcF/sfx_run.f90
+++ b/srcF/sfx_run.f90
@@ -174,6 +174,8 @@ contains
call get_surface_fluxes_vec_sheba_noit(sfx, meteo, numerics_sheba_noit, num)
else if (model == model_most_snow) then
call get_surface_fluxes_vec_most_snow(sfx, meteo, numerics_most_snow, num)
+ else if (model == model_sheba_coare) then
+ call get_surface_fluxes_vec_sheba_coare(sfx, meteo, numerics_sheba_coare, num)
end if
@@ -260,7 +262,7 @@ contains
write(*, *) ' --help'
write(*, *) ' print usage options'
write(*, *) ' --model [key]'
- write(*, *) ' key = esm (default) || log || most || sheba || sheba_noit || most_snow'
+ write(*, *) ' key = esm (default) || log || most || sheba || sheba_noit || most_snow || sheba_coare'
write(*, *) ' --dataset [key]'
write(*, *) ' key = mosaic (default) || irgason || sheba'
write(*, *) ' = lake || papa || toga || user [filename] [param]'
--
GitLab