Subroutine PUT_DOUBLE
Stores values into array.
Calling convention:
call put_double(iarr,iel,val,pntr)
            | Arguments | Data type | Input/Output | Description | 
|---|---|---|---|
iarr | 
                            Integer | Call | Array number (between 2001 and 2500). | 
iel | 
                            Integer | Call | The number of memory locations allocated to array number iarr. | 
                        
val | 
                            Double precision | Call | Stored value into array iarr at location iel. | 
                        
pntr | 
                            Pointer | Return | Pointer to the array iarr. pntr is a pointer in the calling routine. | 
                        
