1 INTEGER, PARAMETER :: int_ioexit = 10
2 INTEGER, PARAMETER :: int_open_for_write_begin = 20
3 INTEGER, PARAMETER :: int_open_for_write_commit = 30
4 INTEGER, PARAMETER :: int_open_for_read = 40
5 INTEGER, PARAMETER :: int_intio_nextrec = 50
6 INTEGER, PARAMETER :: int_inquire_opened = 60
7 INTEGER, PARAMETER :: int_inquire_filename = 70
8 INTEGER, PARAMETER :: int_iosync = 80
9 INTEGER, PARAMETER :: int_ioclose = 90
10 INTEGER, PARAMETER :: int_next_time = 100
11 INTEGER, PARAMETER :: int_set_time = 110
12 INTEGER, PARAMETER :: int_next_var = 120
13 INTEGER, PARAMETER :: int_dom_ti_real = 140
14 INTEGER, PARAMETER :: int_dom_ti_double = 160
15 INTEGER, PARAMETER :: int_dom_ti_integer = 180
16 INTEGER, PARAMETER :: int_dom_ti_logical = 200
17 INTEGER, PARAMETER :: int_dom_ti_char = 220
18 INTEGER, PARAMETER :: int_dom_td_real = 240
19 INTEGER, PARAMETER :: int_dom_td_double = 260
20 INTEGER, PARAMETER :: int_dom_td_integer = 280
21 INTEGER, PARAMETER :: int_dom_td_logical = 300
22 INTEGER, PARAMETER :: int_dom_td_char = 320
23 INTEGER, PARAMETER :: int_var_ti_real = 340
24 INTEGER, PARAMETER :: int_var_ti_double = 360
25 INTEGER, PARAMETER :: int_var_ti_integer = 380
26 INTEGER, PARAMETER :: int_var_ti_logical = 400
27 INTEGER, PARAMETER :: int_var_ti_char = 420
28 INTEGER, PARAMETER :: int_var_td_real = 440
29 INTEGER, PARAMETER :: int_var_td_double = 460
30 INTEGER, PARAMETER :: int_var_td_integer = 480
31 INTEGER, PARAMETER :: int_var_td_logical = 500
32 INTEGER, PARAMETER :: int_var_td_char = 520
33 INTEGER, PARAMETER :: int_field = 530
34 INTEGER, PARAMETER :: int_var_info = 540
35 INTEGER, PARAMETER :: int_noop = 550
1.9.8