This website requires JavaScript.
Explore
Drone CI
Help
Register
Sign In
comicsansg
/
ft8d
mirror of
https://github.com/pavel-demin/ft8d.git
Watch
1
Star
0
Fork
You've already forked ft8d
0
Code
Issues
Packages
Projects
Releases
Wiki
Activity
ab3fe4b93d
ft8d
/
db.f90
6 lines
94 B
Fortran
Raw
Blame
History
real
function
db
(
x
)
db
=
-
9
9.0
if
(
x
.
gt
.
1.259e-10
)
db
=
1
0.0
*
log10
(
x
)
return
end
function
db
Reference in New Issue
View Git Blame
Copy Permalink