#!perl -lpa
$_=0|0>eval'sin($p=81-5,0-4)-83-5,2-4))*sin($p-81-7,0-6)+83-7,2-6))'=~s#\d#$F[$&]//'atan2('#egr