File: t208p.htm4

package info (click to toggle)
ftnchek 3.3.1-4
  • links: PTS
  • area: main
  • in suites: lenny, squeeze, wheezy
  • size: 8,488 kB
  • ctags: 5,960
  • sloc: ansic: 21,908; fortran: 5,748; yacc: 4,071; sh: 3,035; makefile: 895; lisp: 322; f90: 118; perl: 76
file content (31 lines) | stat: -rw-r--r-- 1,149 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
<HTML>
<HEAD><TITLE>Source t208p.f</TITLE></HEAD>
<BODY>
<a name="%MAIN"><h3>PROGRAM %MAIN ( )</h3></a>
<blockquote>
<table><tr><td><b>Source file:</b></td><td>t208p.f</td></tr>
<tr><td></td></tr>
</table>

<table><tr><td><b>I/O Operations:</b></td></tr>
<tr><td><pre>Unit ID  Unit No       Access  Form   Operation
               6          SEQ  FMTD           W  

<small>Operation codes A=rewind,B=backspace,C=close,E=endfile
                I=inquire,O=open,R=read,W=write</small></pre></td></tr></table>
<table><tr><td align="left"><b>Intrinsic Functions Called</b><br></td></tr>
<tr><td><pre>integer            IABS
</pre></td></tr></table>
<table><tr><td align="left"><b>Statement functions Defined</b><br></td></tr>
<tr><td><pre>integer           +IN
</pre></td></tr></table>
<table><tr><td align="left"><b>External Functions and Subroutines Called</b><br></td></tr>
<tr><td><pre>real               EX
</pre></td></tr></table>
<table><tr><td align="left"><b>Local Variables</b> <small>(+ indicates altered content)</small><b></b><br></td></tr>
<tr><td><pre>integer            IARG
</pre></td></tr></table>
</blockquote>
<BR>
</BODY>
</HTML>