# Title: Ruby script drawing contour map for deepconv/arare5 output data 
#
# History: 2011/09/27 (Masatsugu Odaka)
#
require "numru/ggraph"
include NumRu

file = 'igw-SK1994_VelX.nc'
varname = 'VelX'

var = GPhys::IO.open(file, varname)
time  = GPhys::IO.open(file, 't').val

GGraph.set_linear_contour_options( 'min'=>-1.5e-2, 'max'=>1.5e-2, \
                                   'interval'=>5.0e-3 ) 
GGraph.set_linear_tone_options( 'min'=>-1.5e-2, 'max'=>1.5e-2, \
                                   'interval'=>2.5e-3 ) 

# <Open DCL>
DCL.swlset( 'ldump', true )
DCL.gropn(4)
GGraph.set_fig('viewport'=>[0.1,0.85,0.35,0.65])

for i in 0...time.length do
# <Drawing data by GGraph>
  GGraph.tone( var.cut(true,100,true,time[i]), true, \
               'title'=>'W','annot'=>false )
  GGraph.contour( var.cut(true,100,true,time[i]), false )
  GGraph.color_bar( 'tickintv'=>5 )
end

# <Close DCL>
DCL.grcls