Skip to content

Commit

Permalink
typo
Browse files Browse the repository at this point in the history
  • Loading branch information
jalvesz committed Apr 1, 2024
1 parent 3414ee8 commit fdc148b
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion src/fsparse_constants.f90
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ module fsparse_constants
private
public :: hp, sp, dp, xdp, qp, int8, int16, int32, int64

!> Extended double precision real numbers
!> half precision real numbers
integer, parameter :: hp = -1

!> Single precision real numbers
Expand Down
2 changes: 1 addition & 1 deletion src/fsparse_constants.fypp
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ module fsparse_constants
private
public :: hp, sp, dp, xdp, qp, int8, int16, int32, int64

!> Extended double precision real numbers
!> half precision real numbers
integer, parameter :: hp = #{if WITH_HP}#selected_real_kind(3)#{else}#-1#{endif}#

!> Single precision real numbers
Expand Down

0 comments on commit fdc148b

Please sign in to comment.