function psatdomain(input)% PSATDOMAIN defines the domain for the PSAT-Simulink library%% PSATDOMAIN(INPUT)%          INPUT -> OBJECT OF THE Simulink.SlDomainInfo CLASS%% This function has been obtained by hacking Simulink% classes, as no official documentation has been found.%%Author:    Federico Milano%Date:      31-Dic-2005%Version:   1.0.0%%E-mail:    Federico.Milano@uclm.es%Web-site:  http://www.uclm.es/area/gsee/Web/Federico%% Copyright (C) 2002-2008 Federico Milanoglobal Path% Methods for class Simulink.SlDomainInfo:%% Simulink.SlDomainPortType addPortType(SlDomainInfo, string)% Simulink.SlDomainPortType findPortType(SlDomainInfo, string)% Simulink.SlDomainImage getDomainImage(SlDomainInfo, string)set(input, ...    'name', 'PSATDomain', ...    'lineBranching','off', ...    'version','beta')porttype = addPortType(input,'PMIOPort');domainimage = getDomainImage(input, [Path.images,'domain_image.bmp']);set(porttype,'icon',domainimage)