numo-narray-alt 0.9.6 → 0.9.8

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 819274f9f9bc411b8276d69966bcba8aa94bc6d61f73920f653411729e4ef247
-  data.tar.gz: c4ccb23dd013573cd80bd8ab73398fd1a67adf6018a8bd55eebff776a69df6d8
+  metadata.gz: 0b3599445e17b270ef62828929231b129d12bc263e8492a5b4b6c7768107cc63
+  data.tar.gz: f902d9c0c471fd6a32b0e388292468357a2b9828dbe5c2837d5ecbace488351c
 SHA512:
-  metadata.gz: 35056f83d76f4c565f45b97ee8c9c992e6e3f3d77bd63b4ad7102d26631e4fbd82caaec87cb188bd2b23baf9785068923c6e54c441a6c188492526c848e2d0c0
-  data.tar.gz: 78f1154e6e77b6d9848b5a8c1e8d5818b7daeb891f5f476950eff003d7045022f7f57b0518c51c192756bd9b140e5bef737236d168b9918fe2610365388ac2f4
+  metadata.gz: 113dda84cc8bf37ee2013b1314a7a3aed1be8746481c6dae136026a376dd5c77c7698775757c2e07bf34a9b6fbf98f4fc7e569ed0085b2c8c6e215328f4958af
+  data.tar.gz: e5a1dc3ed30d54dddef769cd9f98e790f2aae0ab781f8be599f46015335387f9afb6c79ab44f91d826119bd2dbc41ba070376784ea32a1d3d8cf25b1aff324a6

data/README.md

@@ -5,14 +5,17 @@
 [![BSD 3-Clause License](https://img.shields.io/badge/License-BSD%203--Clause-orange.svg)](https://github.com/yoshoku/numo-narray-alt/blob/main/LICENSE)
 [![Documentation](https://img.shields.io/badge/api-reference-blue.svg)](https://gemdocs.org/gems/numo-narray-alt/)
 
-Numo::NArray Alternative is an experimental project forked from [Numo::NArray](https://github.com/ruby-numo/numo-narray).
-Its goal is to adopt more modern Ruby features and development practices.
-The project owner is also the developer of [Rumale](https://github.com/yoshoku/rumale), a machine learning library,
-and may add new features to this project to support the needs of Rumale.
-In addition, since Rumale depends on Numo::NArray, namespaces, class names, and method names will be kept unchanged
-to allow this library to be used as a drop-in replacement.
-
-The project owner has the utmost respect for Numo::NArray and its creator, Prof. Masahiro Tanaka.
+Numo::NArray Alternative (numo-narray-alt) is a project forked from
+[Numo::NArray](https://github.com/ruby-numo/numo-narray).
+The project aims to support the latest Ruby features, release bug fixes as quickly as possible,
+and adopt modern development practices.
+In addition, module names, class names, and method names remain unchanged for compatibility,
+making it a drop-in replacement.
+The project owner is also the developer of [Rumale](https://github.com/yoshoku/rumale),
+a machine learning library, and may add new features to numo-narray-alt to support the needs of Rumale.
+
+The project owner has the utmost respect for Numo::NArray and its creator,
+Prof. [Masahiro Tanaka](https://github.com/masa16).
 This project is in no way intended to adversely affect the development of the original Numo::NArray.
 
 ## Installation
@@ -23,9 +26,9 @@ $ gem install numo-narray-alt
 
 ## Usage
 
-The same as Numo::NArray.
+The usage is exactly the same as Numo::NArray.
 
-```irb
+```ruby
 irb(main):001> require 'numo/narray'
 => true
 irb(main):002> x = Numo::DFloat[[1, 2, 3], [4, 5, 6]]
@@ -40,6 +43,17 @@ Numo::DFloat#shape=[2,2]
 irb(main):004>
 ```
 
+## Documentation
+
+- [API Documentation on Gemdocs](https://gemdocs.org/gems/numo-narray-alt/)
+- [Major Changes Since Fork](https://github.com/yoshoku/numo-narray-alt/wiki/Major-Changes-Since-Fork)
+
+Since it is compatible with Numo::NArray, the following Numo::NArray documentation is also useful.
+
+- [Comparison with Numpy](https://github.com/ruby-numo/numo-narray/wiki/Comparison-with-Numpy)
+- [Numo vs numpy](https://github.com/ruby-numo/numo-narray/wiki/Numo-vs-numpy)
+- [100 narray exercises](https://github.com/ruby-numo/numo-narray/wiki/100-narray-exercises)
+
 ## Related Projects
 
 Numo::NArray Alternative is used in the following projects:
@@ -77,6 +91,13 @@ $ bundle exec rubocop
 $ clang-format --dry-run --Werror --style=file ext/**/*.h ext/**/*.c
 ```
 
+This project follows [Conventional Commits](https://www.conventionalcommits.org/en/v1.0.0/).
+Please run `npm install` to set up husky and commitlint for commit message validation:
+
+```shell
+$ npm install
+```
+
 ## Contributing
 
 Bug reports and pull requests are welcome on GitHub at https://github.com/yoshoku/numo-narray-alt.

data/ext/numo/narray/SFMT-params19937.h

@@ -30,22 +30,14 @@
 #define ALTI_SR2_PERM64                                                                        \
   (vector unsigned char)(15, 0, 1, 2, 3, 4, 5, 6, 17, 8, 9, 10, 11, 12, 13, 14)
 #else /* For OTHER OSs(Linux?) */
-#define ALTI_SL1                                                                               \
-  { SL1, SL1, SL1, SL1 }
-#define ALTI_SR1                                                                               \
-  { SR1, SR1, SR1, SR1 }
-#define ALTI_MSK                                                                               \
-  { MSK1, MSK2, MSK3, MSK4 }
-#define ALTI_MSK64                                                                             \
-  { MSK2, MSK1, MSK4, MSK3 }
-#define ALTI_SL2_PERM                                                                          \
-  { 1, 2, 3, 23, 5, 6, 7, 0, 9, 10, 11, 4, 13, 14, 15, 8 }
-#define ALTI_SL2_PERM64                                                                        \
-  { 1, 2, 3, 4, 5, 6, 7, 31, 9, 10, 11, 12, 13, 14, 15, 0 }
-#define ALTI_SR2_PERM                                                                          \
-  { 7, 0, 1, 2, 11, 4, 5, 6, 15, 8, 9, 10, 17, 12, 13, 14 }
-#define ALTI_SR2_PERM64                                                                        \
-  { 15, 0, 1, 2, 3, 4, 5, 6, 17, 8, 9, 10, 11, 12, 13, 14 }
+#define ALTI_SL1 { SL1, SL1, SL1, SL1 }
+#define ALTI_SR1 { SR1, SR1, SR1, SR1 }
+#define ALTI_MSK { MSK1, MSK2, MSK3, MSK4 }
+#define ALTI_MSK64 { MSK2, MSK1, MSK4, MSK3 }
+#define ALTI_SL2_PERM { 1, 2, 3, 23, 5, 6, 7, 0, 9, 10, 11, 4, 13, 14, 15, 8 }
+#define ALTI_SL2_PERM64 { 1, 2, 3, 4, 5, 6, 7, 31, 9, 10, 11, 12, 13, 14, 15, 0 }
+#define ALTI_SR2_PERM { 7, 0, 1, 2, 11, 4, 5, 6, 15, 8, 9, 10, 17, 12, 13, 14 }
+#define ALTI_SR2_PERM64 { 15, 0, 1, 2, 3, 4, 5, 6, 17, 8, 9, 10, 11, 12, 13, 14 }
 #endif /* For OSX */
 #define IDSTR "SFMT-19937:122-18-1-11-1:dfffffef-ddfecb7f-bffaffff-bffffff6"
 

data/ext/numo/narray/numo/narray.h

@@ -13,8 +13,8 @@ extern "C" {
 #endif
 #endif
 
-#define NARRAY_VERSION "0.9.6"
-#define NARRAY_VERSION_CODE 960
+#define NARRAY_VERSION "0.9.8"
+#define NARRAY_VERSION_CODE 980
 
 #include <math.h>
 #include "numo/compat.h"

data/ext/numo/narray/numo/types/complex.h

@@ -172,14 +172,14 @@ static inline dtype c_log(dtype x) {
 static inline dtype c_log2(dtype x) {
   dtype z;
   z = c_log(x);
-  z = c_mul_r(x, M_LOG2E);
+  z = c_mul_r(z, M_LOG2E);
   return z;
 }
 
 static inline dtype c_log10(dtype x) {
   dtype z;
   z = c_log(x);
-  z = c_mul_r(x, M_LOG10E);
+  z = c_mul_r(z, M_LOG10E);
   return z;
 }
 

data/ext/numo/narray/src/mh/math/acos.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_ACOS_H
+#define NUMO_NARRAY_MH_MATH_ACOS_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_ACOS_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(acos, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_ACOS_H */

data/ext/numo/narray/src/mh/math/acosh.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_ACOSH_H
+#define NUMO_NARRAY_MH_MATH_ACOSH_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_ACOSH_METHOD_FUNC(tDType, tNAryType)                                    \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(acosh, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_ACOSH_H */

data/ext/numo/narray/src/mh/math/asin.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_ASIN_H
+#define NUMO_NARRAY_MH_MATH_ASIN_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_ASIN_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(asin, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_ASIN_H */

data/ext/numo/narray/src/mh/math/asinh.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_ASINH_H
+#define NUMO_NARRAY_MH_MATH_ASINH_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_ASINH_METHOD_FUNC(tDType, tNAryType)                                    \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(asinh, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_ASINH_H */

data/ext/numo/narray/src/mh/math/atan.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_ATAN_H
+#define NUMO_NARRAY_MH_MATH_ATAN_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_ATAN_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(atan, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_ATAN_H */

data/ext/numo/narray/src/mh/math/atan2.h

@@ -0,0 +1,29 @@
+#ifndef NUMO_NARRAY_MH_MATH_ATAN2_H
+#define NUMO_NARRAY_MH_MATH_ATAN2_H 1
+
+#define DEF_NARRAY_FLT_ATAN2_METHOD_FUNC(tDType, tNAryType)                                    \
+  static void iter_##tDType##_math_s_atan2(na_loop_t* const lp) {                              \
+    size_t n;                                                                                  \
+    char *p1, *p2, *p3;                                                                        \
+    ssize_t s1, s2, s3;                                                                        \
+    tDType x, y;                                                                               \
+    INIT_COUNTER(lp, n);                                                                       \
+    INIT_PTR(lp, 0, p1, s1);                                                                   \
+    INIT_PTR(lp, 1, p2, s2);                                                                   \
+    INIT_PTR(lp, 2, p3, s3);                                                                   \
+    for (size_t i = 0; i < n; i++) {                                                           \
+      GET_DATA_STRIDE(p1, s1, tDType, x);                                                      \
+      GET_DATA_STRIDE(p2, s2, tDType, y);                                                      \
+      x = m_atan2(x, y);                                                                       \
+      SET_DATA_STRIDE(p3, s3, tDType, x);                                                      \
+    }                                                                                          \
+  }                                                                                            \
+                                                                                               \
+  static VALUE tDType##_math_s_atan2(VALUE mod, VALUE a1, VALUE a2) {                          \
+    ndfunc_arg_in_t ain[2] = { { tNAryType, 0 }, { tNAryType, 0 } };                           \
+    ndfunc_arg_out_t aout[1] = { { tNAryType, 0 } };                                           \
+    ndfunc_t ndf = { iter_##tDType##_math_s_atan2, STRIDE_LOOP, 2, 1, ain, aout };             \
+    return na_ndloop(&ndf, 2, a1, a2);                                                         \
+  }
+
+#endif /* NUMO_NARRAY_MH_MATH_ATAN2_H */

data/ext/numo/narray/src/mh/math/atanh.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_ATANH_H
+#define NUMO_NARRAY_MH_MATH_ATANH_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_ATANH_METHOD_FUNC(tDType, tNAryType)                                    \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(atanh, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_ATANH_H */

data/ext/numo/narray/src/mh/math/cbrt.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_CBRT_H
+#define NUMO_NARRAY_MH_MATH_CBRT_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_CBRT_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(cbrt, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_CBRT_H */

data/ext/numo/narray/src/mh/math/cos.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_COS_H
+#define NUMO_NARRAY_MH_MATH_COS_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_COS_METHOD_FUNC(tDType, tNAryType)                                      \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(cos, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_COS_H */

data/ext/numo/narray/src/mh/math/cosh.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_COSH_H
+#define NUMO_NARRAY_MH_MATH_COSH_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_COSH_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(cosh, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_COSH_H */

data/ext/numo/narray/src/mh/math/erf.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_ERF_H
+#define NUMO_NARRAY_MH_MATH_ERF_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_ERF_METHOD_FUNC(tDType, tNAryType)                                      \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(erf, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_ERF_H */

data/ext/numo/narray/src/mh/math/erfc.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_ERFC_H
+#define NUMO_NARRAY_MH_MATH_ERFC_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_ERFC_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(erfc, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_ERFC_H */

data/ext/numo/narray/src/mh/math/exp.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_EXP_H
+#define NUMO_NARRAY_MH_MATH_EXP_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_EXP_METHOD_FUNC(tDType, tNAryType)                                      \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(exp, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_EXP_H */

data/ext/numo/narray/src/mh/math/exp10.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_EXP10_H
+#define NUMO_NARRAY_MH_MATH_EXP10_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_EXP10_METHOD_FUNC(tDType, tNAryType)                                    \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(exp10, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_EXP10_H */

data/ext/numo/narray/src/mh/math/exp2.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_EXP2_H
+#define NUMO_NARRAY_MH_MATH_EXP2_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_EXP2_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(exp2, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_EXP2_H */

data/ext/numo/narray/src/mh/math/expm1.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_EXPM1_H
+#define NUMO_NARRAY_MH_MATH_EXPM1_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_EXPM1_METHOD_FUNC(tDType, tNAryType)                                    \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(expm1, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_EXPM1_H */

data/ext/numo/narray/src/mh/math/frexp.h

@@ -0,0 +1,30 @@
+#ifndef NUMO_NARRAY_MH_MATH_FREXP_H
+#define NUMO_NARRAY_MH_MATH_FREXP_H 1
+
+#define DEF_NARRAY_FLT_FREXP_METHOD_FUNC(tDType, tNAryType)                                    \
+  static void iter_##tDType##_math_s_frexp(na_loop_t* const lp) {                              \
+    size_t n;                                                                                  \
+    char *p1, *p2, *p3;                                                                        \
+    ssize_t s1, s2, s3;                                                                        \
+    tDType x;                                                                                  \
+    int y;                                                                                     \
+    INIT_COUNTER(lp, n);                                                                       \
+    INIT_PTR(lp, 0, p1, s1);                                                                   \
+    INIT_PTR(lp, 1, p2, s2);                                                                   \
+    INIT_PTR(lp, 2, p3, s3);                                                                   \
+    for (size_t i = 0; i < n; i++) {                                                           \
+      GET_DATA_STRIDE(p1, s1, tDType, x);                                                      \
+      x = m_frexp(x, &y);                                                                      \
+      SET_DATA_STRIDE(p2, s2, tDType, x);                                                      \
+      SET_DATA_STRIDE(p3, s3, int32_t, y);                                                     \
+    }                                                                                          \
+  }                                                                                            \
+                                                                                               \
+  static VALUE tDType##_math_s_frexp(VALUE mod, VALUE a1) {                                    \
+    ndfunc_arg_in_t ain[1] = { { tNAryType, 0 } };                                             \
+    ndfunc_arg_out_t aout[2] = { { tNAryType, 0 }, { numo_cInt32, 0 } };                       \
+    ndfunc_t ndf = { iter_##tDType##_math_s_frexp, STRIDE_LOOP, 1, 2, ain, aout };             \
+    return na_ndloop(&ndf, 1, a1);                                                             \
+  }
+
+#endif /* NUMO_NARRAY_MH_MATH_FREXP_H */

data/ext/numo/narray/src/mh/math/hypot.h

@@ -0,0 +1,29 @@
+#ifndef NUMO_NARRAY_MH_MATH_HYPOT_H
+#define NUMO_NARRAY_MH_MATH_HYPOT_H 1
+
+#define DEF_NARRAY_FLT_HYPOT_METHOD_FUNC(tDType, tNAryType)                                    \
+  static void iter_##tDType##_math_s_hypot(na_loop_t* const lp) {                              \
+    size_t n;                                                                                  \
+    char *p1, *p2, *p3;                                                                        \
+    ssize_t s1, s2, s3;                                                                        \
+    tDType x, y;                                                                               \
+    INIT_COUNTER(lp, n);                                                                       \
+    INIT_PTR(lp, 0, p1, s1);                                                                   \
+    INIT_PTR(lp, 1, p2, s2);                                                                   \
+    INIT_PTR(lp, 2, p3, s3);                                                                   \
+    for (size_t i = 0; i < n; i++) {                                                           \
+      GET_DATA_STRIDE(p1, s1, tDType, x);                                                      \
+      GET_DATA_STRIDE(p2, s2, tDType, y);                                                      \
+      x = m_hypot(x, y);                                                                       \
+      SET_DATA_STRIDE(p3, s3, tDType, x);                                                      \
+    }                                                                                          \
+  }                                                                                            \
+                                                                                               \
+  static VALUE tDType##_math_s_hypot(VALUE mod, VALUE a1, VALUE a2) {                          \
+    ndfunc_arg_in_t ain[2] = { { tNAryType, 0 }, { tNAryType, 0 } };                           \
+    ndfunc_arg_out_t aout[1] = { { tNAryType, 0 } };                                           \
+    ndfunc_t ndf = { iter_##tDType##_math_s_hypot, STRIDE_LOOP, 2, 1, ain, aout };             \
+    return na_ndloop(&ndf, 2, a1, a2);                                                         \
+  }
+
+#endif /* NUMO_NARRAY_MH_MATH_HYPOT_H */

data/ext/numo/narray/src/mh/math/ldexp.h

@@ -0,0 +1,29 @@
+#ifndef NUMO_NARRAY_MH_MATH_LDEXP_H
+#define NUMO_NARRAY_MH_MATH_LDEXP_H 1
+
+#define DEF_NARRAY_FLT_LDEXP_METHOD_FUNC(tDType, tNAryType)                                    \
+  static void iter_##tDType##_math_s_ldexp(na_loop_t* const lp) {                              \
+    size_t n;                                                                                  \
+    char *p1, *p2, *p3;                                                                        \
+    ssize_t s1, s2, s3;                                                                        \
+    tDType x, y;                                                                               \
+    INIT_COUNTER(lp, n);                                                                       \
+    INIT_PTR(lp, 0, p1, s1);                                                                   \
+    INIT_PTR(lp, 1, p2, s2);                                                                   \
+    INIT_PTR(lp, 2, p3, s3);                                                                   \
+    for (size_t i = 0; i < n; i++) {                                                           \
+      GET_DATA_STRIDE(p1, s1, tDType, x);                                                      \
+      GET_DATA_STRIDE(p2, s2, tDType, y);                                                      \
+      x = m_ldexp(x, y);                                                                       \
+      SET_DATA_STRIDE(p3, s3, tDType, x);                                                      \
+    }                                                                                          \
+  }                                                                                            \
+                                                                                               \
+  static VALUE tDType##_math_s_ldexp(VALUE mod, VALUE a1, VALUE a2) {                          \
+    ndfunc_arg_in_t ain[2] = { { tNAryType, 0 }, { tNAryType, 0 } };                           \
+    ndfunc_arg_out_t aout[1] = { { tNAryType, 0 } };                                           \
+    ndfunc_t ndf = { iter_##tDType##_math_s_ldexp, STRIDE_LOOP, 2, 1, ain, aout };             \
+    return na_ndloop(&ndf, 2, a1, a2);                                                         \
+  }
+
+#endif /* NUMO_NARRAY_MH_MATH_LDEXP_H */

data/ext/numo/narray/src/mh/math/log.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_LOG_H
+#define NUMO_NARRAY_MH_MATH_LOG_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_LOG_METHOD_FUNC(tDType, tNAryType)                                      \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(log, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_LOG_H */

data/ext/numo/narray/src/mh/math/log10.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_LOG10_H
+#define NUMO_NARRAY_MH_MATH_LOG10_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_LOG10_METHOD_FUNC(tDType, tNAryType)                                    \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(log10, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_LOG10_H */

data/ext/numo/narray/src/mh/math/log1p.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_LOG1P_H
+#define NUMO_NARRAY_MH_MATH_LOG1P_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_LOG1P_METHOD_FUNC(tDType, tNAryType)                                    \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(log1p, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_LOG1P_H */

data/ext/numo/narray/src/mh/math/log2.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_LOG2_H
+#define NUMO_NARRAY_MH_MATH_LOG2_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_LOG2_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(log2, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_LOG2_H */

data/ext/numo/narray/src/mh/math/sin.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_SIN_H
+#define NUMO_NARRAY_MH_MATH_SIN_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_SIN_METHOD_FUNC(tDType, tNAryType)                                      \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(sin, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_SIN_H */

data/ext/numo/narray/src/mh/math/sinc.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_SINC_H
+#define NUMO_NARRAY_MH_MATH_SINC_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_SINC_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(sinc, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_SINC_H */

data/ext/numo/narray/src/mh/math/sinh.h

@@ -0,0 +1,9 @@
+#ifndef NUMO_NARRAY_MH_MATH_SINH_H
+#define NUMO_NARRAY_MH_MATH_SINH_H 1
+
+#include "unary_func.h"
+
+#define DEF_NARRAY_FLT_SINH_METHOD_FUNC(tDType, tNAryType)                                     \
+  DEF_NARRAY_FLT_UNARY_MATH_METHOD_FUNC(sinh, tDType, tNAryType)
+
+#endif /* NUMO_NARRAY_MH_MATH_SINH_H */