Why wont get() read this sequence from file?

new topic     » topic index » view thread      » older message » newer message

Hi Everyone,

I have been pulling my hair out trying to figure out why get() won't load this sequence from file. I copied it into a an editor and the brackets seem to be OK. Any ideas? Thanks!

{ 
 
    "3DX Format V1", 
    1, 
    { 
      1, 
      "glassquartz.BMP", 
 
    }, 
    {"Transform_161", 161,  
 
            { 
            { 1.00E+00, 0.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 1.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 1.00E+00, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 0.00E+00, 1.00E+00} 
            }, 
    {"Transform_162", 162,  
 
        { 
            { 1.00E+00, 0.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 1.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 1.00E+00, 0.00E+00}, 
            { 5.00E+00, 1.00E+00, 0.00E+00, 1.00E+00} 
        } 
 
    }, 
    {"Transform_163", 163,  
 
        { 
            { 1.00E+00, 0.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 1.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 1.00E+00, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 0.00E+00, 1.00E+00} 
        } 
 
    }, 
    {"Transform_164", 164,  
 
        { 
            { 9.999641E-01, -8.484461E-03, 3.785485E-05, 0.00E+00}, 
            { 2.654317E-03, 3.170646E-01, 9.484003E-01, 0.00E+00}, 
            { -8.058667E-03, -9.48366E-01, 3.170757E-01, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 0.00E+00, 1.00E+00} 
        } 
 
    }, 
    {"Transform_165", 165,  
 
        { 
            { 6.463382E-01, -3.499419E-01, -6.780764E-01, 0.00E+00}, 
            { -3.499419E-01, 6.537389E-01, -6.709442E-01, 0.00E+00}, 
            { 6.780764E-01, 6.709442E-01, 3.000771E-01, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 0.00E+00, 1.00E+00} 
        } 
 
    }, 
    {"Transform_166", 166,  
 
        { 
            { 1.00E+00, 0.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 1.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 1.00E+00, 0.00E+00}, 
            { 6.2775E+00, 3.0425E+00, 9.275E-01, 1.00E+00} 
        } 
 
    }, 
    {"Transform_566", 566,  
 
        { 
            { 1.00E+00, 0.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 1.00E+00, 0.00E+00, 0.00E+00}, 
            { 0.00E+00, 0.00E+00, 1.00E+00, 0.00E+00}, 
            { 4.629354E+00, 4.819091E-01, 3.928272E+00, 1.00E+00} 
        }, 
        {1291,  
            { 64, 
              { 0.00E+00, 4.999998E-01, 4.999998E-01}, 
              { 0.00E+00, -4.999997E-01, 4.999998E-01}, 
              { 1.913419E-01, -4.999997E-01, 4.619396E-01}, 
              { 1.913419E-01, 4.999998E-01, 4.619396E-01}, 
              { 3.535533E-01, -4.999997E-01, 3.535535E-01}, 
              { 3.535533E-01, 4.999998E-01, 3.535535E-01}, 
              { 4.619398E-01, -4.999998E-01, 1.913416E-01}, 
              { 4.619398E-01, 4.999998E-01, 1.913416E-01}, 
              { 5.00E-01, -4.999998E-01, 0.00E+00}, 
              { 5.00E-01, 4.999998E-01, 0.00E+00}, 
              { 4.619398E-01, -4.999998E-01, -1.913419E-01}, 
              { 4.619398E-01, 4.999997E-01, -1.913419E-01}, 
              { 3.535533E-01, -4.999998E-01, -3.535535E-01}, 
              { 3.535533E-01, 4.999997E-01, -3.535535E-01}, 
              { 1.913414E-01, -4.999998E-01, -4.619398E-01}, 
              { 1.913414E-01, 4.999997E-01, -4.619398E-01}, 
              { 0.00E+00, -4.999998E-01, -5.00E-01}, 
              { 0.00E+00, 4.999997E-01, -5.00E-01}, 
              { -1.913419E-01, -4.999998E-01, -4.619396E-01}, 
              { -1.913419E-01, 4.999997E-01, -4.619396E-01}, 
              { -3.535538E-01, -4.999998E-01, -3.535533E-01}, 
              { -3.535538E-01, 4.999997E-01, -3.535533E-01}, 
              { -4.619398E-01, -4.999998E-01, -1.913416E-01}, 
              { -4.619398E-01, 4.999997E-01, -1.913416E-01}, 
              { -5.00E-01, -4.999998E-01, 2.384186E-07}, 
              { -5.00E-01, 4.999998E-01, 2.384186E-07}, 
              { -4.619398E-01, -4.999998E-01, 1.913421E-01}, 
              { -4.619398E-01, 4.999998E-01, 1.913421E-01}, 
              { -3.535533E-01, -4.999997E-01, 3.535535E-01}, 
              { -3.535533E-01, 4.999998E-01, 3.535535E-01}, 
              { -1.913414E-01, -4.999997E-01, 4.619401E-01}, 
              { -1.913414E-01, 4.999998E-01, 4.619401E-01}, 
              { 0.00E+00, 4.999998E-01, 4.999998E-01}, 
              { 1.913419E-01, 4.999998E-01, 4.619396E-01}, 
              { 3.535533E-01, 4.999998E-01, 3.535535E-01}, 
              { 4.619398E-01, 4.999998E-01, 1.913416E-01}, 
              { 5.00E-01, 4.999998E-01, 0.00E+00}, 
              { 4.619398E-01, 4.999997E-01, -1.913419E-01}, 
              { 3.535533E-01, 4.999997E-01, -3.535535E-01}, 
              { 1.913414E-01, 4.999997E-01, -4.619398E-01}, 
              { 0.00E+00, 4.999997E-01, -5.00E-01}, 
              { -1.913419E-01, 4.999997E-01, -4.619396E-01}, 
              { -3.535538E-01, 4.999997E-01, -3.535533E-01}, 
              { -4.619398E-01, 4.999997E-01, -1.913416E-01}, 
              { -5.00E-01, 4.999998E-01, 2.384186E-07}, 
              { -4.619398E-01, 4.999998E-01, 1.913421E-01}, 
              { -3.535533E-01, 4.999998E-01, 3.535535E-01}, 
              { -1.913414E-01, 4.999998E-01, 4.619401E-01}, 
              { 0.00E+00, -4.999997E-01, 4.999998E-01}, 
              { -1.913414E-01, -4.999997E-01, 4.619401E-01}, 
              { -3.535533E-01, -4.999997E-01, 3.535535E-01}, 
              { -4.619398E-01, -4.999998E-01, 1.913421E-01}, 
              { -5.00E-01, -4.999998E-01, 2.384186E-07}, 
              { -4.619398E-01, -4.999998E-01, -1.913416E-01}, 
              { -3.535538E-01, -4.999998E-01, -3.535533E-01}, 
              { -1.913419E-01, -4.999998E-01, -4.619396E-01}, 
              { 0.00E+00, -4.999998E-01, -5.00E-01}, 
              { 1.913414E-01, -4.999998E-01, -4.619398E-01}, 
              { 3.535533E-01, -4.999998E-01, -3.535535E-01}, 
              { 4.619398E-01, -4.999998E-01, -1.913419E-01}, 
              { 5.00E-01, -4.999998E-01, 0.00E+00}, 
              { 4.619398E-01, -4.999998E-01, 1.913416E-01}, 
              { 3.535533E-01, -4.999997E-01, 3.535535E-01}, 
              { 1.913419E-01, -4.999997E-01, 4.619396E-01}, 
              18,  
              {40,1,2,3}, 
              {43,2,4,5}, 
              {45,4,6,7}, 
              {47,6,8,9}, 
              {49,8,10,11}, 
              {411,10,12,13}, 
              {413,12,14,15}, 
              {415,14,16,17}, 
              {417,16,18,19}, 
              {419,18,20,21}, 
              {421,20,22,23}, 
              {423,22,24,25}, 
              {425,24,26,27}, 
              {427,26,28,29}, 
              {429,28,30,31}, 
              {431,30,1,0}, 
              {1632,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47}, 
              {1648,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63} 
            }, 
            { 
                1, 
                1, 
                0, 
                "mtx3dc_1291_0" 
            }, 
            { 
                18, 
                { 9.571646E-07, 0.00E+00, 1.00E+00}, 
                { 3.82683E-01, 0.00E+00, 9.238797E-01}, 
                { 7.071066E-01, 0.00E+00, 7.071069E-01}, 
                { 9.238796E-01, 0.00E+00, 3.826834E-01}, 
                { 1.00E+00, 0.00E+00, 1.595275E-07}, 
                { 9.238794E-01, 0.00E+00, -3.826836E-01}, 
                { 7.071062E-01, 0.00E+00, -7.071074E-01}, 
                { 3.826831E-01, 0.00E+00, -9.238797E-01}, 
                { -3.570377E-07, 0.00E+00, -1.00E+00}, 
                { -3.826834E-01, 0.00E+00, -9.238795E-01}, 
                { -7.071069E-01, 0.00E+00, -7.071066E-01}, 
                { -9.238799E-01, 0.00E+00, -3.826827E-01}, 
                { -1.00E+00, 0.00E+00, 0.00E+00}, 
                { -9.238794E-01, 0.00E+00, 3.826839E-01}, 
                { -7.071064E-01, 0.00E+00, 7.071072E-01}, 
                { -3.826824E-01, 0.00E+00, 9.2388E-01}, 
                { 0.00E+00, 1.00E+00, -7.787722E-08}, 
                { 1.94693E-08, -1.00E+00, 7.787722E-08}, 
                18, 
                { 4,0,0,1,1 }, 
                { 4,1,1,2,2 }, 
                { 4,2,2,3,3 }, 
                { 4,3,3,4,4 }, 
                { 4,4,4,5,5 }, 
                { 4,5,5,6,6 }, 
                { 4,6,6,7,7 }, 
                { 4,7,7,8,8 }, 
                { 4,8,8,9,9 }, 
                { 4,9,9,10,10 }, 
                { 4,10,10,11,11 }, 
                { 4,11,11,12,12 }, 
                { 4,12,12,13,13 }, 
                { 4,13,13,14,14 }, 
                { 4,14,14,15,15 }, 
                { 4,15,15,0,0 }, 
                { 16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16,16 }, 
                { 16,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17,17 } 
            }, 
            { 
                18, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0}, 
                { 1, 0} 
            }, 
            { 
                64, 
                { -2.592964E-08, -1.00E+00}, 
                { -2.592964E-08, 0.00E+00}, 
                { -6.250008E-02, 0.00E+00}, 
                { -6.250008E-02, -1.00E+00}, 
                { -1.249999E-01, 0.00E+00}, 
                { -1.249999E-01, -1.00E+00}, 
                { -1.875E-01, 0.00E+00}, 
                { -1.875E-01, -1.00E+00}, 
                { -2.50E-01, 0.00E+00}, 
                { -2.50E-01, -1.00E+00}, 
                { -3.125E-01, 0.00E+00}, 
                { -3.125E-01, -1.00E+00}, 
                { -3.75E-01, 0.00E+00}, 
                { -3.75E-01, -1.00E+00}, 
                { -4.375001E-01, 0.00E+00}, 
                { -4.375001E-01, -1.00E+00}, 
                { -5.000001E-01, 0.00E+00}, 
                { -5.000001E-01, -1.00E+00}, 
                { -5.625001E-01, 0.00E+00}, 
                { -5.625001E-01, -1.00E+00}, 
                { -6.250002E-01, 0.00E+00}, 
                { -6.250002E-01, -1.00E+00}, 
                { -6.875001E-01, 0.00E+00}, 
                { -6.875001E-01, -1.00E+00}, 
                { -7.500002E-01, 0.00E+00}, 
                { -7.500002E-01, -1.00E+00}, 
                { -8.125002E-01, 0.00E+00}, 
                { -8.125002E-01, -1.00E+00}, 
                { -8.750001E-01, 0.00E+00}, 
                { -8.750001E-01, -1.00E+00}, 
                { -9.375002E-01, 0.00E+00}, 
                { -9.375002E-01, -1.00E+00}, 
                { -1.00E+00, 0.00E+00}, 
                { -7.500001E-01, -3.80602E-02}, 
                { -7.500001E-01, -1.464463E-01}, 
                { -7.500001E-01, -3.086582E-01}, 
                { -7.500001E-01, -4.999999E-01}, 
                { -7.500001E-01, -6.913418E-01}, 
                { -7.500001E-01, -8.535535E-01}, 
                { -7.500001E-01, -9.619398E-01}, 
                { -1.00E+00, -1.00E+00}, 
                { -2.50E-01, -9.619396E-01}, 
                { -2.50E-01, -8.535532E-01}, 
                { -2.50E-01, -6.913416E-01}, 
                { -2.50E-01, -4.999996E-01}, 
                { -2.50E-01, -3.086577E-01}, 
                { -2.50E-01, -1.464463E-01}, 
                { -2.50E-01, -3.805972E-02}, 
                { -1.00E+00, -1.00E+00}, 
                { -2.50E-01, -9.619396E-01}, 
                { -2.50E-01, -8.535532E-01}, 
                { -2.50E-01, -6.913416E-01}, 
                { -2.50E-01, -5.000004E-01}, 
                { -2.50E-01, -3.086577E-01}, 
                { -2.50E-01, -1.464463E-01}, 
                { -2.50E-01, -3.805972E-02}, 
                { -1.00E+00, 0.00E+00}, 
                { -7.500001E-01, -3.80602E-02}, 
                { -7.500001E-01, -1.464463E-01}, 
                { -7.500001E-01, -3.086582E-01}, 
                { -7.500001E-01, -4.999999E-01}, 
                { -7.500001E-01, -6.913418E-01}, 
                { -7.500001E-01, -8.535535E-01}, 
                { -7.500001E-01, -9.619398E-01} 
            } 
        } 
 
 
    } 
} 
} 

Actual code:

procedure build_3dx_object(sequence x3dxfile, sequence textfile) 
 
   integer fn 
 
   fn = open(x3dxfile, "r") 
 
	n_3dx = get(fn) 
 
   close(fn) 
 
   fn = open("3dxtest.txt", "w") 
 
     print(fn, n_3dx) 
 
   close(fn) 
 
end procedure 

3dxtest.txt contains simply: {1,0}

Thanks! Steve A.

new topic     » topic index » view thread      » older message » newer message

Search



Quick Links

User menu

Not signed in.

Misc Menu