MODULE lookup_kara_mod

IMPLICIT NONE 
SAVE

INTEGER, PARAMETER :: xdim=31
INTEGER, PARAMETER :: ydim=31
REAL, DIMENSION(xdim) :: ustar_lookup
REAL, DIMENSION(ydim) :: tdif_lookup
REAL, DIMENSION(xdim,ydim) :: uten_lookup

! xdim: dimension of ustar array
! ydim: dimension of Tdif array 
! ustar_lookup: values of ustar used to construct lookup table
! tdif_lookup: values of SST-Tair for lookup table
! uten_table: wind speed at 10m as a function of ustar and Tdif 

END MODULE lookup_kara_mod