Home > solver > TEBD_LegendAppend.m

TEBD_LegendAppend

PURPOSE ^

LegendAppend: Write the short description of the variant of the method

SYNOPSIS ^

function legendtext = TEBD_LegendAppend( OPTIONS)

DESCRIPTION ^

LegendAppend: Write the short description of the variant of the method 
%
%  legendtext = TEBD_LegendAppend( OPTIONS)
%
% 2EBD-HPE:
% Modified by C.Ortiz
% Last Modified: 5/31/2013

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 %LegendAppend: Write the short description of the variant of the method
0002 %%
0003 %%  legendtext = TEBD_LegendAppend( OPTIONS)
0004 %%
0005 %% 2EBD-HPE:
0006 %% Modified by C.Ortiz
0007 %% Last Modified: 5/31/2013
0008 function  legendtext = TEBD_LegendAppend( OPTIONS)
0009 
0010 legendtext = '2EBD-v';
0011 
0012 vers = OPTIONS.vers;
0013 legendtext = [legendtext,num2str(vers)];
0014 if isfield(OPTIONS,'subvers')
0015     legendtext = [legendtext,'.',num2str(OPTIONS.subvers)];
0016 end
0017 
0018 if isfield(OPTIONS,'tol2')
0019     legendtext = [legendtext,'-t2(',num2str(OPTIONS.tol2),')'];
0020 end
0021 
0022 if isfield(OPTIONS,'adaptive') && OPTIONS.adaptive == 1
0023     legendtext = [legendtext,' A'];
0024 end
0025 if isfield(OPTIONS,'balancedinit') && OPTIONS.balancedinit ~= 0
0026     legendtext = [legendtext,' B',num2str(OPTIONS.balancedinit)];
0027 end
0028 if isfield(OPTIONS,'dynamicscaling') && OPTIONS.dynamicscaling == 1
0029     legendtext = [legendtext,' Dyn(',num2str(OPTIONS.scaleratio), ...
0030         ',',num2str(OPTIONS.scalecorrection),',', ...
0031         num2str(OPTIONS.dyn_scale_updateiteration),')'];
0032 end
0033 legendtext = [legendtext,' sig=',num2str(OPTIONS.sigma)];
0034 
0035 if isfield(OPTIONS,'reswithgap') && OPTIONS.reswithgap > 0
0036     legendtext = [legendtext,' GAP',num2str(OPTIONS.reswithgap)];
0037 end
0038 
0039 if isfield(OPTIONS,'h1') && OPTIONS.h1 > 0
0040     legendtext = [legendtext,' h1'];
0041 end
0042 
0043 if isfield(OPTIONS,'scalewithgap') && OPTIONS.scalewithgap == 1
0044     legendtext = [legendtext,' SWGAP'];
0045 end
0046 if isfield(OPTIONS,'SCALE_WITH_NN')
0047     legendtext = [legendtext,' w',num2str(OPTIONS.SCALE_WITH_NN)];
0048 end
0049 
0050 
0051 end

Generated on Tue 06-Aug-2013 17:07:59 by m2html © 2005