Fortran
1 program
Added 2025-10-22T09:36:09Z
Model: meta-llama/llama-3.1-70b-instructTemp: 0.4
Evidence
Report issue
View issues
Aliases: FORTRAN
Provenance: commit 717b5be4dd · authored 2025-10-22T11:36:09+02:00 · model meta-llama/llama-3.1-70b-instruct
Sources mentioning this language
2 sources · pl_id:
pl/for-t-r-a-nRelated languages
LLM-contributed programs
Heat Equation Solver
Provenance: commit 717b5be4dd · authored 2025-10-22T11:36:09+02:00 · model meta-llama/llama-3.1-70b-instruct · Temp 0.4
PROGRAM HEAT_EQ
IMPLICIT NONE
INTEGER, PARAMETER :: N = 100
REAL :: T(N,N), TNEW(N,N)
INTEGER :: I, J
T = 0.0
TNEW = 0.0
DO I = 1, N
T(I,1) = 100.0
END DO
DO J = 1, 1000
DO I = 2, N-1
TNEW(I,1) = T(I-1,1) + T(I+1,1)
END DO
T = TNEW
END DO
WRITE (*,*) T
END PROGRAM HEAT_EQReal programs from Software Heritage
No SWH evidence indexed yet for this language. (Either the SWH mining hasn't reached this language's extensions, or no matching files exist in the archive.)