Changeset 42531 for branches/eam_branches/ipp-20230313/tools/eam/skycoverage/coverage.mana.sh

Timestamp:

Aug 17, 2023, 4:41:34 PM (3 years ago)

Author:

eugene

Message:

merging from trunk

Location:

branches/eam_branches/ipp-20230313/tools

Files:

• . (modified) (1 prop)
• eam/skycoverage/coverage.mana.sh (modified) (1 diff)

branches/eam_branches/ipp-20230313/tools/eam/skycoverage/coverage.mana.sh

@@ -319 +319 @@
   cplot -pt 0 -sz 0.4 $RCOLOR el eb
  end
+
+ $RCOLOR = -c grey70
+ DR1.boundary
+end
+
+macro DR1.boundary 
+ if (1) 
+  if (0)
+    data EuclidDR1_polygon.csv
+    read -skip 1 -csv Re 1 De 2
+    cplot -pt 0 -sz 0.5 -c green Re De
+  end
+
+  # north boundary: 
+  # corner 105, 80 -> 94.7, 56.9 in ecliptic
+  create Rn 105.2 285 0.1
+  set Dn = zero(Rn) + 80
+  cplot $RCOLOR -pt box -sz 0.4 Rn Dn
+
+  # west boundary
+  create elat 50 56.9 0.1
+  set elon = zero(elat) + 95
+  csystem E C elon elat
+  cplot $RCOLOR -pt box -sz 0.4 elon elat
+
+  # south boundary west
+  create elon 95 150 0.1
+  set elat = zero(elon) + 50
+  csystem E C elon elat
+  cplot $RCOLOR -pt box -sz 0.4 elon elat
+ 
+  # south boundary east
+  create elat 50 80 0.1
+  set elon = zero(elat) + 150
+  csystem E C elon elat
+  cplot $RCOLOR -pt box -sz 0.4 elon elat
+
+  # NEP circle
+  create elon3 150 296 0.1
+  set elat3 = zero(elon3) + 80
+  csystem E C elon3 elat3
+  cplot $RCOLOR elon3 elat3 -pt box -sz 0.4
+
+  # galactic plane boundary east
+  create glon 86.5 103 0.1
+  set glat = zero(glon) + 25
+  csystem G C glon glat
+  cplot $RCOLOR -pt box -sz 0.4 glon glat
+
+  # east boundary
+  create Dn 72 80 0.1
+  set Rn = zero(Dn) + 285
+  csystem E C elon elat
+  cplot $RCOLOR -pt box -sz 0.4 Rn Dn
+
+  # DR2 south boundary
+  create elon 100.3 189.5 0.1
+  set elat = zero(elon) + 37
+  csystem E C elon elat
+  cplot $RCOLOR -pt box -sz 0.4 elon elat
+ end
 end