require "numru/ggraph"
include NumRu

dir = '..'

gphys = GPhys::NetCDF_IO.open( dir + '/' + 'Ps' + '.nc', 'Ps' )
tm = gphys.shape[2] # number of elements for time      dimension

figdir = 'figs_xy_clim_mon'
Dir::mkdir( figdir )

#for iyr in 20..20
#  for imon in 1..12

iyrs = 3
iyre = 3

for imon in 1..12

    p 'Month: ' + imon.to_s

    case imon
    when 1
      title = 'JAN.'
    when 2
      title = 'FEB.'
    when 3
      title = 'MAR.'
    when 4
      title = 'APR.'
    when 5
      title = 'MAY'
    when 6
      title = 'JUN.'
    when 7
      title = 'JUL.'
    when 8
      title = 'AUG'
    when 9
      title = 'SEP.'
    when 10
      title = 'OCT.'
    when 11
      title = 'NOV.'
    when 12
      title = 'DEC.'
    end

    system('ruby drawxy_clim.rb ' + dir + ' ' + iyrs.to_s + ' ' + iyre.to_s + ' ' + imon.to_s + ' ' + title )

    system("pstoimg -type gif -flip r270 dcl.ps")
    com = sprintf( "mv dcl.gif "+figdir+"/dcl_mon%0#{2}d.gif", imon )
    system(com)
    com = sprintf( "mv dcl.ps  "+figdir+"/dcl_mon%0#{2}d.ps" , imon )
    system(com)

end

#  end
#end