File: screening.cc

package info (click to toggle)
simrisc 16.05.00-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 4,568 kB
  • sloc: cpp: 6,877; fortran: 665; makefile: 112; ansic: 112; sh: 107
file content (35 lines) | stat: -rw-r--r-- 913 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
35
#define XERR "loop"
#include "loop.ih"

extern size_t g_caseIdx;

    // by gencases.cc

void Loop::screening()
{
    if (d_status == PRESENT and d_nRounds > 0)
        g_log << "\nLoop::screening starts\n";

        // d_round is a data member: available in all of Loop's members
    for (d_round = 0; d_status == PRESENT and d_round != d_nRounds; ++d_round)
    {
        double screeningAge = d_screening.roundAge(d_round);

        g_log << __FILE__ << " screening round " << d_round << " at age " <<
                screeningAge << '\n';
        
        if (leaving(screeningAge))      // the case died or detected a tumor
            return;

        screen(screeningAge);           // perform the screening
    }
}


//if (g_caseIdx == 102)
//xerr("screening " << g_caseIdx << " at age " << screeningAge);


//if (g_caseIdx == 102)
//xerr("screening " << g_caseIdx << " LEAVES at age " << screeningAge);