\hypertarget{dcdatetimesetsecofday_8f90}{}\section{dc\+\_\+utils/dcdatetimesetsecofday.f90 File Reference}
\label{dcdatetimesetsecofday_8f90}\index{dc\+\_\+utils/dcdatetimesetsecofday.\+f90@{dc\+\_\+utils/dcdatetimesetsecofday.\+f90}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine \hyperlink{dcdatetimesetsecofday_8f90_af7da0731f446d5e1325ed16f17d3ba7e}{dcdatetimesetsecofday} (sec)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{dcdatetimesetsecofday_8f90_af7da0731f446d5e1325ed16f17d3ba7e}\label{dcdatetimesetsecofday_8f90_af7da0731f446d5e1325ed16f17d3ba7e}} 
\index{dcdatetimesetsecofday.\+f90@{dcdatetimesetsecofday.\+f90}!dcdatetimesetsecofday@{dcdatetimesetsecofday}}
\index{dcdatetimesetsecofday@{dcdatetimesetsecofday}!dcdatetimesetsecofday.\+f90@{dcdatetimesetsecofday.\+f90}}
\subsubsection{\texorpdfstring{dcdatetimesetsecofday()}{dcdatetimesetsecofday()}}
{\footnotesize\ttfamily subroutine dcdatetimesetsecofday (\begin{DoxyParamCaption}\item[{real(dp), intent(in)}]{sec }\end{DoxyParamCaption})}



Definition at line 13 of file dcdatetimesetsecofday.\+f90.



References dc\+\_\+trace\+::beginsub(), dc\+\_\+date\+\_\+types\+::day\+\_\+seconds, dc\+\_\+types\+::dp, and dc\+\_\+trace\+::endsub().


\begin{DoxyCode}
13   \textcolor{comment}{!}
14   \textcolor{comment}{! 1 日の秒数のデフォルトを設定します.}
15   \textcolor{comment}{!}
16   \textcolor{comment}{! なお, この手続きを呼ばない場合, デフォルトの 1 日の秒数は}
17   \textcolor{comment}{! dc\_date\_types#DAY\_SECONDS\_EARTH に設定されています.}
18   \textcolor{comment}{!}
19   \textcolor{keywordtype}{use }\hyperlink{namespacedc__date__types}{dc\_date\_types}\textcolor{keywordtype}{, only}: day\_seconds\_default => \hyperlink{namespacedc__date__types_a4a0b5df0058a97b5f9e071ecb0fb7aa7}{day\_seconds}
20   \textcolor{keywordtype}{use }\hyperlink{namespacedc__types}{dc\_types}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__types_ac74a34430fcd3d0eb2344f19d536c086}{dp}
21   \textcolor{keywordtype}{use }\hyperlink{namespacedc__trace}{dc\_trace}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__trace_aca1efe8bae50b85f74980a8c4d704dd8}{beginsub}, \hyperlink{namespacedc__trace_ae44de97565a3bdd685789c7748b37e37}{endsub}
22   \textcolor{keywordtype}{implicit none}
23   \textcolor{keywordtype}{real(DP)}, \textcolor{keywordtype}{intent(in)}:: sec
24   \textcolor{keywordtype}{character(*)}, \textcolor{keywordtype}{parameter} :: subname = \textcolor{stringliteral}{'DCDateTimeSetSecOfDay'}
25 \textcolor{keywordflow}{continue}
26   \textcolor{keyword}{call }\hyperlink{namespacedc__trace_aca1efe8bae50b85f74980a8c4d704dd8}{beginsub}(subname, \textcolor{stringliteral}{'sec=<%f>'}, d=(/sec/))
27   day\_seconds\_default = sec
28   \textcolor{keyword}{call }\hyperlink{namespacedc__trace_ae44de97565a3bdd685789c7748b37e37}{endsub}(subname, \textcolor{stringliteral}{'dc\_date\_types#day\_seconds=<%f>'}, d=(/day\_seconds\_default/))
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{dcdatetimesetsecofday_8f90_af7da0731f446d5e1325ed16f17d3ba7e_cgraph}
\end{center}
\end{figure}
