pkg/autodiff/global_max_ad.flow

C     /==========================================================\
C     | SUBROUTINE GLOBAL_MAX_R* is linear                       |
C     | only the array argument is active                        |
C     | only myThid is required                                  |
C     | SUBROUTINE GLOBAL_ADSUM_R* is linear                     |
C     \==========================================================/
cadj SUBROUTINE global_max_r4 INPUT   = 1, 2
cadj SUBROUTINE global_max_r4 OUTPUT  = 1
cadj SUBROUTINE global_max_r4 ACTIVE  = 1
cadj SUBROUTINE global_max_r4 DEPEND  = 2
cadj SUBROUTINE global_max_r4 ADNAME  = global_admax_r4

cadj SUBROUTINE global_max_r8 INPUT   = 1, 2
cadj SUBROUTINE global_max_r8 OUTPUT  = 1
cadj SUBROUTINE global_max_r8 ACTIVE  = 1
cadj SUBROUTINE global_max_r8 DEPEND  = 2
cadj SUBROUTINE global_max_r8 ADNAME  = global_admax_r8
1	C /==========================================================\
2	C \| SUBROUTINE GLOBAL_MAX_R* is linear \|
3	C \| only the array argument is active \|
4	C \| only myThid is required \|
5	C \| SUBROUTINE GLOBAL_ADSUM_R* is linear \|
6	C \==========================================================/
7	cadj SUBROUTINE global_max_r4 INPUT = 1, 2
8	cadj SUBROUTINE global_max_r4 OUTPUT = 1
9	cadj SUBROUTINE global_max_r4 ACTIVE = 1
10	cadj SUBROUTINE global_max_r4 DEPEND = 2
11	cadj SUBROUTINE global_max_r4 ADNAME = global_admax_r4
12
13	cadj SUBROUTINE global_max_r8 INPUT = 1, 2
14	cadj SUBROUTINE global_max_r8 OUTPUT = 1
15	cadj SUBROUTINE global_max_r8 ACTIVE = 1
16	cadj SUBROUTINE global_max_r8 DEPEND = 2
17	cadj SUBROUTINE global_max_r8 ADNAME = global_admax_r8