1. Harald Klimach
  2. aotus

Source

aotus / source / extdouble / dummy_extdouble_module.f90

1
2
3
4
5
6
7
8
module aot_extdouble_module
  implicit none

  private

  integer, parameter :: xdble_k = selected_real_kind(18)

end module aot_extdouble_module