replaced MoonDisc(Time) by (*Body)Disc(Time)