C
C -- param_cou.h
C
	INTEGER jpflda2o
	PARAMETER(jpflda2o = 1)          ! Number of fields exchanged from
                                         ! atmosphere to ocean
C
	INTEGER jpfldo2a
	PARAMETER(jpfldo2a = 1)          ! Number of fields exchanged from
                                         ! ocean to atmosphere
C