<html><head></head><body><div style="color:#000; background-color:#fff; font-family:times new roman, new york, times, serif;font-size:16px"> <div id="yui_3_16_0_ym19_1_1466038784465_5362" abp="11303">To whom it may concern,</div><div id="yui_3_16_0_ym19_1_1466038784465_5363" abp="11304"><br id="yui_3_16_0_ym19_1_1466038784465_5364" clear="none" abp="11305"></div><div id="yui_3_16_0_ym19_1_1466038784465_5372" abp="11313">My below ncl code has aproblem in writting the table with 4 data in one column. It only writes the first data and doesnt continue to write the other data.</div><div abp="11313"><br></div><div id="yui_3_16_0_ym19_1_1466038784465_5488" abp="11313">does anyone know how to fix this problem?</div><div id="yui_3_16_0_ym19_1_1466038784465_5489" abp="11313"><br></div><div id="yui_3_16_0_ym19_1_1466038784465_5490" abp="11313">I appreciate your time and consideration. </div><div id="yui_3_16_0_ym19_1_1466038784465_5466" abp="11313"><br id="yui_3_16_0_ym19_1_1466038784465_5373" clear="none" abp="11314"></div><div id="yui_3_16_0_ym19_1_1466038784465_5374" abp="11315">Best regards,</div><div id="yui_3_16_0_ym19_1_1466038784465_5375" abp="11316"><br id="yui_3_16_0_ym19_1_1466038784465_5376" clear="none" abp="11317"></div><div id="yui_3_16_0_ym19_1_1466038784465_5377" dir="ltr" abp="11318">Snow Sho</div><div id="yui_3_16_0_ym19_1_1466038784465_5378" dir="ltr" abp="11319"><br id="yui_3_16_0_ym19_1_1466038784465_5379" clear="none" abp="11320"></div><div id="yui_3_16_0_ym19_1_1466038784465_5380" dir="ltr" abp="11321"><br id="yui_3_16_0_ym19_1_1466038784465_5381" clear="none" abp="11322"></div><div id="yui_3_16_0_ym19_1_1466038784465_5382" dir="ltr" abp="11323">this is the code:</div><blockquote id="yui_3_16_0_ym19_1_1466038784465_5383" style="font-size: 13px;" abp="11324" type="cite"><div id="yui_3_16_0_ym19_1_1466038784465_5384" abp="11325"><div id="yui_3_16_0_ym19_1_1466038784465_5385" style="font-size: 16px;" abp="11326"><div id="yui_3_16_0_ym19_1_1466038784465_5386" abp="11327"><div id="yui_3_16_0_ym19_1_1466038784465_5387" abp="11328"><div id="yui_3_16_0_ym19_1_1466038784465_5388" abp="11329"><div id="yui_3_16_0_ym19_1_1466038784465_5389" abp="11330"><div id="yui_3_16_0_ym19_1_1466038784465_5390" abp="11331"><div id="yui_3_16_0_ym19_1_1466038784465_5392" dir="ltr" abp="11332">load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"<br id="yui_3_16_0_ym19_1_1466038784465_5393" clear="none" abp="11333">load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"<br id="yui_3_16_0_ym19_1_1466038784465_5394" clear="none" abp="11334">load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"<br id="yui_3_16_0_ym19_1_1466038784465_5395" clear="none" abp="11335">load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/shea_util.ncl"<br id="yui_3_16_0_ym19_1_1466038784465_5396" clear="none" abp="11336">load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/contributed.ncl"<br id="yui_3_16_0_ym19_1_1466038784465_5397" clear="none" abp="11337">begin<br id="yui_3_16_0_ym19_1_1466038784465_5398" clear="none" abp="11338">;----------------------------------------------------------------------<br id="yui_3_16_0_ym19_1_1466038784465_5399" clear="none" abp="11339">; WRF data translate NetCDF file to ascii file <br id="yui_3_16_0_ym19_1_1466038784465_5400" clear="none" abp="11340">;----------------------------------------------------------------------</div><div id="yui_3_16_0_ym19_1_1466038784465_5401" dir="ltr" abp="11341"><br id="yui_3_16_0_ym19_1_1466038784465_5402" clear="none" abp="11342"></div><div id="yui_3_16_0_ym19_1_1466038784465_5403" dir="ltr" abp="11343"> infile=("wrfout_d03_2007-07-24_00_00_00")<br id="yui_3_16_0_ym19_1_1466038784465_5404" clear="none" abp="11344"> fn=dimsizes(infile)</div><div id="yui_3_16_0_ym19_1_1466038784465_5405" dir="ltr" abp="11345"> fin=addfile(infile,"r")<br id="yui_3_16_0_ym19_1_1466038784465_5406" clear="none" abp="11346"> R=fin->RAINNC(0,:,:)</div><div id="yui_3_16_0_ym19_1_1466038784465_5407" dir="ltr" abp="11347"> a=(/189,193,191,192,192,193,192,188,198,196,192,187,197,194,190,187,197,196,195,195,196/)<br id="yui_3_16_0_ym19_1_1466038784465_5408" clear="none" abp="11348"> b=(/285,286,287,288,289,290,291,292,293,294,295,296,296,297,298,299,298,299,300,301,302/)</div><div id="yui_3_16_0_ym19_1_1466038784465_5409" dir="ltr" abp="11349"> c=(/180,174,172,181,179,173,184,175,185,174,184,173,183,193,182,191,179,189,178,188,176/)<br id="yui_3_16_0_ym19_1_1466038784465_5410" clear="none" abp="11350"> d=(/264,266,267,267,268,269,270,270,271,271,272,273,273,273,274,273,275,274,276,275,277/)<br id="yui_3_16_0_ym19_1_1466038784465_5411" clear="none" abp="11351"> e=(/202,205,206,206,198,197,206,205,204,202,200,200,200,200,210,209,205,202,212,208,204,203/)<br id="yui_3_16_0_ym19_1_1466038784465_5412" clear="none" abp="11352"> f=(/270,271,272,273,274,276,277,278,279,280,281,282,283,284,284,284,285,286,287,288,289,290/)<br id="yui_3_16_0_ym19_1_1466038784465_5413" clear="none" abp="11353"> g=(/208,208,209,210,211,210,207,205,215,212,213,215,216,207,209,210,211,214,215,209,211,215,214/)<br id="yui_3_16_0_ym19_1_1466038784465_5414" clear="none" abp="11354"> h=(/263,264,265,266,267,267,268,269,269,270,271,273,274,276,277,278,279,279,280,282,283,284,287/)</div><div id="yui_3_16_0_ym19_1_1466038784465_5415" dir="ltr" abp="11355"> R1=new((/21/),"float") <br id="yui_3_16_0_ym19_1_1466038784465_5416" clear="none" abp="11356"> R2=new((/21/),"float")<br id="yui_3_16_0_ym19_1_1466038784465_5417" clear="none" abp="11357"> R3=new((/22/),"float")<br id="yui_3_16_0_ym19_1_1466038784465_5418" clear="none" abp="11358"> R4=new((/23/),"float")</div><div id="yui_3_16_0_ym19_1_1466038784465_5419" dir="ltr" abp="11359"><br id="yui_3_16_0_ym19_1_1466038784465_5420" clear="none" abp="11360"></div><div id="yui_3_16_0_ym19_1_1466038784465_5421" dir="ltr" abp="11361"> do k=0,20<br id="yui_3_16_0_ym19_1_1466038784465_5422" clear="none" abp="11362"> R1(k)=R(a(k),b(k))<br id="yui_3_16_0_ym19_1_1466038784465_5423" clear="none" abp="11363"> end do<br id="yui_3_16_0_ym19_1_1466038784465_5424" clear="none" abp="11364"> ; print(R1)<br id="yui_3_16_0_ym19_1_1466038784465_5425" clear="none" abp="11365"> do k=0,20<br id="yui_3_16_0_ym19_1_1466038784465_5426" clear="none" abp="11366"> R2(k)=R(c(k),d(k))<br id="yui_3_16_0_ym19_1_1466038784465_5427" clear="none" abp="11367"> end do<br id="yui_3_16_0_ym19_1_1466038784465_5428" clear="none" abp="11368"> do k=0,21<br id="yui_3_16_0_ym19_1_1466038784465_5429" clear="none" abp="11369"> R3(k)=R(e(k),f(k))<br id="yui_3_16_0_ym19_1_1466038784465_5430" clear="none" abp="11370"> end do<br id="yui_3_16_0_ym19_1_1466038784465_5431" clear="none" abp="11371"> do k=0,22<br id="yui_3_16_0_ym19_1_1466038784465_5432" clear="none" abp="11372"> R4(k)=R(g(k),h(k))<br id="yui_3_16_0_ym19_1_1466038784465_5433" clear="none" abp="11373"> end do</div><div id="yui_3_16_0_ym19_1_1466038784465_5434" dir="ltr" abp="11374"> R5=avg(R1(:))<br id="yui_3_16_0_ym19_1_1466038784465_5435" clear="none" abp="11375"> R6=avg(R2(:))<br id="yui_3_16_0_ym19_1_1466038784465_5436" clear="none" abp="11376"> R7=avg(R3(:))<br id="yui_3_16_0_ym19_1_1466038784465_5437" clear="none" abp="11377"> R8=avg(R4(:))</div><div id="yui_3_16_0_ym19_1_1466038784465_5438" dir="ltr" abp="11378"><br id="yui_3_16_0_ym19_1_1466038784465_5439" clear="none" abp="11379"></div><div id="yui_3_16_0_ym19_1_1466038784465_5440" dir="ltr" abp="11380"> ca=new((/1/),"float")<br id="yui_3_16_0_ym19_1_1466038784465_5441" clear="none" abp="11381"> ca=(/R5/)<br id="yui_3_16_0_ym19_1_1466038784465_5442" clear="none" abp="11382"> cb=new((/1/),"float")<br id="yui_3_16_0_ym19_1_1466038784465_5443" clear="none" abp="11383"> cb=(/R6/)<br id="yui_3_16_0_ym19_1_1466038784465_5444" clear="none" abp="11384"> cc=new((/1/),"float")<br id="yui_3_16_0_ym19_1_1466038784465_5445" clear="none" abp="11385"> cc=(/R7/)<br id="yui_3_16_0_ym19_1_1466038784465_5446" clear="none" abp="11386"> cd=new((/1/),"float")<br id="yui_3_16_0_ym19_1_1466038784465_5447" clear="none" abp="11387"> cd=(/R8/)</div><div id="yui_3_16_0_ym19_1_1466038784465_5448" dir="ltr" abp="11388"><br id="yui_3_16_0_ym19_1_1466038784465_5449" clear="none" abp="11389"></div><div id="yui_3_16_0_ym19_1_1466038784465_5450" dir="ltr" abp="11390">; alist=[/R5,R6,R7,R8/]<br id="yui_3_16_0_ym19_1_1466038784465_5451" clear="none" abp="11391"> alist=[/ca,cb,cc,cd/]<br id="yui_3_16_0_ym19_1_1466038784465_5452" clear="none" abp="11392"> write_table("list.txt", "a", alist, "%5.5f")</div><div id="yui_3_16_0_ym19_1_1466038784465_4673" dir="ltr" abp="11393"> end</div></div></div></div></div></div></div></div></blockquote></div></body></html>