$:.unshift '.'
require 'solpos'
include Solpos


def pd lat, lon, tzone
  utc = Time.now.utc
  localtime = utc + (tzone * 60 * 60)
  posdata = Posdata.new
  posdata.year      = localtime.year
  posdata.daynum    = localtime.yday
  posdata.hour      = localtime.hour
  posdata.minute    = localtime.min
  posdata.second    = localtime.sec
  posdata.timezone  = tzone
  posdata.latitude  = lat
  posdata.longitude = lon
  posdata

  Solpos::solpos posdata
  p [posdata.elevetr, posdata.azim]
end