`bsave', `bload'
----------------

bsave(OBJ,"FILENAME")
     :: FILENAME  OBJ oCi`ŏ.
bsave("FILENAME")
     :: FILENAME 琔oCi`œǂݍ.

RETURN
     `bsave()' : 1, `bload()' : ǂݍ񂾐
OBJ
     `, W܂܂ȂCӂ̐
FILENAME
     t@C

   * `bsave()' ͓`قڂ̂܂܃oCi`Ńt@Cɏ
     . `bload()' , `bsave()' ŏ񂾐ǂݍœ`
     ɕϊ. ݂̃Cve[V̐ɂ, `, 
     W (`vtype()' Q) ܂܂ȂXg, zȂǂ܂ޔCӂ
     t@Cɕۑ邱Ƃł.
   * `output()' Ȃǂŕۑꍇ, ǂݍݎɃp[UN邪,
     `bsave()' ŕۑ̂ `bload()' œǂޏꍇ, ړ`\
     ł邽, ԓI, ԓIɌ悢.
   * ̏ꍇ, ݎƓǂݍݎŕϐقȂꍇ
     , ̏ꍇɂ, IɌ݂̕ϐɂ`ɕϊ
     .

     [0] A=(x+y+z+u+v+w)^20$
     [1] bsave(A,"afo");
     1
     [2] B = bload("afo")$
     [3] A == B;
     1
     [4] X=(x+y)^2; 
     x^2+2*y*x+y^2
     [5] bsave(X,"afo")$
     [6] quit;
     % asir
     [0] ord([y,x])$    
     [1] bload("afo");
     y^2+2*x*y+x^2

Q
     `output'

