CFL3D开源了




  • 管理员

     subroutine dynptch(lw,lw2,work,mgwk,wk,nwork,ncall,
         .                   maxgr,maxbl,msub1,intmx,mxxe,mptch,jdimg,
         .                   kdimg,idimg,xorig,yorig,zorig,nblock,ngrid,
         .                   levelg,ncgg,nblg,windex,ninter,iindex,nblkpt,
         .                   windx,nintr,iindx,mblkpt,llimit,iitmax,
         .                   mmcxie,mmceta,ncheck,iifit,iic0,
         .                   iiorph,iitoss,ifiner,factjlo,factjhi,
         .                   factklo,factkhi,dx,dy,dz,dthetx,dthety,
         .                   dthetz,dthetxx,dthetyy,dthetzz,
         .                   isav_dpat,isav_dpat_b,intmax,maxxe,nsub1,
         .                   lw_temp,ireq_ar,lout,ifrom,xif1,xif2,etf1,
         .                   etf2,jjmax1,kkmax1,iiint1,iiint2,nblk1,
         .                   nblk2,jimage,kimage,jte,kte,jmm,kmm,
         .                   xte,yte,zte,xmi,ymi,zmi,xmie,ymie,
         .                   zmie,sxie,seta,sxie2,seta2,xie2s,
         .                   eta2s,temp,x2,y2,z2,x1,y1,z1,
         .                   myid,myhost,mycomm,mblk2nd,nou,bou,nbuf,
         .                   ibufdim,igridg,iemg)
    

    不会FORTRAN,类似F里面这种函数,没有其他的措施处理?



  • 有种老fortran玩意儿叫common block,新fortran叫module.

    没法,早期程序就是这个风格,其实挺好的。有人说科学计算是面向数据的,面向对象其实是邪路。。。



  • @程迪不懂,这个主要模拟什么问题?



  • @mohui 空动问题吧。cfl3d网站上说空动、气弹啥的。



  • 安装脚本
    大家可以试着玩一玩

    # MPI和fortran,UBUNTU为例
    sudo apt-get update
    sudo apt-get install libopenmpi-dev gfortran build-essential git -y
    # 下载chengdi123000修正过的cfl3d代码,(spalart.F, cputim.F)
    cd $HOME
    mkdir cfl3d
    cd cfl3d
    git clone https://github.com/chengdi123000/CFL3D.git
    # cgns代码和安装
    cd $HOME/cfl3d
    wget "http://jaist.dl.sourceforge.net/project/cgns/cgnslib_2.5/Release 5/cgnslib_2.5-5.tar.gz" -O cgnslib_2.5-5.tar.gz
    tar xf cgnslib_2.5-5.tar.gz
    mkdir cgns
    mkdir cgns/include
    mkdir cgns/lib
    cd cgnslib_2.5-5
    ./configure --prefix=../cgns #这是按照最简单的配置进行编译的,没有配hdf5,并行之类高级的东西。
    make
    make install
    # 生成makefile
    cd $HOME/cfl3d/CFL3D/build
    ./Install -fastio -cgnsdir=$HOME/cfl3d/cgns
    # 编译cfl3d
    cd $HOME/cfl3d/CFL3D/build
    cp makefile_linux_gfortran_openmpi makefile #覆盖掉新生成的makefile
    make cfl3d_seq cfl3d_mpi splitter cfl3d_tools
    make precfl3d
    make ronnie preronnie
    make maggie
    make splittercmplx cfl3dcmplx_seq cfl3dcmplx_mpi 
    # 建立链接
    cd $HOME/cfl3d/CFL3D
    mkdir bin
    cd bin
    ## basic
    ln -s ../build/cfl/seq/cfl3d_seq
    ## parallel version
    ln -s ../build/cfl/mpi/cfl3d_mpi
    ## mesh block splitter
    ln -s ../build/split/seq/splitter
    ## memory usage estimator
    ln -s ../build/precfl/seq/precfl3d
    ## overset mesh related tool
    ln -s ../build/mag/seq/maggie
    ## mesh deformation tool and its memory usage estimator
    ln -s ../build/ron/seq/ronnie
    ln -s ../build/preron/seq/preronnie
    ## complex version of cfl3d which is used to compulate flight derivative
    ln -s ../build/cflcmplx/seq/cfl3dcmplx_seq
    ln -s ../build/cflcmplx/mpi/cfl3dcmplx_mpi
    ln -s ../build/splitcmplx/seq/splittercmplx
    ## cfl3d_tools
    ln -s ../build/tools/seq/v6inpdoubhalf
    ln -s ../build/tools/seq/Get_FD
    ln -s ../build/tools/seq/initialize_field
    ln -s ../build/tools/seq/nmf_to_cfl3dinput
    ln -s ../build/tools/seq/cgns_to_cfl3dinput
    ln -s ../build/tools/seq/v6inpswitchijk
    ln -s ../build/tools/seq/v6_ronnie_mod
    ln -s ../build/tools/seq/moovmaker
    ln -s ../build/tools/seq/grid_perturb_cmplx
    ln -s ../build/tools/seq/v6_restart_mod
    ln -s ../build/tools/seq/gridswitchijk
    ln -s ../build/tools/seq/cfl3d_to_nmf
    ln -s ../build/tools/seq/cgns_readhist
    ln -s ../build/tools/seq/p3d_to_cfl3drst
    ln -s ../build/tools/seq/everyother_xyz
    ln -s ../build/tools/seq/p3d_to_INGRID
    ln -s ../build/tools/seq/v6_ronnie_mod.F90
    ln -s ../build/tools/seq/INGRID_to_p3d
    ln -s ../build/tools/seq/grid_perturb
    ln -s ../build/tools/seq/cfl3dinp_to_FVBND
    ln -s ../build/tools/seq/cfl3d_to_pegbc
    ln -s ../build/tools/seq/plot3dg_to_cgns
    ln -s ../build/tools/seq/XINTOUT_to_ovrlp
    # 下载算例
    cd $HOME/cfl3d
    mkdir TestCases
    cd TestCases
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Flatplate/Flatplate.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Flatplateskew/Flatplateskew.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Flatplateyplus/Flatplateyplus.tar.gz
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Backstep/Backstep.tar.gz
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Transdiff/Transdiff.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/NACA_4412/NACA_4412.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/RAE_Sensitivity/RAE_Sensitivity.tar.gz
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Ramp/Ramp.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Cylinder/Timeaccstudy.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/N0012/Spaceaccstudy.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Ejectornozzle/Ejectornozzle.tar.gz
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Pitch/Pitch0012.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Rotorstator/Rotorstator.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Hump/Humpcase.tar.gz
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/2DTestcases/Curvature/SoMellor.tar.gz
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/3DTestcases/Axibump/Axibump.tar.gz
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/3DTestcases/ONERA_M6/ONERA_M6.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/3DTestcases/ARA_M100/ARA_M100.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/3DTestcases/ARA_M100_XMERA/ARA_M100_XMERA.tar.Z
    wget https://cfl3d.larc.nasa.gov/Cfl3dv6/3DTestcases/Delta/Delta_cgns.tar.Z
    


  • CFL3D感觉太原始了,结构网格,薄层近似的NS方程,单元中心的FVM,定比热的formulation。多重网格法要求网格的个数是特殊的一系列multigridable number...收敛倒是特别快。过去17年前15分钟的算例现在的pc机18秒算完了。



  • 现在这个V6.7版本有在Windows下编译好了的吗?


Log in to reply
 


CFD中文网 | 东岳流体学术 | 东岳流体商业 | 吉ICP备20003622号-1