#Purpose: Convert time from yrs, days, hrs, mins to total minutes for a given planet
#Contract: time_in_minutes(yr,da,hr,min): Int,Int,Int,Int,Symbol -> Int
#Example: time_in_minutes(10) -> 0 years, 0 days, 0 hours, 10 minutes; convert_time(70) -> 0yrs, 0days, 1hours, 10 minutes
#Exceptions: time_in_minutes('10')

#require 'TestTimeInMin1'

def daysPerYear(planet)
  if (planet==:earth)
    return 365
  end
  if planet==:saturn
    return 30*365
  end
end


def hoursPerDay(planet)
  if planet==:earth
    return 24
  end
  if planet==:saturn
    return 12
  end
end


def minutesPerHour
  60
end

def time_in_minutes(years,days,hours,mins,planet)
  if not planet.is_a?(Symbol)
    raise "Illegal Arg Value"
  end
  
  if not (natural?(years) and
    natural?(days) and
    natural?(hours) and
    natural?(mins)
    )
    then raise "Illegal Arg Value"
  end
 
  #compute result
  hours_in_minutes(days_in_hours(years_in_days(years,planet),planet)) + hours_in_minutes(days_in_hours(days,planet)) + hours_in_minutes(hours) + mins
  
end

def natural?(obj)
    (obj.is_a?(Integer)) and (obj>=0)  
end 

def years_in_days(years,planet)
  #puts planet
  years*daysPerYear(planet)
end

def days_in_hours(days,planet)
  days*hoursPerDay(planet)
end

def hours_in_minutes(hours)
  hours*minutesPerHour
end

#example
puts time_in_minutes(1,1,1,1,:earth)