Revision: | 1.1 |
Committed: | Fri Mar 14 01:40:30 2014 UTC (9 years, 6 months ago) by tplarson |
Branch: | MAIN |
CVS Tags: | Ver_8-8, Ver_8-11, Ver_8-10, Ver_8-6, Ver_LATEST, Ver_8-4, Ver_9-41, Ver_8-5, Ver_8-12, Ver_8-7, Ver_9-5, Ver_9-4, Ver_9-3, Ver_9-2, Ver_9-1, Ver_9-0, HEAD |
Log Message: | same as for sourcetype=mdi |
# | Content |
---|---|
1 | |
2 | words=readmdisw(day,ndays) |
3 | sw=reform(words[0,*]) |
4 | ssw=reform(words[1,*]) |
5 | qual=sw and ssw |
6 | wq0=where(qual eq 0,ncheck) |
7 | gq0=fltarr(nx) |
8 | if (ncheck ne 0) then gq0[wq0]=1 |
9 | iss=qual and 65536L |
10 | wiss=where(iss ne 0,ncheck) |
11 | giss=fltarr(nx) |
12 | if (ncheck ne 0) then giss[wiss]=1 |
13 | |
14 | g2=giss+gq0 |
15 | |
16 | mksec,day,nx,tstep,ref=secsref |