* Bug #9385 fixed - The type checking in trigonometric functions has been added.
[scilab.git] / scilab / modules / elementary_functions / macros / acosd.sci
index 1b12df4..a1ded81 100644 (file)
@@ -15,7 +15,7 @@ function y = acosd(x)
         error(msprintf(gettext("%s: Wrong number of input argument(s): %d expected.\n"),"acosd", 1));
     end
 
-    if ~isreal(x)
+    if type(x) <> 1 | ~isreal(x) then
         error(msprintf(gettext("%s: Wrong type for input argument #%d: Real matrix expected.\n"),"acosd",1));
     end
     if min(x)<-1|max(x)>1 then