fortran90

4열

2답변

저는 Fortran 90을 처음 접하는 사용자입니다. 프로그래밍 방법을 배우고 있습니다. 현재 행렬 곱셈을 수행하는 프로그램을 작성하려고합니다. 그러나 오류가 발생합니다. 컴파일에 Program Matrix_Multiplication Implicit None Real, Dimension(2:2) :: A, B, C Integer

0열

1답변

포트란 코드 다차원 배열

나는 자바에 오래된 포트란 코드를 변환하고 있지만 다음 줄에 붙어 : PARAMETER (MAXC=15) REAL CKV(MAXC,MAXC) DATA (CKV(1,J),J= 2,15)/10*0.,.45,.02,.12,.08/ DATA (CKV(2,J),J= 3,15)/ 9*0.,.45,.06,.15,.07/ 누군가가 위의 마지막 두 줄을 설명 할

1열

1답변

F2PY에서 모듈 범위 변수를 볼 수 없습니다

Fortran 90과 f2py를 처음 사용하게되어 죄송합니다. 저는 Windows 64 비트, Python 3.4 64 비트, gfortran을 사용하고 있습니다. NumPy와 버전은 1.9.1이며,이 링크의 지시에 따라 나는 "NotImplementedError 인상의 gnu.py에서 ("오직 MS 컴파일러의 Win64에 gfortran와 지원 ")"의

-2열

1답변

Fortran에서 5 차 Runge-Kutta 방법의 적응 스텝 크기 방법

적응 스텝 사이즈 방법을 사용한 5 차 Runge-Kutta 방법을 사용하여 방정식 세트를 풀고 싶습니다. Taner Akgun이 작성한 유용한 코드를 발견했습니다. 코드는 다음과 같습니다. c c Adaptive Size Method for 5th Order Runge-Kutta Method c (Based on Numerical Recipes.)

0열

1답변

포트란 인쇄 다이아몬드/물음표

AIX에서 Fortran 90을 실행 중입니다. 호환성 문제인지 여부는 확실하지 않습니다. 나는 현재 연도의 마지막 두 문자 (예 : 2016이고 16을 원한다)를 포함하는 화면에 문자열을 인쇄하려고합니다. 출력에 물음표가있는 검은 색 다이아몬드가 표시됩니다. 그것은 무엇을 나타내거나 나타내는가? CHARACTER (LEN=4) :: year_str p

0열

1답변

C++에서 호출 된 Fortran 서브 루틴의 값이 잘못되었습니다.

C++에서 Fortran 서브 루틴을 호출하려고합니다. 참고로 필자는 포트란에 동일한 서브 루틴을 호출하는 테스트 프로그램을 가지고 있는데,이 루틴은 프로 시저에 올바른 값을 제공합니다. 나는 포트란 지식을 극히 제한적으로 가지고 있는데 왜 쓰레기 값을 얻는 지 알 수 없다. 다음 포트란 코드 : program test_9j implicit no

2열

1답변

LOC 및 % LOC가 Windows의 서브 루틴에서 작동하지 않습니다.

loc 함수를 광범위하게 사용하여 배열 주소 (Matlab과 상호 작용할 수있는 API의 일부)를 얻는 Fortran 90 프로젝트가 있습니다. 이 코드는 Intel과 gfortran 모두를 사용하여 Mac 및 Linux에서 컴파일 및 작동하며 잠시 (두 가지 다른 컴파일러 버전에서) 사용합니다. 필자는 Composer XE 2015의 인텔 포트란을 사용하

3열

1답변

문자열에 문자 배열을 전달하는 방법

문자 배열을 여러 문자열로 어떻게 갈 수 있을지 궁금합니다. 사실, 17 문자의 파일 경로가 포함 된 문자 배열이 있습니다. character, dimension(29,17) :: FILE_SIM_all character, length(29) :: FILE_SIM ! Declarations end FILE_SIM_all(1:29,1) = "/Use

0열

1답변

정적 변수를 사용하여 서브 루틴 내에 상태를 저장하는 것이 좋습니다.

정적 변수를 사용하여 서브 루틴 내에 상태를 저장하는 것이 좋습니다. "물건"의 subroutine somesub() logical, save :: first_call = .true. if (first_call) then ! do some stuff first_call = .false. end if ! ... perform standard

3열

2답변

포트란 혼합 텍스트와 숫자

나는 다음과 같은 명령을 시도하고 좋은 read (2,*) tempstr , my_param(1), tempstr , my_param(2), tempstr , my_param(3) 문제는 언제 작동 number# 125 var1= 2 var2= 1 var3: 4 . . . . number# 234 var1=