1// =============================================================================
2// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3// Copyright (C) 2008 - INRIA
4//
5//  This file is distributed under the same license as the Scilab package.
6// =============================================================================
7
8//typename
9
10[typs,nams]=typename();
11if or(typs<>[1;2;4;5;6;7;8;9;10;11;13;14;15;16;17;128;129;130]) then pause,end
12if or(nams<>["s";"p";"b";"sp";"spb";"msp";"i";"h";"c";"function";"f";"l";"tl";"ml";"ptr";"ip";"fptr"])  then pause,end
13