initial commit

ks/Models/FP56/Model_grt_rtw/rt_nonfinite.cpp

@@ -0,0 +1,109 @@
+/*
+ * rt_nonfinite.cpp
+ *
+ * Code generation for model "Model".
+ *
+ * Model version              : 1.2
+ * Simulink Coder version : 9.7 (R2022a) 13-Nov-2021
+ * C++ source code generated on : Sat Mar 28 11:28:04 2026
+ *
+ * Target selection: grt.tlc
+ * Note: GRT includes extra infrastructure and instrumentation for prototyping
+ * Embedded hardware selection: Intel->x86-64 (Windows64)
+ * Code generation objectives: Unspecified
+ * Validation result: Not run
+ */
+
+extern "C" {
+
+#include "rtGetNaN.h"
+
+}
+  extern "C"
+{
+
+#include "rtGetInf.h"
+
+}
+
+#include <stddef.h>
+#include "rtwtypes.h"
+
+extern "C" {
+
+#include "rt_nonfinite.h"
+
+}
+#define NumBitsPerChar                 8U
+
+extern "C" {
+  real_T rtInf;
+  real_T rtMinusInf;
+  real_T rtNaN;
+  real32_T rtInfF;
+  real32_T rtMinusInfF;
+  real32_T rtNaNF;
+}
+  extern "C"
+{
+  /*
+   * Initialize the rtInf, rtMinusInf, and rtNaN needed by the
+   * generated code. NaN is initialized as non-signaling. Assumes IEEE.
+   */
+  void rt_InitInfAndNaN(size_t realSize)
+  {
+    (void) (realSize);
+    rtNaN = rtGetNaN();
+    rtNaNF = rtGetNaNF();
+    rtInf = rtGetInf();
+    rtInfF = rtGetInfF();
+    rtMinusInf = rtGetMinusInf();
+    rtMinusInfF = rtGetMinusInfF();
+  }
+
+  /* Test if value is infinite */
+  boolean_T rtIsInf(real_T value)
+  {
+    return (boolean_T)((value==rtInf || value==rtMinusInf) ? 1U : 0U);
+  }
+
+  /* Test if single-precision value is infinite */
+  boolean_T rtIsInfF(real32_T value)
+  {
+    return (boolean_T)(((value)==rtInfF || (value)==rtMinusInfF) ? 1U : 0U);
+  }
+
+  /* Test if value is not a number */
+  boolean_T rtIsNaN(real_T value)
+  {
+    boolean_T result{ (boolean_T) 0 };
+
+    size_t bitsPerReal{ sizeof(real_T) * (NumBitsPerChar) };
+
+    if (bitsPerReal == 32U) {
+      result = rtIsNaNF((real32_T)value);
+    } else {
+      union {
+        LittleEndianIEEEDouble bitVal;
+        real_T fltVal;
+      } tmpVal;
+
+      tmpVal.fltVal = value;
+      result = (boolean_T)((tmpVal.bitVal.words.wordH & 0x7FF00000) ==
+                           0x7FF00000 &&
+                           ( (tmpVal.bitVal.words.wordH & 0x000FFFFF) != 0 ||
+                            (tmpVal.bitVal.words.wordL != 0) ));
+    }
+
+    return result;
+  }
+
+  /* Test if single-precision value is not a number */
+  boolean_T rtIsNaNF(real32_T value)
+  {
+    IEEESingle tmp;
+    tmp.wordL.wordLreal = value;
+    return (boolean_T)( (tmp.wordL.wordLuint & 0x7F800000) == 0x7F800000 &&
+                       (tmp.wordL.wordLuint & 0x007FFFFF) != 0 );
+  }
+}