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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
|
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!--Converted with LaTeX2HTML 2002-2-1 (1.70)
original version by: Nikos Drakos, CBLU, University of Leeds
* revised and updated by: Marcus Hennecke, Ross Moore, Herb Swan
* with significant contributions from:
Jens Lippmann, Marek Rouchal, Martin Wilck and others -->
<HTML>
<HEAD>
<TITLE>Basic Types</TITLE>
<META NAME="description" CONTENT="Basic Types">
<META NAME="keywords" CONTENT="users_guide">
<META NAME="resource-type" CONTENT="document">
<META NAME="distribution" CONTENT="global">
<META NAME="Generator" CONTENT="LaTeX2HTML v2002-2-1">
<META HTTP-EQUIV="Content-Style-Type" CONTENT="text/css">
<LINK REL="STYLESHEET" HREF="users_guide.css">
<LINK REL="next" HREF="node134.html">
<LINK REL="previous" HREF="node132.html">
<LINK REL="up" HREF="node131.html">
<LINK REL="next" HREF="node134.html">
</HEAD>
<BODY >
<DIV CLASS="navigation"><!--Navigation Panel-->
<A NAME="tex2html2701"
HREF="node134.html">
<IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="next.png"></A>
<A NAME="tex2html2695"
HREF="node131.html">
<IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="up.png"></A>
<A NAME="tex2html2689"
HREF="node132.html">
<IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="prev.png"></A>
<A NAME="tex2html2697"
HREF="node14.html">
<IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="contents.png"></A>
<A NAME="tex2html2699"
HREF="node317.html">
<IMG WIDTH="43" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="index" SRC="index.png"></A>
<BR>
<B> Next:</B> <A NAME="tex2html2702"
HREF="node134.html">Calling Methods From FORTRAN</A>
<B> Up:</B> <A NAME="tex2html2696"
HREF="node131.html">FORTRAN 77 Bindings</A>
<B> Previous:</B> <A NAME="tex2html2690"
HREF="node132.html">Introduction</A>
<B> <A NAME="tex2html2698"
HREF="node14.html">Contents</A></B>
<B> <A NAME="tex2html2700"
HREF="node317.html">Index</A></B>
<BR>
<BR></DIV>
<!--End of Navigation Panel-->
<H1><A NAME="SECTION03320000000000000000"></A><A NAME="ss:f77:types"></A><A NAME="7208"></A>
<BR>
Basic Types
</H1>
<P>
<BR>
<DIV ALIGN="CENTER">
<A NAME="tbl:f77:types"></A><A NAME="7211"></A>
<TABLE CELLPADDING=3 BORDER="1" ALIGN="CENTER">
<CAPTION><STRONG>Table 8.1:</STRONG>
SIDL to FORTRAN 77 type mapping</CAPTION>
<TR><TH ALIGN="LEFT"><SPAN CLASS="textbf">SIDL TYPE</SPAN></TH>
<TH ALIGN="LEFT"><SPAN CLASS="textbf">FORTRAN 77 TYPE</SPAN></TH>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">int</I></TT></TD>
<TD ALIGN="LEFT"><TT>INTEGER*4</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">long</I></TT></TD>
<TD ALIGN="LEFT"><TT>INTEGER*8</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">float</I></TT></TD>
<TD ALIGN="LEFT"><TT>REAL</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">double</I></TT></TD>
<TD ALIGN="LEFT"><TT>DOUBLE PRECISION</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">bool</I></TT></TD>
<TD ALIGN="LEFT"><TT>LOGICAL</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">char</I></TT></TD>
<TD ALIGN="LEFT"><TT>CHARACTER*1</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">string</I></TT></TD>
<TD ALIGN="LEFT"><TT>CHARACTER*(*)</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">fcomplex</I></TT></TD>
<TD ALIGN="LEFT"><TT>COMPLEX</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">dcomplex</I></TT></TD>
<TD ALIGN="LEFT"><TT>DOUBLE COMPLEX</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">enum</I></TT></TD>
<TD ALIGN="LEFT"><TT>INTEGER</TT></TD>
</TR>
<TR><TD ALIGN="LEFT"><TT><I CLASS="slanted">opaque</I></TT></TD>
<TD ALIGN="LEFT"><TT>INTEGER*8</TT></TD>
</TR>
</TABLE>
</DIV>
<BR>
<P>
For pointer types, such as opaque, interface, class, and array, a 64-bit
integer is used, so FORTRAN 77 code will be portable between systems
with a 32 bit address space and systems with a 64 bit address space.
On a 32 bit system, the upper 32 bits of these quantities are ignored.
Systems with more than 64-bit pointers aren't currently supported.
<P>
Generally, clients should treat opaque, interface, class and array values
as black boxes.
However, there is one value that is special.
A value of zero for any of these quantities indicates that the value does
not refer to an object.
Zero is the FORTRAN 77 equivalent of NULL .
Any nonzero value is or should be a valid object reference.
Developers writing in FORTRAN 77 should initialize values to be passed as
in or inout parameters to zero or a valid object reference.
<P>
When mapping the SIDL string type into FORTRAN 77, some capability was
sacrificed to make it possible to use normal looking FORTRAN 77 string handling.
<A NAME="7242"></A> One difference is that all
FORTRAN 77 strings have a limited fixed size.
When implementing a subroutine with an out parameter, the size of the
string is limited to 512 characters.
<P>
Enumerated types are just integer values.
The constants are defined in an includable file assuming your FORTRAN 77
compiler supports some form of including.
<P>
<DIV CLASS="navigation"><HR>
<!--Navigation Panel-->
<A NAME="tex2html2701"
HREF="node134.html">
<IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="next.png"></A>
<A NAME="tex2html2695"
HREF="node131.html">
<IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="up.png"></A>
<A NAME="tex2html2689"
HREF="node132.html">
<IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="prev.png"></A>
<A NAME="tex2html2697"
HREF="node14.html">
<IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="contents.png"></A>
<A NAME="tex2html2699"
HREF="node317.html">
<IMG WIDTH="43" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="index" SRC="index.png"></A>
<BR>
<B> Next:</B> <A NAME="tex2html2702"
HREF="node134.html">Calling Methods From FORTRAN</A>
<B> Up:</B> <A NAME="tex2html2696"
HREF="node131.html">FORTRAN 77 Bindings</A>
<B> Previous:</B> <A NAME="tex2html2690"
HREF="node132.html">Introduction</A>
<B> <A NAME="tex2html2698"
HREF="node14.html">Contents</A></B>
<B> <A NAME="tex2html2700"
HREF="node317.html">Index</A></B> </DIV>
<!--End of Navigation Panel-->
<ADDRESS>
<br><br>babel-0.10.2<br>users_guide Last Modified 2005-03-23<br><br><a href="http://www.llnl.gov/CASC/components">http://www.llnl.gov/CASC/components</a><br><a href="mailto:components@llnl.gov">components@llnl.gov</a>
</ADDRESS>
</BODY>
</HTML>
|
