Commit 2620c958 authored by Carl Schreck's avatar Carl Schreck
Browse files

Automated Nightly Commit - Wed Nov 21 00:00:30 EST 2018

parent 51d04379
......@@ -65,7 +65,7 @@ begin
retVal@dx = dx
; retVal@isCyclic = isCyclic
if( dataFlip ) then
if( newFlip ) then
print( "copy_Gridding: un-re-ordering 'retVal' lat" )
if( dataDims.eq.2 ) then
retVal = retVal(::-1,:)
......
......@@ -12,7 +12,7 @@ procedure ibt_map_all_storms( \
i_minTime [1] : numeric, \
i_maxTime [1] : numeric, \
i_tcRes [1] : logical \ ; ibtFullTrack, lgLegendOn, ibtAddGenesis, \
; ibtStartName, ibtEndName, ibtBasin
; ibtStartName, ibtEndName, ibtBasin; lgJust
)
begin ; ibt_map_all_storms
; These are some parameters that could be useful to have up top
......@@ -119,11 +119,22 @@ begin ; ibt_map_all_storms
io_plot@lgId = gsn_create_legend( io_wks, dimsizes(labels), labels, lgRes )
if( ( .not.isatt( i_tcRes, "lgLegendOn" ) ).or.i_tcRes@lgLegendOn ) then
amRes = True
amRes@amParallelPosF = 1.0
amRes@amOrthogonalPosF = 0.0
amRes@amJust = "BottomRight"
amRes@amZone = 1
if( ( .not.isatt( i_tcRes, "lgJust" ) ) \
.or.i_tcRes@lgJust.eq."BottomRight" ) then
amRes = True
amRes@amParallelPosF = 1.0
amRes@amOrthogonalPosF = 0.0
amRes@amJust = "BottomRight"
amRes@amZone = 1
elseif( i_tcRes@lgJust.eq."BottomLeft" ) then
amRes = True
amRes@amParallelPosF = 0.0
amRes@amOrthogonalPosF = 0.0
amRes@amJust = "BottomLeft"
amRes@amZone = 1
end if
io_plot@legend = gsn_add_annotation( io_plot, io_plot@lgId, amRes )
end if
......
......@@ -119,14 +119,38 @@ begin ; ibt_map_all_storms
io_plot@lgId = gsn_create_legend( io_wks, dimsizes(labels), labels, lgRes )
if( ( .not.isatt( i_tcRes, "lgLegendOn" ) ).or.i_tcRes@lgLegendOn ) then
amRes = True
amRes@amParallelPosF = 1.0
amRes@amOrthogonalPosF = 0.0
amRes@amJust = "BottomRight"
amRes@amZone = 1
if( ( .not.isatt( i_tcRes, "lgJust" ) ) \
.or.i_tcRes@lgJust.eq."BottomRight" ) then
amRes = True
amRes@amParallelPosF = 1.0
amRes@amOrthogonalPosF = 0.0
amRes@amJust = "BottomRight"
amRes@amZone = 1
elseif( i_tcRes@lgJust.eq."BottomLeft" ) then
amRes = True
amRes@amParallelPosF = 0.0
amRes@amOrthogonalPosF = 0.0
amRes@amJust = "BottomLeft"
amRes@amZone = 1
elseif( i_tcRes@lgJust.eq."TopRight" ) then
amRes = True
amRes@amParallelPosF = 1.0
amRes@amOrthogonalPosF = 1.0
amRes@amJust = "TopRight"
amRes@amZone = 1
elseif( i_tcRes@lgJust.eq."TopLeft" ) then
amRes = True
amRes@amParallelPosF = 0.0
amRes@amOrthogonalPosF = 1.0
amRes@amJust = "TopLeft"
amRes@amZone = 1
end if
io_plot@legend = gsn_add_annotation( io_plot, io_plot@lgId, amRes )
end if
end; ibt_map_all_storms
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment