в первом параметре процедуры указывает

Равенство (sin(phi)=tan(phi)*cos(phi)) в первом параметре процедуры указывает на то, что синус следует представить как произведение тангенса на косинус, а второй параметр (переменная среды %) определяет выражение, в котором следует осуществить эту замену.
Полученное выражение следует сократить на косинус. Для этого воспользуемся процедурой упрощения дробей normal ().