Update textractOpenAIEmbeddings.m

Adding extra tests to increase code coverage in extractOpenAIEmbeddings

Author: vpapanasta

tests/textractOpenAIEmbeddings.m

@@ -16,7 +16,8 @@ function saveEnvVar(testCase)
     end
 
     properties(TestParameter)
-        InvalidInput = iGetInvalidInput;
+        InvalidInput = iGetInvalidInput();
+        ValidDimensionsModelCombinations = iGetValidDimensionsModelCombinations();
     end
 
     methods(Test)
@@ -31,6 +32,18 @@ function keyNotFound(testCase)
             testCase.verifyError(@()extractOpenAIEmbeddings("bla"), "llms:keyMustBeSpecified");
         end
 
+        function validCombinationOfModelAndDimension(testCase, ValidDimensionsModelCombinations)
+            testCase.verifyWarningFree(@()extractOpenAIEmbeddings("bla", ...
+                Dimensions=ValidDimensionsModelCombinations.Dimensions,...
+                ModelName=ValidDimensionsModelCombinations.ModelName, ...
+                ApiKey="not-real"));
+        end
+
+        function embedStringWithSuccessfulOpenAICall(testCase)
+            testCase.verifyWarningFree(@()extractOpenAIEmbeddings("bla", ...
+                ApiKey=getenv("OPENAI_KEY")));
+        end
+
         function invalidCombinationOfModelAndDimension(testCase)
             testCase.verifyError(@()extractOpenAIEmbeddings("bla", ...
                 Dimensions=10,...
@@ -54,7 +67,7 @@ function testInvalidInputs(testCase, InvalidInput)
     end    
 end
 
-function invalidInput = iGetInvalidInput
+function invalidInput = iGetInvalidInput()
 invalidInput = struct( ...
     "InvalidEmptyText", struct( ...
         "Input",{{ "" }},...
@@ -117,4 +130,15 @@ function testInvalidInputs(testCase, InvalidInput)
     "InvalidApiKeySize",struct( ...
         "Input",{{"bla", "ApiKey" ["abc" "abc"] }},...
         "Error","MATLAB:validators:mustBeTextScalar"));
-end
+end
+
+function validDimensionsModelCombinations = iGetValidDimensionsModelCombinations()
+validDimensionsModelCombinations = struct( ...
+    "CaseTextEmbedding3Small", struct( ...
+        "Dimensions",10,...
+        "ModelName", "text-embedding-3-small"), ...
+    ...
+    "CaseTextEmbedding3Large", struct( ...
+        "Dimensions",10,...
+        "ModelName", "text-embedding-3-large"));
+end