Skip to content

Resolve "Create Material class"

Lucas POLO-LOPEZ requested to merge 10-create-material-class into develop

Closes #10 (closed)

Methods to implement

addNormalMaterial(name,Eps,Mue,colour,**kwords)

**kwords are 'tand', 'sigma', 'tandM', 'sigmaM', all of which have a default value of 0.

VBA string:

'With Material\n',...
'.Reset\n',...
'.Name "%s"\n',...
'.Type "Normal"\n',...
'.Epsilon "%s"\n',...
'.Mue "%s"\n',...
'.TanD "%s"\n',...
'.TanDFreq "0.0"\n',...
'.TanDGiven "%s"\n',...
'.TanDModel "ConstTanD"\n',...
'.Sigma "%s"\n',...
'.TanDM "%s"\n',...
'.TanDMFreq "0.0"\n',...
'.TanDMGiven "%s"\n',...
'.TanDMModel "ConstTanD"\n',...
'.SigmaM "%s"\n',...
'.Colour "%f", "%f", "%f"\n',...
'.Create\n',...
 'End With'

addAnisotropicMaterial(name,Eps,Mue,colour)

VBA string:

'With Material\n',...
'.Reset\n',...
'.Name "%s"\n',...
'.Type "Anisotropic"\n',...
'.EpsilonX "%s"\n',...
'.EpsilonY "%s"\n',...
'.EpsilonZ "%s"\n',...
'.MueX "%s"\n',...
'.MueY "%s"\n',...
'.MueZ "%s"\n',...
'.Colour "%f", "%f", "%f"\n',...
'.Create\n',...
'End With'

Merge request reports