【HeapPush2D】

1. inputs:
   
2.         MyArray[ MaxSize1, MaxSize2 ]( numericarray ),  
   
3.         int ColIndx3( numericref ),
   
4.         int Size( numericsimple ),
   
5.         int Order( numericsimple ) ;                                    
   
6. 
   
7. variables:
   
8.         int var0( 0 ) ;
   
9. 
   
10. if Order = -1 then
    
11.         begin
    
12.         if ColIndx3 < Size then
    
13.                 begin
    
14.                 var0 = ColIndx3 + 1 ;
    
15.                 condition1 = MyArray[ 1, var0 ] > MyArray[ 1, ColIndx3 ] ;
    
16.                 if condition1 then
    
17.                         ColIndx3 = var0 ;
    
18.                 end ;
    
19.         HeapPush2D = ( MyArray[ 1, 0 ] < MyArray[ 1, ColIndx3 ] ) ;
    
20.         end
    
21. else if Order = 1 then
    
22.         begin
    
23.         if ColIndx3 < Size then
    
24.                 begin
    
25.                 var0 = ColIndx3 + 1 ;
    
26.                 condition1 = MyArray[ 1, var0 ] < MyArray[ 1, ColIndx3 ] ;
    
27.                 if condition1 then
    
28.                          ColIndx3 =        var0 ;
    
29.                 end ;
    
30.         HeapPush2D = ( MyArray[ 1, 0 ] > MyArray[ 1, ColIndx3 ] ) ;
    
31.         end
    
32. else
    
33.         RaiseRunTimeError( "Order input must be -1 or 1." ) ;

复制代码