\hypertarget{interfacedc__scaledsec_1_1ceiling}{}\section{dc\+\_\+scaledsec\+:\+:ceiling Interface Reference}
\label{interfacedc__scaledsec_1_1ceiling}\index{dc\+\_\+scaledsec\+::ceiling@{dc\+\_\+scaledsec\+::ceiling}}
\subsection*{Private Member Functions}
\begin{DoxyCompactItemize}
\item 
type(\hyperlink{structdc__scaledsec_1_1dc__scaled__sec}{dc\+\_\+scaled\+\_\+sec}) function \hyperlink{interfacedc__scaledsec_1_1ceiling_ad30da64150ca3f7620f092f74a9c43e4}{dcscaledsec\+\_\+ceiling\+\_\+s} (sclsec)
\end{DoxyCompactItemize}


\subsection{Detailed Description}


Definition at line 191 of file dc\+\_\+scaledsec.\+f90.



\subsection{Member Function/\+Subroutine Documentation}
\mbox{\Hypertarget{interfacedc__scaledsec_1_1ceiling_ad30da64150ca3f7620f092f74a9c43e4}\label{interfacedc__scaledsec_1_1ceiling_ad30da64150ca3f7620f092f74a9c43e4}} 
\index{dc\+\_\+scaledsec\+::ceiling@{dc\+\_\+scaledsec\+::ceiling}!dcscaledsec\+\_\+ceiling\+\_\+s@{dcscaledsec\+\_\+ceiling\+\_\+s}}
\index{dcscaledsec\+\_\+ceiling\+\_\+s@{dcscaledsec\+\_\+ceiling\+\_\+s}!dc\+\_\+scaledsec\+::ceiling@{dc\+\_\+scaledsec\+::ceiling}}
\subsubsection{\texorpdfstring{dcscaledsec\+\_\+ceiling\+\_\+s()}{dcscaledsec\_ceiling\_s()}}
{\footnotesize\ttfamily type(\hyperlink{structdc__scaledsec_1_1dc__scaled__sec}{dc\+\_\+scaled\+\_\+sec}) function dc\+\_\+scaledsec\+::ceiling\+::dcscaledsec\+\_\+ceiling\+\_\+s (\begin{DoxyParamCaption}\item[{type(\hyperlink{structdc__scaledsec_1_1dc__scaled__sec}{dc\+\_\+scaled\+\_\+sec}), intent(in)}]{sclsec }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Definition at line 2017 of file dc\+\_\+scaledsec.\+f90.


\begin{DoxyCode}
2017     \textcolor{comment}{!}
2018     \textcolor{comment}{! DC\_SCALED\_SEC 型変数の整数値 (対象の数値以上で最小の整数) を返す. }
2019     \textcolor{comment}{! }
2020     \textcolor{comment}{! Return an integer value (minimum integer over the given value) }
2021     \textcolor{comment}{! of a "DC\_SCALED\_SEC" variable}
2022     \textcolor{comment}{!}
2023     \textcolor{keywordtype}{implicit none}
2024     \textcolor{keywordtype}{type}(\hyperlink{structdc__scaledsec_1_1dc__scaled__sec}{dc\_scaled\_sec}), \textcolor{keywordtype}{intent(in)}:: sclsec
2025     \textcolor{keywordtype}{integer}:: i
2026     \textcolor{keywordtype}{logical}:: flag\_after\_decimal
2027   \textcolor{keywordflow}{continue}
2028     result = sclsec
2029     flag\_after\_decimal = .false.
2030     \textcolor{keywordflow}{do} i = -1, imin, -1
2031       \textcolor{keywordflow}{if} ( result % sec\_ary(i) /= 0 ) flag\_after\_decimal = .true.
2032       result % sec\_ary(i) = 0
2033 \textcolor{keywordflow}{    end do}
2034     \textcolor{keywordflow}{if} ( flag\_after\_decimal .and. .not. result % flag\_negative ) \textcolor{keywordflow}{then}
2035       result = result + 1
2036 \textcolor{keywordflow}{    end if}
2037 
\end{DoxyCode}


The documentation for this interface was generated from the following file\+:\begin{DoxyCompactItemize}
\item 
dc\+\_\+utils/\hyperlink{dc__scaledsec_8f90}{dc\+\_\+scaledsec.\+f90}\end{DoxyCompactItemize}
