UPP (upp-srw-2.2.0)
Loading...
Searching...
No Matches
intio_tags.f
1module intio_tags_mod
2!
3!- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
4 implicit none
5!
6 INTEGER, PARAMETER :: int_ioexit = 10
7 INTEGER, PARAMETER :: int_open_for_write_begin = 20
8 INTEGER, PARAMETER :: int_open_for_write_commit = 30
9 INTEGER, PARAMETER :: int_open_for_read = 40
10 INTEGER, PARAMETER :: int_intio_nextrec = 50
11 INTEGER, PARAMETER :: int_inquire_opened = 60
12 INTEGER, PARAMETER :: int_inquire_filename = 70
13 INTEGER, PARAMETER :: int_iosync = 80
14 INTEGER, PARAMETER :: int_ioclose = 90
15 INTEGER, PARAMETER :: int_next_time = 100
16 INTEGER, PARAMETER :: int_set_time = 110
17 INTEGER, PARAMETER :: int_next_var = 120
18 INTEGER, PARAMETER :: int_dom_ti_real = 140
19 INTEGER, PARAMETER :: int_dom_ti_double = 160
20 INTEGER, PARAMETER :: int_dom_ti_integer = 180
21 INTEGER, PARAMETER :: int_dom_ti_logical = 200
22 INTEGER, PARAMETER :: int_dom_ti_char = 220
23 INTEGER, PARAMETER :: int_dom_td_real = 240
24 INTEGER, PARAMETER :: int_dom_td_double = 260
25 INTEGER, PARAMETER :: int_dom_td_integer = 280
26 INTEGER, PARAMETER :: int_dom_td_logical = 300
27 INTEGER, PARAMETER :: int_dom_td_char = 320
28 INTEGER, PARAMETER :: int_var_ti_real = 340
29 INTEGER, PARAMETER :: int_var_ti_double = 360
30 INTEGER, PARAMETER :: int_var_ti_integer = 380
31 INTEGER, PARAMETER :: int_var_ti_logical = 400
32 INTEGER, PARAMETER :: int_var_ti_char = 420
33 INTEGER, PARAMETER :: int_var_td_real = 440
34 INTEGER, PARAMETER :: int_var_td_double = 460
35 INTEGER, PARAMETER :: int_var_td_integer = 480
36 INTEGER, PARAMETER :: int_var_td_logical = 500
37 INTEGER, PARAMETER :: int_var_td_char = 520
38 INTEGER, PARAMETER :: int_field = 530
39 INTEGER, PARAMETER :: int_var_info = 540
40 INTEGER, PARAMETER :: int_noop = 550
41
42end module intio_tags_mod