Diploma thesis
Diploma thesis
Diploma thesis
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
optwgheight�getOpt�wgheight,opts,defaults�;<br />
iassert�optwgheight ��0�;<br />
iassert�optwgheight Ε Reals�;<br />
��Print�"optwgheight: ",optwgheight�;��<br />
optdn�getOpt�dn,opts,defaults�;<br />
iassert�optdn ��0�;<br />
iassert�optdn Ε Reals�;<br />
��Print�"optdn: ",optdn�;��<br />
optairBoundary�getOpt�airBoundary,opts,defaults�;<br />
iassert�optairBoundary �� "x" �� optairBoundary �� "y" �� optairBoundary �� "z" �� optairBoundary<br />
��Print�"optairBoundary: ",optairBoundary�;��<br />
optmodesu�getOpt�modesu,opts,defaults�;<br />
iassert�optmodesu ��0�;<br />
iassert�optmodesu Ε Reals�;<br />
��Print�"optmodesu: ",optmodesu�;��<br />
optmodesv�getOpt�modesv,opts,defaults�;<br />
iassert�optmodesv ��0�;<br />
iassert�optmodesv Ε Reals�;<br />
��Print�"optmodesv: ",optmodesv�;��<br />
��gruesome code to assemble the approbriate filename��<br />
If�optairBoundary �� "y",optdirectory � ".�neff�fit�ktp�true�EY�neff�fit�true�EY�25�",optdirectory<br />
optdnmantissa�PaddedForm�10 MantissaExponent�optdn���1��,�8,6��;<br />
optdnexponent��MantissaExponent�optdn���2����1;<br />
optstringdn � ToString�optdnmantissa� �� "e�0" �� ToString��1�optdnexponent��;<br />
optwgwidth�PaddedForm�replaceSiPrefixes�optwgwidth��Micro Meter��,�8,6��;<br />
optwgheight�PaddedForm�replaceSiPrefixes�optwgheight��Micro Meter��,�8,6��;<br />
optpath � ToString�optdirectory� �� ToString�optmodesu� �� "�" �� ToString�optmodesv��� "�" ��<br />
optpath � StringReplace�optpath,�" " �� ""��;<br />
��Print�"optpath: ", optpath�;��<br />
enhancedSellmeier.m 7<br />
��extracts the coefficients from the selected file��<br />
opta � FindList�ToString�optpath�,"a�"�;<br />
opta � StringReplace�ToString�opta�,�"e�"��" 10^","e�"��" 10^�","a�" ��"", "�"�� "", "�"��""�<br />
opta � ToExpression�opta�;<br />
��Print�"opta: ", opta�;��<br />
optb � FindList�ToString�optpath�,"b�"�;<br />
optb � StringReplace�ToString�optb�,�"e�"��" 10^","e�"��" 10^�","b�" �� "", "�"�� "", "�"��""<br />
optb � ToExpression�optb�;<br />
��Print�"optb: ", optb�;��<br />
optc � FindList�ToString�optpath�,"c�"�;<br />
optc � StringReplace�ToString�optc�,�"e�"��" 10^","e�"��" 10^�","c�" �� "", "�"�� "", "�"��""<br />
optc � ToExpression�optc�;<br />
��Print�"optc: ", optc�;��<br />
optd � FindList�ToString�optpath�,"d�"�;<br />
optd � StringReplace�ToString�optd�,�"e�"��" 10^","e�"��" 10^�","d�" �� "", "�"�� "", "�"��""<br />
optd � ToExpression�optd�;<br />
��Print�"optd: ", optd�;��<br />
opte � FindList�ToString�optpath�,"e�"�;<br />
opte � StringReplace�ToString�opte�,�"e�"��" 10^","e�"��" 10^�","e�" �� "", "�"�� "", "�"��""<br />
opte � ToExpression�opte�;