bling/pkg/bling_ad.flow

C $Header:  $
C $Name:  $

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

C----------------------------------------
C subroutine BLING_READ_CO2_PICKUP
C----------------------------------------
CADJ SUBROUTINE BLING_READ_CO2_PICKUP  INPUT  = 1,2
CADJ SUBROUTINE BLING_READ_CO2_PICKUP  OUTPUT =
1	C $Header: $
2	C $Name: $
3
4	C----------------------------------------
5	C subroutine BLING_READ_PICKUP
6	C----------------------------------------
7	CADJ SUBROUTINE BLING_READ_PICKUP INPUT = 1,2,3
8	CADJ SUBROUTINE BLING_READ_PICKUP OUTPUT = 1
9
10	C----------------------------------------
11	C subroutine BLING_READ_CO2_PICKUP
12	C----------------------------------------
13	CADJ SUBROUTINE BLING_READ_CO2_PICKUP INPUT = 1,2
14	CADJ SUBROUTINE BLING_READ_CO2_PICKUP OUTPUT =