flow3d学习资源客制化操作步骤.pptxVIP

FLOW-3D V9.4客制化操作流程;Flow-3D 客製化概論;Step 1: 利用 Microsoft visual studio 2005 打开Cumtom_double.sln ;Step 2: 打开Source文件下 name.f此例子采用边界条件客制化（bc.f ）;Step 3: 编译客制化的子程序;c if(dum3.lt.ztest .or. wr.ne.6) return c phasc=dum2*xi(imax)-dum1*t wvcosc=dum3*cos(phasc) wvsinc=dum3*sin(phasc) wvcosr=dum3*cos(dum2*x(im1)-dum1*t) c i=imax i=imax-1 c do 8000 k=kprb,kprt do 8000 j=jprf,jprbk c include deck/ijk.f include deck/mijk.f c c Let fhtw = wave height c fhtw=flhtr+wvcosc fhtz=max(fhtw-z(k-1),zero)*rdz(k