Create a two-dimensional array at runtime: Difference between revisions
Content added Content deleted
No edit summary |
|||
| Line 354: | Line 354: | ||
<lang haskell> doit n m = a!(0,0) where a = array ((0,0),(n,m)) [((0,0),42)]</lang> |
<lang haskell> doit n m = a!(0,0) where a = array ((0,0),(n,m)) [((0,0),42)]</lang> |
||
=={{header|HicEst}}== |
|||
<lang hicest>REAL :: array(1) |
|||
DLG(NameEdit=rows, NameEdit=cols, Button='OK', TItle='Enter array dimensions') |
|||
ALLOCATE(array, cols, rows) |
|||
array(1,1) = 1.234 |
|||
WRITE(Messagebox, Name) array(1,1) </lang> |
|||
=={{header|IDL}}== |
=={{header|IDL}}== |
||