fortran

    0

    1답변

    R에서 간단한 Fortran 서브 루틴을 호출하려고했지만 잘못된 것이 있습니다. 나는 포트란 코드를 컴파일했다. (정확히 말하면이 언어에서는 초보자이다.)하지만 R은 서브 루틴을 호출 할 때 실패한다. 포트란 코드는 a의 값을 계산하는 간단한 서브 루틴이다. (정의 된) 범위의 각 지점에서의 속성. 결과는 크기 2 x 100 000의 행렬 (포트란의 배열)

    1

    1답변

    나는이 오류 팝업이 나타나고 이것이 일어나고 있는지 확신하지 못합니다. 나는 다음과 같은 데이터를 읽으려고 해요 : 1 0000 1234 2 0032 8383 3 1201 3983 4 1234 9292 5 4567 9202 6 7890 8382 7 2324 9383 처음 4 줄을 건너 뛰는, 별도의 배열의 두 번째 열에서 정수를 읽고 (그래서

    1

    1답변

    연속적으로 변하는 매개 변수 x에 의존하는 2x2 허미 시안 행렬을 대각선 화해야합니다. 대각선 화를 위해 나는 EISPACK을 사용한다. eigenvector의 실수 및 허수 성분을 x의 함수로 플롯하면 불연속이 있음을 알게됩니다. 고유 값 계산은 OK입니다. Maxima에 고유 벡터를 그릴 때 솔루션은 연속적으로 나타납니다. 다음 단계에서 파생 상품을

    0

    1답변

    나는 일련의 선형 방정식을 해결하기 위해 LAPACK를 사용하려고 해요,하지만 난이 프로그램을 실행할 때 그것은 요소 U (10011001)이 정확히 0이 상태 정보> 0 인 오류가 발생합니다. 인수 분해 이 완료되었지만 요소 U가 정확히 단수이므로 솔루션을 계산할 수 없습니다. ' 정확히 무엇을 의미합니까? 나는 cgesv 서브 루틴을 사용하고 있습니다.

    2

    1답변

    제 3 자의 매우 오래된 Fortran 77 코드를 사용하고 있습니다 (매우 버그가 있음). 나는 FFLAGS=-O0 -Wall -g -fbacktrace -pedantic -Wextra 내가 실행시 제목에 경고를 얻고 컴파일 한 : At line <number> of file <namefile>.f (unit=6, file='stdout') Fort

    2

    1답변

    Matlab에 Fortran 루틴을 추가하는 중입니다 (Mex 함수를 통해). 저는 Matlab, Mex, Fortran 사이의 링크가 어떻게 만들어 졌는지 이해할 수있는 간단한 프로그램을 작성하려고합니다. 나는 x과 y의 값을 취하는 간단한 프로그램을 작성하여 함께 더하고 z을 출력합니다. 그러나 컴파일 후 Matlab에서 실행하려고하면 Matlab은 설

    0

    1답변

    에서의 .dat에 매트릭스 2 개 벡터를 읽는 방법 : x1 y1 z1 x2 y2 z2 인덱스 1과 2를 벡터 1과 2를 각각 참조하십시오. 먼저 나는 나에게 sugested했다 program ex2 implicit none real*8 x integer i write(6,*

    1

    1답변

    n에서 m까지 특정 범위의 트윈 소수를 찾는 프로그램을 만들고 싶습니다. 여기에서는 지금까지이 무엇인가 program twin implicit none integer i, count1, n, m, count2, j, k, pri1, pri2 count1 = 0 count2 = 0

    1

    1답변

    불완전한 감마 함수를 계산하는 절차가 필요합니다. 물론, 나는 netlib 경로를 시도하고 dgamic 함수를 발견했다. 그러나,이 gfortran main.f90 -o main dgamic.f d9lgic.f d9lgit.f d9gmic.f d9gmit.f dlgams.f dlngam.f dgamma.f d9lgmc.f dcsevl.f dgamlm.f i

    1

    1답변

    중첩 된 병렬 영역에 문제가 있으므로 아주 간단한 openmp 포트란 프로그램을 사용하려고합니다. 코드는 다음과 같다 : PROGRAM TEST_OPENMP IMPLICIT NONE INTEGER :: omp_get_num_threads, omp_get_thread_num CALL omp_set_num_threads(4) WRITE(*,*) "I a