Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Carl Schreck
Carl NCL Library
Commits
38c92f45
Commit
38c92f45
authored
Sep 22, 2016
by
Carl Schreck
Browse files
Automated Nightly Commit - Thu Sep 22 00:00:20 EDT 2016
parent
8b825ba8
Changes
1
Hide whitespace changes
Inline
Side-by-side
cjs_graphics/cjs_add_vectors.ncl
View file @
38c92f45
...
...
@@ -25,34 +25,50 @@ begin ; cjs_add_vectors
vecRes@gsnRightString = ""
vecRes@gsnFrame = False
vecRes@gsnDraw = False
vecRes@vcVectorDrawOrder = "PostDraw"
vecRes@vcRefMagnitudeF = 3
vecRes@vcRefLengthF = 0.025
vecRes@vcMinDistanceF = 0.03
vecRes@vcGlyphStyle = "CurlyVector"
vecRes@vcLineArrowColor = "black"
vecRes@vcLineArrowThicknessF = 2
; ...vector legend
vecRes@vcRefAnnoOn = True
vecRes@vcRefAnnoArrowUseVecColor = False
if( isatt( i_vecRes, "fontHeightF" ) ) then
vecRes@vcRefAnnoFontHeightF := i_vecRes@fontHeightF
if( isatt( i_vecRes, "vecNotStrm" ).and.( i_vecRes@vecNotStrm ) ) then
vecRes@vcVectorDrawOrder = "PostDraw"
vecRes@vcRefMagnitudeF = 3
vecRes@vcRefLengthF = 0.025
vecRes@vcMinDistanceF = 0.03
vecRes@vcGlyphStyle = "CurlyVector"
vecRes@vcLineArrowColor = "black"
vecRes@vcLineArrowThicknessF = 2
; ...vector legend
vecRes@vcRefAnnoOn = True
vecRes@vcRefAnnoArrowUseVecColor = False
if( isatt( i_vecRes, "fontHeightF" ) ) then
vecRes@vcRefAnnoFontHeightF := i_vecRes@fontHeightF
else
vecRes@vcRefAnnoFontHeightF := 0.02
end if
vecRes@vcRefAnnoString1 = "$VMG$ m/s"
vecRes@vcRefAnnoString2On = False
vecRes@vcRefAnnoOrthogonalPosF = 0
vecRes@vcRefAnnoZone = 1
vecRes@vcRefAnnoJust = "BottomRight"
if( i_vecRes ) then
copy_VarAtts( i_vecRes, vecRes )
end if
vectPlot = gsn_csm_vector( io_wks, i_uData, i_vData, vecRes )
else
vecRes@vcRefAnnoFontHeightF := 0.02
end if
vecRes@vcRefAnnoString1 = "$VMG$ m/s"
vecRes@vcRefAnnoString2On = False
vecRes@vcRefAnnoOrthogonalPosF = 0
vecRes@vcRefAnnoZone = 1
vecRes@vcRefAnnoJust = "BottomRight"
if( i_vecRes ) then
copy_VarAtts( i_vecRes, vecRes )
vecRes@stArrowLengthF = 0.01
vecRes@stMinLineSpacingF = 0.020
if( i_vecRes ) then
copy_VarAtts( i_vecRes, vecRes )
end if
print(num(ismissing(i_uData) ) )
print(num(ismissing(i_vData) ) )
vectPlot = gsn_csm_streamline( io_wks, i_uData, i_vData, vecRes )
end if
vectPlot = gsn_csm_vector( io_wks, i_uData, i_vData, vecRes )
overlay( io_basePlot, vectPlot )
end ; cjs_add_vectors
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment