File: group.f

package info (click to toggle)
simrisc 16.06.00-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 4,568 kB
  • sloc: cpp: 6,889; fortran: 669; makefile: 112; ansic: 112; sh: 107
file content (34 lines) | stat: -rw-r--r-- 646 bytes parent folder | download
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
inline Group::Group(Series series)
:
    d_series(series)
{}

    // by probgroup.f (begin())
inline double Group::begin() const
{
    return d_begin;
}

    // by probgroup.f (end())
inline double Group::end() const
{
    return d_end;
}

template <HasGroup Type>
bool Group::nextRange(std::vector<Type> const &vect) const
{
    return  vect.empty()                    // no Type elements yet
            or
            connects(vect.back().group());
}

inline std::istream &operator>>(std::istream &in, Group &group)
{
    return group.extract(in);
}

inline bool operator!=(Group const &lhs, Group const &rhs)
{
    return not (lhs == rhs);
}