Changeset 1641


Ignore:
Timestamp:
Dec 9, 2004, 3:21:53 AM (16 years ago)
Author:
orlov
Message:
  • A bit faster version.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • to-imperative/trunk/samples/perm2.rf

    r1640 r1641  
    44
    55$vector V;
    6 $const  Len = 10;
     6$const  Len   = 10;
     7$const  Len-1 = 9;
    78
    89Main =
     
    1112
    1213Perm sN, {
    13   sN : &Len = ;
     14  sN : &Len-1 = ;
    1415//    <PrintLN <Vector-To-Exp &V>>;
    1516  <"+" sN 1> :: sN1,
Note: See TracChangeset for help on using the changeset viewer.