Sign in
fuchsia
/
third_party
/
github.com
/
Kitware
/
CMake
/
f1e1124e7e4e62eb9a74ef79fe91b6e83d7b9c61
/
.
/
Tests
/
FortranModules
/
ModulesViaSubdirTargetObjectsSource
/
subdir
/
obj.f90
blob: 6b5ddd59fbb69d323c7b3768ff6892c0d37789f4 [
file
] [
log
] [
blame
]
module
m1
implicit
none
contains
pure real
function
pi
()
pi
=
4
*
atan
(
1.
)
end
function
end
module
m1