Changeset 237 for trunk/SRC/Matrix


Ignore:
Timestamp:
03/26/07 17:37:03 (17 years ago)
Author:
pinsard
Message:

replace some print by some report in some .pro (continuation) + improvements/corrections of some *.pro headers

Location:
trunk/SRC/Matrix
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/Matrix/cmapply.pro

    r232 r237  
    66; @param X 
    77; 
    8 ; 
    9 ; @version $Id$ 
     8; @version  
     9; $Id$ 
    1010; 
    1111; @todo seb 
    1212;- 
    1313; 
    14 function cmapply_product, x 
     14FUNCTION cmapply_product, x 
    1515; 
    1616  compile_opt idl2, strictarrsubs 
     
    2929 
    3030;+ 
     31; 
    3132; @file_comments 
    3233; cmapply_redim : Utility function, used to collect collaped dimensions 
     
    3435; @param newarr 
    3536; 
    36 ; 
    3737; @param dimapply 
    3838; 
    39 ; 
    4039; @param dimkeep 
    4140; 
    42 ; 
    4341; @param nkeep 
    4442; 
    45 ; 
    4643; @param totcol 
    4744; 
    48 ; 
    4945; @param totkeep 
    5046; 
    51 ; 
    5247; @todo seb 
     48; 
    5349;- 
    5450; 
    55 pro cmapply_redim, newarr, dimapply, dimkeep, nkeep, totcol, totkeep 
     51PRO cmapply_redim, newarr, dimapply, dimkeep, nkeep, totcol, totkeep 
    5652; 
    5753  compile_opt idl2, strictarrsubs 
     
    7874end 
    7975 
    80 ;; Main function 
     76;Main function 
    8177;+ 
    8278; 
     
    237233; 
    238234;- 
    239 function cmapply, op, array, dimapply, double=dbl, type=type, $ 
     235; 
     236FUNCTION cmapply, op, array, dimapply, double=dbl, type=type, $ 
    240237                  functargs=functargs, nocatch=nocatch 
    241238; 
  • trunk/SRC/Matrix/cmset_op.pro

    r163 r237  
    11;+ 
     2; 
    23; @hidden 
    34; 
     
    78; 
    89; @todo seb 
     10; 
    911;- 
    1012; 
    11 function cmset_op_uniq, a 
     13FUNCTION cmset_op_uniq, a 
    1214; 
    1315  compile_opt idl2, strictarrsubs 
     
    129131;  SET_UTILS.PRO by RSI 
    130132; 
    131 ; @history Written, CM, 23 Feb 2000 
     133; @history  
     134; Written, CM, 23 Feb 2000 
    132135;   Added empty set capability, CM, 25 Feb 2000 
    133136;   Documentation clarification, CM 02 Mar 2000 
     
    160163;   craigm\@lheamail.gsfc.nasa.gov 
    161164; 
    162 ; @version $Id$ 
     165; @version  
     166; $Id$ 
    163167; 
    164168; @examples 
     
    192196; 
    193197;- 
    194  
    195  
    196 function cmset_op, a, op0, b, not1=not1, not2=not2, count=count, $ 
     198; 
     199FUNCTION cmset_op, a, op0, b, not1=not1, not2=not2, count=count, $ 
    197200              empty1=empty1, empty2=empty2, maxarray=ma, index=index 
    198201; 
  • trunk/SRC/Matrix/inter.pro

    r232 r237  
    77; Calculation 
    88; 
    9 ; @param a {in}{required} arrays of positive integers, which need not to be 
     9; @param a {in}{required}  
     10; arrays of positive integers, which need not to be 
    1011; sorted. Duplicate elements are ignored, as they have no effect on the 
    1112; result 
    1213; 
    13 ; @param b {in}{required} see a 
     14; @param b {in}{required}  
     15; see a 
    1416; 
    15 ; @returns tableau 
     17; @returns 
     18; tableau 
    1619; 
    17 ; @restrictions The empty set is denoted by an array with the first element equal to 
     20; @restrictions  
     21; The empty set is denoted by an array with the first element equal to 
    1822; -1. 
    1923; 
    20 ; @restrictions These functions will not be efficient on sparse sets with wide 
    21 ; ranges, as they trade memory for efficiency. The HISTOGRAM function 
     24; @restrictions  
     25; These functions will not be efficient on sparse sets with wide 
     26; ranges, as they trade memory for efficiency.  
     27; The <proidl>HISTOGRAM</proidl> function 
    2228; is used, which creates arrays of size equal to the range of the 
    2329; resulting set. 
  • trunk/SRC/Matrix/union.pro

    r232 r237  
    1212;               effect on the result 
    1313; 
    14 ; @param b {in}{required} see a 
     14; @param b {in}{required}  
     15; see a 
    1516; 
    1617; @returns 
     
    2021; The empty set is denoted by an array with the first element equal to -1. 
    2122; 
    22 ; @restrictions These functions will not be efficient on sparse sets with wide 
    23 ; ranges, as they trade memory for efficiency. The HISTOGRAM function 
     23; @restrictions  
     24; These functions will not be efficient on sparse sets with wide 
     25; ranges, as they trade memory for efficiency.  
     26; The <proidl>HISTOGRAM</proidl> function 
    2427; is used, which creates arrays of size equal to the range of the 
    2528; resulting set. 
  • trunk/SRC/Matrix/zero_one.pro

    r231 r237  
    11;+ 
    2 ; @file_comments  
     2; @file_comments 
    33; Send back a vector or a matrix constituted of 0 and 1 in alternation 
    44; 
    5 ; @categories  
     5; @categories 
    66; Function, Matrix 
    77; 
    8 ; @param n1 {in}{required} number of elements in the first dimension 
    9 ; @param n2 {in}{required} number of elements in the second dimension 
     8; @param n1 {in}{required} 
     9; number of elements in the first dimension 
    1010; 
    11 ; @returns result 
    12 ;  
    13 ; @history Sebastien Masson (smasson\@lodyc.jussieu.fr) 
     11; @param n2 {in}{required} 
     12; number of elements in the second dimension 
     13; 
     14; @returns 
     15; result 
     16; 
     17; @history 
     18; Sebastien Masson (smasson\@lodyc.jussieu.fr) 
    1419;                       1/12/98 
    1520; 
    16 ; @version $Id$ 
     21; @version 
     22; $Id$ 
    1723; 
    1824;- 
    1925; 
    20 function zero_one, n1,n2 
     26FUNCTION zero_one, n1,n2 
    2127; 
    2228  compile_opt idl2, strictarrsubs 
     
    2430   CASE N_PARAMS() OF 
    2531      1:return, findgen(n1) mod 2 
    26       2:BEGIN  
     32      2:BEGIN 
    2733         if fix(n1/2) EQ n1/2. then BEGIN ;even number of columns 
    2834            res = findgen(n1+1,n2) mod 2 
     
    3137      END 
    3238      else: return,  report('bad number of arguments') 
    33    endcase             
     39   endcase 
    3440end 
Note: See TracChangeset for help on using the changeset viewer.