C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/dic/dic_ad.flow,v 1.3 2010/04/11 20:59:27 jmc Exp $
C $Name: checkpoint64 $

C----------------------------------------
C subroutine DIC_READ_PICKUP
C----------------------------------------
CADJ SUBROUTINE DIC_READ_PICKUP  INPUT  = 1,2,3
CADJ SUBROUTINE DIC_READ_PICKUP  OUTPUT = 1


C----------------------------------------
C subroutine DIC_READ_CO2_PICKUP
C----------------------------------------
CADJ SUBROUTINE DIC_READ_CO2_PICKUP  INPUT  = 1,2
CADJ SUBROUTINE DIC_READ_CO2_PICKUP  OUTPUT =