ported get_saura_masa_day and today_saura_masa_first_p