Sign in
chromium
/
external
/
github.com
/
Kitware
/
CMake
/
refs/heads/release
/
.
/
Tests
/
FortranModules
/
ModulesViaTargetObjectsLink
/
obj.f90
blob: 6b5ddd59fbb69d323c7b3768ff6892c0d37789f4 [
file
] [
log
] [
blame
] [
edit
]
module
m1
implicit
none
contains
pure real
function
pi
()
pi
=
4
*
atan
(
1.
)
end
function
end
module
m1