ccp4io_adaptbx/ccp4_other_fem.hpp at master · cctbx/ccp4io_adaptbx · GitHub

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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
#ifndef CCP4IO_ADAPTBX_CCP4_OTHER_FEM_HPP
#define CCP4IO_ADAPTBX_CCP4_OTHER_FEM_HPP

#include <fem.hpp> // Fortran EMulation library of fable module

namespace ccp4_other_fem {

using namespace fem::major_types;

inline
bool
vaxvms()
{
  return false;
}

inline
void
ugerr(
  int const& /*status*/,
  str_ref errstr)
{
  throw TBXX_NOT_IMPLEMENTED();
}

inline
void
ccp4h_summary_beg()
{
}

inline
void
ccp4h_summary_end()
{
}

inline
void
ubytes(
  int& inum,
  str_ref string)
{
  inum = 4;
  string = "BYTES";
}

inline
void
ugtenv(
  str_cref namenv,
  str_ref valenv)
{
  fem::getenv(namenv, valenv);
}

inline
void
imsiz(
  str_cref /* odfile */,
  int& nrec,
  int& iylen)
{
  throw TBXX_NOT_IMPLEMENTED();
}

inline
void
readpack_word(
  arr_ref<fem::integer_star_2> datapack,
  str_cref /* filn */)
{
  throw TBXX_NOT_IMPLEMENTED();
}

} // namespace ccp4_other_fem

#endif // GUARD