function [v,u]=ReducedPlanck() [v,u]=Constant.(UnitSystem()).ReducedPlanck; end