
// Unless named starting with GlobalSino, EM, My, Self, the function commands are defined 
//by Gatan DM, please see at link: http://www.globalsino.com/EM/page2597.html


number EMWidth=500, EMHeight=500
Image GlobalSinoImage
if (1) // or you can change it to "if (0)" to see different output image.
 {
  GlobalSinoImage:=ExprSize(EMWidth,EMHeight,sin(irow*icol))  
 }
else 
 {
  GlobalSinoImage:=ExprSize(EMWidth,EMHeight,icol)                                              
 }
showimage(GlobalSinoImage)