`load'
------

load("FILENAME")
     :: FILENAME $@$rFI$_9~$`(J.

RETURN
     (1|0)
FILENAME
     $@%U%!%$%kL>(J ($@%Q%9L>(J)

   * $@<B:]$N%W%m%0%i%`$N=q$-J}$O(J, *Note $@%f!<%68@8l(J Asir::.
      $@%F%-%9%H%U%!%$%k$rFI$_9~$`>l9g(J, `cpp' $@$rDL$9$N$G(J, C $@$N%W%m%0%i%`(J
     $@F1MM(J `#include', `#define' $@$r;H$&$3$H$,$G$-$k(J.
   * $@;XDj$7$?%U%!%$%k$,B8:_$7$?;~$K$O(J 1 $@$rJV$7(J, $@B8:_$7$J$+$C$?;~$O(J 0 
     $@$rJV$9(J.
   * $@%U%!%$%kL>$,(J `/' $@$G;O$^$k>l9g$O@dBP%Q%9(J, `.' $@$G;O$^$k>l9g$O%+%l%s(J
     $@%H%G%#%l%/%H%j$+$i$NAjBP%Q%9$H8+$J$5$l$k(J. $@$=$l0J30$N>l9g(J, $@4D6-JQ(J
     $@?t(J `ASIRLOADPATH' $@$K@_Dj$5$l$F$$$k%G%#%l%/%H%j$r:8$+$i=g$K%5!<%A(J
     $@$9$k(J. $@$=$l$i$K3:Ev$9$k%U%!%$%k$,B8:_$7$J$$>l9g(J, $@I8=`%i%$%V%i%j%G%#(J
     $@%l%/%H%j(J ($@$"$k$$$O4D6-JQ?t(J `ASIR_LIBDIR' $@$K@_Dj$5$l$F$$$k%G%#%l%/(J
     $@%H%j(J) $@$b%5!<%A$9$k(J.

   * $@FI$_9~$`%U%!%$%k$N:G8e$K(J, `end$' $@$,$J$$$H(J `load()' $@=*N;8e$K%W%m%s(J
     $@%W%H$,$G$J$$$,(J, $@<B:]$K$OF~NO$r<u$1IU$1$k(J. $@$7$+$7(J, $@:.Mp$r>7$/$*$=(J
     $@$l$,$"$k$N$G%U%!%$%k$N:G8e$K(J `end$' $@$r=q$$$F$*$/$3$H$,K>$^$7$$(J. 
     (`end;' $@$G$b$h$$$,(J, `end' $@$,JV$9CM(J 0 $@$,I=<($5$l$k$?$a(J, `end$' $@$r(J
     $@$*4+$a$9$k(J. )

$@;2>H(J
     `end', `which'

