精品偷拍一区二区三区,亚洲精品永久 码,亚洲综合日韩精品欧美国产,亚洲国产日韩a在线亚洲

  • <center id="usuqs"></center>
  • 
    
  • Fortran里面的一些問(wèn)題

    Fortran里面的一些問(wèn)題
    我有一個(gè)老程序,里面有幾個(gè)部分是讀數(shù)到一個(gè)數(shù)組中,以前的數(shù)組不是動(dòng)態(tài)的,大致類(lèi)似于這樣的定義:
    DOUBLE PRECISION US_T1(NX,NY,NZ),US_T2(NX,NY,NZ)
    其中NX,NY,NZ都是提前定義好的PARAMETER (NX=33,NY=56,NZ=64)
    現(xiàn)在我想改成動(dòng)態(tài)數(shù)組,于是出現(xiàn)問(wèn)題了,我是這么修改的:
    DOUBLE PRECISION,allocatable::US_T1(:,:,:),US_T2(:,:,:)
    OPEN (111000,FILE='MOLD.BX')
    READ (111000,*)
    READ (111000,*)
    READ (111000,*) NX,NZ,NY
    \x05CLOSE(111000)
    allocate(US_T1(NX,NY,NZ),US_T2(NX,NY,NZ))
    然后出現(xiàn)了這樣的問(wèn)題:
    A specification statement cannot appear in the executable section
    其他人氣:594 ℃時(shí)間:2020-06-19 10:03:38
    優(yōu)質(zhì)解答
    這句話的意思是,有一個(gè)聲明語(yǔ)句,它不能在執(zhí)行語(yǔ)句的部分.
    一段Fortran代碼,應(yīng)該先是全部的聲明語(yǔ)句,然后是全部的執(zhí)行語(yǔ)句.
    比如
    real ::a
    integer b
    real ::c
    a = b * 1.0
    而不能是
    real ::a
    integer b
    a = b * 1.0
    real ::c嗯,我最開(kāi)始那一堆都放在‘common.inc’里面,然后 INCLUDE 'COMMON.INC' INTEGER I,J,K本來(lái)‘common.inc’里面都是定義的變量,后來(lái)我加了OPEN (111000,FILE='MOLD.BX')就不行了,是這個(gè)原因吧。
    我來(lái)回答
    類(lèi)似推薦
    請(qǐng)使用1024x768 IE6.0或更高版本瀏覽器瀏覽本站點(diǎn),以保證最佳閱讀效果。本頁(yè)提供作業(yè)小助手,一起搜作業(yè)以及作業(yè)好幫手最新版!
    版權(quán)所有 CopyRight © 2012-2024 作業(yè)小助手 All Rights Reserved. 手機(jī)版