NECI
Documentation
Source Files
Modules
Procedures
Abstract Interfaces
Derived Types
Namelists
Program
new_werner_get_weight
Function
24 statements
Source File
guga_pchb_doubles_weights.F90
guga_pchb_doubles_weights_mod
new_werner_get_weight
Contents
private pure function new_werner_get_weight(exc) result(weight)
Arguments
Type
Intent
Optional
Attributes
Name
type(
DistinctDouble_t
),
intent(in)
::
exc
Return Value
real(kind=dp)