1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108
|
<html><head>
<link rel="stylesheet" href="style.css" type="text/css">
<link rel="Start" href="index.html">
<link title="Index of types" rel=Appendix href="index_types.html">
<link title="Index of exceptions" rel=Appendix href="index_exceptions.html">
<link title="Index of values" rel=Appendix href="index_values.html">
<link title="Index of modules" rel=Appendix href="index_modules.html">
<link title="Index of module types" rel=Appendix href="index_module_types.html">
<link title="Time_Zone" rel="Chapter" href="Time_Zone.html">
<link title="Period" rel="Chapter" href="Period.html">
<link title="Time" rel="Chapter" href="Time.html">
<link title="Date" rel="Chapter" href="Date.html">
<link title="Calendar" rel="Chapter" href="Calendar.html">
<link title="Printer" rel="Chapter" href="Printer.html"><title>Calendar</title>
</head>
<body>
<code class="code"><span class="keyword">sig</span><br>
<span class="keyword">type</span> t<br>
<span class="keyword">type</span> day = <span class="constructor">Date</span>.day = <span class="constructor">Sun</span> <span class="keywordsign">|</span> <span class="constructor">Mon</span> <span class="keywordsign">|</span> <span class="constructor">Tue</span> <span class="keywordsign">|</span> <span class="constructor">Wed</span> <span class="keywordsign">|</span> <span class="constructor">Thu</span> <span class="keywordsign">|</span> <span class="constructor">Fri</span> <span class="keywordsign">|</span> <span class="constructor">Sat</span><br>
<span class="keyword">type</span> month =<br>
<span class="constructor">Date</span>.month =<br>
<span class="constructor">Jan</span><br>
<span class="keywordsign">|</span> <span class="constructor">Feb</span><br>
<span class="keywordsign">|</span> <span class="constructor">Mar</span><br>
<span class="keywordsign">|</span> <span class="constructor">Apr</span><br>
<span class="keywordsign">|</span> <span class="constructor">May</span><br>
<span class="keywordsign">|</span> <span class="constructor">Jun</span><br>
<span class="keywordsign">|</span> <span class="constructor">Jul</span><br>
<span class="keywordsign">|</span> <span class="constructor">Aug</span><br>
<span class="keywordsign">|</span> <span class="constructor">Sep</span><br>
<span class="keywordsign">|</span> <span class="constructor">Oct</span><br>
<span class="keywordsign">|</span> <span class="constructor">Nov</span><br>
<span class="keywordsign">|</span> <span class="constructor">Dec</span><br>
<span class="keyword">type</span> year = <span class="constructor">Date</span>.year<br>
<span class="keyword">type</span> field = [ <span class="keywordsign">`</span><span class="constructor">Day</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Hour</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Minute</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Month</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Second</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Week</span> <span class="keywordsign">|</span> <span class="keywordsign">`</span><span class="constructor">Year</span> ]<br>
<span class="keyword">val</span> make : int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> lmake :<br>
year:int <span class="keywordsign">-></span><br>
?month:int <span class="keywordsign">-></span><br>
?day:int <span class="keywordsign">-></span> ?hour:int <span class="keywordsign">-></span> ?minute:int <span class="keywordsign">-></span> ?second:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> create : <span class="constructor">Date</span>.t <span class="keywordsign">-></span> <span class="constructor">Time</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> now : unit <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> from_jd : float <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> from_mjd : float <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> convert : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Time_Zone</span>.t <span class="keywordsign">-></span> <span class="constructor">Time_Zone</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> to_gmt : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> from_gmt : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> days_in_month : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> day_of_week : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.day<br>
<span class="keyword">val</span> day_of_month : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> day_of_year : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> week : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> month : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.month<br>
<span class="keyword">val</span> year : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> to_jd : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> float<br>
<span class="keyword">val</span> to_mjd : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> float<br>
<span class="keyword">val</span> hour : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> minute : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> second : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> equal : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> bool<br>
<span class="keyword">val</span> compare : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> is_leap_day : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> bool<br>
<span class="keyword">val</span> is_gregorian : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> bool<br>
<span class="keyword">val</span> is_julian : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> bool<br>
<span class="keyword">val</span> is_pm : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> bool<br>
<span class="keyword">val</span> is_am : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> bool<br>
<span class="keyword">val</span> to_unixtm : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Unix</span>.tm<br>
<span class="keyword">val</span> from_unixtm : <span class="constructor">Unix</span>.tm <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> to_unixfloat : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> float<br>
<span class="keyword">val</span> from_unixfloat : float <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> from_date : <span class="constructor">Date</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> to_date : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Date</span>.t<br>
<span class="keyword">val</span> to_time : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Time</span>.t<br>
<span class="keyword">module</span> <span class="constructor">Period</span> :<br>
<span class="keyword">sig</span><br>
<span class="keyword">type</span> t<br>
<span class="keyword">val</span> empty : t<br>
<span class="keyword">val</span> add : t <span class="keywordsign">-></span> t <span class="keywordsign">-></span> t<br>
<span class="keyword">val</span> sub : t <span class="keywordsign">-></span> t <span class="keywordsign">-></span> t<br>
<span class="keyword">val</span> opp : t <span class="keywordsign">-></span> t<br>
<span class="keyword">val</span> compare : t <span class="keywordsign">-></span> t <span class="keywordsign">-></span> int<br>
<span class="keyword">val</span> equal : t <span class="keywordsign">-></span> t <span class="keywordsign">-></span> bool<br>
<span class="keyword">val</span> make : int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> lmake :<br>
?year:int <span class="keywordsign">-></span><br>
?month:int <span class="keywordsign">-></span><br>
?day:int <span class="keywordsign">-></span><br>
?hour:int <span class="keywordsign">-></span> ?minute:int <span class="keywordsign">-></span> ?second:int <span class="keywordsign">-></span> unit <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> year : int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> month : int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> week : int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> day : int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> hour : int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> minute : int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> second : int <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> from_date : <span class="constructor">Date</span>.<span class="constructor">Period</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> from_time : <span class="constructor">Time</span>.<span class="constructor">Period</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> to_date : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Date</span>.<span class="constructor">Period</span>.t<br>
<span class="keyword">exception</span> <span class="constructor">Not_computable</span><br>
<span class="keyword">val</span> to_time : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Time</span>.<span class="constructor">Period</span>.t<br>
<span class="keyword">val</span> ymds : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> int * int * int * int<br>
<span class="keyword">end</span><br>
<span class="keyword">val</span> add : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.<span class="constructor">Period</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> sub : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.<span class="constructor">Period</span>.t<br>
<span class="keyword">val</span> rem : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.<span class="constructor">Period</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> next : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.field <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">val</span> prev : <span class="constructor">Calendar</span>.t <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.field <span class="keywordsign">-></span> <span class="constructor">Calendar</span>.t<br>
<span class="keyword">end</span></code></body></html>
|