170515-2332 EDT
mike_kilroy:
I said nothing about input power. I approximated the diode average current, and since diode voltage is approximately constant I can approximate total diode power dissipation that in turn approximates diode junction temperature rise.
If you want average input power in this application, then you need the instantaneous product of the input voltage and current, integrate this over an adequate time, and divide by that time.
The current waveform is not a sine wave, but a smooth rounded pulse with a slower rising slope than falling slope for a sample circuit I measured. Inductance is causing the rounding.
.