Update ch05-06-intrinsic.md

Author: Euler-37

src/ch05-06-intrinsic.md

@@ -21,4 +21,28 @@ Fortran中提供了大量的内置函数，熟练使用这些内置函数，可
   `minloc(array,dim=1)`这样写可以返回一个数。
 - `dot_product(a,b)`这个函数用于计算两个一维数组的内积，需要注意的是，当传入的是`complex`类型的时候，它实际上计算的是\\(a^{H}b\\)而不是\\(a^{T}b\\)
 - `reshape，mamtul`这些返回数组的内置函数，在`ifort/ifx`中优化很差，会造成栈溢出`stack overflow`,需要谨慎使用。
+- `reduce`,`reduce`接收一个数组，并对数组元素做相对应的规约操作(目前仅`ifx/ifort`支持)
+
+    规约操作是指对于矩阵`a`和运算`f(x,y)`,假设有初始值`id`
+    ``` fortran
+    do i=1,n
+      id = f(id,a(i))
+    end do
+    ```
+    例如计算一个数组的模
+    ``` fortran
+    program main
+        implicit none
+        write(*,*)reduce([real::1,2,3],add_pow)
+    contains
+        pure real function add_pow(x,y)result(f)
+            real,intent(in)::x,y
+            f=sqrt(x**2+y**2)
+        end function add_pow
+    end program main
+    ```
+    - 练习：查询相关函数的文档，思考如何计算一个数组的模平方
+    - 练习：使用reduce计算数组的最大公约数，最小公倍数
+    
+