fortran77

2열

4답변

다른 입력 매개 변수 세트를 사용하여 fortran 77 프로그램을 여러 번 실행하고 싶습니다. 이미 출력 파일 이름이 내가 사용하는 여러 입력 매개 변수에 대해 변경되도록했지만 매개 변수를 변경할 때마다 코드로 갈 필요없이 다른 입력 매개 변수 집합으로 프로그램을 실행할 수 있는지 잘 모르겠습니다. 제 질문을 설명하기 위해 다음은 간단한 코드입니다. PR

0열

1답변

인쇄 낮은 삼각 포장 매트릭스 나는 포장 낮은 삼각 행렬로 배열에 저장된 실제 * 8 개 숫자의 행렬이 77

: 나는 다음과 같은 형식으로 인쇄 할 수 있도록하려면 |1 * * * * *| |2 7 * * * *| |3 8 12 * * *| |4 9 13 16 * *| => [1,2,3,4,5,6,7,8,9...21] |5 10 14 17 19 *| |6 11 15 18 20 21| 을 :가 [row|col] 1 2 3 4 5 1 1 * *

2열

1답변

코드 실행 시간을 향상시키기위한 Fortran 형식 선택

코드 시작 부분에 초기화되는 세 개의 값 배열로 시작하는 코드가 있습니다. 다른 실행을 위해, 나는이 초기 값을 명시 적으로 변경하기 위해 코드로 가야한다. 이것은 매우 초조하고 시간이 오래 걸리기 때문에 코드가 텍스트 파일에서 초기 값을 읽도록 코드를 수정하기로 결정했습니다. 변경 작업을 성공적으로 마쳤지 만 이제는 코드가 훨씬 느리게 실행됩니다 (최소한

1열

1답변

Fortran 77 코드를 Python으로 변환

이 Q/A Intent of this Fotran77 code을 살펴본 결과, Fortran77 스타일 코드를 Python 3.x로 거의 변환했습니다. 단, i = i + 1이 파이썬 버전. 링크 된 질문의 주석에서 언급했듯이 적합성 테스트를 수행했으며 그 결과는 2의 여백만큼 떨어져 있습니다. 따라서 질문입니다. 여기 i = 0 500 continue

2열

1답변

gfortran에서 "pragma GCC optimize"사용

Fortran 77에서 "#pragma GCC optimize ("o3 ")"와 같은 함수 특정 옵션 pragma를 사용하고 싶습니다. 그러나 다음과 같이 표시 할 수 없습니다. 그것을 .f 코드에 적용하지 마십시오. 어떤 아이디어? foo.f : ... call hoge ... subroutine hoge IMPLI

1열

1답변

이전 포트란 코드 컴파일 구문 오류

레거시 포트란 코드를 fort77으로 컴파일하려고합니다. Error on line XXX: syntax error 라인 XXX 읽기 : INTEGER MAXF, MAXC PARAMETER (MAXF=400, MAXC=20) 내가 제거하는 경우 : MAXF과 함께 위의 몇 줄을 정의 CHARACTER(LEN=10) TREE(2,MAXF)

0열

1답변

Fortran에서 읽기의 구문 오류

Fortran 77로 작성된 코드를 Fortran 90으로 변경하는 중입니다. 그리고 다음 오류를 컴파일하는 Im이 나타나면 이미 검색했으며 xint가 배열로 선언되어 문제가 아님을 알고 있습니다. . Integer :: n,nitp,m Integer,parameter :: mdi1=3500 Double Precision :: xint(mdi1),yin

0열

1답변

fortran이 2 차원 배열의 한 줄에 네 개의 요소를 쓰도록하려면 어떻게해야합니까?

다음 코드를 고려하십시오. 한 번에 "n"개 요소를 씁니다. "N"인텔 컴파일러 및 "n"은 5였다 PGI있는 "X"는 연속 문자 icels=128 jcels=128 imat=2 ! just for example write(ounit,*) x ((real(pr(i,j,imat)),i=1,icels),j=1,jcels

1열

2답변

fortran 77에서 문자 변수를 초기화하는 방법은 무엇입니까?

는 character*100 xx 내가 어떤 가치, 가능성이 일부 인쇄 가능한 문자 또는 공백으로 초기화 할 변수를 고려한다. 시도했습니다 data xx /100*char(120)/ 하지만 작동하지 않았습니다. 최소 작업 예 : cat car_array.F character*10 xx data xx /10*char(120)/

0열

1답변

랜덤으로 서브 루틴을 실행하는 방법()

나는 ++ C에 포트란 77 코드를 변환 할 노력하고있어. Cygwin에서 gfortran 컴파일러를 사용하고 있습니다. 나는 대부분의 코드를 성공적으로 변환했지만 Random()에 대한 종속성으로 인해이 서브 루틴을 실행할 수 없습니다. 는이 라인 gfortran -std=legacy Listing_4_3.f90 -o test I을 사용하여 C THE F