我们以一个简单的VOF算例来说明，算例模型如下： 

http://s3/mw690/0066xqHTzy7gJ6XHliqa2&690

算例中空气为主相，水为次相。开始时刻，inlet_one设置为速度入口边界，速度为1m/s，且水的体积分数为100%，inlet_two设置为速度入口边界，速度为1m/s，且水的体积分为0，出口为压力出口，在4s时，我们将outlet边界转换为壁面（wall），inlet_two从速度入口转换为压力出口

由于几何和网格比较简单，过程略去，打开Fluent 

http://s13/mw690/0066xqHTzy7gJ70txDK9c&690

http://s13/mw690/0066xqHTzy7gJ70zQGo5c&690

http://s4/mw690/0066xqHTzy7gJ70CXf5c3&690

http://s9/mw690/0066xqHTzy7gJ70CXdS78&690

http://s8/mw690/0066xqHTzy7gJ70Mn1Zb7&690

http://s2/mw690/0066xqHTzy7gJ70QujL01&690

http://s6/mw690/0066xqHTzy7gJ70RUWxc5&690

http://s3/mw690/0066xqHTzy7gJ70V5Qu62&690

http://s7/mw690/0066xqHTzy7gJ710dvw46&690

http://s1/mw690/0066xqHTzy7gJ7138GId0&690

http://s12/mw690/0066xqHTzy7gJ70YKnNfb&690

http://s8/mw690/0066xqHTzy7gJ719gph87&690

http://s3/mw690/0066xqHTzy7gJ71hNGqf2&690

http://s13/mw690/0066xqHTzy7gJ71mN407c&690

http://s2/mw690/0066xqHTzy7gJ71qYRXa1&690

http://s8/mw690/0066xqHTzy7gJ71wHgX37&690

http://s1/mw690/0066xqHTzy7gJ71y8qAf0&690

http://s8/mw690/0066xqHTzy7gJ71D79Ba7&690

http://s6/mw690/0066xqHTzy7gJ71yqZna5&690

http://s15/mw690/0066xqHTzy7gJ71HhjE1e&690
http://s16/mw690/0066xqHTzy7gJ7c8T7h7f&690

http://s5/mw690/0066xqHTzy7gJ7c4IyU24&690

http://s9/mw690/0066xqHTzy7gJ7cdpdC68&690

http://s13/mw690/0066xqHTzy7gJ7chukA0c&690

http://s3/mw690/0066xqHTzy7gJ7clZuyd2&690

http://s6/mw690/0066xqHTzy7gJ7cCNfv75&690

http://s16/mw690/0066xqHTzy7gJ7d0kDJ1f&690

http://s14/mw690/0066xqHTzy7gJ7d4FjL7d&690
http://s10/mw690/0066xqHTzy7gJ9xCJVTb9&690
http://s3/mw690/0066xqHTzy7gJ9xEjVo22&690
http://s6/mw690/0066xqHTzy7gJ7d1AnH75&690

(define (ModifyBC)

     (if (>= (rpgetvar 'flow-time) 4)

        (begin

          (ti-menu-load-string "define/boundary-conditions/modify-zones/zone-type outlet wall")

          (ti-menu-load-string "define/boundary-conditions/modify-zones/zone-type inlet_two pressure-outlet")

          (ti-menu-load-string "define/boundary-conditions/pressure-outlet inlet_two water , , 0")

        )

     )

然后将文本文件重命名为以.scm为后缀名（我命名为demo.scm）,通过运行该文件，可以在计算到4s时实现outlet边界转换为壁面（wall），inlet_two从速度入口转换为压力出口的转换

http://s7/mw690/0066xqHTzy7gJ7gnawSc6&690
http://s8/mw690/0066xqHTzy7gJ7nvIZF77&690
http://s13/mw690/0066xqHTzy7gJ7gtad6cc&690
http://s16/mw690/0066xqHTzy7gJ7gyE592f&690

http://s2/mw690/0066xqHTzy7gJ7guva961&690

http://s10/mw690/0066xqHTzy7gJ7gL8SZ59&690