Mathematica不能识别一个计算矿物化学式的软件？

hedgehog2012

各位好！我下载了一个关于矿物化学成分软件是基于Mathematica软件的，之前我有一点学习VB语言的基础，在用软件的过程中，可能是一个调用“B88”总是显示红色，不知是不是这个Mathematica软件不识别我下载的这个矿物化学成分计算软件：
, g+ I- a. Z$ r1 C# [0 X
(* This notebook contains examples for the PET-functions
-CalcFormula- calculate mineral formulae (and mole fractions)
-TransformDatFile- transform microprobe data-files (JEOL_JX \
8600) to PET-readable format
-MakeAnalysisTable- make a usual table of mineralchemical \
+ u$ g8 {. ]4 j! P* J* m  janalyses (wt.% and formula units) *)
(* This top-cell must be run once before any example can be \
# e$ o8 v2 W: x& d* O0 vperformed. *)

+ h  s7 U+ ?/ I1 O/ |(* Define the directory, where the PET-files reside (e.g. C:\Eigene \
: m) }& k, J5 `: ]/ ODateien\Pet) and load PET. *)
- v3 {7 z7 ?7 c+ T1 G$PetDirectory = "C:\Eigene Dateien\Pet";
SetDirectory[$PetDirectory];
DeclarePackage["DEFDAT`", {"Dataset"}];
Dataset[Dataset -> B88];
5 \+ J0 g0 F; p

" u6 r( {8 f( X7 d6 E
+ O  E$ o: B4 N  k/ M* l

另一个相关的“DEFDAT”:
! A% `! s! v9 t# F(* Name: DEFDAT`
( o7 W2 n) O+ m. mpackage of PET: Petrological Elementary Tools
Computers & Geoscience 24:219-235 *)

(* Summary: this package declares various PET-functions *)
. L- o8 a, g$ T# `
(* Author: Edgar Dachs, Department of Mineralogy
University of Salzburg, Austria
email: edgar.dachs@sbg.ac.at
- B. L8 w/ _( P' S5 V# p2 q2 Alast update: 11-2002 *)

BeginPackage["DEFDAT`"]

Dataset::usage = "Dataset[Dataset-> ...] selects the thermodynamic dataset to be used.\n\n
: q1 [$ o. r& C8 q, _. lThe following data sets are available, loaded with:\n\n
Berman (1988) J Petrol 29:445-522 Dataset[Dataset -> B88]\n
3 `$ ~5 S& ]$ q2 _Holland & Powell (1998) J metam Geol 16:309-343 Dataset[Dataset -> HP31], or\n
Dataset[Dataset -> HP32]\n
Gottschalk (1997) Eur J Mineral 9:175-223 Dataset[Dataset -> G97]\n\n
; n1 U5 M& Y: A( h6 R9 Y& {, P  ISee G::usage for more details.\n
% g" e% g% q! E8 Y+ g5 w0 o4 j\"31\" or \"32\" following \"HP\" indicates that the thermodynamic data have been\n
( T) l: l  D' ?$ K6 Rconverted from THERMOCALC-versions 3.1 or 3.2 of Holland & Powell respectively.\n
6 T/ v3 Q, q/ I" MWhen you start PET, a subdirectory \"/work\" is created by default, from which all user-files\n
(e.g. mineralchemical data files) are read and all files produced by PET are written to.\n
7 x* j, b6 f9 H4 vTo create a new subdirectory for that purpose, you can use the option:\n
WorkDirectory -> \"/directory_name\"\n
Example: Dataset[Dataset -> B88, WorkDirectory -> \"sample_xy\"]\n
This loads PET with the Berman data set and reads/writes all user files from/to the\n
subdirectory named \"sample_xy\".\n
Called from: User.\n
% J9 b9 x$ G" |0 p* y9 d; }Package name: DEFDAT.m\n
PET: Petrological Elementary Tools, (c) Edgar Dachs."
4 u) Q  ?/ L1 ?