Fypp
1 program
Added 2026-03-13T10:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: —
Provenance: commit 2e521f4177 · authored 2026-03-13T05:43:36+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
Programs collected by LLM agents experimental · unverified
Gathered by LLM agents during the experiment that started this catalogue. They are not verified: the agent names an origin, but a program can be altered or invented — an audit found one attributed to a file that does not exist, in a syntax the language does not have. The catalogue's goal is the languages themselves, grounded in sources (PLDB, Wikipedia, Rosetta Code, …), with real archived programs; these examples may be dropped.
Generic math utilities module using type/kind iteration
Provenance: commit 2e521f4177 · authored 2026-03-13T05:43:36+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
#:set KINDS = ['int32', 'int64', 'sp', 'dp']
#:set TYPES = ['integer', 'integer', 'real', 'real']
module math_utils
use iso_fortran_env, only: int32, int64, sp => real32, dp => real64
implicit none
#:for TYPE, KIND in zip(TYPES, KINDS)
pure function sum_${TYPE}$_${KIND}$(arr) result(res)
${TYPE}$(${KIND}$), intent(in) :: arr(:)
${TYPE}$(${KIND}$) :: res
integer :: i
res = 0
do i = 1, size(arr)
res = res + arr(i)
end do
end function sum_${TYPE}$_${KIND}$
#:endfor
end module math_utils