Fix peformance issue with get_resolution

The code was unnecessarily checking the consistency of a single time
series resolution in calls to get_time_series. The check occurs when
the array is added to the system.

src/single_time_series.jl

@@ -44,7 +44,7 @@ function SingleTimeSeries(;
     return SingleTimeSeries(
         name,
         data,
-        _get_resolution(data),
+        get_resolution(data),
         scaling_factor_multiplier,
         internal,
     )
@@ -72,17 +72,6 @@ function SingleTimeSeries(
     )
 end
 
-function _get_resolution(data::TimeSeries.TimeArray)
-    if length(data) < 2
-        throw(
-            ConflictingInputsError(
-                "Resolution can't be inferred from the data. Please select an appropiate constructor.",
-            ),
-        )
-    end
-    return TimeSeries.timestamp(data)[2] - TimeSeries.timestamp(data)[1]
-end
-
 """
 Construct SingleTimeSeries from a TimeArray or DataFrame.
 

src/utils/utils.jl

@@ -385,11 +385,18 @@ end
 Return the resolution from a TimeArray.
 """
 function get_resolution(ts::TimeSeries.TimeArray)
+    if length(ts) < 2
+        throw(ConflictingInputsError("Resolution can't be inferred from the data."))
+    end
+
+    timestamps = TimeSeries.timestamp(ts)
+    return timestamps[2] - timestamps[1]
+end
+
+function check_resolution(ts::TimeSeries.TimeArray)
     tstamps = TimeSeries.timestamp(ts)
     timediffs = unique([tstamps[ix] - tstamps[ix - 1] for ix in 2:length(tstamps)])
-
     res = []
-
     for timediff in timediffs
         if mod(timediff, Dates.Millisecond(Dates.Day(1))) == Dates.Millisecond(0)
             push!(res, Dates.Day(timediff / Dates.Millisecond(Dates.Day(1))))

test/test_utils.jl

@@ -53,3 +53,22 @@ IS.get_name(::FakeTimeSeries) = "fake"
         sprint(show, MIME("text/plain"), summary(FakeTimeSeries())),
     )
 end
+
+@testset "Test check_resolution" begin
+    initial_time1 = Dates.DateTime("2020-09-01")
+    len1 = 24
+    resolution1 = Dates.Hour(1)
+    timestamps1 = range(initial_time1; length = len1, step = resolution1)
+    ta1 = TimeSeries.TimeArray(timestamps1, rand(len1))
+    IS.check_resolution(ta1) == resolution1
+
+    initial_time2 = Dates.DateTime("2020-09-02")
+    len2 = 12
+    resolution2 = Dates.Minute(5)
+    timestamps2 = range(initial_time2; length = len2, step = resolution2)
+    ta2 = TimeSeries.TimeArray(timestamps2, rand(len2))
+    IS.check_resolution(ta2) == resolution2
+
+    ta3 = vcat(ta1, ta2)
+    @test_throws IS.DataFormatError IS.check_resolution(ta3)
+end