source:
branches/jerome/src_flexwrf_v3.1/mt_kind_defs.f90
@
16
Last change on this file since 16 was 16, checked in by jebri, 11 years ago | |
---|---|
File size: 221 bytes |
Line | |
---|---|
1 | module mt_kind_defs |
2 | implicit none |
3 | public |
4 | integer, parameter :: INT32 = selected_int_kind(9) |
5 | integer, parameter :: INT64 = selected_int_kind(18) |
6 | integer, parameter :: REAL64 = selected_real_kind(15) |
7 | end module |
Note: See TracBrowser
for help on using the repository browser.