Re: print and get procedures
- Posted by evanmars Jan 28, 2011
- 1327 views
This works for me:
include get.e sequence seq1 = "abc", seq2 = "def", seq3 = "ghi" atom fn = open("Test.txt","w") print(fn,seq1) puts(fn,' ') --white space necessary print(fn,seq2) puts(fn,'\n') --white space print(fn,seq3) close(fn) fn = open("Test.txt","r") sequence s1 = get(fn), s2 = get(fn), s3 = get(fn) print(1,s1) puts(1,'\n') print(1,s2) puts(1,'\n') print(1,s3)