\hypertarget{dccaltochar_8f90}{}\section{dc\+\_\+utils/dccaltochar.f90 File Reference}
\label{dccaltochar_8f90}\index{dc\+\_\+utils/dccaltochar.\+f90@{dc\+\_\+utils/dccaltochar.\+f90}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
character(string) function \hyperlink{dccaltochar_8f90_a6e80d9cbdbf99579e4555220baa641d8}{dccaltochar1} (cal)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{dccaltochar_8f90_a6e80d9cbdbf99579e4555220baa641d8}\label{dccaltochar_8f90_a6e80d9cbdbf99579e4555220baa641d8}} 
\index{dccaltochar.\+f90@{dccaltochar.\+f90}!dccaltochar1@{dccaltochar1}}
\index{dccaltochar1@{dccaltochar1}!dccaltochar.\+f90@{dccaltochar.\+f90}}
\subsubsection{\texorpdfstring{dccaltochar1()}{dccaltochar1()}}
{\footnotesize\ttfamily character(string) function dccaltochar1 (\begin{DoxyParamCaption}\item[{type(dc\+\_\+cal), intent(in)}]{cal }\end{DoxyParamCaption})}



Definition at line 12 of file dccaltochar.\+f90.



References dc\+\_\+calendar\+\_\+internal\+::dccaltype\+\_\+str(), dc\+\_\+types\+::dp, dc\+\_\+types\+::string, and dc\+\_\+types\+::token.


\begin{DoxyCode}
12   \textcolor{comment}{!}
13   \textcolor{comment}{! dc\_calendar\_types#DC\_CAL 型変数 *cal* を文字型変数 *result* }
14   \textcolor{comment}{! へ変換して返します.}
15   \textcolor{comment}{! 書式は下記のようになります. }
16   \textcolor{comment}{!}
17   \textcolor{comment}{!   CCCC:month\_in\_year=MM,day\_in\_month=(/DD1,.../),hour\_in\_day=hh,min\_in\_hour=mm,sec\_in\_min=ss}
18   \textcolor{comment}{!}
19   \textcolor{comment}{! CCCC が暦のタイプ (文字数は任意), 以降は一年の月数等の情報となります. }
20   \textcolor{comment}{!}
21   \textcolor{comment}{! Convert a "dc\_calendar\_types#DC\_CAL" variable *cal* into}
22   \textcolor{comment}{! a character variable *result* }
23   \textcolor{comment}{! The format is as follows. }
24   \textcolor{comment}{! }
25   \textcolor{comment}{!   CCCC:month\_in\_year=MM,day\_in\_month=(/DD1,.../),hour\_in\_day=hh,min\_in\_hour=mm,sec\_in\_min=ss}
26   \textcolor{comment}{!}
27   \textcolor{comment}{! CCCC is a type of calencar (number of strings is arbitrary). }
28   \textcolor{comment}{! The rest is information about number of months of a year, etc. }
29   \textcolor{comment}{!}
30   \textcolor{keywordtype}{use }\hyperlink{namespacedc__calendar__types}{dc\_calendar\_types}\textcolor{keywordtype}{, only}: \hyperlink{structdc__calendar__types_1_1dc__cal}{dc\_cal}
31   \textcolor{keywordtype}{use }\hyperlink{namespacedc__calendar__internal}{dc\_calendar\_internal}\textcolor{keywordtype}{,only}: \hyperlink{namespacedc__calendar__internal_aa5cfbed96ce640b2c6dd7bc0df513872}{dccaltype\_str}
32   \textcolor{keywordtype}{use }\hyperlink{namespacedc__types}{dc\_types}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__types_adb76910ff05e3b9fe3436567f8f8dac6}{string}, \hyperlink{namespacedc__types_a6d28eb015ba84292a06f4ff25165b376}{token}, \hyperlink{namespacedc__types_ac74a34430fcd3d0eb2344f19d536c086}{dp}
33   \textcolor{keywordtype}{use }\hyperlink{namespacedc__string}{dc\_string}\textcolor{keywordtype}{, only}: \hyperlink{interfacedc__string_1_1tochar}{tochar}, \hyperlink{interfacedc__string_1_1cprintf}{cprintf}, \hyperlink{interfacedc__string_1_1stoa}{stoa}, \hyperlink{interfacedc__string_1_1tochar}{tochar}
34   \textcolor{keywordtype}{use }\hyperlink{namespacedc__message}{dc\_message}\textcolor{keywordtype}{, only}: \hyperlink{interfacedc__message_1_1messagenotify}{messagenotify}
35   \textcolor{keywordtype}{implicit none}
36   \textcolor{keywordtype}{character(STRING)}:: result
37   \textcolor{keywordtype}{type}(\hyperlink{structdc__calendar__types_1_1dc__cal}{dc\_cal}), \textcolor{keywordtype}{intent(in)}:: cal
38                               \textcolor{comment}{! 暦情報を収めたオブジェクト. }
39                               \textcolor{comment}{! }
40                               \textcolor{comment}{! An object that stores information of }
41                               \textcolor{comment}{! calendar. }
42 
43   \textcolor{keywordtype}{character(TOKEN)}:: cal\_str
44 \textcolor{keywordflow}{continue}
45 
46   cal\_str = \hyperlink{namespacedc__calendar__internal_aa5cfbed96ce640b2c6dd7bc0df513872}{dccaltype\_str}( cal % cal\_type )
47 
48   result = \hyperlink{interfacedc__string_1_1cprintf}{cprintf}(\textcolor{stringliteral}{
      '%c:month\_in\_year=%d,day\_in\_month=(/%c/),hour\_in\_day=%d,min\_in\_hour=%d,sec\_in\_min=%f'}, &
49     & i = (/ cal % month\_in\_year, cal % hour\_in\_day, cal % min\_in\_hour /), &
50     & d = (/ cal % sec\_in\_min /), &
51     & c1=trim(cal\_str), c2=trim(\hyperlink{interfacedc__string_1_1tochar}{tochar}(cal % day\_in\_month)))
52 
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=294pt]{dccaltochar_8f90_a6e80d9cbdbf99579e4555220baa641d8_cgraph}
\end{center}
\end{figure}
