Changeset 297 for trunk/SRC/Calendar

Timestamp:

09/25/07 17:09:12 (17 years ago)

Author:

pinsard

Message:

typo

File:

• trunk/SRC/Calendar/julday.pro (modified) (2 diffs)

trunk/SRC/Calendar/julday.pro

@@ -11 +11 @@
 ; Calendar
 ;
-; @param MONTH {in}{required} {type=scalar (integer or double) or array of scalars}
+; @param MONTH {in}{optional} {type=scalar (integer or double) or array of scalars}
 ; Number of the desired month (1 = January, ..., 12 = December).
 ;
-; @param DAY {in}{required} {type=scalar (integer or double) or array of scalars}
+; @param DAY {in}{optional} {type=scalar (integer or double) or array of scalars}
 ; Number of day of the month.
 ;
-; @param YEARin {in}{required} {type=scalar (integer or double) or array of scalars}
+; @param YEARin {in}{optional} {type=scalar (integer or double) or array of scalars}
 ; Number of the desired year.Year parameters must be valid
 ; values from the civil calendar.  Years B.C.E. are represented
@@ -93 +93 @@
   IF n_elements(key_caltype) EQ 0 THEN key_caltype = 'greg'
   if keyword_set(ndayspm) then key_caltype = '360d'
+  
+  NP = n_params()
+; Process the input, if all are missing, use today's date.
+  IF (np EQ 0) THEN RETURN, SYSTIME(/JULIAN)
+  IF (np LT 3) THEN ras = report('Incorrect number of arguments.')
 ;
   YEAR = long(yearin)
   zero = where(year EQ 0, cnt)
   IF cnt NE 0 THEN YEAR[zero] = 654321L
-  
-  NP = n_params()
-; Process the input, if all are missing, use todays date.
-  IF (np EQ 0) THEN RETURN, SYSTIME(/JULIAN)
-  IF (np LT 3) THEN ras = report('Incorrect number of arguments.')
 ;
   CASE key_caltype OF