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

hedgehog2012

各位好！我下载了一个关于矿物化学成分软件是基于Mathematica软件的，之前我有一点学习VB语言的基础，在用软件的过程中，可能是一个调用“B88”总是显示红色，不知是不是这个Mathematica软件不识别我下载的这个矿物化学成分计算软件：

+ u" a5 G! f, Y" J8 H(* This notebook contains examples for the PET-functions
-CalcFormula- calculate mineral formulae (and mole fractions)
-TransformDatFile- transform microprobe data-files (JEOL_JX \
( s: p8 s7 H1 Q7 T( v1 g4 s- Z  ]3 W8600) to PET-readable format
% g2 G# b' s/ x% g8 P. ^-MakeAnalysisTable- make a usual table of mineralchemical \
! }" M4 T! q5 y/ C1 Nanalyses (wt.% and formula units) *)
(* This top-cell must be run once before any example can be \
1 B3 D( _0 {: h, pperformed. *)
' {9 r4 w$ W% C
(* Define the directory, where the PET-files reside (e.g. C:\Eigene \
Dateien\Pet) and load PET. *)
$PetDirectory = "C:\Eigene Dateien\Pet";
0 F5 b( }" o2 @9 |! KSetDirectory[$PetDirectory];
$ |& L6 N. m, b% iDeclarePackage["DEFDAT`", {"Dataset"}];
Dataset[Dataset -> B88];
1 D! U! l* I4 _) x: v) x! n: c7 K

9 L: S, M( p* \+ a


8 h% }; w8 D4 X; m另一个相关的“DEFDAT”:
6 C" K! n  G( G5 L, T+ V: q(* Name: DEFDAT`
  I! ?- m) o- }6 f1 S' z$ S1 {package of PET: Petrological Elementary Tools
2 H; [' E3 V' T5 UComputers & Geoscience 24:219-235 *)
+ s, H' e$ L6 w( m1 Q( v) _
(* Summary: this package declares various PET-functions *)

(* Author: Edgar Dachs, Department of Mineralogy
University of Salzburg, Austria
, K5 j9 k% t+ H$ T" d) wemail: edgar.dachs@sbg.ac.at
  \' F( C: k  h# g, ~last update: 11-2002 *)
% b6 L' c& I) B
BeginPackage["DEFDAT`"]
/ u) g/ R" y' k+ J! S
Dataset::usage = "Dataset[Dataset-> ...] selects the thermodynamic dataset to be used.\n\n
The following data sets are available, loaded with:\n\n
& J. z/ ]8 l1 q# KBerman (1988) J Petrol 29:445-522 Dataset[Dataset -> B88]\n
Holland & Powell (1998) J metam Geol 16:309-343 Dataset[Dataset -> HP31], or\n
Dataset[Dataset -> HP32]\n
$ n2 f' b1 e' \+ u' W; NGottschalk (1997) Eur J Mineral 9:175-223 Dataset[Dataset -> G97]\n\n
See G::usage for more details.\n
\"31\" or \"32\" following \"HP\" indicates that the thermodynamic data have been\n
converted from THERMOCALC-versions 3.1 or 3.2 of Holland & Powell respectively.\n
) S9 R; ^3 G" N. zWhen you start PET, a subdirectory \"/work\" is created by default, from which all user-files\n
1 [& t5 n( K) X6 q7 k(e.g. mineralchemical data files) are read and all files produced by PET are written to.\n
) g/ z" o: i; M0 N1 iTo create a new subdirectory for that purpose, you can use the option:\n
WorkDirectory -> \"/directory_name\"\n
+ J( U% z: J( L, ?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
! M- k% w/ k7 h' p, E2 d3 O% [subdirectory named \"sample_xy\".\n
Called from: User.\n
7 u) j) q" J& N# EPackage name: DEFDAT.m\n
9 s, \8 z1 @5 N8 C9 nPET: Petrological Elementary Tools, (c) Edgar Dachs."