home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / prgramer / adaptor / examples / dalib / hostnode / to.f < prev   
Encoding:
Text File  |  1993-03-23  |  146 b   |  10 lines
  1.       program transfer
  2.  
  3.       integer a(10), ha(10)
  4. cmf$  layout ha(:host)
  5.  
  6.       call cmf_random (a,10)
  7.       ha = a
  8.       print *, ha
  9.       end
  10.