FUNCTION NRH_PIXARCSEC, Date, Rayon

NJOUR=UTC2DOY(Date,ERRMSG=Err)

RSOL=16.028+0.268*SIN(2*!PI*(Njour-278)/365.25)

PIXSZ = 60.*Rsol/Rayon
RETURN, Pixsz

END