! NOAA/PMEL TMAP
 ! FERRET v6.67  
 ! Linux(gfortran) 2.6.18-238.1.1.el5 - 02/11/11
 ! 31-Jul-15 16:08     

use "data/O_feflux.nc"
se tavg.08550.01.01.nc
use tavg.08550.01.01.nc
let odfe = o_dfe[k=1:3@ave,l=10,d=2]
let feflux = if o_dfe[d=2,l=10,k=1:3@ave] gt 0 then o_feflux[l=@ave,d=1]
list/file=fefluxvsodfe.dat/clobber/format=(i5,e10.5,e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(i,e10.5,e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(i2,e10.5,e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(e10.5,,e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(e10.5,'',e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(e10.5,'',e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(e10.5,i5,e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(e10.5,i1.1,e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(e10.5, e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(2e10.5,2e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(2e10.5,4e10.5) feflux,odfe
list/file=fefluxvsodfe.dat/clobber/format=(xe10.5,xe10.5) feflux,odfe
list/file=fefluxvsodfe.txt/clobber/format=(xe10.5,xe10.5) feflux,odfe
let feflux = if g_kmt ge 5 then o_feflux[l=@ave,d=1]
let odfe = if g_kmt ge 5 then o_dfe[k=1:3@ave,l=10,d=2]
shade odfe
shade o_dfe[k=1:3@ave,d=2,l=10]
shade o_dfe[k=1:3@ave,d=2,l=10]*10^6
shade odfe*10^6
shade o_dfe[k=1:3@ave,d=2,l=10]*10^6
shade odfe*10^6
shade o_dfe[k=1:3@ave,d=2,l=10]*10^6
shade odfe*10^6
shade o_dfe[k=1:3@ave,d=2,l=10]*10^6
shade odfe*10^6
shade o_dfe[k=1:3@ave,d=2,l=10]*10^6
shade odfe*10^6
shade o_dfe[k=1:3@ave,d=2,l=10]*10^6
shade odfe*10^6
let odfe = if g_kmt ge 9 then o_dfe[k=1:3@ave,l=10,d=2]
shade odfe*10^6
let odfe = if g_kmt ge 12 then o_dfe[k=1:3@ave,l=10,d=2]
shade odfe*10^6
let odfe = if g_kmt ge 10 then o_dfe[k=1:3@ave,l=10,d=2]
shade odfe*10^6
let odfe = if g_kmt ge 11 then o_dfe[k=1:3@ave,l=10,d=2]
shade odfe*10^6
let odfe = if g_kmt ge 12 then o_dfe[k=1:3@ave,l=10,d=2]
shade odfe*10^6
list/file=fefluxvsodfek12.txt/clobber/format=(xe10.5,xe10.5) feflux,odfe
sh var
let FEFLUX = IF G_KMT[l=10,d=2] GE 5 THEN O_FEFLUX[L=@AVE,D=1]
list/file=fefluxvsodfek12.txt/clobber/format=(xe10.5,xe10.5) feflux,odfe
let FEFLUX = IF G_KMT[l=10,d=2] GE 12 THEN O_FEFLUX[L=@AVE,D=1]
list/file=fefluxvsodfek12.txt/clobber/format=(xe10.5,xe10.5) feflux,odfe
let FEFLUX = IF G_KMT[l=10,d=2] GE 5 THEN O_FEFLUX[L=@AVE,D=1]
let odfe = if g_kmt ge 5 then o_dfe[k=1:3@ave,l=10,d=2]
list/file=fefluxvsodfek5.txt/clobber/format=(xe10.5,xe10.5) feflux,odfe
sp sed '/^$/d' fefluxvsodfek5.txt > fefluxvsodfek5_.txt
sp sed '/^$/d' fefluxvsodfek12.txt > fefluxvsodfek12_.txt
sp sed '/^$/d' fefluxvsodfe.txt > fefluxvsodfe_.txt
sp sed '/^$/d' fefluxvsodfe.txt > 1fefluxvsodfe.txt
exi