MIPSVER Prints or returns MIPS version info for current installation. V = MIPSVER returns the current MIPS version number. V = MIPSVER('all') returns a struct with the fields Name, Version, Release and Date (all strings). Calling MIPSVER without assigning the return value prints the version and release date of the current installation of MIPS. See also MPVER.
0001 function rv = mipsver(varargin) 0002 %MIPSVER Prints or returns MIPS version info for current installation. 0003 % V = MIPSVER returns the current MIPS version number. 0004 % V = MIPSVER('all') returns a struct with the fields Name, Version, 0005 % Release and Date (all strings). Calling MIPSVER without assigning the 0006 % return value prints the version and release date of the current 0007 % installation of MIPS. 0008 % 0009 % See also MPVER. 0010 0011 % MIPS 0012 % $Id: mipsver.m 2489 2014-12-17 16:27:36Z ray $ 0013 % by Ray Zimmerman, PSERC Cornell 0014 % Copyright (c) 2010 by Power System Engineering Research Center (PSERC) 0015 % 0016 % This file is part of MIPS. 0017 % See http://www.pserc.cornell.edu/matpower/ for more info. 0018 % 0019 % MIPS is free software: you can redistribute it and/or modify 0020 % it under the terms of the GNU General Public License as published 0021 % by the Free Software Foundation, either version 3 of the License, 0022 % or (at your option) any later version. 0023 % 0024 % MIPS is distributed in the hope that it will be useful, 0025 % but WITHOUT ANY WARRANTY; without even the implied warranty of 0026 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 0027 % GNU General Public License for more details. 0028 % 0029 % You should have received a copy of the GNU General Public License 0030 % along with MIPS. If not, see <http://www.gnu.org/licenses/>. 0031 % 0032 % Additional permission under GNU GPL version 3 section 7 0033 % 0034 % If you modify MIPS, or any covered work, to interface with 0035 % other modules (such as MATLAB code and MEX-files) available in a 0036 % MATLAB(R) or comparable environment containing parts covered 0037 % under other licensing terms, the licensors of MIPS grant 0038 % you additional permission to convey the resulting work. 0039 0040 v = struct( 'Name', 'MIPS', ... 0041 'Version', '1.1', ... 0042 'Release', '', ... 0043 'Date', '17-Dec-2014' ); 0044 if nargout > 0 0045 if nargin > 0 0046 rv = v; 0047 else 0048 rv = v.Version; 0049 end 0050 else 0051 fprintf('%-22s Version %-9s %11s\n', v.Name, v.Version, v.Date); 0052 end