发帖回复

上一页 1...12 13 14 151617 下一页

到第

页

14112阅读
162回复

[新闻]CST2011支持的GPU加速卡（清单、倍数、硬件要求）

离线asgard

UID ：105074

注册：2013-03-05
登录：2014-12-18
发帖：7
等级：旁观者

150楼发表于: 2014-12-18 19:53:27

谢谢，下载看看

离线xiafei

UID ：116057

注册：2015-05-05
登录：2016-04-25
发帖：142
等级：仿真二级

151楼发表于: 2015-07-07 21:45:59

看看，我这仿真慢的要死

离线晴天sym

UID ：80744

注册：2011-07-27
登录：2022-05-09
发帖：174
等级：仿真二级

152楼发表于: 2015-08-27 15:33:05

我也来看看！！

离线zhangzhaoxd

哈哈哈哈~~~~~~~~~~·

UID ：6759

注册：2007-12-20
登录：2023-06-20
发帖：570
等级：积极交流四级

153楼发表于: 2015-11-13 16:15:54

看看~~~~~~~~~

离线ihrton

做我所想乐我所乐

UID ：68196

注册：2010-10-23
登录：2022-08-20
发帖：44
等级：仿真新人

154楼发表于: 2015-11-13 20:41:50

看看了
是从官网下的？

做我所想乐我所乐

离线sanshaolau

UID ：100167

注册：2012-10-08
登录：2019-05-17
发帖：66
等级：仿真一级

155楼发表于: 2015-11-14 18:57:04

看看，学习一下

离线miaozhuowei

sdvdvdfav

UID ：117233

注册：2015-07-21
登录：2020-01-22
发帖：119
等级：仿真二级

156楼发表于: 2016-05-26 20:33:51

asvawvwrverasvfearfvaevfearvae

离线xinxliu

UID ：114587

注册：2014-10-07
登录：2019-12-08
发帖：186
等级：仿真二级

157楼发表于: 2016-09-23 22:52:48

看看阿奎那看看看看

离线blucruz

UID ：115858

注册：2015-04-24
登录：2016-10-25
发帖：27
等级：仿真新人

158楼发表于: 2016-09-26 16:03:09

感谢分享！！！

离线jxljg

UID ：76366

注册：2011-04-27
登录：2025-02-24
发帖：217
等级：仿真三级

159楼发表于: 2017-01-06 16:19:19

Option Explicit

Dim studio As Object
Dim ems As Object

Dim a As Integer

Sub main()

a = 30
'Call read

Set studio = CreateObject("CSTStudio.Application")
Set ems = studio.NewEMS

With ems.Units
     .Geometry "mm"
     .Frequency "Hz"
End With

With ems.Background
     .Type "Normal"
     .Epsilon "1.0"
     .Mue "1.0"
     .XminSpace "0.0"
     .XmaxSpace "0.0"
     .YminSpace "0.0"
     .YmaxSpace "0.0"
     .ZminSpace "0.0"
     .ZmaxSpace "0.0"
End With

With ems.mesh
     .MeshType "Tetrahedral"
     .UseRatioLimit "True"
     .RatioLimit "50"
     .SetAutomeshRefineDielectricsType "None"
     .MaterialRefinementTet "False"
     .MinimumStepNumber "20"
     .MinimumStepNumberTet "5"
     .SurfaceOptimization "True"
     .SurfaceSmoothing "3"
     .MinimumCurvatureRefinement "100"
     .CurvatureRefinementFactor "0.05"
     .SmallFeatureSize "0.0"
     .VolumeOptimization "True"
     .VolumeSmoothing "True"
     .DensityTransitions "0.8"
     .Automesh "True"
End With

With ems.Boundary
     .Xmin "electric"
     .Xmax "electric"
     .Ymin "electric"
     .Ymax "electric"
     .Zmin "electric"
     .Zmax "electric"
End With

With ems.VectorPlot3D
     .Objects 2000
End With

With ems.VectorPlot2D
     .Arrows 1000
End With

'ChangeProblemType "lf:fd"

With ems.Units
     .Geometry "cm"
     .Frequency "Hz"
     .Time "s"
     .TemperatureUnit "Kelvin"
     .Voltage "V"
     .Current "A"
     .Resistance "Ohm"
     .Conductance "S"
     .Capacitance "PikoF"
     .Inductance "NanoH"
End With

With ems.Background
     .Reset
     .Type "Normal"
     .Epsilon "1.0"
     .Mue "1.0"
     .ElConductivity "0.0"
     .ThermalType "Normal"
     .ThermalConductivity "0.0"
     .HeatCapacity "0.0"
     .Rho "0.0"
     .XminSpace "100"
     .XmaxSpace "100"
     .YminSpace "100"
     .YmaxSpace "100"
     .ZminSpace "100"
     .ZmaxSpace "100"
     .ApplyInAllDirections "True"
End With

With ems.Boundary
     .Xmin "expanded lf open"
     .Xmax "expanded lf open"
     .Ymin "expanded lf open"
     .Ymax "expanded lf open"
     .Zmin "expanded lf open"
     .Zmax "expanded lf open"
     .Xsymmetry "none"
     .Ysymmetry "none"
     .Zsymmetry "none"
     .XminThermal "isothermal"
     .XmaxThermal "isothermal"
     .YminThermal "isothermal"
     .YmaxThermal "isothermal"
     .ZminThermal "isothermal"
     .ZmaxThermal "isothermal"
     .XsymmetryThermal "none"
     .YsymmetryThermal "none"
     .ZsymmetryThermal "none"
     .ApplyInAllDirections "True"
     .XminTemperature ""
     .XminTemperatureType "None"
     .XmaxTemperature ""
     .XmaxTemperatureType "None"
     .YminTemperature ""
     .YminTemperatureType "None"
     .YmaxTemperature ""
     .YmaxTemperatureType "None"
     .ZminTemperature ""
     .ZminTemperatureType "None"
     .ZmaxTemperature ""
     .ZmaxTemperatureType "None"
End With

With ems.Circle
     .Reset
     .Name "circle1"
     .Curve "curve1"
     .Radius a
     .Xcenter "0"
     .Ycenter "0"
     .Segments "0"
     .Create
End With

With ems.CurrentPath
     .Reset
     .Name "path1"
     .Type "CurvePath"
     .Current "1"
     .Phase "0.0"
     .Curve "curve1:circle1"
     .Add
End With

'ChangeProblemType "Low Frequency"

With ems.MStaticSolver
     .Reset
     .Method "Tetrahedral Mesh"
     .Accuracy "1e-4"
     .MaxLinIter "0"
     .Preconditioner "ILU"
     .NlinCycles "200"
     .NlinAccuracy "1e-3"
     .CalcInductanceMatrix "False"
     .StoreResultsInCache "False"
     .MeshAdaption "False"
     .PrecomputeStationaryCurrentSource "False"
     .IgnorePECMaterial "False"
     .GridLocation "Dual"
     .LSESolverType "Auto"
     .TetSolverOrder "2"
     .TetAdaption "True"
     .TetAdaptionMinCycles "2"
     .TetAdaptionMaxCycles "6"
     .TetAdaptionAccuracy "0.01"
     .TetAdaptionRefinementPercentage "10"
     .SnapToGeometry "True"
     .UseMaxNumberOfThreads "True"
     .MaxNumberOfThreads "32"
     .UseDistributedComputing "False"
End With

ems.SaveAs "D:\CST\test.cst", False
'ems.Quit

Set studio = Nothing

With ems.mesh
     .UseRatioLimit "True"
     .RatioLimit "20000.0"
     .LinesPerWavelength "2000000"
     .MinimumStepNumber "100"
     .Automesh "True"
     .MeshType "PBA"
     .SetCreator "Low Frequency"
End With

With ems.MStaticSolver
    .MeshAdaption "False"
    .Start
End With

With ems.ResultTree
    .Name "My FieldView\B_Field"   ' Entry name and destination folder
    .File "^field_sh_b.m3d"              ' Result file name
    .Type "Bfield3D"
    .Add
End With
ems.SelectTreeItem ("My FieldView\B_Field\Abs")

End Sub

发帖回复