home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / octave-1.1.1p1-src.tgz / tar.out / fsf / octave / test / octave.test / global / global-8.m < prev    next >
Text File  |  1996-09-28  |  100b  |  12 lines
  1. 1;
  2. function f ()
  3.   global H = 1;
  4. endfunction
  5. f;
  6. function g ()
  7.   global H;
  8.   H
  9. endfunction
  10. clear H
  11. g
  12.