C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/obcs/obcs_ad.flow,v 1.4 2009/04/24 01:52:12 jmc Exp $ C $Name: $ C---------------------------------------- C subroutine OBCS_DIAGS C---------------------------------------- CADJ SUBROUTINE OBCS_DIAGS INPUT = 1,2,3 CADJ SUBROUTINE OBCS_DIAGS OUTPUT = C---------------------------------------- C subroutine OBCS_CHECK_DEPTHS C---------------------------------------- CADJ SUBROUTINE OBCS_CHECK_DEPTHS INPUT = 1 CADJ SUBROUTINE OBCS_CHECK_DEPTHS OUTPUT =