Replace merge(n, 0, n > 0) by max(n, 0)

Author: 14NGiestas

src/stdlib_math_linspace.fypp

@@ -25,7 +25,7 @@ contains
       ${t1}$, intent(in) :: end
       integer, intent(in) :: n
 
-      ${t1}$ :: res(merge(n, 0, n > 0))
+      ${t1}$ :: res(max(n, 0))
 
       integer :: i    ! Looping index
       ${t1}$ :: interval ! Difference between adjacent elements