C $Header: /u/gcmpack/MITgcm/pkg/autodiff/autodiff_inadmode.flow,v 1.3 2007/10/08 23:50:53 jmc Exp $ C $Name: $ C /==========================================================\ C | SUBROUTINE AUTODIFF_INADMODE_SET | C \==========================================================/ cadj SUBROUTINE autodiff_inadmode_set INPUT = 1 cadj SUBROUTINE autodiff_inadmode_set OUTPUT = cadj SUBROUTINE autodiff_inadmode_set ACTIVE = cadj SUBROUTINE autodiff_inadmode_set DEPEND = 1 cadj SUBROUTINE autodiff_inadmode_set REQUIRED cadj SUBROUTINE autodiff_inadmode_set INFLUENCED cadj SUBROUTINE autodiff_inadmode_set ADNAME = CADJ & adautodiff_inadmode_set cadj SUBROUTINE autodiff_inadmode_set FTLNAME = CADJ & g_autodiff_inadmode_set C /==========================================================\ C | SUBROUTINE AUTODIFF_INADMODE_UNSET | C \==========================================================/ cadj SUBROUTINE autodiff_inadmode_unset INPUT = 1 cadj SUBROUTINE autodiff_inadmode_unset OUTPUT = cadj SUBROUTINE autodiff_inadmode_unset ACTIVE = cadj SUBROUTINE autodiff_inadmode_unset DEPEND = 1 cadj SUBROUTINE autodiff_inadmode_unset REQUIRED cadj SUBROUTINE autodiff_inadmode_unset INFLUENCED cadj SUBROUTINE autodiff_inadmode_unset ADNAME = CADJ & adautodiff_inadmode_unset cadj SUBROUTINE autodiff_inadmode_unset FTLNAME = CADJ & g_autodiff_inadmode_unset