1
0
mirror of https://github.com/adambard/learnxinyminutes-docs.git synced 2025-07-31 12:00:34 +02:00

[fortran/en] declare pi without extraneous digits (#5175)

This commit is contained in:
Beliavsky
2024-11-10 09:05:32 -05:00
committed by GitHub
parent 77e2233bf3
commit 5d0fe40db8

View File

@@ -41,7 +41,7 @@ program example ! declare a program called example.
real :: v, x ! WARNING: default initial values are compiler dependent!
real :: a = 3, b = 2E12, c = 0.01
integer :: i, j, k = 1, m
real, parameter :: PI = 3.1415926535897931 ! declare a constant.
real, parameter :: PI = 3.14159265 ! declare a constant.
logical :: y = .TRUE., n = .FALSE. ! boolean type.
complex :: w = (0, 1) ! sqrt(-1)
character(len=3) :: month ! string of 3 characters.