自编程子程序适用于流体区域的比热容、密度、粘度、表面张力系数及导热系数。由于程序非常相似，这里仅描述一种性质。
如果想要使用自编程粘度子程序USERVISLAW，对正在分析的特定模型就需要把其用户化。
编好子程序，使其与ANSYS库连接起来，并使一个执行复制可用，然后就可以重新开始对模型进行分析，并且激活已定义的粘度模型。可以使用以下方法：
命令：FLDATA7，PROT，VISC，USRV（或USER）
菜单：Main Menu→Preprocessor→FLOTRAN Set Up→Fluid Properties
Main Menu→Solution→FLOTRAN Set Up→Fluid Properties
在这个点上，可能想要确定的每一个性质都是最新的，并且想使粘度输出进入到结果文件中。为了这样做，可使用以下命令或菜单：
命令：FLDATA12，PROP，UFRQ，1
FLDATA5，OUTP，VISC，T
菜单：Main Menu→Preprocessor→FLOTRAN Set Up→Fluid Properties
Main Menu→Solution→FLOTRAN Set Up→Fluid Properties
接下来需要确定与自定义粘度模型相关的4个系数。可使用以上所示的菜单路径，或使用以下的命令：(www.xing528.com)
命令：FLDATA7，NOMI，VISC，Value（确定系数1）
FLDATA6，COF1，VISC，Value（确定系数2）
FLDATA9，COF2，VISC，Value（确定系数3）
FLDATA10，COF3，VISC，Value（确定系数4）
子程序就产生了一个Power Law粘度模型。
也可以确定一个初始粘度来加速收敛，可通过以下方法：
命令：FLDATA12，PROP，IVISC，Value
菜单：Main Menu→Preprocessor→FLOTRAN Set Up→Fluid Properties
Main Menu→Preprocessor→FLOTRAN Set Up→Fluid Properties
一旦确定了系数以及随意的一个初始粘度，就可以通过SOLVE命令或选择Main Menu→Solution→Run FLOTRAN菜单来求解模型。
免责声明：以上内容源自网络，版权归原作者所有，如有侵犯您的原创版权请告知，我们将尽快删除相关内容。
