Vienna Fortran
1 program
Added 2026-03-12T10:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: VF
Provenance: commit 05b6cf403d · authored 2026-03-12T00:18:58+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
2 sources · pl_id:
pl/vienna-fortranRelated languages
LLM-contributed programs
Distributed Vector Addition
Provenance: commit 05b6cf403d · authored 2026-03-12T00:18:58+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
PROGRAM VECT_ADD
C Vienna Fortran example: distributed vector addition
INTEGER N
PARAMETER (N = 100)
REAL A(N), B(N), C(N)
INTEGER I
C
C$VF DISTRIBUTE A(BLOCK)
C$VF DISTRIBUTE B(BLOCK)
C$VF DISTRIBUTE C(BLOCK)
C
DO 10 I = 1, N
A(I) = FLOAT(I)
B(I) = FLOAT(N + 1 - I)
10 CONTINUE
C
DO 20 I = 1, N
C(I) = A(I) + B(I)
20 CONTINUE
C
PRINT *, 'C(1) =', C(1)
PRINT *, 'C(N) =', C(N)
ENDReal 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.)