From f7ef7641edc4111995d933ba4ebd2f85f05dc6d7 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: Mon, 24 Feb 2025 16:50:46 +0300 Subject: [PATCH] fix run.f90 --- srcF/sfx_run.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/srcF/sfx_run.f90 b/srcF/sfx_run.f90 index 784ecb8..a7cdf1a 100644 --- a/srcF/sfx_run.f90 +++ b/srcF/sfx_run.f90 @@ -70,7 +70,7 @@ contains type(numericsType_sheba) :: numerics_sheba !< surface flux module (SHEBA) numerics parameters type(numericsType_sheba_noit) :: numerics_sheba_noit !< surface flux module (SHEBA) numerics parameters type(numericsType_most_snow) :: numerics_most_snow !< surface flux module (MOST_SNOW) numerics parameters - type(numericsType_most_snow) :: numerics_sheba_coare !< surface flux module (MOST_SNOW) numerics parameters + type(numericsType_sheba_coare) :: numerics_sheba_coare !< surface flux module (MOST_SNOW) numerics parameters integer :: num !< number of 'cells' in input ! -------------------------------------------------------------------------------- -- GitLab