https://github.com/geodynamics/citcoms
Raw File
Tip revision: 365487241b962a4c2bba472af24d581b81d96c80 authored by Eh Tan on 27 March 2007, 04:40:15 UTC
Tag for v2.2.1
Tip revision: 3654872
RTFtoXYZ2D.net
//
// time: Tue Sep 21 21:24:21 2004
//
// version: 3.2.0 (format), 4.3.2 (DX)
//
//
// Begin MDF
// MODULE RTFtoXYZ2D
// CATEGORY Macros
// DESCRIPTION new macro
// INPUT input_1; field; (no default);  
// OUTPUT output_1; field;  
// End MDF
// workspace: width = 79, height = 362
// layout: snap = 0, width = 50, height = 50, align = NN
//
macro RTFtoXYZ2D(
 input_1
) -> (
 output_1
) {
    // 
    // node Input[19]: x = 0, y = 0, inputs = 0, label = Input
    // parameter: position = 1, name = 'input_1', value = ' ', descriptive = 0, description = ' ', required = 0, visible = 1
    //
RTFtoXYZ2D_Input_19_out_1 = input_1;
    // 
    // node Mark[11]: x = 10, y = 80, inputs = 2, label = Mark
    // input[2]: defaulting = 0, visible = 1, type = 32, value = "positions"
    //
RTFtoXYZ2D_Mark_11_out_1[cache: 0] = 
    Mark(
    RTFtoXYZ2D_Input_19_out_1,
    "positions"
    ) [instance: 11, cache: 1];
    // 
    // node Compute[70]: x = 0, y = 148, inputs = 2, label = RTF to XYZ
    // input[1]: defaulting = 0, visible = 0, type = 32, value = "[sin($0.x)*cos($0.y), sin($0.x)*sin($0.y), cos($0.x)]"
    // expression: value = [sin(positions.x)*cos(positions.y), sin(positions.x)*sin(positions.y), cos(positions.x)]
    // name[2]: value = positions
    //
RTFtoXYZ2D_Compute_70_out_1[cache: 0] = 
    Compute(
    "[sin($0.x)*cos($0.y), sin($0.x)*sin($0.y), cos($0.x)]",
    RTFtoXYZ2D_Mark_11_out_1
    ) [instance: 70, cache: 1];
    // 
    // node Unmark[11]: x = 19, y = 220, inputs = 2, label = Unmark
    //
RTFtoXYZ2D_Unmark_11_out_1 = 
    Unmark(
    RTFtoXYZ2D_Compute_70_out_1,
    NULL
    ) [instance: 11, cache: 1];
    // 
    // node Output[14]: x = 0, y = 300, inputs = 1, label = Output
    // parameter: position = 1, name = 'output_1', value = ' ', descriptive = 0, description = ' ', required = 0, visible = 1
    //
output_1 = RTFtoXYZ2D_Unmark_11_out_1;
// network: end of macro body
}
RTFtoXYZ2D_Input_19_out_1 = NULL;
RTFtoXYZ2D_Mark_11_out_1 = NULL;
RTFtoXYZ2D_Compute_70_out_1 = NULL;
RTFtoXYZ2D_Unmark_11_out_1 = NULL;
back to top