star-meteo

commit d7b559b96ee55c16fc9d97394d596e3288cd82cf
parent 18fe4a98374f127d16f05790e9f0ad14885858e3
Author: Vincent Forest <vincent.forest@meso-star.com>
Date:   Tue, 12 Aug 2025 16:51:58 +0200

Check the loading of 4 time intervals

Diffstat:
M
src/test_smeteo_load.c
 | 
28
++++++++++++++++++++++++++++

1 file changed, 28 insertions(+), 0 deletions(-)
diff --git a/src/test_smeteo_load.c b/src/test_smeteo_load.c
@@ -194,7 +194,34 @@ check_1_time_interval(struct smeteo* smeteo)
     &day_1850);
 }
 
+static void
+check_4_time_intervals(struct smeteo* smeteo)
+{
+  /* Header */
+  const double albedo = 0.31659812657071051;
+  const double longitude = 10.428827285766602; /* [deg] */
+  const double latitude = 16.388128280639648; /* [deg] */
 
+  /* Time interval data */
+  const char* date[] = {
+    "01-JAN-1850 01:30:00", "01-JAN-1850 04:30:00",
+    "01-JAN-1850 07:30:00", "01-JAN-1850 10:30:00",
+  };
+  const double Tsrf[] = { 287.85, 286.18, 293.25, 307.28 }; /* [K] */
+  const double Tatm[] = { 289.62, 287.77, 291.16, 298.31 }; /* [K] */
+  const double Ahum[] = { 4.23, 0, 0, 0 }; /* [g(water)/kg(air)] */
+  const double Rhum[] = { 12.28, 0, 0, 0 };
+  const double SWdn_direct[] = { 0, 0, 175.08, 679.01 }; /* [W/m^2] */
+  const double SWdn_diffuse[] = { 0, 0, 0, 0 }; /* [W/m^2] */
+  const double SWup[] = { 0, 0, 55.43, 213.37 }; /* [W/m^2] */
+  const double Trad[] = { 271.21, 269.50, 268.62, 271.61 }; /* [K] */
+  const double H[] = { 12.60, 8.74, 7.32, 17.80 }; /* [W/K/m^2] */
+  const double LE[] = { 0.51, 0.52, 0.87, 1.78 }; /* [W/m^2] */
+  const double day_1850[] = { 0.0625, 0.1875, 0.3125, 0.4375 };
+
+  check_n_time_intervals(smeteo, albedo, longitude, latitude, 4, date, Tsrf,
+    Tatm, Ahum, Rhum, SWdn_direct, SWdn_diffuse, SWup, Trad, H, LE, day_1850);
+}
 
 /*******************************************************************************
  * The test
@@ -210,6 +237,7 @@ main(void)
 
   check_api(smeteo);
   check_1_time_interval(smeteo);
+  check_4_time_intervals(smeteo);
 
   CHK(smeteo_ref_put(smeteo) == RES_OK);
   CHK(mem_allocated_size() == 0);