Ferret v5.81 contains a few bug fixes and a couple of new features. It is being released now because it is needed for the upcoming release of LAS V6.5.1. Look for a Ferret release with more new features later in the summer of 2005.
yes? use etopo60
yes? fill/pal=land_sea/lev=(-inf)(-5000,5000,1000)(inf) rose
The call is
LABWID (string, labelsize)Where string may include a font specification. For a multi-line label, the longest line of the label determines the length that is returned.
yes? LIST/NOHEADER LABWID("abcdefg", .15)
0.8857
yes? LIST/NOHEADER LABWID("abcdefg", .10)
0.5905
yes? LIST/NOHEADER LABWID("abcdefg<NL>hi", .15)
0.8857
yes? LIST/NOHEADER LABWID("ABCDEFG", .15)
0.9929
! Make a plot, appending one label after another.
! Use the italics font for the first label.
yes? PLOT/VS/LINE/I=1:314 i*cos(i/20),i*sin(i/20)
yes? LET firstlab = "@iiMy label"
yes? LABEL/NOUSER 0, 3, -1, 0, .15, "`firstlab`"
yes? LET wid = labwid("`firstlab`", .15)
yes? LABEL/NOUSER `wid`, 3, -1, 0, .15, "@P4Second Label"
! Draw modulo replications to fill the requested range /HLIM=-180:180
yes? SET DATA my_curvilinear.nc
yes? SHADE/MOD/HLIM=-180:180 my_var, xlon, ylat
yes? FILL/MOD/HLIM=-180:180 my_var, xlon, ylat
yes? CONTOUR/OVER/MOD/HLIM=-180:180 my_var, xlon, ylat
yes? CANCEL MODE verify
yes? LET a = 1
yes? REPEAT/I=1:10 (LET a = `2*a`; IF `a LT 20` THEN EXIT/CYCLE; SAY `a`)
32
64
128
256
512
1024
yes? SHOW AXIS/XML taxis <axes> <axis name="taxis"> <units>DAYS since 0001-01-01 00:00:00</units> <length>32</length> <start>1989-12-30 00:00:00</start> <end>1990-01-30 00:00:00</end> <point_spacing>even</point_spacing> <modulo>no</modulo> <time_origin>0001-01-01 00:00:00</time_origin> </axis> </axes>
yes? use coads_climatology yes? vec/l=1/set uwnd,vwnd yes? ppl veckey,1,1,,(f4.0,"x10^-^2 n m^-^2") yes? ppl vector