ASo, спасибо. Нашел у себя на компе эту библиотеку. По описанию то что надо.
Код:
IF rh > 0.0 THEN
(*	old code was rewritten for better performance
	SDD := 6.1078*EXPT(10,(a*T)/(b+T));
	DD := RH/100 * SDD;
	V := LOG(DD/6.1078);
	dew_temp := b*V/(a-v);
*)
	V := LOG(RH * 0.01 * EXP10((a*T) / (b+T)));
	DEW_TEMP := b*V / (a-V);
ELSE
	DEW_TEMP:= phys.T0;
END_IF;
много всего закоментировано рабочий код 6 строк.


Только тут или есть ошибки или я не знаю где взять функцию EXP10 из строки
V := LOG(RH * 0.01 * EXP10((a*T) / (b+T)));
а в этой строке
DEW_TEMP:= phys.T0;
не описана переменная phys

Попробовал поправить, но все равно работает не правильно.

Может у меня библиотека не та? Называется oscat_building_100.lib