29 lines
429 B
Plaintext
29 lines
429 B
Plaintext
#
|
|
# Example of interactive redefinition
|
|
# of the geometry
|
|
#
|
|
# this macro can be executed at any time
|
|
# during an interactive session:
|
|
#
|
|
# Idle> /control/execute newgeom.mac
|
|
#
|
|
#
|
|
/calor/setNbOfLayers 1
|
|
#
|
|
/calor/setAbsMat Aluminium
|
|
/calor/setAbsThick 10. cm
|
|
#
|
|
/calor/setGapMat Air
|
|
/calor/setGapThick 0. cm
|
|
#
|
|
/calor/setSizeYZ 10. cm
|
|
#
|
|
/calor/update
|
|
#
|
|
/calor/setField 5 tesla
|
|
#
|
|
/vis/clear/scene
|
|
/vis/clear/view
|
|
/vis/draw/current
|
|
|