wafermap.m

来自「MDPSAS工具箱是马里兰大学开发的」· M 代码 · 共 63 行

function B = wafermap(deltawaf,waferid,param)

% wafermap.m Create a wafermap object. Called as
%
%            B = wafermap(deltawaf,waferid,param)
%
% INPUT PARAMETERS
%
%         deltawaf : a wafer map in the form of a scalarfield object
%          waferid : character string wafer ID (OPTIONAL)
%            param : assocarray of wafer processing parameters (OPTIONAL)
%                    
%
% OBJECT FIELDS
%
%     scalarfield : the parent class
%                   = deltawaf (delta, the stalled wafer dep pattern)

% Copyright (c) by Raymond A. Adomaitis, 1998-2006

if nargin == 0 % default values

    nr   = 10;
    nth  = 31;
    rmax = 1;
    xshift = 0;
    yshift = 0;
    
    waferid = [];
    param = [];

    % Define the quadgrid over the wafer domain omega

    R = quadgrid('cyln',nr,'r',[0 rmax]);
    T = quadgrid('peri',nth,'th');

    omegawaf = relquad(R*T,[xshift,yshift]);  % wafer grid relative to rxr
    deltawaf = scalarfield(omegawaf,0);  % stalled wafer dep pattern

end

if nargin > 0

    if ~isa(deltawaf,'scalarfield')
        error('Input must be a scalarfield')
    end

    omegawaf = get(deltawaf,'pd');
    if ~isa(omegawaf,'relquad')
        deltawaf = scalarfield( relquad(omegawaf,[0,0]), ...
                                get(deltawaf,'val') );
    end
    
    if nargin < 2, waferid = []; end
    if nargin < 3, param = []; end

end

B.waferid = waferid;
B.param   = param;

B = class(B,'wafermap',deltawaf);