Skip to content

Commit 2c25b9e

Browse files
authored
Update Mod_NumPrec.f90
file no longer needed
1 parent 21f3cc0 commit 2c25b9e

File tree

1 file changed

+1
-20
lines changed

1 file changed

+1
-20
lines changed

FortranCode/Mod_NumPrec.f90

Lines changed: 1 addition & 20 deletions
Original file line numberDiff line numberDiff line change
@@ -1,20 +1 @@
1-
!****************************************************************************************
2-
!* :: Purpose :: *
3-
!* Module defining compiler-independent numerical precision parameters *
4-
!* *
5-
!* :: Authors :: *
6-
!* Andi Zuend (andreas.zuend@mcgill.ca) *
7-
!* Dept. Atmospheric and Oceanic Sciences, McGill University *
8-
!* *
9-
!****************************************************************************************
10-
module Mod_NumPrec
11-
12-
implicit none
13-
14-
!define a working precision (wp) level to be used with floating point (real) variables, e.g. 1.0 should be stated as 1.0_wp.
15-
!number_of_digits = desired minimum level of precision in terms of number of floating point decimal digits.
16-
integer,parameter,public :: wp = kind(1.0D0) !set here for compatibility with AIOMFAC's real(8) settings;
17-
!integer,parameter,private :: number_of_digits = 12
18-
!integer,parameter,public :: wp = kind (1.0D0) !wp = selected_real_kind(number_of_digits)
19-
20-
end module Mod_NumPrec
1+
!file no longer needed (replaced by Mod_kinds_param)

0 commit comments

Comments
 (0)