C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/mypackage/mypackage_ad.flow,v 1.2 2007/10/09 00:13:15 jmc Exp $ C $Name: $ C---------------------------------------- C subroutine mypackage_diagnostics_fill C---------------------------------------- CADJ SUBROUTINE mypackage_diagnostics_fill INPUT = 1,2,3 CADJ SUBROUTINE mypackage_diagnostics_fill OUTPUT =