;----------------------------------------------------------------- ; cmul_arr.pro ; ; written by Andreas Reigber ;------------------------------------------------------------------ ; Generates a new 2D array out of two given 1D arrays. The result ; is an multipicative overlay of the two input arrays, which define ; the shape in x and y direction. ; ; Usage: ; res = cmul_arr(arr1,arr2) ; ;------------------------------------------------------------------ ; This software has been released under the terms of the GNU Public ; license. See http://www.gnu.org/copyleft/gpl.html for details. ;------------------------------------------------------------------ function cmul_arr,arr1,arr2 s1 = (size(arr1))[1] s2 = (size(arr2))[1] res1 = (fltarr(s2) + 1) ## arr1 res2 = arr2 ## (fltarr(s1) + 1) return,res1*res2 end