code_array.ans.fdc

来自「多学科优化软件isight培训教程初级pdf有很详细的例子讲解」· FDC 代码 · 共 18 行

    find "Surface Area of the Wing =" ignore 
    read SurfArea
    provide $SurfArea 
    CrossSection[20]
    if ( $SurfArea <= 300 ) {
        find "Areas" ignore 
        moveto $Line_Start
        moveto line + 2
        for ( i = 1 ; $i <= 10 ; i = $i + 1) {
        read CrossSection[$i]
        }
        provide $CrossSection 
    }
    moveto $File_Start
    find "Aspect Ratio of the Wing =" ignore 
    read AR
    provide $AR