htrdr

commit 6b7b7f694ab21eadd020cd432a8112c36bb317d9
parent 85104c6689bd65b7ec264d261d0c446f83e68981
Author: Vincent Forest <vincent.forest@meso-star.com>
Date:   Thu, 20 Feb 2025 14:38:18 +0100

planets: check spectral arguments for volumic radiative budget

It must be longwave or shortwave. Calculating the volume radiation
balance in color space seems to make no sense.

Diffstat:
M
src/planets/htrdr_planets_args.c
 | 
17
+++++++++++++++++

1 file changed, 17 insertions(+), 0 deletions(-)
diff --git a/src/planets/htrdr_planets_args.c b/src/planets/htrdr_planets_args.c
@@ -704,6 +704,16 @@ htrdr_planets_args_init(struct htrdr_planets_args* args, int argc, char** argv)
     }
   }
 
+  if(args->output_type == HTRDR_PLANETS_ARGS_OUTPUT_VOLUMIC_RADIATIVE_BUDGET
+  && args->spectral_domain.type != HTRDR_SPECTRAL_LW
+  && args->spectral_domain.type != HTRDR_SPECTRAL_SW) {
+    fprintf(stderr,
+      "volumic radiative budget can be evaluated in "
+      "longwave or shortwave only -- option '-s'\n");
+    res = RES_BAD_ARG;
+    goto error;
+  }
+
 exit:
   return res;
 error:
@@ -792,6 +802,13 @@ htrdr_planets_args_check(const struct htrdr_planets_args* args)
   if(args->output_type == HTRDR_PLANETS_ARGS_OUTPUT_VOLUMIC_RADIATIVE_BUDGET) {
     res = check_volrad_budget_args(&args->volrad_budget);
     if(res != RES_OK) return res;
+
+    /* The volumic radiative budget can be evaluated
+     * in longwave or shortwave only */
+    if(args->spectral_domain.type != HTRDR_SPECTRAL_LW
+    && args->spectral_domain.type != HTRDR_SPECTRAL_SW) {
+      return RES_BAD_ARG;
+    }
   }
 
   /* Check miscalleneous parameters */