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

file = 'BS1998_PTempRad.nc'

Adv   = GPhys::IO.open('BS1998_PTempRad.nc',   'PTempRad'  )

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

# <Open DCL>
DCL.swlset( 'ldump', true )
DCL.gropn(4)

for i in 0...time.length do
# <Drawing data by GGraph>
#  GGraph.line( var.cut(5500,100,true,time[i]) )

  GGraph.line( Adv.cut(5500,100,true,time[i]), \
               true, 'exchange'=>true , 'index'=>22, 'type'=>1, 'label'=>'adv', \
               'title'=>'Potential Temp. Tendency', 'max'=>5.0e-3, 'min'=>-5.0e-3)    # °Üή
end
# <Close DCL>
DCL.grcls