Keith M:Hyperspheres 4

From Ultrafractal Wiki

Note: NO TWEAKS to this upr

Copyright © 2008 by Keith Mackay

hyperspheres4 {
; Copyright © 2008 by Keith Mackay.
; No tweaks
::4OS21jn2t3ZXPOuNWa47bg+/gh3LDiLSKR9RWoL2kZnMIzWZbkOY2dBWgCqsVVWptl0Ipq7u
  akf8DFpksKX2WiSUV6O97FBpLZyXRxDNNpOnHeuLPcdZ4uv71vaxiy4ydRBL3+YWUeR22o8o
  iF2LX8h4NlbD8IkFbjivfbZgjNZxuwHFFKg6UVx15RbiLLCW+3jiL3u46w1vL8x/d/rYuXxI
  Evlv+VyiLvJrDzKjTTCW+fVdpFUnlLSzCXHX+Ygn9i9R53HtPdTUQhQ0oExFK3muJY/D7Kjz
  CLKe9r2HmlFncvSsokyo8gvlsy2z13hb77S94XV93WeELbitLlyXsP8+kA3VuUGzyjuIM5ex
  zJzalnvt/rf1dp5C5DlCuP8jxVKy4kF3FvLKJcvoH5tlhJbCz3s6h72vch4em/Ywyf6hdxhL
  rqU2NFRRbktCmPjVd79Yu+UxHkl+hK1uiI+33GGvL9hyAKz71vKOpIeTkqbPPMp4ORxSSTie
  9rEFp9j2EJKmonhsieoYrf42o800yF5RZRhliqdym66dyGXdr9HjSiyjX/j5hbiFX6HS3lmL
  6Frb/rr/zfYnoLOY5m9/Gf1D7u97+LX/T38fnfbc5vmHmVcpKt693cv6WEQJkT8pN/d1Hfm6
  X326vki23NpVNryqmVfl/ubkFLaX06yje2qeser8DW2XNf6D4QLdYZa+ALf1DVnG6QqUm8PC
  3traMbY1XrEGPxfu4wfvcgiUUGmXGYNwSL/OCdoS/u4sBr8u00sA6/J7kP8ZdKf5Wx0TbT3t
  R8lD+5FX9tGx3wDWuOd/+0Eptvyu/rNfyyBU7ha97WhD36BXlHKiyHR1e6D6ArmqzseGUyKi
  vjD39Kx/wm447qrC7TffUhYqohXvN5x3VGQuSjGbx6QxE3DycXXj80S53DCI6XniyoMdqXx7
  i+gulX37RYRmcyhL8tpthZRPbw+bru63vLd97W2TVH88c1F+w9kSoaU8braMDpO989Y1VvOK
  //vSo7jWqjY69wO6vifuqrxX37tFIX50Y0Qs6ltiVpsPTsOjHjK0v6t/bqYNI3K+C6IU5uOq
  0dRMSjqwQ3clb+xKp+bR7jVLQd5UuRdt+ybk+deHJX7fIlbMWjjEsdEiUwxOM5JimEwWNNFU
  bIYlDfSqsuUuwdinlt8hTuuZLLij2TJ8UdVbcQ+rSSdzv4vK17gaW9ga9FpTriFsMP6W5UWX
  nKbVJJxR5383q2q1tp7iX/rx7O3KrH69wsDnZme4MbOGOXJq4HDq6M3+oU0mO0SZH6klvalu
  lfciTpxWJ3S71yduq+dqxLVyFXLd/1/dBuTq+FPuP4648808vR+o8L1LXaSi2uMUmaoLnyoV
  zH4Qsn00MsViVzVt62pZ9qe/Br8n2TYae++wsJPSKRu3L+Y+d+2/tlJmTzq7KxkGtv7nfY3u
  hstq+12szlZZ65ysmj5yqENR0DOdR7YqtNyaysnRbttZt12m2WbPH2a75wWzNitmPj2auZt1
  cTbr5zhtmPH2aHjYrdmRbtjZt1Om2W7MH2an5wW7aEbt7MardNrt2102a35wW7OH2aPjYr9m
  RbtnZt1em2W7NH2av5wW7bEbt/Mar9Nrt2302a/5wW7PH2aKxMvcUSHrtstdr5s2USHztU8J
  +uGJds3S9m8bvk0xgLVswEvTUSHL+YUdy+cZ0+fZC+ixM+lpff0I7QHqDX7V6n09omRaaqdo
  Rr3I++9pjUP9HHdR/7aKN766W1Exfb17eryDwVvFebLCzyo63v/hHqoK/GrM9XZgOBlTlVG/
  prmy5xKz0F968oEsP3FP4n5ecVtO6UUKbcmphp8vd9SD0XuTPRsUO5sxvJNOpc5I1d8zMboZ
  pPjMZVPUauaqnbDiyfS/2PLFsdlFR5LHvwTtjrjOtt1pO5vUt2V5dXjrC1chEH3ppf/1U6jO
  d/i+VuT3Q+QieojeqP8b7X8pW3nUtf6eaFy0sSZ3klHFuZDNYwlW9LHUNEnNQxv7hk1ywWaX
  cSUY+wuDpFl60+FFXrHAl8D9JI82L/r9SHi+8gx8axl/hdpFRFXaa6qKP0hR1lt9eqTh/Qc5
  2DxZ4QqZTQcW9nrVPHnreifwrTIMy4noAi1SWkuLezljruoPW+Q+p6Ml/k3fdX4l6Krr9g/S
  ZbxH4vidoCtx3aVluT0quQHjqSVD5Os88T3H0W4iy8ok7L3K7LPf7pNYhPeGsmgb+vELGnns
  +SRWUz1GanWny/kmwYq0m6m3Ars4LiPUmq+eeVHYTMWLju8i9ppiOsHjKW0Gnk8FxJbi+YgN
  hsQqSA1x1l6ZZX/BUmMw7VfEzlQ8p06Pyyt+6kmL473clX/q6o8v7dOJtugkWGAYc+loFgfg
  WAuXHaBE7uIXULgLghwF4tSD0yz3kqioieHMZ1aerHvQt88oc/mxYs6rzJideykxXh6T42t1
  wl4TscqvuTjSWO+UfR9VX2t9Gw4u+GaoG9wQtKiGOMWTN4aHGsB2UAbK6xmSR6+IAnCgTBwp
  A4UAcKAOFAnCgTBwpA4UAcKAOFAnCgTBwpA4UAcKAOFAnCgTBwpA4UAcKAOFAnCgTBwpA4UA
  cKAOFAnyXnwpQWRo2cLZ0zw4cPqNgTBwpA4UAcKAOFAnCgTBwpA4UAcKAOlvagTh2BOFXG9w
  H0BOlj+oGUUYUPqLx7YiCaKuZoHw9Y4BeKpAqAmPLUMqoU9SXA5AgcAQOAIHAkDAyBA5AgcA
  QOAIHAkDAyBmbyBmYE/C0BA6AAdAgOwnXoDMt2yJYHYMRIAYH4oWZmhFtz+0q/FRyKXHO3Ts
  bPmvDnyNr86FlAXUV5mErDthrMRvgcLka5Z6LKncviS5iHegCMcF1JSBu8jd1eT1xXr9qma8
  ppafy91qUUf7CAlBgyAQZAoMAUGAKDAlBgyAQZAoMAUGAKDAlRXQZGOlM5vT92s/l/+3fzbf
  7P+ZPbMx/jo8iq9orVtiSer6xV+/W8v56r1DaoeBT/t6V896V8EqmlnpZ5t0r8xv9DRRZFay
  bwbLzjKXv9/9/TTwC+lBEIAn621Xs1ei68rfIuoUdfubo15hk1qqFvJKpUvns4N3HV8Xzj+n
  a+spq4/xedR+4/J89Rj42VVN9vZVBy5bkRRn2doyvzed6GaQYZYy2xWdWwd7izAPBgnAwTA4
  JA8EAeC+qgngk0D4E0kSLY2Hl3K8fOUANZmg2MaB1xiSJWN5yAx/s+Dc8pN5lAOx7J8IQt9d
  byJC02binD13nxOJ4BV4PcCyDavpsTeVHJQu1fQ3kxR71uA6COAdBguAQXAoLA0FA6CAdBgu
  AQXAoLA0FA6CAdBguAQXAoLA0FA6CAdBguAQXAoLA0FA6CAdBguAQXAoLA0FA6CAdBguAQXA
  oLA0FA6CAdBguAQXAoLMDoLsON53A6CAdBguAQXAoLA0FA6CNR5vXDGCUbKn762FdB+hPi4x
  bZUoNXKwtc8J8OAKcAehhxogD/ZUH45cCCF8t6CoQXyF8GN2C8jxWI/+I5EJiJDjrK4zIZoN
  U/BMDAmBAzAgZAwMAYGAMDAmBAzAgZAwMAYGAMDAmBAzAgZAwMAYGAMDAmBAzAgZAwMAYGAM
  DAmBAzAgZAwMAYGAMDAmBAzAgZAwMAYGAMDAmBAzAgZQTYGCLiTAMDAmBAzAgZAwMAYGAMDN
  pdhGsC8auurjvtLrDSDkTXDbfvj4ioKVJouivlNhaRGR6WoDJCPhZhpktFoszxtgiThdPeCu
  FAkCASBApwMBpADQKAIFAkCASBApAgUAQKAIFAkCNQKMpYuEMKAGFAjCgRhPzYUYaxR+MGtI
  f1iogxjWEE12IqtRUbjo2GRtNiabE12IqtRUbjo2GRtNiabE12DKqt1IgKniPX+jOEuHvfZ6
  3HNyO0xc4F0vHb0h66+dhjej473nOS90fc0F9vrp0srrbrPDAWRo2cLZ0zw4cPqtR1XvDugL
  JqyvxKT/VGoTQ5UZlxf6qpcesyMpbEx3vg6coFcxn5ecVtO6UoOSFMTDT5fbtOEJ6fiYpcyZ
  jfTacS5yRq74nZ2QzSfGZyqeo0c1U9HZ9SB1P86NVo23fY3PtJ/POO8rdVo2RzPwRA4IAcEA
  OCAHBgjwXo4IUF4/txJZLFBHSNCHhXQnMjwzIPo+6MqH1l41gwwxgKcS8DSSPF9BXgeA7jhH
  4pkCg0bAIHAkDAyBA5AgcAQOAIHAkDAyBA5AgcAkeDA6AAdg/MiOA1VhOgnrjX1MCcfxu49A
  9AIDHgMcAywBIDHgMcAYlBsyAWZArMgVGwKDYlBsyAWZArMgVGwKDYlBZ4g5PDH4TRGOAZ4A
  khD+CLDHU8PzLRCOAEFAiCARBgoAQUAIKQrEcgVDFAsjyKBuONYBwI22EL6hUbgXTZddagIw
  vJ/I4xIcK3pJtJ0W0LCXwlztBe2nKhHMtUbABp2AAoAAU4zHAFoAQBAoAAUAAKAAFAgCAQBA
  oAAUAp2AwnA4TAp2AkaDQqNAp2AEu2IctR4ajw1GhrNCXbEu2IctR4ajw1GhrNCXbkaDQqNA
  p2AkaDQqNAp2AkaDQqNAp2AAiAARAgIAQEAICAEBkaDmhUbA16A9AusOwDsNMfzu473WeC6B
  WgMeAAKAAFAgCAQBAoAAUAAKAAFAgCAQBAoAkxDARBgoAQUAIKAp7AkuDQ6OAp7AkuDMK/MN
  rW7XVrW72HLuONPbLInZMtyUR33eR3nU0tjYT/PVxythspN9i9q1bDTE7XmNJR2rcL6n+mf/
  TyHtffaDP+kqRJ2A8vLl7TTUPZzjJbfGRv62HzotPLj3+sMV7L6jZ0A6VkpKilJEhZCRsNhI
  cTIizkFp8DTcJBVSwMgGWGQDbDoB3Aa4MZNSzC+mhd0yeGBSeoKcaCCXnWYAdYVHgwqX4SpB
  kzysyZbW54Bfq+9gnaA1cOoGQcFIuCEXBirAxVg4KQcFIuCEXBirAxVkRi+MMjE55jMSEyIR
  IjE9FWGJKsMMZLSJRgEQQCIIBEkACSABJgjKlEROKjE5wbo5zym5zJWdyIRtJrIiLn1kigsa
  yJReuEH7mcSEl0kTiEawcs7IjRSXRUqzpuqaAxYTYRWHnvieKehgtQwWIYLEsFC2CBbhgtQw
  WIYLEsFC2CBbhgtQwWIYLEsFC2CBbhgtQwWIYLEsFC2CBbhgtQwWIYLEsFC2CBbhgtQwWIYL
  EsFC2CBbhgtQwWIYLEsFC2CBbhgtw/MzWorNYLEsFC2CBbhgtQwWIYLEsFC2CBbh/5PLDeO4
  C5+Pj8vW4CbKrL3T8p0G8C9aqBVcVCz/AEhPPPFOCOC9sOFGhqelxiRo/xYE2k5CVkEu7xTk
  4CBJhgkQQS4MRSIBkECSCBJhgkQQSIIJEkECSCBJhNkEOpIXGgECQCBIhAkwPzAJcaweNjxL
  yXtcEa84FxYoVNb26vaBsy42aE32IutRcbj42GxtNibbE32IutRcbj42Gxt9kibbNCpyp4zl
  /oDi7x7Xm+9RjsDdMnwQ97xGdOaU63FO6Nivff6ogwV7xRX0/umSzuuut+g6ZFhaztkRPDjz
  9o2GVf9OdhukoK/GrM9XZgOBlTlVG/prmy5xKzkuxEf/CqzJL0Ffm7xV16oTh6cPyMNMl/t1
  6keq/JilyJnN+NpxJlLHpujfmZDNL9ZkJr6hSzVT1fs1LFU/As3UBbf/Be/0m8/4Ixv2VhaH
  P/AIBAkAASAAJAgEAQC/ZAIhmI73mQPiZg2Y7/54E0AtQT6KiZRZue8zzywJoPIJ9UwHcB4B
  o2njeAVEAdC2BWgETEwJA4EAcCAOBAnAgTAwJA4EAcCAOBAnAkYiAPBgnAwTA4JAJmIkYiQi
  JCJmIkYiA9MgeGQPDonB0zA6ZA9MgeGQPDonB0zA6ZA9MIrHYosegPFZ9Ak1DQWP4Lssewah
  xPBZ9AAZAgMAQGAIDAkBAygehMIJ95J9Arjz6BOW1Xw323yl7fIpH43wQAzhR5N52AKvBSBP
  HC1rl4ghnzDON1BtyzO1VdYTJnHQPL1Cp3VuL++tlIpHAKFAlCgSBQpAoUAUKAKFAlCgSBQp
  AoUAUKAKFAlCgSBQpAoUAUKAKFAlCgSBQpAoUAUKAKFAlCgSBQpAoUAUKAKFAlCgSBQpAoUw
  UUK4aDKFAlCgShvwoUIsMMZLoUAUKAKFAlCgSBQpAoUYUUKIGO+UKF42NkFYT8JMruYKw7gp
  gtdDxAe+tYKQ99ZMDhpwFoMw7cUGk++ocRtAjBgxAwYgWMGI+zXIEDI6wYwgLNgMAQGAIDAk
  BAyAAZAgMAQG8ZDkBTKmJBjBgxAwYAYM4zMGDmWcgPjR7xXtIGY8o9ARdNi6aE11IqrRUXjo
  uGRdNi6aE11IqrRUXjouGRd9gi6aNCIyp4zl/oDB7x7Xm+9RjsDdMH+A97xGdomufX4o3I++
  9pjUP9HHdR/7aKN766W1ExfLZFl4WdyDU9a495W2+G9Go3JPwlEV54Ylt/KD0Lo8qsy6Pd1U
  ePWZn0Nk27XQdO1Bu4zcP+qWHdKUnJCmphpcwtWnCE9PTsUO50xvJNOpc5I1d8TNboppPjMZ
  VPUaucq+DNepg6Hf8mKW57Pu5n2s/HHI91+KU7wxH8EAeCAPBgnAwTA4J4LUeCeMq45AF0k1
  DoULPvDJzArmkfgFxyXsLhDUFY70WDXqloSNgI42cdC3zy2p56uNAKQMDMBsjhJAoDA0BA6A
  AdAgOAQHAoDA0BA6AAdAgOAQHA5nAwOAYHAsDA2BQ+JA5nAkfCQ+JA5nATSKzhXUosVd9PdT
  lLFSzLBlMjQ0q3uZlPPUL9NvcySmpkLXsuD1qpLKfUY2reHyh7MryK/FY4mbXXXYxtdZ22e+
  KXXI2PkN3m6b7Mxb5dxfMaTQ6t/mKyeWXa6e8WX1xnky3d8g4THMGTmQtjvPT7l/0n0T6960
  n4T+FH13N4QwkYsbgqg1W4z4l7v/6lG9GZaT8TleEhA2wF/pOa/WzbEEXIJNu4Mvr4fu6jWO
  L3w50oc4WMjGnTcTU9kz2jjYFOx7iSv7uioyJuQ4LeXqdY9KKvKIittnznmi4PFFw4OXJ+Pz
  efyupOkoImWXTsWgT1clLj2E/M6JauSxtcNt2prLDr2mn5FWNK/breVQMGxvaRRELXXfqR+R
  Ox4b5daEx+oW3lVy7i5XixBlHb0iOMpzmN5HUMaOWdr/m/KxCq5O8ZpdzMe7uNQR18gQfIN5
  BEPpjW4CdO9+1tJb+u5+im1hvrKWwSFFPV/xi3Hu7hJuWpzu7KWgvZXcP7la7VsZc/VsZdDW
  sZfHWsZfLWsXs9Yxmx1zzm1FyzeJ2mF7FffWsXgNaxeR2pF7lbrWsXm9axep2sF7la3WsDb3
  y46OHb3iNX73iNnb4iNb74idYLXGZwucFXsn/icnj9Yxmr3jbHpnhtB1V7s5TfzvPruCb21+
  fUTmZ+m8ghxbktbTvPrno8c1Zb6da1q842qFOG8wxgHOG8wxgHOG8wxgHOG8wxgHOG8wxgHO
  G8QyHHJfck8xRyHHJfck8xxhFGOswwhFGOswwhFGOswe5S+4WeMbOle4YCzr5gFzh7R8sday
  J5unKnkP9cP+/CgKq/5Z
}