Changeset 11 in TRACY3 for trunk/tracy/tracy/src/prtmfile.cc

Timestamp:

Oct 21, 2013, 10:40:43 AM (11 years ago)

Author:

zhangj

Message:

 

File:

• trunk/tracy/tracy/src/prtmfile.cc (modified) (2 diffs)

trunk/tracy/tracy/src/prtmfile.cc

@@ -153 +153 @@
 
  Purpose:
- Print out flatfile
+ Print out flatfile;
+ print the lattice parameters in an external file.
 
  Input:
@@ -181 +182 @@
             Cell[i].dS[Y_], Cell[i].Elem.M->PdTpar, Cell[i].Elem.M->PdTsys
                 + Cell[i].Elem.M->PdTrms * Cell[i].Elem.M->PdTrnd);
-        fprintf(mfile, " %23.16e %23.16e %23.16e %23.16e %23.16e\n",
+        fprintf(mfile, " %23.16e %23.16e %23.16e %23.16e %23.16e  %23.16e %23.16e\n",
             Cell[i].Elem.PL, Cell[i].Elem.M->Pirho, Cell[i].Elem.M->PTx1,
-            Cell[i].Elem.M->PTx2, Cell[i].Elem.M->Pgap);
+            Cell[i].Elem.M->PTx2, Cell[i].Elem.M->PH1,Cell[i].Elem.M->PH2,Cell[i].Elem.M->Pgap);
         prtHOM(mfile, Cell[i].Elem.M->n_design, Cell[i].Elem.M->PB,
             Cell[i].Elem.M->Porder);