<HTML> <HEAD><TITLE>Source t208b.f</TITLE></HEAD> <BODY> <a name="%MAIN"><h3>PROGRAM %MAIN ( )</h3></a> <blockquote> <table><tr><td><b>Source file:</b></td><td>t208b.f</td></tr> <tr><td></td></tr> </table> <table><tr><td align="left"><b>Intrinsic Functions Called</b><br></td></tr> <tr><td><pre>SUBROUTINE COS, SIN, SQRT </pre></td></tr></table> <table><tr><td align="left"><b>External Functions and Subroutines Called</b><br></td></tr> <tr><td><pre>REAL MYSQRT SUBROUTINE MYSUB </pre></td></tr></table> </blockquote> <BR> </BODY> </HTML>