// Last edited on 2011-05-07 09:03:31 by stolfi

global_settings{ max_trace_level 10 }

#include "generic_fig.inc"
#include "un4_macros.inc"

#local cut = 2;         // North-south slice.
#local cpos = <0,0,0>;  // Cut through the reactor's axis.

#local view = 2;        // View from east.
#local cam_mag = 0.00;  // We choose {cam_ctr,cam_rad}.
#declare cam_ctr = un4_reactor_axis + 20.800*z;
#declare cam_rad = 55.000;

#local CB = object{ un4_standard_building_cutter(cut,cpos) }
#local CD = object{ un4_standard_drywell_cutter(cut,cpos) }
#local CR = object{ un4_standard_reactor_cutter(cut,cpos) }

#local cw = 0; // Water level inside RPV.
#local dw = 0; // Water level in drywell.
#local sw = 0; // Water level in suppression pool.
#local uw = 0; // Water level in shroud cavity.
#local pw = 0; // Water level in spent-fuel pool.

#local OB = object{ un4_whole(CB,CD,CR,CR,cw,dw,sw,uw,pw) }

generic_fig(OB,view,cam_mag)