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