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, 10 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.
