<html><head><meta http-equiv="Content-Type" content="text/html charset=utf-8"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class=""><div class=""><blockquote type="cite" class=""><div dir="ltr" class=""><div class="gmail_quote"><div dir="ltr" class=""><font class="" style="background-color: rgb(147, 196, 125);">So, I edit the plotgrids_new.ncl as showed below, but I could not get what I wanted.</font></div></div></div></blockquote>What do you mean by this? </div><div class="">Is a plot produced? </div><div class="">You’re outputting to x11 so it will only be temporary. At the top of the script you might want to change type =“png” or “pdf” then you can send the output to the script and detail what you actually wanted.</div><div class=""><br class=""></div><div class="">mpres@gsnDraw = False ; may prevent the wrf_wps_dom() function from drawing allowing your to overlay your shape file polylines. I’m not familiar with wrf_wps_dom() though, and the documentation I found online was particularly lacking. </div><div class=""><br class=""></div><div class=""><br class=""></div><div class="">An example of why the plot isn’t what you want, will enable someone to probably either answer or forward this onto <a href="mailto:wrfhelp@ucar.edu" class="">wrfhelp@ucar.edu</a></div><div class=""><br class=""></div><div class=""><br class=""></div><div class="">Alan</div><div class=""><br class=""></div><div class=""><br class=""></div><div class=""><br class=""></div><div class=""><span style="orphans: 2; widows: 2;" class="">##############################</span><br style="orphans: 2; widows: 2;" class=""><span style="orphans: 2; widows: 2;" class="">Alan Brammer,</span><div style="orphans: 2; widows: 2;" class="">Post-Doc Researcher</div><div style="orphans: 2; widows: 2;" class=""><br class=""></div><div style="orphans: 2; widows: 2;" class="">Department of Atmospheric and Environmental Sciences,<br class="">University at Albany, State University of New York, Albany, NY, 12222<div class=""><a href="mailto:abrammer@albany.edu" class="">abrammer@albany.edu</a><br class="">##############################</div></div></div><br class=""><div><blockquote type="cite" class=""><div class="">On 27 Jan 2016, at 03:21, Tao Lu <<a href="mailto:hakufu.asano@gmail.com" class="">hakufu.asano@gmail.com</a>> wrote:</div><br class="Apple-interchange-newline"><div class=""><div dir="ltr" class=""><div class="gmail_quote"><div dir="ltr" class=""><font style="background-color:rgb(147,196,125)" class="">I try to show nesting domain and some shape files at the same time.<br class="">So, I edit the plotgrids_new.ncl as showed below, but I could not get what I wanted.<br class=""><br class="">I found the reason is the command: draw(mp), But I do not know how to handle this problem.</font></div></div></div></div></blockquote><blockquote type="cite" class=""><div class=""><div dir="ltr" class=""><div class="gmail_quote"><div dir="ltr" class=""><font style="background-color:rgb(147,196,125)" class="">Please help me.</font><div class=""><font class=""><br class=""></font></div><div class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Script display location of model domains</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Only works for ARW domains</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Only works for NCL versions 6.2 or later</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Reads namelist file directly</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">load "$NCARG_ROOT/lib/ncarg/nclscripts/wrf/WRFUserARW.ncl"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">;----------------------------------------------------------------------------</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">begin</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">;</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Check the version of NCL</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> version = systemfunc("ncl -V")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(version.lt.6.2) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("You need NCL V6.2 or later to run this script. Try running plotgrids.ncl. Stopping now...")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> return</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; We generate plots, but what kind do we prefer?</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> type = "x11"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; type = "pdf"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; type = "ps"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; type = "ncgm"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> wks = gsn_open_wks(type,"wps_show_dom")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; read the following namelist file</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> filename = "namelist.wps"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Set the colors to be used</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> colors = (/"white","black","White","ForestGreen","DeepSkyBlue","Red","Blue"/)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> gsn_define_colormap(wks, colors) </span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Set some map information ; line and text information</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres = True</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpFillOn = True</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpFillColors = (/"background","DeepSkyBlue","ForestGreen","DeepSkyBlue", "transparent"/)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpDataBaseVersion = "Ncarg4_1"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpGeophysicalLineColor = "Black"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpGridLineColor = "Black"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpLimbLineColor = "Black"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpNationalLineColor = "Black"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpPerimLineColor = "Black"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@mpUSStateLineColor = "Black"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; mpres@mpOutlineBoundarySets = "AllBoundaries"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;mpres@mpGridSpacingF = 45</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@tiMainString = " WPS Domain Configuration "</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> lnres = True </span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> lnres@gsLineThicknessF = 2.5</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> lnres@domLineColors = (/ "white", "Red" , "Red" , "Blue" /)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> txres = True</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> txres@txFont = "helvetica-bold"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;txres@txJust = "BottomLeft"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> txres@txJust = "TopLeft"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> txres@txPerimOn = False</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> txres@txFontHeightF = 0.015</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Do not change anything between the ";;;;;" lines</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> maxdom = 21</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> nvar = 19</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> parent_idn = new (maxdom,integer)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> parent_grid_ration = new (maxdom,integer)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> i_parent_startn = new (maxdom,integer)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> j_parent_startn = new (maxdom,integer)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> e_wen = new (maxdom,integer)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> e_snn = new (maxdom,integer)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> plotvar = new((/maxdom,nvar/),float)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> plotvar@_FillValue = -999.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> plotvar = wrf_wps_read_nml(filename)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@max_dom = floattointeger(plotvar(0,0))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@dx = plotvar(0,1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@dy = plotvar(0,2)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if (.not.ismissing(plotvar(0,3))) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@ref_lat = plotvar(0,3)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> else</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@ref_lat = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if (.not.ismissing(plotvar(0,4))) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@ref_lon = plotvar(0,4)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> else</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@ref_lon = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if (.not.ismissing(plotvar(0,5))) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@ref_x = plotvar(0,5)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if (.not.ismissing(plotvar(0,6))) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@ref_y = plotvar(0,6)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@truelat1 = plotvar(0,7)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@truelat2 = plotvar(0,8)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@stand_lon = plotvar(0,9)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mproj_int = plotvar(0,10)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@pole_lat = plotvar(0,11)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@pole_lon = plotvar(0,12)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> do i = 0,maxdom-1</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> parent_idn(i) = floattointeger(plotvar(i,13))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> parent_grid_ration(i) = floattointeger(plotvar(i,14))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> i_parent_startn(i) = floattointeger(plotvar(i,15))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> j_parent_startn(i) = floattointeger(plotvar(i,16))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> e_wen(i) = floattointeger(plotvar(i,17))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> e_snn(i) = floattointeger(plotvar(i,18))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end do</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(mpres@max_dom .gt. 1) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> do i = 1,mpres@max_dom-1</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;Making sure edge is nested grid is at least 5 grid points from mother domain.</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(i_parent_startn(i) .lt. 5) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("Warning: Western edge of grid must be at least 5 grid points from mother domain!")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(j_parent_startn(i) .lt. 5) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("Warning: Southern edge of grid must be at least 5 grid points from mother domain!")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> pointwe = (e_wen(i)-1.)/parent_grid_ration(i)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> pointsn = (e_snn(i)-1.)/parent_grid_ration(i)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> gridwe = e_wen(parent_idn(i)-1)-(pointwe+i_parent_startn(i))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> gridsn = e_snn(parent_idn(i)-1)-(pointsn+j_parent_startn(i))</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(gridwe .lt. 5) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("Warning: Eastern edge of grid must be at least 5 grid points from mother domain!")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(gridsn .lt. 5) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("Warning: Northern edge of grid must be at least 5 grid points from mother domain!")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;Making sure nested grid is fully contained in mother domain.</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> gridsizewe = (((e_wen(parent_idn(i)-1)-4)-i_parent_startn(i))*parent_grid_ration(i))-(parent_grid_ration(i)-1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> gridsizesn = (((e_snn(parent_idn(i)-1)-4)-j_parent_startn(i))*parent_grid_ration(i))-(parent_grid_ration(i)-1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(gridwe .lt. 5) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("Warning: Inner nest (domain = " + (i+1) + ") is not fully contained in mother nest (domain = " + parent_idn(i) + ")!")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("For the current setup of mother domain = " + parent_idn(i) + ", you can only have a nest of size " + gridsizewe + "X" + gridsizesn + ". Stopping Program!")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> exit</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(gridsn .lt. 5) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("Warning: Inner nest (domain = " + (i+1) + ") is not fully contained in mother nest (domain = " + parent_idn(i) + ")!")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("For the current setup of mother domain = " + parent_idn(i) + ", you can only have a nest of size " + gridsizewe + "X" + gridsizesn + ". Stopping Program!")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> exit</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;Making sure the nest ends at a mother grid domain point.</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> pointwetrunc = decimalPlaces(pointwe,0,False)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> pointsntrunc = decimalPlaces(pointsn,0,False)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if((pointwe-pointwetrunc) .ne. 0.) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> nest_we_up = (ceil(pointwe)*parent_grid_ration(i))+1</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> nest_we_dn = (floor(pointwe)*parent_grid_ration(i))+1</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("Nest does not end on mother grid domain point. Try " + nest_we_dn + " or " + nest_we_up + ".")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if((pointsn-pointsntrunc) .ne. 0.) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> nest_sn_up = (ceil(pointsn)*parent_grid_ration(i))+1</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> nest_sn_dn = (floor(pointsn)*parent_grid_ration(i))+1</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> print("Nest does not end on mother grid domain point. Try " + nest_sn_dn + " or " + nest_sn_up + ".")</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end do</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@parent_id = parent_idn(0:mpres@max_dom-1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@parent_grid_ratio = parent_grid_ration(0:mpres@max_dom-1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@i_parent_start = i_parent_startn(0:mpres@max_dom-1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@j_parent_start = j_parent_startn(0:mpres@max_dom-1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@e_we = e_wen(0:mpres@max_dom-1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@e_sn = e_snn(0:mpres@max_dom-1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if(mproj_int .eq. 1) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@map_proj = "lambert"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@pole_lat = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@pole_lon = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> else if(mproj_int .eq. 2) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@map_proj = "mercator"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@pole_lat = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@pole_lon = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> else if(mproj_int .eq. 3) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@map_proj = "polar"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@pole_lat = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@pole_lon = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> else if(mproj_int .eq. 4) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@map_proj = "lat-lon"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Deal with global wrf domains that don't have dx or dy</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> if (<a href="mailto:mpres@dx.lt" class="">mpres@dx.lt</a>.1e-10 .and. <a href="mailto:mpres@dx.lt" class="">mpres@dx.lt</a>.1e-10) then</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@dx = 360./(mpres@e_we(0) - 1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@dy = 180./(mpres@e_sn(0) - 1)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@ref_lat = 0.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mpres@ref_lon = 180.0</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> end if</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> mp = wrf_wps_dom (wks,mpres,lnres,txres)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> </span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Now you can add some information to the plot. </span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Below is an example of adding a white dot over the DC location.</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;pmres = True</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;pmres@gsMarkerColor = "White"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;pmres@gsMarkerIndex = 16</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;pmres@gsMarkerSizeF = 0.01</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> ;gsn_polymarker(wks,mp,-77.26,38.56,pmres)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> </span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; Test to add a shapefile</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">; I add the following contents</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> dir = "/home/taolu/WRF/CASES/kinugawa/shp/"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> shp_kinu = dir + "kinugawa.shp"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> shp_tone = dir + "tonegawa.shp"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> preres = True</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> preres@gsLineColor = "gray25"</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> preres@gsLineThicknessF = 2.0 </span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> kinu_id = gsn_add_shapefile_polylines(wks,mp,shp_kinu,preres)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> tone_id = gsn_add_shapefile_polylines(wks,mp,shp_tone,preres)</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> </span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> draw(mp);</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""> frame(wks) ; lets frame the plot - do not delete</span><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><br style="margin:0px;padding:0px;color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class=""><span style="color:rgb(46,139,87);font-family:Monaco,'Andale Mono','Courier New',Courier,mono;font-size:11.7px;line-height:15.21px" class="">end</span></div></div></div><div class="gmail_signature"><div dir="ltr" class=""><div dir="ltr" class=""><div dir="ltr" class=""><div style="font-size:12.8000001907349px" class=""><br class=""></div></div></div></div></div>
</div>
_______________________________________________<br class="">ncl-talk mailing list<br class=""><a href="mailto:ncl-talk@ucar.edu" class="">ncl-talk@ucar.edu</a><br class="">List instructions, subscriber options, unsubscribe:<br class="">http://mailman.ucar.edu/mailman/listinfo/ncl-talk<br class=""></div></blockquote></div><br class=""></body></html>