function mtt_write(t,x,y,nx,ny,first);

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.5  2001/03/30 15:13:58  gawthrop
## Rationalised simulation modes to each return mtt_data
##
## Revision 1.4  1999/03/15 23:05:29  peterg
## A complete rewrite - now puts into a Global matrix MTT_data
##
## Revision 1.3  1999/03/15 21:57:00  peterg
## Removed the # symbol
##
###############################################################

global MTT_data
  if (t==0.0)
    MTT_data=[];
  endif

  if (t>= first)
    MTT_data = [MTT_data; t,y',t,x'];
  endif
  
endfunction