macro gh [1] [2]
*
 for/file 66 [2].eps
 gra/meta 66 -113
 ht [1] colz
 close 66
* 
 return