C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/profiles/profiles.flow,v 1.4 2013/08/08 14:31:34 heimbach Exp $ C $Name: $ C---------------------------------------- C subroutine profiles_readvector C---------------------------------------- CADJ SUBROUTINE profiles_readvector INPUT = 1,2,3,4,6,7,8 CADJ SUBROUTINE profiles_readvector DEPEND = 1,2,3,4,6,7 CADJ SUBROUTINE profiles_readvector OUTPUT = 5 CADJ SUBROUTINE NF_OPEN INPUT = CADJ SUBROUTINE NF_CLOSE INPUT =