File: ciftophs.cpp

package info (click to toggle)
clipper 2.1.20130601-2
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 6,812 kB
  • ctags: 4,269
  • sloc: cpp: 26,716; sh: 11,175; makefile: 242; fortran: 41; csh: 18
file content (33 lines) | stat: -rw-r--r-- 676 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
// Clipper test application
/* (C) 2003 Kevin Cowtan */


#include <clipper/clipper.h>
#include <clipper/clipper-phs.h>
#include <clipper/clipper-cif.h>


using clipper::data32::F_sigF;


int main(int argc, char** argv)
{
  clipper::CIFfile ciffile;
  clipper::PHSfile phsfile;

  // make data objects
  clipper::HKL_info wrk_hkl;
  clipper::HKL_data<F_sigF> wrk_fo( wrk_hkl );

  // read data
  ciffile.open_read( argv[1] );
  ciffile.import_hkl_info( wrk_hkl );
  ciffile.import_hkl_data( wrk_fo );
  ciffile.close_read();

  // write data
  phsfile.open_write( argv[2] );
  phsfile.export_hkl_info( wrk_hkl );
  phsfile.import_hkl_data( wrk_fo );
  phsfile.close_read();
}