Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  283 1484 (N24E58 L=  6)  2442    403        2 ( 235/1417- 354/1554) -29.1 E67-E49 N19-N30
      2 1182 1478 (N25W09 L= 73)   459    109        0 (1144/1435-1232/1525) -39.8 W06-W12 N22-N27
      3 1734 1457 (N27W52 L=116)  1131    144        2 (1692/1421-1781/1490)   0.0 W47-W56 N24-N29
      4  925 1440 (N21E08 L= 56)   286     73        0 ( 884/1419- 972/1460)  -9.5 E10-E04 N20-N22
      5  456 1293 (N11E38 L= 26)   234     56        0 ( 438/1262- 469/1325) -63.4 E39-E36 N09-N13
      6  200 1229 (N08E61 L=  3)   437    151       -1 ( 180/1198- 222/1262)  90.0 E63-E58 N05-N09
      7  665 1196 (N05E23 L= 41)   217     60        0 ( 642/1180- 694/1221) -33.7 E24-E20 N04-N06
      8 1901 1194 (N11W66 L=130)   676     70        0 (1874/1162-1919/1220) -31.0 W62-W69 N09-N12
      9  422 1152 (N03E39 L= 25)   503    125        0 ( 369/1110- 481/1204)  32.0 E43-E35 N00-N05
     10 1402 1093 (N02W23 L= 87)   281     49        0 (1382/1061-1425/1133)  71.6 W21-W24 N00-N03
     11 1696 1037 (S00W44 L=109)   279     53        1 (1679/1001-1710/1072)  76.0 W43-W45 S02-N02
     12 1554 1015 (S02W34 L= 98)   500    163        1 (1471/ 982-1615/1040)  20.0 W27-W38 S04-N00
     13 1644  998 (S03W40 L=104)   438     54        1 (1620/ 960-1672/1030) -56.3 W38-W42 S05-N00
     14  176  831 (S16E64 L=  0)  1966    141        2 ( 136/ 779- 214/ 887)  81.9 E69-E58 S19-S12
     15 1603  840 (S13W39 L=103)   264     67        0 (1591/ 805-1622/ 879) -53.1 W37-W40 S14-S10
     16 1288  818 (S16W17 L= 81)   567    175        0 (1231/ 760-1355/ 878) -33.7 W13-W22 S18-S12
     17  305  841 (S16E50 L= 14)   512    104        1 ( 259/ 818- 334/ 862)  -8.1 E54-E47 S17-S14
     18 1735  751 (S17W51 L=115)  1089    216        1 (1656/ 691-1798/ 822)  36.0 W45-W56 S20-S12
     19  499  615 (S30E37 L= 27)  2533    677        2 ( 351/ 445- 710/ 820)  33.0 E56-E19 S41-S17
     20  274  752 (S21E54 L= 10)   937    200        4 ( 235/ 703- 327/ 798) -20.6 E57-E49 S24-S18
     21 1061  743 (S21W03 L= 67)   424     95        0 (1018/ 716-1127/ 760)  23.2 W00-W07 S22-S19
     22 1332  684 (S24W22 L= 86)   735    106        1 (1293/ 621-1370/ 749)  76.0 W19-W23 S27-S19
     23  301  704 (S24E52 L= 12)   320     44        0 ( 282/ 683- 324/ 721)  26.6 E54-E49 S25-S23
     24 1605  620 (S26W43 L=107)  1321    306        0 (1538/ 582-1716/ 698)   3.6 W37-W53 S28-S21
     25 1365  484 (S37W28 L= 92)  1049    165        0 (1279/ 435-1430/ 554)  48.4 W22-W31 S40-S31
     26  895  517 (S36E08 L= 56)   226     50        0 ( 873/ 494- 921/ 536)  26.6 E09-E05 S38-S35
     27  846  475 (S40E12 L= 52)   236     19        1 ( 828/ 455- 866/ 495) -63.4 E13-E10 S41-S38
     28 1227  461 (S39W18 L= 82)   392     85        0 (1207/ 428-1257/ 494) -38.7 W16-W21 S41-S36
  

    OPENR, u, binfile, /COMP, /GET_LUN
    head = FLTARR(6) ;[xsize,ysize,radius,hh,mm,ss]
    READU, u, head
    data = INTARR(FIX(head[0]),FIX(head[1]))
    READU, u, data
    FREE_LUN, u
    

• each filament has the value of Fil_ID
• all values are in pixel

  c = WHERE(data EQ Fil_ID, area)
  f = '(2(A,I6))'
  PRINT, FORM=f, "Area of Fil_ID", Fil_ID," =", area 

  data = ROTATE(data,7)
  Solar_y = 2048-Solar_y