ГОСТ Р ИСО 10303-41—2022
exponent);
result.time_exponent := result.time_exponent +
(x\derived_unit.elements[i]\derived_unit_element.exponent *
x\derived_unit.elements[i]\derived_unit_element.unit\named_unit.dimensions.time_
exponent);
result.electric_current_exponent := result.electric_current_exponent +
(x\derived_unit.elements[i]\derived_unit_element.exponent *
x\derived_unit.elements[i]\derived_unit_element.unit\named_unit.dimensions.
electric_current_exponent);
result.thermodynamic_temperature_exponent := result.thermodynamic_
temperature_exponent +
(x\derived__unit.elements[i]\derived_unit_element.exponent *
x\derived_unit.elements[i]\derived_unit_element.unit\named_unit.dimensions.
thermodynamic_temperature_exponent);
result.amount_of_substance_exponent :=
result.amount_of_substance_exponent +
(x\derived_unit.elements[i]\derived_unit_element.exponent *
x\derived_unit.elements[i]\derived_unit_element.unit\named_unit.dimensions.
amount_of_substance_exponent);
result.luminous_intensity_exponent :=
result.luminous_intensity_exponent +
(x\derived_unit.elements[i]\derived_unit_element.exponent *
x\derived_unit.elements[i]\derived_unit_element.unit\named_unit.dimensions.
luminous_intensity_exponent);
END_REPEAT;
ELSE
result := x\named_unit.dimensions;
END_IF;
RETURN (result);
END_FUNCTION;
(*
Определение параметра:
x — (входной) объект unit, представляющий единицу измерения, на основании которой получа
ется объект dimensional_exponents, представляющий показатели степени основных физических ве
личин.
19.5.2 Функция dimensions_for_si_unit
Функция dimensions_for_si_unit возвращает объект dimensional_exponent, представляющий
показатели степени основных физических величин для единицы измерения СИ, представленной объ
ектом si_unit, играющим роль входного параметра функции.
EXPRESS-специФикация:
*)
FUNCTION dimensions_for_si_unit (n : si unit name) :
dimensional_exponents;
CASE n OF
.
0
..
0
,
0
..
0
,
0
..
0
,
0
..
0
)
.
.
.
.
0
.
0
,
0
.
0
,
.
0
.
0
,
0
..
0
)
.
.
0
.
0
,
0
..
0
,
.
.
0
.
0
,
0
.
0
)
.
.
1
.
0
,
0
..
0
,
0
..
0
,
0
..
0
)
.
metre:
RETURN (dimensional_exponents(1.0,
0
..
0
,
0
.
0
,
gram:
RETURN (dimensional_exponents(0.0,
1
.
0
,
0
.
0
,
second:
RETURN (dimensional_exponents(0.0,
0
..
0
,
1
.
0
,
ampere:
RETURN (dimensional_exponents(0.0,
0
..
0
,
0
.
0
,
kelvin:
RETURN (dimensional_exponents(0.0,
0
.
0
,
0
..
0
,
mole:
.
0
.
0
,
1
..
0
,
.
0
.
0
,
0
..
0
)
179