mt_normal Interface

public interface mt_normal

Module Procedures

private function gaussrnd()

Arguments

None

Return Value real(kind=8)

private function normalrnd(mean, stdev) result(c)

Arguments

Type IntentOptional Attributes Name
real(kind=8) :: mean
real(kind=8) :: stdev

Return Value real(kind=8)