1 | \hypertarget{namespacemod__oasis__sys}{}\section{mod\+\_\+oasis\+\_\+sys Module Reference} |
---|
2 | \label{namespacemod__oasis__sys}\index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
3 | |
---|
4 | |
---|
5 | System type methods. |
---|
6 | |
---|
7 | |
---|
8 | \subsection*{Functions/\+Subroutines} |
---|
9 | \begin{DoxyCompactItemize} |
---|
10 | \item |
---|
11 | subroutine, public \hyperlink{namespacemod__oasis__sys_af1943a0ce0c5765ba8a714379065464f}{oasis\+\_\+abort} (id\+\_\+compid, cd\+\_\+routine, cd\+\_\+message, file, line, rcode) |
---|
12 | \begin{DoxyCompactList}\small\item\em O\+A\+S\+IS abort method, publically available to users. \end{DoxyCompactList}\item |
---|
13 | subroutine, public \hyperlink{namespacemod__oasis__sys_ad152b6f737a7e06f8f1226af23d66361}{oasis\+\_\+flush} (nu) |
---|
14 | \begin{DoxyCompactList}\small\item\em Flushes output to file. \end{DoxyCompactList}\item |
---|
15 | subroutine, public \hyperlink{namespacemod__oasis__sys_abce4c06d8a999919a2a185c71ab15edd}{oasis\+\_\+unitget} (uio) |
---|
16 | \begin{DoxyCompactList}\small\item\em Get a free unit number. \end{DoxyCompactList}\item |
---|
17 | subroutine, public \hyperlink{namespacemod__oasis__sys_a063a41b73546564afd294fd5708b6667}{oasis\+\_\+unitsetmin} (uio) |
---|
18 | \begin{DoxyCompactList}\small\item\em Set the minimum unit number allowed. \end{DoxyCompactList}\item |
---|
19 | subroutine, public \hyperlink{namespacemod__oasis__sys_a6e0a46b41f1b9f0a1dc99b17665f49dc}{oasis\+\_\+unitsetmax} (uio) |
---|
20 | \begin{DoxyCompactList}\small\item\em Set the maximum unit number allowed. \end{DoxyCompactList}\item |
---|
21 | subroutine, public \hyperlink{namespacemod__oasis__sys_a892ed9f46e2e8f577f1a2670f74695d6}{oasis\+\_\+unitfree} (uio) |
---|
22 | \begin{DoxyCompactList}\small\item\em Release a unit number for reuse. \end{DoxyCompactList}\item |
---|
23 | subroutine, public \hyperlink{namespacemod__oasis__sys_ab963e928a34a1521ec2c1921cc956cc5}{oasis\+\_\+debug\+\_\+enter} (string) |
---|
24 | \begin{DoxyCompactList}\small\item\em Used when a subroutine is entered, write info to log file at some debug level. \end{DoxyCompactList}\item |
---|
25 | subroutine, public \hyperlink{namespacemod__oasis__sys_a349f71cba2df935179d78f3858992c83}{oasis\+\_\+debug\+\_\+exit} (string) |
---|
26 | \begin{DoxyCompactList}\small\item\em Used when a subroutine is exited, write info to log file at some debug level. \end{DoxyCompactList}\item |
---|
27 | subroutine, public \hyperlink{namespacemod__oasis__sys_a8e488f6a9a829762324519c6dd493912}{oasis\+\_\+debug\+\_\+note} (string) |
---|
28 | \begin{DoxyCompactList}\small\item\em Used to write information from a subroutine, write info to log file at some debug level. \end{DoxyCompactList}\item |
---|
29 | subroutine, public \hyperlink{namespacemod__oasis__sys_ab2aa592727d1e5bea728281679d5ca8d}{oasis\+\_\+sys\+\_\+sortc} (num, fld, sortkey) |
---|
30 | \begin{DoxyCompactList}\small\item\em Sort a character array and compute a sort key. \end{DoxyCompactList}\item |
---|
31 | subroutine, public \hyperlink{namespacemod__oasis__sys_a0deb9712f58a255d6ae938af2ed8b35c}{oasis\+\_\+sys\+\_\+sorti} (num, fld, sortkey) |
---|
32 | \begin{DoxyCompactList}\small\item\em Sort a integer array and compute a sort key. \end{DoxyCompactList}\item |
---|
33 | subroutine, public \hyperlink{namespacemod__oasis__sys_ae73e75ed1a8aaba9da01d79ad3276e13}{oasis\+\_\+sys\+\_\+sortikey} (num, arr, sortkey) |
---|
34 | \begin{DoxyCompactList}\small\item\em Sort an integer array using a sort key. \end{DoxyCompactList}\item |
---|
35 | recursive subroutine \hyperlink{namespacemod__oasis__sys_a30b91b7cab02c85d85fb7a7debdd5ec2}{oasis\+\_\+sys\+\_\+mergesortc} (N, A, T, S, Z) |
---|
36 | \begin{DoxyCompactList}\small\item\em Generic oasis\+\_\+sys\+\_\+mergesortC routine for character strings. \end{DoxyCompactList}\item |
---|
37 | subroutine \hyperlink{namespacemod__oasis__sys_a27e13d259fbecbfe09e750d16f50ef25}{oasis\+\_\+sys\+\_\+mergec} (A, X, NA, B, Y, NB, C, Z, NC) |
---|
38 | \begin{DoxyCompactList}\small\item\em Merge routine needed for mergesortC for character strings. \end{DoxyCompactList}\item |
---|
39 | recursive subroutine \hyperlink{namespacemod__oasis__sys_a298b27e03ff339d56eda3c5b31115781}{oasis\+\_\+sys\+\_\+mergesorti} (N, A, T, S, Z) |
---|
40 | \begin{DoxyCompactList}\small\item\em Generic oasis\+\_\+sys\+\_\+mergesortI routine for an integer array. \end{DoxyCompactList}\item |
---|
41 | subroutine \hyperlink{namespacemod__oasis__sys_a5384f02abfdf4a5cee0706ddefecde87}{oasis\+\_\+sys\+\_\+mergei} (A, X, NA, B, Y, NB, C, Z, NC) |
---|
42 | \begin{DoxyCompactList}\small\item\em Merge routine needed for mergesortI for integer array. \end{DoxyCompactList}\end{DoxyCompactItemize} |
---|
43 | \subsection*{Variables} |
---|
44 | \begin{DoxyCompactItemize} |
---|
45 | \item |
---|
46 | character(len= $\ast$), parameter, public \hyperlink{namespacemod__oasis__sys_aad26202d309c5b33de4cddb54c7edc99}{astr} = \textquotesingle{} A\+B\+O\+R\+T\+: \textquotesingle{} |
---|
47 | \item |
---|
48 | character(len= $\ast$), parameter, public \hyperlink{namespacemod__oasis__sys_a0f6e0376585c6f39d653f5ab05e80e8f}{estr} = \textquotesingle{} E\+R\+R\+O\+R\+: \textquotesingle{} |
---|
49 | \item |
---|
50 | character(len= $\ast$), parameter, public \hyperlink{namespacemod__oasis__sys_a4e16ba69c68a3a39c8b8aa3b92234ce1}{wstr} = \textquotesingle{} W\+A\+R\+N\+I\+N\+G\+: \textquotesingle{} |
---|
51 | \item |
---|
52 | integer(ip\+\_\+intwp\+\_\+p), save \hyperlink{namespacemod__oasis__sys_aded42e42797afa8d6ee5bdefdf42a812}{minion} = 1024 |
---|
53 | \item |
---|
54 | integer(ip\+\_\+intwp\+\_\+p), save \hyperlink{namespacemod__oasis__sys_a9dc0e2d10d9e8e8c23e391467ae2eee4}{maxion} = 9999 |
---|
55 | \item |
---|
56 | integer(ip\+\_\+intwp\+\_\+p), parameter \hyperlink{namespacemod__oasis__sys_ad7e3af62b75730bc71be0df8ae50cf0a}{tree\+\_\+delta} = 2 |
---|
57 | \item |
---|
58 | integer(ip\+\_\+intwp\+\_\+p), save \hyperlink{namespacemod__oasis__sys_a159b60d106efcb1f42722b08c5511ad0}{tree\+\_\+indent} = 0 |
---|
59 | \end{DoxyCompactItemize} |
---|
60 | |
---|
61 | |
---|
62 | \subsection{Detailed Description} |
---|
63 | System type methods. |
---|
64 | |
---|
65 | \subsection{Function/\+Subroutine Documentation} |
---|
66 | \mbox{\Hypertarget{namespacemod__oasis__sys_af1943a0ce0c5765ba8a714379065464f}\label{namespacemod__oasis__sys_af1943a0ce0c5765ba8a714379065464f}} |
---|
67 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+abort@{oasis\+\_\+abort}} |
---|
68 | \index{oasis\+\_\+abort@{oasis\+\_\+abort}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
69 | \subsubsection{\texorpdfstring{oasis\+\_\+abort()}{oasis\_abort()}} |
---|
70 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+abort (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+intwp\+\_\+p), intent(in), optional}]{id\+\_\+compid, }\item[{character(len=$\ast$), intent(in), optional}]{cd\+\_\+routine, }\item[{character(len=$\ast$), intent(in), optional}]{cd\+\_\+message, }\item[{character(len=$\ast$), intent(in), optional}]{file, }\item[{integer, intent(in), optional}]{line, }\item[{integer, intent(in), optional}]{rcode }\end{DoxyParamCaption})} |
---|
71 | |
---|
72 | |
---|
73 | |
---|
74 | O\+A\+S\+IS abort method, publically available to users. |
---|
75 | |
---|
76 | |
---|
77 | \begin{DoxyParams}[1]{Parameters} |
---|
78 | \mbox{\tt in} & {\em id\+\_\+compid} & component id\\ |
---|
79 | \hline |
---|
80 | \mbox{\tt in} & {\em cd\+\_\+routine} & string defining calling routine\\ |
---|
81 | \hline |
---|
82 | \mbox{\tt in} & {\em cd\+\_\+message} & error message string\\ |
---|
83 | \hline |
---|
84 | \mbox{\tt in} & {\em file} & file called from\\ |
---|
85 | \hline |
---|
86 | \mbox{\tt in} & {\em line} & line in file called from\\ |
---|
87 | \hline |
---|
88 | \mbox{\tt in} & {\em rcode} & optional code to return to invoking environment \\ |
---|
89 | \hline |
---|
90 | \end{DoxyParams} |
---|
91 | |
---|
92 | |
---|
93 | Definition at line 44 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
94 | |
---|
95 | \mbox{\Hypertarget{namespacemod__oasis__sys_ab963e928a34a1521ec2c1921cc956cc5}\label{namespacemod__oasis__sys_ab963e928a34a1521ec2c1921cc956cc5}} |
---|
96 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+debug\+\_\+enter@{oasis\+\_\+debug\+\_\+enter}} |
---|
97 | \index{oasis\+\_\+debug\+\_\+enter@{oasis\+\_\+debug\+\_\+enter}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
98 | \subsubsection{\texorpdfstring{oasis\+\_\+debug\+\_\+enter()}{oasis\_debug\_enter()}} |
---|
99 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+debug\+\_\+enter (\begin{DoxyParamCaption}\item[{character(len=$\ast$), intent(in)}]{string }\end{DoxyParamCaption})} |
---|
100 | |
---|
101 | |
---|
102 | |
---|
103 | Used when a subroutine is entered, write info to log file at some debug level. |
---|
104 | |
---|
105 | |
---|
106 | \begin{DoxyParams}[1]{Parameters} |
---|
107 | \mbox{\tt in} & {\em string} & name of the subroutine \\ |
---|
108 | \hline |
---|
109 | \end{DoxyParams} |
---|
110 | |
---|
111 | |
---|
112 | Definition at line 209 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
113 | |
---|
114 | \mbox{\Hypertarget{namespacemod__oasis__sys_a349f71cba2df935179d78f3858992c83}\label{namespacemod__oasis__sys_a349f71cba2df935179d78f3858992c83}} |
---|
115 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+debug\+\_\+exit@{oasis\+\_\+debug\+\_\+exit}} |
---|
116 | \index{oasis\+\_\+debug\+\_\+exit@{oasis\+\_\+debug\+\_\+exit}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
117 | \subsubsection{\texorpdfstring{oasis\+\_\+debug\+\_\+exit()}{oasis\_debug\_exit()}} |
---|
118 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+debug\+\_\+exit (\begin{DoxyParamCaption}\item[{character(len=$\ast$), intent(in)}]{string }\end{DoxyParamCaption})} |
---|
119 | |
---|
120 | |
---|
121 | |
---|
122 | Used when a subroutine is exited, write info to log file at some debug level. |
---|
123 | |
---|
124 | |
---|
125 | \begin{DoxyParams}[1]{Parameters} |
---|
126 | \mbox{\tt in} & {\em string} & name of subroutine \\ |
---|
127 | \hline |
---|
128 | \end{DoxyParams} |
---|
129 | |
---|
130 | |
---|
131 | Definition at line 236 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
132 | |
---|
133 | \mbox{\Hypertarget{namespacemod__oasis__sys_a8e488f6a9a829762324519c6dd493912}\label{namespacemod__oasis__sys_a8e488f6a9a829762324519c6dd493912}} |
---|
134 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+debug\+\_\+note@{oasis\+\_\+debug\+\_\+note}} |
---|
135 | \index{oasis\+\_\+debug\+\_\+note@{oasis\+\_\+debug\+\_\+note}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
136 | \subsubsection{\texorpdfstring{oasis\+\_\+debug\+\_\+note()}{oasis\_debug\_note()}} |
---|
137 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+debug\+\_\+note (\begin{DoxyParamCaption}\item[{character(len=$\ast$), intent(in)}]{string }\end{DoxyParamCaption})} |
---|
138 | |
---|
139 | |
---|
140 | |
---|
141 | Used to write information from a subroutine, write info to log file at some debug level. |
---|
142 | |
---|
143 | |
---|
144 | \begin{DoxyParams}[1]{Parameters} |
---|
145 | \mbox{\tt in} & {\em string} & string to write \\ |
---|
146 | \hline |
---|
147 | \end{DoxyParams} |
---|
148 | |
---|
149 | |
---|
150 | Definition at line 263 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
151 | |
---|
152 | \mbox{\Hypertarget{namespacemod__oasis__sys_ad152b6f737a7e06f8f1226af23d66361}\label{namespacemod__oasis__sys_ad152b6f737a7e06f8f1226af23d66361}} |
---|
153 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+flush@{oasis\+\_\+flush}} |
---|
154 | \index{oasis\+\_\+flush@{oasis\+\_\+flush}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
155 | \subsubsection{\texorpdfstring{oasis\+\_\+flush()}{oasis\_flush()}} |
---|
156 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+flush (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+intwp\+\_\+p), intent(in)}]{nu }\end{DoxyParamCaption})} |
---|
157 | |
---|
158 | |
---|
159 | |
---|
160 | Flushes output to file. |
---|
161 | |
---|
162 | |
---|
163 | \begin{DoxyParams}[1]{Parameters} |
---|
164 | \mbox{\tt in} & {\em nu} & unit number of file \\ |
---|
165 | \hline |
---|
166 | \end{DoxyParams} |
---|
167 | |
---|
168 | |
---|
169 | Definition at line 94 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
170 | |
---|
171 | \mbox{\Hypertarget{namespacemod__oasis__sys_a27e13d259fbecbfe09e750d16f50ef25}\label{namespacemod__oasis__sys_a27e13d259fbecbfe09e750d16f50ef25}} |
---|
172 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+sys\+\_\+mergec@{oasis\+\_\+sys\+\_\+mergec}} |
---|
173 | \index{oasis\+\_\+sys\+\_\+mergec@{oasis\+\_\+sys\+\_\+mergec}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
174 | \subsubsection{\texorpdfstring{oasis\+\_\+sys\+\_\+mergec()}{oasis\_sys\_mergec()}} |
---|
175 | {\footnotesize\ttfamily subroutine mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+sys\+\_\+mergec (\begin{DoxyParamCaption}\item[{character(cl), dimension(na), intent(inout)}]{A, }\item[{integer(in), dimension(na), intent(inout)}]{X, }\item[{integer, intent(in)}]{NA, }\item[{character(cl), dimension(nb), intent(in)}]{B, }\item[{integer(in), dimension(nb), intent(in)}]{Y, }\item[{integer, intent(in)}]{NB, }\item[{character(cl), dimension(nc), intent(inout)}]{C, }\item[{integer(in), dimension(nc), intent(inout)}]{Z, }\item[{integer, intent(in)}]{NC }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} |
---|
176 | |
---|
177 | |
---|
178 | |
---|
179 | Merge routine needed for mergesortC for character strings. |
---|
180 | |
---|
181 | |
---|
182 | |
---|
183 | Definition at line 498 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
184 | |
---|
185 | \mbox{\Hypertarget{namespacemod__oasis__sys_a5384f02abfdf4a5cee0706ddefecde87}\label{namespacemod__oasis__sys_a5384f02abfdf4a5cee0706ddefecde87}} |
---|
186 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+sys\+\_\+mergei@{oasis\+\_\+sys\+\_\+mergei}} |
---|
187 | \index{oasis\+\_\+sys\+\_\+mergei@{oasis\+\_\+sys\+\_\+mergei}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
188 | \subsubsection{\texorpdfstring{oasis\+\_\+sys\+\_\+mergei()}{oasis\_sys\_mergei()}} |
---|
189 | {\footnotesize\ttfamily subroutine mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+sys\+\_\+mergei (\begin{DoxyParamCaption}\item[{integer(in), dimension(na), intent(inout)}]{A, }\item[{integer(in), dimension(na), intent(inout)}]{X, }\item[{integer, intent(in)}]{NA, }\item[{integer(in), dimension(nb), intent(in)}]{B, }\item[{integer(in), dimension(nb), intent(in)}]{Y, }\item[{integer, intent(in)}]{NB, }\item[{integer(in), dimension(nc), intent(inout)}]{C, }\item[{integer(in), dimension(nc), intent(inout)}]{Z, }\item[{integer, intent(in)}]{NC }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} |
---|
190 | |
---|
191 | |
---|
192 | |
---|
193 | Merge routine needed for mergesortI for integer array. |
---|
194 | |
---|
195 | |
---|
196 | |
---|
197 | Definition at line 596 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
198 | |
---|
199 | \mbox{\Hypertarget{namespacemod__oasis__sys_a30b91b7cab02c85d85fb7a7debdd5ec2}\label{namespacemod__oasis__sys_a30b91b7cab02c85d85fb7a7debdd5ec2}} |
---|
200 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+sys\+\_\+mergesortc@{oasis\+\_\+sys\+\_\+mergesortc}} |
---|
201 | \index{oasis\+\_\+sys\+\_\+mergesortc@{oasis\+\_\+sys\+\_\+mergesortc}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
202 | \subsubsection{\texorpdfstring{oasis\+\_\+sys\+\_\+mergesortc()}{oasis\_sys\_mergesortc()}} |
---|
203 | {\footnotesize\ttfamily recursive subroutine mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+sys\+\_\+mergesortc (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{N, }\item[{character(cl), dimension(n), intent(inout)}]{A, }\item[{character(cl), dimension((n+1)/2), intent(out)}]{T, }\item[{integer(in), dimension(n), intent(inout)}]{S, }\item[{integer(in), dimension((n+1)/2), intent(out)}]{Z }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} |
---|
204 | |
---|
205 | |
---|
206 | |
---|
207 | Generic oasis\+\_\+sys\+\_\+mergesortC routine for character strings. |
---|
208 | |
---|
209 | |
---|
210 | |
---|
211 | Definition at line 447 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
212 | |
---|
213 | \mbox{\Hypertarget{namespacemod__oasis__sys_a298b27e03ff339d56eda3c5b31115781}\label{namespacemod__oasis__sys_a298b27e03ff339d56eda3c5b31115781}} |
---|
214 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+sys\+\_\+mergesorti@{oasis\+\_\+sys\+\_\+mergesorti}} |
---|
215 | \index{oasis\+\_\+sys\+\_\+mergesorti@{oasis\+\_\+sys\+\_\+mergesorti}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
216 | \subsubsection{\texorpdfstring{oasis\+\_\+sys\+\_\+mergesorti()}{oasis\_sys\_mergesorti()}} |
---|
217 | {\footnotesize\ttfamily recursive subroutine mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+sys\+\_\+mergesorti (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{N, }\item[{integer(in), dimension(n), intent(inout)}]{A, }\item[{integer(in), dimension((n+1)/2), intent(out)}]{T, }\item[{integer(in), dimension(n), intent(inout)}]{S, }\item[{integer(in), dimension((n+1)/2), intent(out)}]{Z }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} |
---|
218 | |
---|
219 | |
---|
220 | |
---|
221 | Generic oasis\+\_\+sys\+\_\+mergesortI routine for an integer array. |
---|
222 | |
---|
223 | |
---|
224 | |
---|
225 | Definition at line 545 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
226 | |
---|
227 | \mbox{\Hypertarget{namespacemod__oasis__sys_ab2aa592727d1e5bea728281679d5ca8d}\label{namespacemod__oasis__sys_ab2aa592727d1e5bea728281679d5ca8d}} |
---|
228 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+sys\+\_\+sortc@{oasis\+\_\+sys\+\_\+sortc}} |
---|
229 | \index{oasis\+\_\+sys\+\_\+sortc@{oasis\+\_\+sys\+\_\+sortc}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
230 | \subsubsection{\texorpdfstring{oasis\+\_\+sys\+\_\+sortc()}{oasis\_sys\_sortc()}} |
---|
231 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+sys\+\_\+sortc (\begin{DoxyParamCaption}\item[{integer(in), intent(in)}]{num, }\item[{character(len=cl), dimension(\+:), intent(inout)}]{fld, }\item[{integer(in), dimension(\+:), intent(inout)}]{sortkey }\end{DoxyParamCaption})} |
---|
232 | |
---|
233 | |
---|
234 | |
---|
235 | Sort a character array and compute a sort key. |
---|
236 | |
---|
237 | |
---|
238 | \begin{DoxyParams}[1]{Parameters} |
---|
239 | \mbox{\tt in} & {\em num} & size of array\\ |
---|
240 | \hline |
---|
241 | \mbox{\tt in,out} & {\em fld} & sort field\\ |
---|
242 | \hline |
---|
243 | \mbox{\tt in,out} & {\em sortkey} & sort key \\ |
---|
244 | \hline |
---|
245 | \end{DoxyParams} |
---|
246 | |
---|
247 | |
---|
248 | Definition at line 295 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
249 | |
---|
250 | \mbox{\Hypertarget{namespacemod__oasis__sys_a0deb9712f58a255d6ae938af2ed8b35c}\label{namespacemod__oasis__sys_a0deb9712f58a255d6ae938af2ed8b35c}} |
---|
251 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+sys\+\_\+sorti@{oasis\+\_\+sys\+\_\+sorti}} |
---|
252 | \index{oasis\+\_\+sys\+\_\+sorti@{oasis\+\_\+sys\+\_\+sorti}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
253 | \subsubsection{\texorpdfstring{oasis\+\_\+sys\+\_\+sorti()}{oasis\_sys\_sorti()}} |
---|
254 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+sys\+\_\+sorti (\begin{DoxyParamCaption}\item[{integer(in), intent(in)}]{num, }\item[{integer(in), dimension(\+:), intent(inout)}]{fld, }\item[{integer(in), dimension(\+:), intent(inout)}]{sortkey }\end{DoxyParamCaption})} |
---|
255 | |
---|
256 | |
---|
257 | |
---|
258 | Sort a integer array and compute a sort key. |
---|
259 | |
---|
260 | |
---|
261 | \begin{DoxyParams}[1]{Parameters} |
---|
262 | \mbox{\tt in} & {\em num} & size of array\\ |
---|
263 | \hline |
---|
264 | \mbox{\tt in,out} & {\em fld} & sort field\\ |
---|
265 | \hline |
---|
266 | \mbox{\tt in,out} & {\em sortkey} & sort key \\ |
---|
267 | \hline |
---|
268 | \end{DoxyParams} |
---|
269 | |
---|
270 | |
---|
271 | Definition at line 346 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
272 | |
---|
273 | \mbox{\Hypertarget{namespacemod__oasis__sys_ae73e75ed1a8aaba9da01d79ad3276e13}\label{namespacemod__oasis__sys_ae73e75ed1a8aaba9da01d79ad3276e13}} |
---|
274 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+sys\+\_\+sortikey@{oasis\+\_\+sys\+\_\+sortikey}} |
---|
275 | \index{oasis\+\_\+sys\+\_\+sortikey@{oasis\+\_\+sys\+\_\+sortikey}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
276 | \subsubsection{\texorpdfstring{oasis\+\_\+sys\+\_\+sortikey()}{oasis\_sys\_sortikey()}} |
---|
277 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+sys\+\_\+sortikey (\begin{DoxyParamCaption}\item[{integer(in), intent(in)}]{num, }\item[{integer(in), dimension(\+:), intent(inout)}]{arr, }\item[{integer(in), dimension(\+:), intent(in)}]{sortkey }\end{DoxyParamCaption})} |
---|
278 | |
---|
279 | |
---|
280 | |
---|
281 | Sort an integer array using a sort key. |
---|
282 | |
---|
283 | |
---|
284 | \begin{DoxyParams}[1]{Parameters} |
---|
285 | \mbox{\tt in} & {\em num} & size of array\\ |
---|
286 | \hline |
---|
287 | \mbox{\tt in,out} & {\em arr} & field to sort\\ |
---|
288 | \hline |
---|
289 | \mbox{\tt in} & {\em sortkey} & sort key \\ |
---|
290 | \hline |
---|
291 | \end{DoxyParams} |
---|
292 | |
---|
293 | |
---|
294 | Definition at line 396 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
295 | |
---|
296 | \mbox{\Hypertarget{namespacemod__oasis__sys_a892ed9f46e2e8f577f1a2670f74695d6}\label{namespacemod__oasis__sys_a892ed9f46e2e8f577f1a2670f74695d6}} |
---|
297 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+unitfree@{oasis\+\_\+unitfree}} |
---|
298 | \index{oasis\+\_\+unitfree@{oasis\+\_\+unitfree}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
299 | \subsubsection{\texorpdfstring{oasis\+\_\+unitfree()}{oasis\_unitfree()}} |
---|
300 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+unitfree (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+intwp\+\_\+p), intent(in)}]{uio }\end{DoxyParamCaption})} |
---|
301 | |
---|
302 | |
---|
303 | |
---|
304 | Release a unit number for reuse. |
---|
305 | |
---|
306 | |
---|
307 | \begin{DoxyParams}[1]{Parameters} |
---|
308 | \mbox{\tt in} & {\em uio} & unit number \\ |
---|
309 | \hline |
---|
310 | \end{DoxyParams} |
---|
311 | |
---|
312 | |
---|
313 | Definition at line 186 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
314 | |
---|
315 | \mbox{\Hypertarget{namespacemod__oasis__sys_abce4c06d8a999919a2a185c71ab15edd}\label{namespacemod__oasis__sys_abce4c06d8a999919a2a185c71ab15edd}} |
---|
316 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+unitget@{oasis\+\_\+unitget}} |
---|
317 | \index{oasis\+\_\+unitget@{oasis\+\_\+unitget}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
318 | \subsubsection{\texorpdfstring{oasis\+\_\+unitget()}{oasis\_unitget()}} |
---|
319 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+unitget (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+intwp\+\_\+p), intent(out)}]{uio }\end{DoxyParamCaption})} |
---|
320 | |
---|
321 | |
---|
322 | |
---|
323 | Get a free unit number. |
---|
324 | |
---|
325 | |
---|
326 | \begin{DoxyParams}[1]{Parameters} |
---|
327 | \mbox{\tt out} & {\em uio} & unit number \\ |
---|
328 | \hline |
---|
329 | \end{DoxyParams} |
---|
330 | |
---|
331 | |
---|
332 | Definition at line 112 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
333 | |
---|
334 | \mbox{\Hypertarget{namespacemod__oasis__sys_a6e0a46b41f1b9f0a1dc99b17665f49dc}\label{namespacemod__oasis__sys_a6e0a46b41f1b9f0a1dc99b17665f49dc}} |
---|
335 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+unitsetmax@{oasis\+\_\+unitsetmax}} |
---|
336 | \index{oasis\+\_\+unitsetmax@{oasis\+\_\+unitsetmax}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
337 | \subsubsection{\texorpdfstring{oasis\+\_\+unitsetmax()}{oasis\_unitsetmax()}} |
---|
338 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+unitsetmax (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+intwp\+\_\+p), intent(in)}]{uio }\end{DoxyParamCaption})} |
---|
339 | |
---|
340 | |
---|
341 | |
---|
342 | Set the maximum unit number allowed. |
---|
343 | |
---|
344 | |
---|
345 | \begin{DoxyParams}[1]{Parameters} |
---|
346 | \mbox{\tt in} & {\em uio} & unit number \\ |
---|
347 | \hline |
---|
348 | \end{DoxyParams} |
---|
349 | |
---|
350 | |
---|
351 | Definition at line 167 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
352 | |
---|
353 | \mbox{\Hypertarget{namespacemod__oasis__sys_a063a41b73546564afd294fd5708b6667}\label{namespacemod__oasis__sys_a063a41b73546564afd294fd5708b6667}} |
---|
354 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!oasis\+\_\+unitsetmin@{oasis\+\_\+unitsetmin}} |
---|
355 | \index{oasis\+\_\+unitsetmin@{oasis\+\_\+unitsetmin}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
356 | \subsubsection{\texorpdfstring{oasis\+\_\+unitsetmin()}{oasis\_unitsetmin()}} |
---|
357 | {\footnotesize\ttfamily subroutine, public mod\+\_\+oasis\+\_\+sys\+::oasis\+\_\+unitsetmin (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+intwp\+\_\+p), intent(in)}]{uio }\end{DoxyParamCaption})} |
---|
358 | |
---|
359 | |
---|
360 | |
---|
361 | Set the minimum unit number allowed. |
---|
362 | |
---|
363 | |
---|
364 | \begin{DoxyParams}[1]{Parameters} |
---|
365 | \mbox{\tt in} & {\em uio} & unit number \\ |
---|
366 | \hline |
---|
367 | \end{DoxyParams} |
---|
368 | |
---|
369 | |
---|
370 | Definition at line 148 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
371 | |
---|
372 | |
---|
373 | |
---|
374 | \subsection{Variable Documentation} |
---|
375 | \mbox{\Hypertarget{namespacemod__oasis__sys_aad26202d309c5b33de4cddb54c7edc99}\label{namespacemod__oasis__sys_aad26202d309c5b33de4cddb54c7edc99}} |
---|
376 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!astr@{astr}} |
---|
377 | \index{astr@{astr}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
378 | \subsubsection{\texorpdfstring{astr}{astr}} |
---|
379 | {\footnotesize\ttfamily character(len=$\ast$), parameter, public mod\+\_\+oasis\+\_\+sys\+::astr = \textquotesingle{} A\+B\+O\+R\+T\+: \textquotesingle{}} |
---|
380 | |
---|
381 | |
---|
382 | |
---|
383 | Definition at line 11 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
384 | |
---|
385 | \mbox{\Hypertarget{namespacemod__oasis__sys_a0f6e0376585c6f39d653f5ab05e80e8f}\label{namespacemod__oasis__sys_a0f6e0376585c6f39d653f5ab05e80e8f}} |
---|
386 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!estr@{estr}} |
---|
387 | \index{estr@{estr}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
388 | \subsubsection{\texorpdfstring{estr}{estr}} |
---|
389 | {\footnotesize\ttfamily character(len=$\ast$), parameter, public mod\+\_\+oasis\+\_\+sys\+::estr = \textquotesingle{} E\+R\+R\+O\+R\+: \textquotesingle{}} |
---|
390 | |
---|
391 | |
---|
392 | |
---|
393 | Definition at line 12 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
394 | |
---|
395 | \mbox{\Hypertarget{namespacemod__oasis__sys_a9dc0e2d10d9e8e8c23e391467ae2eee4}\label{namespacemod__oasis__sys_a9dc0e2d10d9e8e8c23e391467ae2eee4}} |
---|
396 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!maxion@{maxion}} |
---|
397 | \index{maxion@{maxion}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
398 | \subsubsection{\texorpdfstring{maxion}{maxion}} |
---|
399 | {\footnotesize\ttfamily integer(ip\+\_\+intwp\+\_\+p), save mod\+\_\+oasis\+\_\+sys\+::maxion = 9999\hspace{0.3cm}{\ttfamily [private]}} |
---|
400 | |
---|
401 | |
---|
402 | |
---|
403 | Definition at line 31 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
404 | |
---|
405 | \mbox{\Hypertarget{namespacemod__oasis__sys_aded42e42797afa8d6ee5bdefdf42a812}\label{namespacemod__oasis__sys_aded42e42797afa8d6ee5bdefdf42a812}} |
---|
406 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!minion@{minion}} |
---|
407 | \index{minion@{minion}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
408 | \subsubsection{\texorpdfstring{minion}{minion}} |
---|
409 | {\footnotesize\ttfamily integer(ip\+\_\+intwp\+\_\+p), save mod\+\_\+oasis\+\_\+sys\+::minion = 1024\hspace{0.3cm}{\ttfamily [private]}} |
---|
410 | |
---|
411 | |
---|
412 | |
---|
413 | Definition at line 30 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
414 | |
---|
415 | \mbox{\Hypertarget{namespacemod__oasis__sys_ad7e3af62b75730bc71be0df8ae50cf0a}\label{namespacemod__oasis__sys_ad7e3af62b75730bc71be0df8ae50cf0a}} |
---|
416 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!tree\+\_\+delta@{tree\+\_\+delta}} |
---|
417 | \index{tree\+\_\+delta@{tree\+\_\+delta}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
418 | \subsubsection{\texorpdfstring{tree\+\_\+delta}{tree\_delta}} |
---|
419 | {\footnotesize\ttfamily integer(ip\+\_\+intwp\+\_\+p), parameter mod\+\_\+oasis\+\_\+sys\+::tree\+\_\+delta = 2\hspace{0.3cm}{\ttfamily [private]}} |
---|
420 | |
---|
421 | |
---|
422 | |
---|
423 | Definition at line 32 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
424 | |
---|
425 | \mbox{\Hypertarget{namespacemod__oasis__sys_a159b60d106efcb1f42722b08c5511ad0}\label{namespacemod__oasis__sys_a159b60d106efcb1f42722b08c5511ad0}} |
---|
426 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!tree\+\_\+indent@{tree\+\_\+indent}} |
---|
427 | \index{tree\+\_\+indent@{tree\+\_\+indent}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
428 | \subsubsection{\texorpdfstring{tree\+\_\+indent}{tree\_indent}} |
---|
429 | {\footnotesize\ttfamily integer(ip\+\_\+intwp\+\_\+p), save mod\+\_\+oasis\+\_\+sys\+::tree\+\_\+indent = 0\hspace{0.3cm}{\ttfamily [private]}} |
---|
430 | |
---|
431 | |
---|
432 | |
---|
433 | Definition at line 33 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
434 | |
---|
435 | \mbox{\Hypertarget{namespacemod__oasis__sys_a4e16ba69c68a3a39c8b8aa3b92234ce1}\label{namespacemod__oasis__sys_a4e16ba69c68a3a39c8b8aa3b92234ce1}} |
---|
436 | \index{mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}!wstr@{wstr}} |
---|
437 | \index{wstr@{wstr}!mod\+\_\+oasis\+\_\+sys@{mod\+\_\+oasis\+\_\+sys}} |
---|
438 | \subsubsection{\texorpdfstring{wstr}{wstr}} |
---|
439 | {\footnotesize\ttfamily character(len=$\ast$), parameter, public mod\+\_\+oasis\+\_\+sys\+::wstr = \textquotesingle{} W\+A\+R\+N\+I\+N\+G\+: \textquotesingle{}} |
---|
440 | |
---|
441 | |
---|
442 | |
---|
443 | Definition at line 13 of file mod\+\_\+oasis\+\_\+sys.\+F90. |
---|
444 | |
---|