Meissner examples - the last one to fall

[Dominique Dhumieres]

> > and the program Array_List.f90 (use compound.txt) does not give the right
> > result.
>
> I'll take a look tonight.

The other compilers I have used (g95, Intel, and Portland group) gives:

...
  Found at   18  of  25 : sodium chloride          7
  Found at   18  of  25 : sodium chloride          8
  Insert at  14  of  26 : iron (II) sulfide       
  Insert at  17  of  27 : lead (II) nitrate       
  Found at   15  of  27 : iron (III) chloride      1
  Insert at  20  of  28 : sodium bromide          
  Final size:  28
 1  aluminum hydroxide      
 1  barium chloride         
 1  barium sulfate          
...
 9  sodium chloride         
 1  sodium hydrogen sulfate 
 2  sodium hydroxide        
 1  sodium peroxide         
 1  sodium sulfate          
 3  sulfuric acid           
 1  water                   
 2  zinc oxide              

The latest snapshot gives

...
  Found at            28  of           37 : sodium chloride                    1
  Found at            28  of           37 : sodium chloride                    2
  Insert at           28  of           38 : iron (II) sulfide       
  Insert at           34  of           39 : lead (II) nitrate       
  Insert at           20  of           40 : iron (III) chloride     
  Insert at           20  of           41 : sodium bromide          
  Final size:           41
           1  zinc oxide              
           1  sulfuric acid           
           1  carbon monoxide         
...
           1  sulfuric acid           
           1  sodium sulfate          
           1  lead (II) nitrate       
           1  zinc oxide              
           1  sodium peroxide         
           1  sodium hydrogen sulfate 
           1  water                   
           1  hydrogen peroxide       

Although I must confess that I did not look in detail to the code,
the majority rule seems to work:

[karma] f90/Meissner% grep "sodium chloride" compound.txt

returns 9 instances.

Good luck and thanks for the ising.dat example.

Dominique