raw_size Function

private pure function raw_size(mag)

A star's pixel diameter from its apparent magnitude, from its brightness and luminance (OpenFrames' getStarPixelSizeFromMagnitude).

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in) :: mag

apparent magnitude

Return Value real(kind=wp)


Called by

proc~~raw_size~~CalledByGraph proc~raw_size raw_size proc~read_stars read_stars proc~read_stars->proc~raw_size proc~star_to_point star_to_point proc~read_stars->proc~star_to_point proc~star_to_point->proc~raw_size proc~set_star_data SkySphere%set_star_data proc~set_star_data->proc~read_stars

Source Code

    pure real(wp) function raw_size(mag)
        real(wp), intent(in) :: mag                         !! apparent magnitude
        real(wp) :: la, l
        la = 100.0_wp**(-2.0_wp / 5.0_wp)                ! transition luminance
        l = 100.0_wp**(-mag / 5.0_wp)                    ! relative luminance
        raw_size = 2.0_wp * sqrt(l / (l**(2.0_wp / 3.0_wp) + la))
    end function raw_size