save and load



Excuse,

what can I do for MAXIMA make something like:

if I have two expressions, like:
dog_F:x[1](t);
dog_G:x[1](t)+x[2](t);

and the function (something like that):
SaveSyst(syst,name):=block([],
  syst_F:concat(syst,_F),
  syst_G:concat(syst,_G),
  namesd:concat(name,".sd"),
  save(namesd,syst_F,syst_G));

when I type
SaveSyst(dog,cat);

the function will be create the file "cat.sd" and save
the expressions "dog_F" and "dog_G". It's possible to do?
Because, I do not want create the file "namesd" and I do not
save only the names "syst_F" and "syst_G".


Thanks for your help and time.

Ricardo Cuesta