Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Add constants4 directory #5

Merged
merged 5 commits into from
Oct 20, 2021
Merged

Add constants4 directory #5

Show file tree
Hide file tree
Changes from 1 commit
Commits
Show all changes
5 commits
Select commit Hold shift + click to select a range
e9e5496
add constants4 directory for single precision constants
binli2337 Oct 19, 2021
5e538a1
modify CMakeLists.txt
binli2337 Oct 19, 2021
4b75bf7
modify constants.F90 and fmsconstants.F90
binli2337 Oct 20, 2021
44117cd
modify constants4/constants4.F90 and constants4/fmsconstants4.F90
binli2337 Oct 20, 2021
3cd3bef
update constants4/fmsconstants4.F90
binli2337 Oct 20, 2021
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 2 additions & 2 deletions constants/constants.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -47,7 +47,7 @@

!> @addtogroup constants_mod
!> @{
module constantsR4_mod
module constants_mod

!---variable for strong typing grid parameters
use platform_mod, only: r8_kind
Expand Down Expand Up @@ -171,6 +171,6 @@ subroutine constants_init

end subroutine constants_init

end module constantsR4_mod
end module constants_mod
!> @}
! close documentation grouping
6 changes: 3 additions & 3 deletions constants/fmsconstants.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -22,11 +22,11 @@
!! @ref libfms.
!!
!> See @ref constants_mod for individual parameter information.
module FMSconstantsR4
module FMSconstants

!> rename to not conflict with any other version vars
use constantsR4_mod, version_constants => version
use constants_mod, version_constants => version

implicit none

end module FMSconstantsR4
end module FMSconstants
4 changes: 2 additions & 2 deletions constants4/constants4.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -47,7 +47,7 @@

!> @addtogroup constants_mod
!> @{
module constants4_mod
module constantsR4_mod

!---variable for strong typing grid parameters
use platform_mod, only: r8_kind, r4_kind
Expand Down Expand Up @@ -171,6 +171,6 @@ subroutine constants_init

end subroutine constants_init

end module constants4_mod
end module constantsR4_mod
!> @}
! close documentation grouping
4 changes: 2 additions & 2 deletions constants4/fmsconstants4.F90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -22,11 +22,11 @@
!! @ref libfms.
!!
!> See @ref constants_mod for individual parameter information.
module FMSconstants4
module FMSconstantsR4

!> rename to not conflict with any other version vars
use constants4_mod, version_constants => version

implicit none

end module FMSconstants4
end module FMSconstantsR4