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 |
Rev | Line | |
---|---|---|
[16] | 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.