pkg/autodiff/active_file_control.flow


c----------------------------------------
c subroutine active_read_rl
c----------------------------------------
cadj SUBROUTINE active_read_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
cadj SUBROUTINE active_read_rl OUTPUT  =    2

c----------------------------------------
c subroutine active_write_rl
c----------------------------------------
cadj SUBROUTINE active_write_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8
cadj SUBROUTINE active_write_rl OUTPUT  =    2

c----------------------------------------
c subroutine active_read_tile_rl
c----------------------------------------
cadj SUBROUTINE active_read_tile_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
cadj SUBROUTINE active_read_tile_rl INPUT  += 10, 11
cadj SUBROUTINE active_read_tile_rl OUTPUT  =    2

c----------------------------------------
c subroutine active_write_tile_rl
c----------------------------------------
cadj SUBROUTINE active_write_tile_rl INPUT   = 1, 2, 3, 4, 5, 6, 7, 8, 9
cadj SUBROUTINE active_write_tile_rl INPUT  += 10
cadj SUBROUTINE active_write_tile_rl OUTPUT  =    2
1
2	c----------------------------------------
3	c subroutine active_read_rl
4	c----------------------------------------
5	cadj SUBROUTINE active_read_rl INPUT = 1, 2, 3, 4, 5, 6, 7, 8, 9
6	cadj SUBROUTINE active_read_rl OUTPUT = 2
7
8	c----------------------------------------
9	c subroutine active_write_rl
10	c----------------------------------------
11	cadj SUBROUTINE active_write_rl INPUT = 1, 2, 3, 4, 5, 6, 7, 8
12	cadj SUBROUTINE active_write_rl OUTPUT = 2
13
14	c----------------------------------------
15	c subroutine active_read_tile_rl
16	c----------------------------------------
17	cadj SUBROUTINE active_read_tile_rl INPUT = 1, 2, 3, 4, 5, 6, 7, 8, 9
18	cadj SUBROUTINE active_read_tile_rl INPUT += 10, 11
19	cadj SUBROUTINE active_read_tile_rl OUTPUT = 2
20
21	c----------------------------------------
22	c subroutine active_write_tile_rl
23	c----------------------------------------
24	cadj SUBROUTINE active_write_tile_rl INPUT = 1, 2, 3, 4, 5, 6, 7, 8, 9
25	cadj SUBROUTINE active_write_tile_rl INPUT += 10
26	cadj SUBROUTINE active_write_tile_rl OUTPUT = 2