From 5d0fe40db8ecb73db890bfca827114edf7a268a6 Mon Sep 17 00:00:00 2001
From: Beliavsky <38887928+Beliavsky@users.noreply.github.com>
Date: Sun, 10 Nov 2024 09:05:32 -0500
Subject: [PATCH] [fortran/en] declare pi without extraneous digits (#5175)

---
 fortran.html.markdown | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fortran.html.markdown b/fortran.html.markdown
index 71bc91d1..11116637 100644
--- a/fortran.html.markdown
+++ b/fortran.html.markdown
@@ -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.