C $Header: /u/gcmpack/MITgcm/pkg/sphere/sphere_ad.flow,v 1.3 2007/10/09 00:11:39 jmc Exp $ C $Name: $ CADJ SUBROUTINE FSC4DAT input = 1, 2 CADJ SUBROUTINE FSC4DAT output = 2 CADJ SUBROUTINE FSC4DAT depend = 1 CADJ SUBROUTINE FSC4DAT active = 2 CADJ SUBROUTINE FSC4DAT adname = ADFSC4DAT CADJ SUBROUTINE FFTRB input = 1, 2 CADJ SUBROUTINE FFTRB output = 3 cphCADJ SUBROUTINE FRSBASE input = 1, 3, 4 cphCADJ SUBROUTINE FRSBASE output = 2 CADJ SUBROUTINE HELMHOLTZ input = 1, 2 CADJ SUBROUTINE HELMHOLTZ output = 3 CADJ SUBROUTINE SHCERROR input = 1, 2 CADJ SUBROUTINE SHCERROR output =