Changeset 25596 in project


Ignore:
Timestamp:
11/28/11 14:49:57 (9 years ago)
Author:
Ivan Raikov
Message:

applied patch for #733 [thanks to Mario Domenech Goulart]

File:
1 edited

Legend:

Unmodified
Added
Removed

  • wiki/eggref/4/srfi-4-utils

    r20221 r25596  
    1919=== Procedures
    2020
    21 
    22 For each value of {{TAG}} in {{{ s8, u8, s16, u16, s32, u32, f32, f64
    23 }}}, the following procedures are defined:
    24 
    25 <procedure>TAGvector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure>
     21<procedure>s8vector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure><br>
     22<procedure>u8vector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure><br>
     23<procedure>s16vector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure><br>
     24<procedure>u16vector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure><br>
     25<procedure>s32vector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure><br>
     26<procedure>u32vector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure><br>
     27<procedure>f32vector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure><br>
     28<procedure>f64vector-fold :: F * X0 * V [* V1 ... VN] -> XN</procedure>
    2629
    2730where {{F :: V(I) [ * V1(I) ... VN(I)] * AX -> AX}}
    2831
    29 <procedure>TAGvector-map  :: F * V [ * V1 ... VN] -> V</procedure>
     32<procedure>s8vector-map  :: F * V [ * V1 ... VN] -> V</procedure><br>
     33<procedure>u8vector-map  :: F * V [ * V1 ... VN] -> V</procedure><br>
     34<procedure>s16vector-map  :: F * V [ * V1 ... VN] -> V</procedure><br>
     35<procedure>u16vector-map  :: F * V [ * V1 ... VN] -> V</procedure><br>
     36<procedure>s32vector-map  :: F * V [ * V1 ... VN] -> V</procedure><br>
     37<procedure>u32vector-map  :: F * V [ * V1 ... VN] -> V</procedure><br>
     38<procedure>f32vector-map  :: F * V [ * V1 ... VN] -> V</procedure><br>
     39<procedure>f64vector-map  :: F * V [ * V1 ... VN] -> V</procedure>
    3040
    31 <procedure>TAGvector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure>
     41<procedure>s8vector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure><br>
     42<procedure>u8vector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure><br>
     43<procedure>s16vector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure><br>
     44<procedure>u16vector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure><br>
     45<procedure>s32vector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure><br>
     46<procedure>u32vector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure><br>
     47<procedure>f32vector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure><br>
     48<procedure>f64vector-foldi :: F * X0 * V [ * V1 ... VN] -> XN</procedure>
    3249
    3350where {{F :: I * V(I) [ * V1(I) ... VN(I)] * AX -> AX}}
    3451
    35 <procedure>TAGvector-mapi  :: F * V [* V1 ... VN] -> V</procedure>
     52
     53<procedure>s8vector-mapi  :: F * V [* V1 ... VN] -> V</procedure><br>
     54<procedure>u8vector-mapi  :: F * V [* V1 ... VN] -> V</procedure><br>
     55<procedure>s16vector-mapi  :: F * V [* V1 ... VN] -> V</procedure><br>
     56<procedure>u16vector-mapi  :: F * V [* V1 ... VN] -> V</procedure><br>
     57<procedure>s32vector-mapi  :: F * V [* V1 ... VN] -> V</procedure><br>
     58<procedure>u32vector-mapi  :: F * V [* V1 ... VN] -> V</procedure><br>
     59<procedure>f32ector-mapi  :: F * V [* V1 ... VN] -> V</procedure><br>
     60<procedure>f64vector-mapi  :: F * V [* V1 ... VN] -> V</procedure>
    3661
    3762where {{F :: I * V(I) [* V1(I) ... VN(I)] -> V}}
    3863
    39 <procedure>TAGvector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure>
     64
     65<procedure>s8vector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure><br>
     66<procedure>u8vector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure><br>
     67<procedure>s16vector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure><br>
     68<procedure>u16vector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure><br>
     69<procedure>s32vector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure><br>
     70<procedure>u32vector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure><br>
     71<procedure>f32vector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure><br>
     72<procedure>f64vector-quick-sort!  :: V * ELT< [ * START * END] -> V</procedure>
    4073
    4174where {{F :: i1 * V(i1) * i2 * V(i2) -> boolean}}
     75
    4276
    4377== Examples
Note: See TracChangeset for help on using the changeset viewer.