* Bug #9385 fixed - The type checking in trigonometric functions has been added.
[scilab.git] / scilab / modules / elementary_functions / macros / acscd.sci
index f0b6df2..96ab8cb 100644 (file)
@@ -17,8 +17,8 @@ function y = acscd(x)
         error(msprintf(gettext("%s: Wrong number of input argument(s): %d expected.\n"),"acscd", 1));
     end
 
-    if ~isreal(x) then
-        error(msprintf(gettext("%s: Wrong type for input argument #%d: Real matrix expected.\n"),"acscd",1));
+    if and(type(x) <> [1 5]) | ~isreal(x) then
+        error(msprintf(gettext("%s: Wrong type for input argument #%d: Real sparse or full matrix expected.\n"),"acscd",1));
     end
     y = 180/%pi*asin(ones(x)./x);
 endfunction