//
// time: Fri Aug 30 15:47:53 1996
//
// version: 3.0.0 (format), 3.1.2 (DX)
//
//
// Begin MDF
// MODULE MoveToOrigin
// CATEGORY Realization
// DESCRIPTION Moves an object so that the bottom edge of the bounding box is at zero
// INPUT object; field; (none);  
// OUTPUT output_1; object;  
// End MDF
//
// comment: MoveToOrigin
// comment: -----------
// comment: 
// comment: (C) Duncan Galloway 1996
// comment: duncang@ibm590.aims.gov.au
// comment: 
// comment: This macro simply moves an object to the origin.
// workspace: width = 259, height = 743
// layout: snap = 0, width = 50, height = 50, align = UL
//
macro MoveToOrigin(
 object
) -> (
 output_1
) {
    // 
    // node Input[45]: x = 177, y = 28, inputs = 0, label = Input
    // parameter: position = 1, name = 'object', value = ' ', descriptive = 0, description = ' ', required = 1, visible = 1
    //
MoveToOrigin_Input_45_out_1 = object;
    // 
    // node ShowBox[2]: x = 172, y = 125, inputs = 1, label = ShowBox
    //
MoveToOrigin_ShowBox_2_out_1,
MoveToOrigin_ShowBox_2_out_2 = 
    ShowBox(
    MoveToOrigin_Input_45_out_1
    ) [instance: 2, cache: 1];
    // 
    // node Mark[10]: x = 177, y = 219, inputs = 2, label = Mark
    // input[2]: defaulting = 0, visible = 1, type = 32, value = "positions"
    //
MoveToOrigin_Mark_10_out_1 = 
    Mark(
    MoveToOrigin_ShowBox_2_out_1,
    "positions"
    ) [instance: 10, cache: 1];
    // 
    // node Compute[91]: x = 182, y = 306, inputs = 2, label = Compute
    // input[1]: defaulting = 0, visible = 0, type = 32, value = "$0.y"
    // expression: value = a.y
    // name[2]: value = a
    //
MoveToOrigin_Compute_91_out_1 = 
    Compute(
    "$0.y",
    MoveToOrigin_Mark_10_out_1
    ) [instance: 91, cache: 1];
    // 
    // node Statistics[16]: x = 180, y = 394, inputs = 1, label = Statistics
    // output[1]: visible = 0
    // output[2]: visible = 0
    // output[3]: visible = 0
    // output[5]: visible = 0
    //
MoveToOrigin_Statistics_16_out_1,
MoveToOrigin_Statistics_16_out_2,
MoveToOrigin_Statistics_16_out_3,
MoveToOrigin_Statistics_16_out_4,
MoveToOrigin_Statistics_16_out_5 = 
    Statistics(
    MoveToOrigin_Compute_91_out_1
    ) [instance: 16, cache: 1];
    // 
    // node Compute[92]: x = 189, y = 486, inputs = 2, label = Compute
    // input[1]: defaulting = 0, visible = 0, type = 32, value = "[0,-$0,0]"
    // expression: value = [0,-a,0]
    // name[2]: value = a
    //
MoveToOrigin_Compute_92_out_1 = 
    Compute(
    "[0,-$0,0]",
    MoveToOrigin_Statistics_16_out_4
    ) [instance: 92, cache: 1];
    // 
    // node Translate[1]: x = 152, y = 589, inputs = 2, label = Translate
    //
MoveToOrigin_Translate_1_out_1 = 
    Translate(
    MoveToOrigin_Input_45_out_1,
    MoveToOrigin_Compute_92_out_1
    ) [instance: 1, cache: 1];
    // 
    // node Output[8]: x = 161, y = 680, inputs = 1, label = Output
    // parameter: position = 1, name = 'output_1', value = ' ', descriptive = 0, description = ' ', required = 0, visible = 1
    //
output_1 = MoveToOrigin_Translate_1_out_1;
// network: end of macro body
}
MoveToOrigin_Input_45_out_1 = NULL;
MoveToOrigin_ShowBox_2_out_1 = NULL;
MoveToOrigin_Mark_10_out_1 = NULL;
MoveToOrigin_Compute_91_out_1 = NULL;
MoveToOrigin_Statistics_16_out_4 = NULL;
MoveToOrigin_Compute_92_out_1 = NULL;
MoveToOrigin_Translate_1_out_1 = NULL;