(*************************  filename: nbsolveABR0.m  *************************)

(*****************************************************************************)
(*                                                                           *)
(*  This Mathematica program takes the user input Apos, Azero, or Aneg and   *)
(*  reads into the Mathematica session the appropriate program file.         *)
(*                                                                           *)
(*****************************************************************************)

Switch[Atype, Apos, <<nbsolveAposBR0.m,
              Azero, <<nbsolveAzeroBR0.m,
              Aneg, <<nbsolveAnegBR0.m]

(************************  End of file nbsolveABR0.m  ************************)
