# -*- coding: euc-jp -*-
# Title: Ruby script drawing contour map for deepconv/arare5 output data 
#
# History: 2012/06/01 (Masatsugu Odaka)
#
require "numru/dcl"
include NumRu

#file = 'KinEnergy.txt'
file = 'PotEnergy.txt'

time = [0.0]
KE = [0.0]
PE = [0.0]

var = open(file)
#while line = var.gets
for i in 1..288
  time.push(600*i)
  KE.push(var.gets)
end 

DCL::swlset( 'ldump', true )
DCL::gropn(4)
DCL::grfrm
DCL::ussttl('Time', 'sec', 'Total Energy', 'J')
DCL::usgrph(time,KE)


DCL::grcls

var.close