diff --git a/srcF/sfx_run.f90 b/srcF/sfx_run.f90 index 784ecb839319cd737488052a3642beab58eadcf0..a7cdf1a05970bf18c6a5c9202a070a8e3d5850a8 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 ! --------------------------------------------------------------------------------