Longwave up and down

Changes to get longwave up and down HYCOM_GlueFieldsDataImport and changes in the
calculation of the fluxes in thermf.F

ok I think I push my changes for the corner points and HYCOM_IN_CESM on github… 

A.
On Oct 21, 2014, at 5:13 PM, feiliuesmf <notifications@github.com> wrote:

> In sorc/thermf.F:
> 
> > @@ -22,6 +22,14 @@ subroutine thermf_oi(m,n)
> >          if     (iceflg.ne.0) then
> >            do l=1,isp(j)
> >              do i=max(1-margin,ifp(j,l)),min(ii+margin,ilp(j,l))
> > +#ifdef HYCOM_IN_CESM
> Should be: #ifdef NUOPC HYCOM_IN_CESM stuff is only at the very top level in hycom_nuopc.F90 and hycom_nuopc_glue.F90 Could you please also commit the corner coordinate code changes? Thanks! - Fei
> …
> —
> Reply to this email directly or view it on GitHub.
>