mean_sp Subroutine

public subroutine mean_sp(x_sp, xm, xs, number)

Uses

                                                                        *

This subroutine calculates mean and standard deviation of a given element.* * AUTHOR: Andreas Stohl, 25 January 1994 * * Single precision version ESO 2016 *

                                                                        *

Variables: * x_sp(number) field of input data * xm mean * xs standard deviation * number number of elements of field x_sp * * Constants: * eps tiny number * *

Arguments

Type IntentOptional Attributes Name
real(kind=sp), intent(in) :: x_sp(number)
real(kind=sp), intent(out) :: xm
real(kind=sp), intent(out) :: xs
integer, intent(in) :: number