[6331] | 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 | |
---|