Fixed incorrect setting of variable names in tsc action.

actions/actiontsc.h

@@ -79,7 +79,7 @@ template<class D> MString ActionTSC::DoAction(const CLArgs& args, D& ds)
  {
   if(!data[i].Unit().Exist()) michlib::errmessage("Unknown measurement unit for variable " + vnames[i] + "!");
   if(!data[i].StandartName().Exist()) data[i].SetStandartName(NCFuncs::Name2StName(vnames[i]));
-  if(!data[i].LongName().Exist()) data[i].SetStandartName(NCFuncs::Name2LongName(vnames[i]));
+  if(!data[i].LongName().Exist()) data[i].SetLongName(NCFuncs::Name2LongName(vnames[i]));
  }
 
  MString name   = args.contains("out") ? args.at("out") : "out.bin";

src/ncfuncs.cpp

@@ -147,6 +147,20 @@ MString NCFuncs::Name2StName(const MString& name)
 
 MString NCFuncs::Name2LongName(const MString& name)
 {
+ if(name == "ptemp") return "Potential temperature";
+ if(name == "temp") return "Temperature";
+ if(name == "sal") return "Salinity";
+ if(name == "mld") return "Mixed layer depth";
+ if(name == "ssh") return "Sea surface height";
+ if(name == "u") return "X-velocity";
+ if(name == "v") return "Y-velocity";
+ if(name == "w") return "Z-velocity";
+ if(name == "chl") return "Concentration of chlorophyll";
+ if(name == "NO3") return "Concentration of nitrates";
+ if(name == "prprod") return "Primary production";
+ if(name == "Cchl") return "Concentration of chlorophyll carbon";
+ if(name == "PO4") return "Concentration of phosphates";
+ if(name == "Si") return "Concentration of silicates";
  if(name == "U") return "Module of horizontal velocity";
  if(name == "U2") return "Squared horizontal velocity";
  return "";