bin/gpview in gphys-1.4.3.2 vs bin/gpview in gphys-1.5.0
- old
+ new
@@ -43,14 +43,18 @@
:--var url:
set the variable name and slicing parameters.
:--wsn [1-4]:
set work staion number. each number represent output device:
- 1 : X window.
- 2 : PS file. (named dcl.ps)
- 3 : Tcl/Tk file.
- 4 : GTK Windows (depend on dcl-5.3)
+ * for dcl-6,
+ 1 : X window
+ 2.: PDF file (named dcl.pdf).
+ * for dcl-5-?,
+ 1 : X window,
+ 2 : PS file. (named dcl.ps)
+ 3 : Tektronix terminal
+ 4 : GTK Windows
:--clrmap [1-]:
set colormap to draw tone/contour.
:--itr [1-4,5-7,10-15,20-23,30-33]:
@@ -92,10 +96,13 @@
enable to backing store.
:--nowait, --Gw:
not wait for any actions if animate
+:--delay <number>:
+ wait <number> seconds for each new page drawing of animation
+
:--reverse, --Gr:
plot animation reversible if animate
:--smooth, --Gaw:
equal to --anlternate && --nowait
@@ -223,11 +230,11 @@
do not draw zero contour
:--udsfmt [strings]:
change contour label format. see UDCNTR/DCL manual for the format.
-== EXAMPLES
+= EXAMPLES
For a single GPhys variable,
% gpview data.nc@temp
% gpview data.nc@temp,lon=130:150,lat=0:90:2
@@ -238,10 +245,11 @@
% gpview --animate lon data.nc@temp,lon=130:150
% gpview --animate lon --alternate data.nc@temp
% gpview --smooth lon data.nc@temp,lon=130:150
% gpview --levels 0,10,20,30 --pattern 30999,40999,50999,60999,70999 data.nc@temp
% gpview --overplot=3 --anim t data.nc@temp,lon=0
+ % gpview --overplot=3 --Opc --anim t data.nc@temp,lon=0
% gpview --mark data.nc@temp,lon=0,lat=0
% gpview --operation log10 data.nc@temp,lon=0
% gpview --time_ax false data.nc@temp,lon=0,lat=0
Example to set DCL internal variable,
@@ -252,63 +260,66 @@
% gpview data1.nc@temp,lon=130:150 data2.nc@temp,lon=150:170
% gpview --overplot=3 --anim t data.nc@temp,lon=0 data.nc@temp,lon=10
% gpview --var temp,lon=130:150 data?.nc
% gpview --anim t --var temp,lon=130:150 data*.nc
-
-== HISTORY
-
- 2004/12/14 D Tsukahara && T Horinouti(parse_gturl)
- 2005/01/08 D Tsukahara (add option --exch and able to invalid value)
- 2005/01/09 D Tsukahara (add option --animate, smooth, alternate, index )
- 2005/01/10 D Tsukahara (transpose axis with attr "positive:down" ,
- abailable loopsense_flag. )
- 2005/01/10 D Tsukahara (implement GGraph::color_bar, and margin_info,
- which file name, date, and toolname. )
- 2005/01/11 D Tsukahara ( 1. write document about OPTIONS.
- 2. add many options. more info please see document. )
- 2005/01/23 S Takehiro (add option --similar, map_axis)
- 2005/02/09 D Tsukahara && M Nakano (add option --reverse, --Gr, --map)
- 2005/02/10 D Tsukahara (change option parser (getopts => getoptlong))
- 2005/02/24 D Tsukahara (apply --range for line plot)
- 2005/06/15 S Takehiro (add option --levels, --clevels, --slevels, --patterns)
- 2005/06/17 S Takehiro (missing_value attribute setting removed)
- 2005/06/22 S Takehiro (debug, clipping control added to GGraph::annotate)
- 2005/06/23 S Takehiro (debug, option --title implemented)
- 2005/07/15 S Takehiro (option --noannotate implemented)
- 2005/08/07 S Takehiro (option --overplot implemented)
- 2005/08/09 S Takehiro && T Horinouchi (add option --help and help function.
- URL information corrected. )
- 2005/08/23 S Takehiro (multiple Gphys variables plotting
- and option --var implemented)
- 2005/08/23 S Takehiro (common methods to gp* command moved to gpcommon.rb)
- 2005/10/30 S Takehiro (option --animate recoverd)
- 2005/10/31 S Takehiro (option --smooth bug fixed)
- 2006/03/07 M Nakano (option --int bug fixed)
- 2007/10/03 S Takehiro (option --nocolorbar implemented)
- 2008/04/03 S Takehiro (option --nozero implemented)
- 2008/12/14 S Takehiro (option --mark implemented)
- 2010/03/10 Y SASAKI (change help block into RD format)
- 2011/01/14 T Tanigawa && S Takehiro (option --operation implemented)
- 2011/11/04 S Takehiro (option --time_ax implemented)
- 2011/11/20 S Takehiro (option --eddy implemented)
- 2012/02/19 S Takehiro (description for gturl format updated)
- 2013/01/29 T Tanigawa && S Takehiro (calculation of aspect ratio
- of viewport improved)
- 2013/01/29 S Nishizawa && S Takehiro (sequential operation implemented)
- 2014/02/21 Y Naito && S Takehiro (implement DCL internal variable setting,
- add option --udsfmt)
- 2014/02/21 S Noda && S Takehiro (add option --stddev)
- 2014/02/23 S Takehiro (option --tonf is changed to --tone)
- 2014/03/05 S Takehiro (add option --map_radius)
- 2014/03/10 Y Kawai && S Takehiro (setting labels for contours)
- 2014/04/06 S Takehiro (option --map_radius bug fix)
- 2014/06/27 S Nishizawa && S Takehiro (add options --xcoord, --ycoord)
- 2014/11/28 H Kashimura && S Takehiro (add option --diff, --tone bug fix)
- 2014/11/28 Y O Takahashi && S Takehiro (add option --overplot_color, --Opc)
-
=end
+#
+# = HISTORY
+#
+# 2004/12/14 D Tsukahara && T Horinouti(parse_gturl)
+# 2005/01/08 D Tsukahara (add option --exch and able to invalid value)
+# 2005/01/09 D Tsukahara (add option --animate, smooth, alternate, index )
+# 2005/01/10 D Tsukahara (transpose axis with attr "positive:down" ,
+# abailable loopsense_flag. )
+# 2005/01/10 D Tsukahara (implement GGraph::color_bar, and margin_info,
+# which file name, date, and toolname. )
+# 2005/01/11 D Tsukahara ( 1. write document about OPTIONS.
+# 2. add many options. more info please see document. )
+# 2005/01/23 S Takehiro (add option --similar, map_axis)
+# 2005/02/09 D Tsukahara && M Nakano (add option --reverse, --Gr, --map)
+# 2005/02/10 D Tsukahara (change option parser (getopts => getoptlong))
+# 2005/02/24 D Tsukahara (apply --range for line plot)
+# 2005/06/15 S Takehiro (add option --levels, --clevels, --slevels, --patterns)
+# 2005/06/17 S Takehiro (missing_value attribute setting removed)
+# 2005/06/22 S Takehiro (debug, clipping control added to GGraph::annotate)
+# 2005/06/23 S Takehiro (debug, option --title implemented)
+# 2005/07/15 S Takehiro (option --noannotate implemented)
+# 2005/08/07 S Takehiro (option --overplot implemented)
+# 2005/08/09 S Takehiro && T Horinouchi (add option --help and help function.
+# URL information corrected. )
+# 2005/08/23 S Takehiro (multiple Gphys variables plotting
+# and option --var implemented)
+# 2005/08/23 S Takehiro (common methods to gp* command moved to gpcommon.rb)
+# 2005/10/30 S Takehiro (option --animate recoverd)
+# 2005/10/31 S Takehiro (option --smooth bug fixed)
+# 2006/03/07 M Nakano (option --int bug fixed)
+# 2007/10/03 S Takehiro (option --nocolorbar implemented)
+# 2008/04/03 S Takehiro (option --nozero implemented)
+# 2008/12/14 S Takehiro (option --mark implemented)
+# 2010/03/10 Y SASAKI (change help block into RD format)
+# 2011/01/14 T Tanigawa && S Takehiro (option --operation implemented)
+# 2011/11/04 S Takehiro (option --time_ax implemented)
+# 2011/11/20 S Takehiro (option --eddy implemented)
+# 2012/02/19 S Takehiro (description for gturl format updated)
+# 2013/01/29 T Tanigawa && S Takehiro (calculation of aspect ratio
+# of viewport improved)
+# 2013/01/29 S Nishizawa && S Takehiro (sequential operation implemented)
+# 2014/02/21 Y Naito && S Takehiro (implement DCL internal variable setting,
+# add option --udsfmt)
+# 2014/02/21 S Noda && S Takehiro (add option --stddev)
+# 2014/02/23 S Takehiro (option --tonf is changed to --tone)
+# 2014/03/05 S Takehiro (add option --map_radius)
+# 2014/03/10 Y Kawai && S Takehiro (setting labels for contours)
+# 2014/04/06 S Takehiro (option --map_radius bug fix)
+# 2014/06/27 S Nishizawa && S Takehiro (add options --xcoord, --ycoord)
+# 2014/11/28 H Kashimura && S Takehiro (add option --diff, --tone bug fix)
+# 2014/11/28 Y O Takahashi && S Takehiro (add option --overplot_color, --Opc)
+# 2015/03/10 S Takehiro (History removes from the output of --help option)
+# 2015/09/05 Y O Takahashi && S Takehiro (add option --delay)
+# 2015/09/06 Y O Takahashi && S Takehiro (defalt wsn number changed)
+#
#################################################
require "getoptlong" # for option_parse
require "numru/ggraph" # ggraph library
require "numru/gphys/gpcommon"
@@ -724,10 +735,11 @@
['--Ga', GetoptLong::NO_ARGUMENT],
['--nowait', GetoptLong::NO_ARGUMENT],
['--Gw', GetoptLong::NO_ARGUMENT],
['--smooth', GetoptLong::NO_ARGUMENT],
['--Gaw', GetoptLong::NO_ARGUMENT],
+ ['--delay', GetoptLong::REQUIRED_ARGUMENT],
['--exch', GetoptLong::NO_ARGUMENT],
['--reverse', GetoptLong::NO_ARGUMENT],
['--Gr', GetoptLong::NO_ARGUMENT],
['--mean', GetoptLong::REQUIRED_ARGUMENT],
['--stddev', GetoptLong::REQUIRED_ARGUMENT
@@ -836,11 +848,15 @@
loopdim = loopdim.to_i if loopdim.to_i.to_s == loopdim
### set colormap
DCL.sgscmn($OPT_clrmap||1)
## open work station
-DCL.gropn($OPT_wsn||4)
+if NumRu::DCL::DCLVERSION.to_f >= 6
+ DCL.gropn($OPT_wsn||1)
+else
+ DCL.gropn($OPT_wsn||4)
+end
## open netcdf variables
while ARGV[0] do
gturl = ARGV[0]
@@ -933,9 +949,10 @@
end
if loopdim # animation
each_along_dims(gp, loopdim){|gp_subset|
proc.call(gp_subset)
+ sleep($OPT_delay.to_f) if ($OPT_delay && !DCL::swlget('lwait'))
}
else
proc.call(gp)
end