Changeset 25596 in project
 Timestamp:
 11/28/11 14:49:57 (9 years ago)
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

wiki/eggref/4/srfi4utils
r20221 r25596 19 19 === Procedures 20 20 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>TAGvectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure> 21 <procedure>s8vectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure><br> 22 <procedure>u8vectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure><br> 23 <procedure>s16vectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure><br> 24 <procedure>u16vectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure><br> 25 <procedure>s32vectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure><br> 26 <procedure>u32vectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure><br> 27 <procedure>f32vectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure><br> 28 <procedure>f64vectorfold :: F * X0 * V [* V1 ... VN] > XN</procedure> 26 29 27 30 where {{F :: V(I) [ * V1(I) ... VN(I)] * AX > AX}} 28 31 29 <procedure>TAGvectormap :: F * V [ * V1 ... VN] > V</procedure> 32 <procedure>s8vectormap :: F * V [ * V1 ... VN] > V</procedure><br> 33 <procedure>u8vectormap :: F * V [ * V1 ... VN] > V</procedure><br> 34 <procedure>s16vectormap :: F * V [ * V1 ... VN] > V</procedure><br> 35 <procedure>u16vectormap :: F * V [ * V1 ... VN] > V</procedure><br> 36 <procedure>s32vectormap :: F * V [ * V1 ... VN] > V</procedure><br> 37 <procedure>u32vectormap :: F * V [ * V1 ... VN] > V</procedure><br> 38 <procedure>f32vectormap :: F * V [ * V1 ... VN] > V</procedure><br> 39 <procedure>f64vectormap :: F * V [ * V1 ... VN] > V</procedure> 30 40 31 <procedure>TAGvectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure> 41 <procedure>s8vectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure><br> 42 <procedure>u8vectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure><br> 43 <procedure>s16vectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure><br> 44 <procedure>u16vectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure><br> 45 <procedure>s32vectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure><br> 46 <procedure>u32vectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure><br> 47 <procedure>f32vectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure><br> 48 <procedure>f64vectorfoldi :: F * X0 * V [ * V1 ... VN] > XN</procedure> 32 49 33 50 where {{F :: I * V(I) [ * V1(I) ... VN(I)] * AX > AX}} 34 51 35 <procedure>TAGvectormapi :: F * V [* V1 ... VN] > V</procedure> 52 53 <procedure>s8vectormapi :: F * V [* V1 ... VN] > V</procedure><br> 54 <procedure>u8vectormapi :: F * V [* V1 ... VN] > V</procedure><br> 55 <procedure>s16vectormapi :: F * V [* V1 ... VN] > V</procedure><br> 56 <procedure>u16vectormapi :: F * V [* V1 ... VN] > V</procedure><br> 57 <procedure>s32vectormapi :: F * V [* V1 ... VN] > V</procedure><br> 58 <procedure>u32vectormapi :: F * V [* V1 ... VN] > V</procedure><br> 59 <procedure>f32ectormapi :: F * V [* V1 ... VN] > V</procedure><br> 60 <procedure>f64vectormapi :: F * V [* V1 ... VN] > V</procedure> 36 61 37 62 where {{F :: I * V(I) [* V1(I) ... VN(I)] > V}} 38 63 39 <procedure>TAGvectorquicksort! :: V * ELT< [ * START * END] > V</procedure> 64 65 <procedure>s8vectorquicksort! :: V * ELT< [ * START * END] > V</procedure><br> 66 <procedure>u8vectorquicksort! :: V * ELT< [ * START * END] > V</procedure><br> 67 <procedure>s16vectorquicksort! :: V * ELT< [ * START * END] > V</procedure><br> 68 <procedure>u16vectorquicksort! :: V * ELT< [ * START * END] > V</procedure><br> 69 <procedure>s32vectorquicksort! :: V * ELT< [ * START * END] > V</procedure><br> 70 <procedure>u32vectorquicksort! :: V * ELT< [ * START * END] > V</procedure><br> 71 <procedure>f32vectorquicksort! :: V * ELT< [ * START * END] > V</procedure><br> 72 <procedure>f64vectorquicksort! :: V * ELT< [ * START * END] > V</procedure> 40 73 41 74 where {{F :: i1 * V(i1) * i2 * V(i2) > boolean}} 75 42 76 43 77 == Examples
Note: See TracChangeset
for help on using the changeset viewer.