나는 내가하고 싶은 작은 숙제로 2 시간 동안 고생했다. 나는 문구를 바꾸어하는 프로그램을 만들어야합니다. 예를 들어 : program reversing
implicit none
character(len=20),dimension(1:20)::phraseT
character(len=20)::phrase,reverse
integer::i,x
FORTRAN-90을 사용하고 있습니다. 문제점이 하나 있습니다. 3 차원 배열 (A (900,900,900), B (900,900,900))에 데이터 (예 : X 및 Y 값)를 저장하려면 30X30X30의 각 배열에 30X30X30 요소 만 사용했습니다. X와 Y의 초기 값 그리고 다음 번 단계에서 X와 Y의 값을 변경하기위한 몇 가지 과학적 계산이 있고
다음 질문이 있습니다. 포트란 90 소스 파일 집합이 있는데 대부분 모듈이 들어 있습니다. 정적 라이브러리 (.a)를 만들어야하고 다음 Makefile을 사용했습니다. .SUFFIXES: .o .c .f90 .f .mod
DEPSF = tt_f90m, bt
include Makefile.in #Contains compiler flags (CC, FOR
나는 두 개의 루틴을 인자의 순서로만 가지고 있지만, 인터페이스를 통해 그것들을 사용하고자한다. 그래서 호출 될 때 인자의 순서에 따라 적절한 것이 호출된다. 컴파일러는 그것들을 구별 할 수 없다고 불평하며, 호출시 이름있는 인수에 대한 구문을 사용하면 호출 할 호출을 알 수 없기 때문에 추측 할 수 있습니다. 한 가지 해결 방법은 인수에 대해 다른 이름을
Fortran 모듈은 가능한 한 많이 OOP 철학을 따르고 Fortran 2003과 호환되도록 만들고 있습니다.이 모듈은 기본적으로 : (a) allocs/임시 배열 버퍼를 해제하고, (b) 일부 데이터에서 작동하는 do_F 함수를 제공합니다. 이 함수 do_F는 이러한 임시 버퍼를 사용하지만 몇 가지 보조 유형에 따라 달라집니다. 분명히 버퍼를 타입에 넣
Fortran과 OpenMP를 사용하고 있지만, 큰 배열이있을 때 OpenMP를 사용하여 루프를 병렬 처리하려고 할 때 계속 문제가 발생합니다. 예를 들어, 다음 코드는이 Makefile을 사용 PROGRAM main
IMPLICIT NONE
INTEGER, PARAMETER :: NUMLOOPS = 300000
REAL(8) :: TESTMAT(NU
INTEGER, PARAMETER :: SINGLE=SELECTED_REAL_KIND(7)
REAL(KIND=SINGLE) :: K
REAL::X
...
K=X
WRITE(*,*) K
SELECTED_REAL_KIND 안에 5 또는 6을 쓰면 6 개의 유효 숫자가 출력되지만 7을 시도하면 7보다 큰 값이 출력됩니다. 이유를 말해 줄 수 있습니까
작은 프로그램에 어려움을 겪고 있습니다. 한 가지 실수를 수정하는 방법을 찾을 수 없습니다. 내 프로그램 : program calcul
! ce programme permet d'effectuer des opérations mathématique de base
IMPLICIT NONE
REAL::x,y
character(len=1)::op
Fortran 90으로 작성된 프로그램의 매뉴얼에는 "모든 실제 변수와 매개 변수는 64 비트 정밀도 (즉, real*8)로 지정되어 있습니다."라고되어 있습니다. Wikipedia에 따르면 단 정밀도는 32 비트 정밀도에 해당하는 반면 배정 밀도는 64 비트 정밀도에 해당하므로 분명히 프로그램은 배정도를 사용합니다. 하지만 real*8은 무엇을 의미합니까