Ignore:
Timestamp:
04/17/14 10:49:43 (10 years ago)
Author:
pinsard
Message:

fix thanks to coding rules; typo; dupe empty lines; trailing blanks

Location:
trunk/SRC/ToBeReviewed/PLOTS/LABEL
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/ToBeReviewed/PLOTS/LABEL/label.pro

    r479 r495  
    22; 
    33; @file_comments 
    4 ; Allows to choose the type of the label we want to use at the time of a  
     4; Allows to choose the type of the label we want to use at the time of a 
    55; contour. 
    66; 
  • trunk/SRC/ToBeReviewed/PLOTS/LABEL/label_date.pro.new

    r39 r495  
    119119;                Added AM_PM and DAYS_OF_WEEK keywords, '%A' and '%W' codes. 
    120120;- 
    121  
    122121 
    123122;-------------------------------------------------- LABEL_DATE_CONVERT_FORMAT 
     
    178177END 
    179178 
    180  
    181179;----------------------------------------------------------------- LABEL_DATE 
    182180FUNCTION LABEL_DATE, axisIn, indexIn, valueIn, levelIn, $ 
     
    193191        ON_ERROR, 2 
    194192 
    195  
    196193        IF (N_PARAMS() LT 3) THEN $  ; use default for no inputs 
    197194                IF NOT KEYWORD_SET(dateFormat) THEN dateFormat='' 
    198  
    199195 
    200196; process a new months vector? 
     
    207203        if (N_ELEMENTS(months) EQ 12) then cMonths = months 
    208204 
    209  
    210205; process a new days_of_week vector? 
    211206        ; if days_of_week is undefined, then make cDaysWeek undefined 
     
    217212        if (N_ELEMENTS(days_of_week) EQ 7) then cDaysWeek = days_of_week 
    218213 
    219  
    220214; process a new AM_PM vector? 
    221215        ; if AM_PM is undefined, then make cAmpm undefined 
     
    227221        if (N_ELEMENTS(am_pm) EQ 2) then cAmpm = am_pm 
    228222 
    229  
    230223; process a new cOffset? 
    231224        IF ARG_PRESENT(offs) THEN cOffset = 0 
     
    234227        IF (N_ELEMENTS(cOffset) EQ 0) THEN cOffset = 0d 
    235228 
    236  
    237229; process a new cRoundup? 
    238230        IF (N_ELEMENTS(round_up) GT 0) THEN cRoundup = KEYWORD_SET(round_up) 
    239  
    240231 
    241232; process a new date_format string? 
     
    248239        IF (N_ELEMENTS(cFormatArray) EQ 0) THEN cFormatArray = '(C())' 
    249240 
    250  
    251241        IF (N_PARAMS() LT 3) THEN RETURN, 0 
    252  
    253242 
    254243;------------------------------------------------------ Process an axis value 
     
    257246        time = value1 - date  ; Julian time 
    258247 
    259  
    260248        IF (N_ELEMENTS(levelIn) LT 1) THEN levelIn = 0 
    261249        nFormat = N_ELEMENTS(cFormatArray) 
    262250        formatLevel = cFormatArray[levelIn MOD nFormat]    ; repeat cyclically 
    263  
    264251 
    265252; Round subseconds to the desired precision 
     
    273260                value1 = date + time 
    274261        ENDIF 
    275  
    276262 
    277263; Round fractional time to the least significant format specified. 
     
    291277        ENDIF 
    292278 
    293  
    294279; check for negative (B.C.E.) years 
    295280        jan1_1ad = 1721424L   ; Julian date for 1 Jan, 1 C.E. 
  • trunk/SRC/ToBeReviewed/PLOTS/LABEL/lataxe.pro

    r369 r495  
    22; 
    33; @file_comments 
    4 ; function called by [XYZ]TICKFORMAT (see the help to see how to use it) to  
     4; function called by [XYZ]TICKFORMAT (see the help to see how to use it) to 
    55; label axes in latitude. 
    66; 
    77; @categories 
    88; Graphics 
    9 ;  
    10 ; @param AXIS  
     9; 
     10; @param AXIS 
    1111; It is the axis number: 0 for X axis, 1 for Y axis, 2 for Z axis. 
    1212; 
  • trunk/SRC/ToBeReviewed/PLOTS/LABEL/lonaxe.pro

    r369 r495  
    22; 
    33; @file_comments 
    4 ; function called by [XYZ]TICKFORMAT (see the help to see how to use it) to  
     4; function called by [XYZ]TICKFORMAT (see the help to see how to use it) to 
    55; label axes in longitude. 
    66; 
    77; @categories 
    88; Graphics 
    9 ;  
    10 ; @param AXIS  
     9; 
     10; @param AXIS 
    1111; It is the axis number: 0 for X axis, 1 for Y axis, 2 for Z axis. 
    1212; 
Note: See TracChangeset for help on using the changeset viewer.