C $Header: /u/gcmpack/MITgcm/pkg/autodiff/global_max_ad.flow,v 1.4 2007/10/08 23:50:53 jmc Exp $
C $Name:  $

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_r4 FTLNAME = global_max_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
cadj SUBROUTINE global_max_r8 FTLNAME = global_max_r8