squiggle/foretold/components/showcase/entries/Showcase_AgentLink.re
2022-01-12 18:33:04 +11:00

49 lines
9.3 KiB
ReasonML

let image1 = "https://media1.popsugar-assets.com/files/thumbor/PqBqxo_cWMRP99nvp73HN0lSqr0/fit-in/1024x1024/filters:format_auto-!!-:strip_icc-!!-/2016/01/11/797/n/1922153/940d7f6ffea5ccb7_grid-cell-30798-1452255774-1/i/Photos-People-Freckles.jpg";
let image2 = "https://www.w3schools.com/howto/img_avatar.png";
let image3 = "https://secure.gravatar.com/avatar/d9032fc9ac4a2f815ae8f88a0bdd97f2?s=96&d=mm&r=g";
let image4 = "https://avatars1.githubusercontent.com/u/377065?v=4";
let bot1image = "data:image/jpeg;base64,/9j/4AAQSkZJRgABAQAAAQABAAD/2wCEAAkGBxITEhUQEhAVFRUXGBUVFhUVFxAWFRUVFRcWFhUVFRUYHSggGBolHRUWIjEhJSkrLi4uFx8zODMtNygtLisBCgoKDg0OFhAQFysgFR0rKysrKysrLSsrKy0tLS0tKystLS0tKy0tKy0tKystKy0tKy0rNy03LS03Ky0rNystLf/AABEIAOEA4QMBIgACEQEDEQH/xAAcAAABBQEBAQAAAAAAAAAAAAAAAQQFBgcDAgj/xABFEAABAwIDBQUFBgQEAwkAAAABAAIDBBEFITEGEkFRYQcTInGBMkJSkcEUYnKhsfAjNILRc5LC8RUzUzVDVGOisrPh4v/EABkBAQEBAQEBAAAAAAAAAAAAAAABAgMEBf/EACQRAQACAgICAgIDAQAAAAAAAAABAgMRITEEEhNBMmEiUXEU/9oADAMBAAIRAxEAPwDQkIQtIEBCEAQhCE0BCEKAQhCAQEIQIhC5zztY0ve5rWjVziAB5kpodEKp1PaDRjvBE50xjaXncB3SAcwHHI+YVak7S6l5/hUoa3gXHMjz0XWuK0/TM2iGoEJAsuPaDXcIIv8AMSpHB+0OR8jYZqXdLvea7IAZ3O9wW58e8Qe8NAQoDB9sqKpIayYNeb+CTwEkG3hvkdOCn1wmsx21sIQhQCSyVCBEJUisBUiEIBCEIOqRKkQCEIQCEIQCEEIUAhCEAhdIIXPNmhOmYYfed8kGd7ZbdNpXmmhiMk9r3OTGX0vxJWZ47ik9QQ+rnyGjATbpZugU92wxOp8QeQ3KRrC0+QsbKgxxuebnMr6PjYItES52to+hxLuzeBu6R7xzPqpCPEXP9uBruZaXsv6BdMLwMu1Ct+FbMl1gG3X0ow0pHLxZPJ51CrOkaBdtI0HnvylNajGJwCwBrGnVoGbhyc7Wy1duxY3MyN7gOCqOMbPFpIIzVr8d51Dn89q9wpIMT/aHdu5jS6s+C7W1tJZpPfwjgSSbfddqPXJQNfh9jovUEcsQBtdh+S4ZvFrL1Uzbbhs7jcdZCJ4wQLlpa6281w1GWRUmonssow6iL3NtvPJGgOQtfJWl+Fj3XWXxckRW0w9UcwjEL3NGWndOq8LChIlQqEQlRZQCRKhB0QhCoRCChAJUJFAqRKkQCEIQSuDjw+pT1yZYSfD806kcsyrPe2jZp1VSCeIXkgJdugZujOTreWtljmz1OHOX1CXcFRdouzClneZoJH00pzJjsWOPVp09F7vE8v4uJccuL3hG7M4IHAHQcTkr7Q0DGCzRb6qhU2xOLw5Q4nGW8N5hB+qkY8Ex/wD8fTerP/yumbyIydS82Pxpp9J2h2gpKiSSCGdr5IsntAcLcDYkeIcLhMNoaEPaTbxAfNVih7OcUgmfUQ1dNG+S+8WtNszc2FrD0TifYvGH5PxNlugI+iziy1rO9t5MM3jWlIxtoBK97Mu797acML3GzQByJz3uQAuVaYeyGR5vU17nDUhjc/mVfNm9l6WhbuwR2PF7s3u9V3zefWa6r2mLxvXtMYbRthjbEwANaLZCwPM26p0CuHeL02RfJmdzt7Ubiw8Y8vqmKe4ocx5JkqBCEIgQhCAQhCDohCFQhQlSFAJUiE0FSFCVQIhCEDygmsCOqcPlUPFPZzh5fourqlZlUiJVFYjWPys7dBO60N9t51NufHTkurZ1G7bbJnEqeJsE/czROLmG5t4m7rmm2Y0GaaNHWA4yJi7ckLw1xY9rvaY4ZkEcD6kKwNlVP2D2N/4ZDI2SbvJpXBzyL7o3RYAX11OasokTTMRo9dKuE01gTyF1x71eHSI0q1Vj4Ermvc67RvOs5rWxtOhO84KyYdUiSJkrZBIx43mPHEKnbXdmMdfKJ46ruXENbI0gua4N0IF/NW2iooqOlioonFwjaG7xIJ1JJPC5N8lWYro7MyUTqLfULx9rTTR3VPuVxXCnm3nH0TlUeUL0QvKIEpCRKECISoQe0IQqBIlQgRCEIBCEIFQkQoIHFK3cmIvwBXhuI34qK2naftR5FjbdVFGVwWZWFzhreqdxVfVUuGuKkIa9RVrbUrq2dVuOtThtX1QThqF5M6qlPUV32p4e2IUue44E94dLAtvkL31ClTMtIfvqU1kqkyklKZTzFahDuorbcVHzYpbimVTKVFyyDi4fNXRtdNlqrvO8PK31U+qnsQ9gEnjbckWBc0HIHgc1bFJgCEIUCWShCECoSIQe0IQqApEqRAiEqEHlKlXKonaxpe9wa1oJcToANSrrY9SPDQXOIAAuSSAAOZJVKxjtIp2Esp2OqHD3m5Rg/iOvoqJtrtZLWvLGkspgcm/EB7z+ZVTfUn2WZDpqvXi8Xfbn7/0uuLbdVcti5tNHbTIlw/quFwpdr5TYSCF/4Tuk+QUfs7sTNVjvD/DiHtSHj91g949dApWXCaemNmNLiPU+ZOgXPNFKcNREzym8LxFk3/dPaeRaR8jxUrFTNOh/f0Vew+vde4s0fP5G6tGHVgkNpA0/eGTgvNMNukdMncUC6YrE2CIzNcS0buR+8bXuqMzbaffIETS2+QOtvMLMi/sh/dkohKqUG2Upy7gDzJTqh2gmfKA7da3PIXzNss1BPSxKtYvi7GHu2eN/IZgKX2rrxT0vfAkvfZrByJvc/ILIKnEHNuAfEdT565r1+Pgm7FrRCcxLGXNduuIcfhBvbzAXGLE5j7LVF4RSF7hfiVr+yOxrCwTzjdj1A0L/AD5NX070xYa7s8nva1tQzSLDJqiTw00kj+cQcSPUaeRsrtgWEY3TW3InSR/9KeSG4H3SX3BU5tLt9T0Q7mBguNGMA+buXmVnVf2rVm9lHujqXfRfMyeTF+q6h6q45juWu0NU94tJA+GTix9rebXtu1w9U7ssv2b7TXSuEcwsTpc3F+XQlaVSVAkbvD/Y8l53TTtZCVCIRCVCD0EFKhUIkSoQIgpUiAVO7QHyTdzQxZmV13dWiwAPS+Z8lcVT8dre7qKiUZvjp7MGV7vLvEB0BPyC6Yu3PLOqsm2qEbJXQxZsjuze4vcMnO8ib26WXvYTZ01tS2LSNtnSu5M5Dq4+EeqhK+clxPUrZ+yPDRDh5nIAdM5zr/cb4W/nde3LlmlOPtnFXhYK2AOApoR3cbBY24N4NA+IqFxHBWkbrW2H748fNWmkjszMZu8R9cwPQWXl1PvaL5b0M1qcELdB8tV7wou3i1u84jWzH7t/hDrWJWlxYKD7Sf0uDxsFgwD5K7RSZxNLF3BidunM6aWyHzCZUuxjibmEjz/3Wox0rRwThkQUkZ5BsMTwA9SnjNhLeLfAt+JXsNTeobfJQY92mxlrY2OflEwkZW33vNmgcrBt8+ayk5m9wtI7asRvOynAsGMDnfec7LP0Cy9js7r7Hi8Vh5rczLRuzbCO/qGMI8Au+Q/daRl6mw9VpG3eNOYwU8A/iP8ABGBoBxd5BRHZlh32Wi+0SAh82beYj93+6ltmqP7VUOq3Dwt8Md+Q1PqV4vMze9/06Yqesfsx2Z7NowO9qbyPOZvpfrfVT1dsLRSMLHU7LEcAAfO6twsBZcXheV1fMu3mx7sOqG7lzDIT3bje4I1Y7qNRzWnbAV/eQMJOZFj1LePyP5Kz7Z4Iyqp3xPYHG28y/B4B3SCqNsGx0TRG8WO/pytlb9UF/QkCVaQIQhB7QhCoEiVIgEIQgQlZb2mF0b5tWmRsJ1sS3xeHyWoslAO8dG6DmVnnaVTOqGOcM5BoOY1ItxsfqumK0Rblm0bhi87s19FYOzuMNghOThCwEfee0X/NyxzZfZd007XTNLIWkOkLhYut7gvrf9FouL40XvYGjJrmuI/DoPLIJnye06hqkaXdktzYfuy54pjkFI27yXPtfcYLu9eDR1KhG4o5jLxDelee7iHIu9/0uFV9uZRAPswfvSGzp5D7T5Dq2/wjkmHF7Ty55Mvqe4h2wOaf4VGwD/zJHE/JoA/NN6PtrkDv41Cwt493I8OHkHXB8rrMKh/FNHvXv/5sfWnOuS0vqfZnaenro+9p33t7TDk9h5OH1U01y+V9kMekpKlk7HWzAeODmcQRx1X05RVYkY2RujhdeLyPH+PmOpdq23wkWppVmy7xvTfEHZLzNsd7Ttm5aqRs8ADntbuPjy3nNBJa5t9bXOXVQeynZ+/fbNX2jib4u6uDJKR7pt7LeZ9FdtrmuzcxxDhexCzDF8aqs295YdGgEet11jNaI1CerTMWxd1Q9tNDlvEMy9xmhsOGS0TBqZsMbYmiwAAWIdj1SXVD435loD2k8bmzr/NbdBIuSpbULk5eqd9xZc5dUHGZuSpNXQObXNsPA7+Jfo3UfOyu7io6rZmD+7FBwSoQtIEIQg9IQhUCRekhQIucz91pK6WTLFXWaBzI/K5QNZp8rKtY6N4ZGxGhHNSlVOoqc7yzLSIjlfbxG/ndey7LLXnxXSpZmubG5pCF2Qxpori1/sU0UkxPABl7Af1OChaTC6rFZXyxgNYXHelffdufdY0alR80jo21IyBmaYmkauBl0PJaZVTCgw7di8O4yxcLXBt43dXX/VembTTWu5cYrFp3Kty9jx3bisJd1YN2/ms62lwKajl7qYa5tcNHDopWi2nq4ZmVgkIaZC1zSb7wFi4OvrkdVpfaThjKyg75gu9gEzDxta5b5ELVb3pPM8NxET0wyMOzIaSBa5zsL6XPBbt2QbR97TmmcbviyGerOHyGXosJZUEAtBIBtvAZB1sxvDipfZXG5KSds7Dp7Q+JvELtMTekxP30zbidvqISrjPLcKKwvF46iJk8brtcL+XMHqCuss6+daNTqXWvKBx+K91nOMYYCSQP7+i0yvde6qeJ0+dwsqruw7HQV0br+F12H1Fx+YC26mkWNgbrgbaEH81qWEVe+0O55qostLKu0xUbBInbn3CBN5NKvRdrrjUaIGrTklXGmORHI2XZbhAlSIQegEqVCBEIQqFUVjb7Bp6O/wBKlCVB7StJDLaZ9Lk8B1yUkQEs1yvIC9xU54rq5iw0i5G3K8RR5p7UNsneB0HePFx4Rm7y5KooG0VI5stnNI3J4XD70cu7n/mDh6K/bZwGXDakNFyGtfbo14Jt8kx7WqXdhbO0fAx3QNeC39SrHQ1ALQbXDm2I4Frhoutra1LMQwnEZWmniiHdF43CC1njO/vXDn3ztZvDiFuuCUhbRQwvzIia11/w53UFR7E0TJ+/EeYN2tPsg/h0VsDwmXJ76arD5sxij7meWH4HuHpfL8rJmx5urn2q0Hd1veWylaHDzHhd+iqYzXopFrViYli0xCy7HbWS0T7e1C43fHwv8TeRWuYZj8FS3ehkB5tOTm9CFgbGqSoYy0iQOLSNC0kO+YW74Yt/rl8vq2qoeoWs4qF2a2oM38CUjvADunTfA59VK1D14LUms6eiLRMbR0rFaNlKrLcPDRVtyd4bU7kjeuqyrSIHp21+Sh6Oa4CfskQdi7NEq5tdcrpKgjYD4nD1TlNNJfMWTxahCIQlVR7QkQgEqEWQcnO8bW+adVlGyRpikbvN5cuoPAqLxBxa5jvMKZY+9jzCzKqRiuy1VGd6mmEjPgksH+j9D6qElqZospoJGcyWm3oRktWIXGVigy2DEGSGwcL9TbPkr9hlII4w0Zk5k8yfovcuGxXuYmXvrutvfzsukAytyuPzWoEHt/QmXD6hoF3CMvaBmbss7L0BUDs5Xb9NC++rG/lkr65oIsdDcHyORv6XVMGzn2SIsY7eYHuLMrFrXG4YedlZ5hDxlSnEc/VV37RbVdYa3qsabgy7ScINRTh7Bd8RLh1b74/RZA0Ld/tIIzVQxrZGORxkZ4SczbnzsvRhzevEud67UehgvmdE4rZ+AU+NmXgW3/yXuHZJt7vc53lYBeqc9NdvN8Vpnk02JpLudOeHhb9Va5SikpWxtDGiwHAJJGrwXt7WmXqrGocmtuV7w5u/PG06FwHpdem5Ncei67Mx3qYujr/LNZVaqZxjcY3ag2HUag/JS0UqYbRRWa2YatNieh0/NJhchfZSY0qbpRfNdZUQtyXieQDUgeoQRlQbSNPVP1GVcrS5tnA+IaEc1KLVUkiEJVWXtCWyRRSWQEqSyoZ4pHdlxq0h3yyP5FP6F14mn0XJ7bix8vSxuueCyhzBuuDmgkXBuLg2Oakqkw7of0Xl56fouwahzFkM39E1i0+f6p3URnUJtEMrfu61A9BeJ4g5padCuiFpFAxehdG8tPp1HNRguFoWNUAljPxDMH6KmnDpPhWJWJcIZCncb15ZhsnwJ3DhkvwrLTlupW05doFKw4UfePonf2cNFgERBGkDeFymdQ1TdS1RczFRGTMyspPY+n/jh3wtJTV8eSsmxtGbPfwJA9BmVUT76XvGlnAggnknOH4VHE0C1zxJ5+S6bwGQXh86kyGmLYAyc3M8zB8LHlrD52z/ADVbxDYal4w971c5zz67xurPLVKKr8TA4qKp1Bs3SR1kTmRmMh2jC5uYBIBHEZLRbKiVW0YZI2QsDy29jxHkVccMxBk8Ylj9k311BHArVSTqyRerIW9MPSEIWVIhKkQRO1tYYaOeUGxEbgD1dkP1TPspYBh0Nje5kuTqTvm5+aje1eq3aMM/6j//AEsG8fopvs3onRUEEbtbFx6b7i76rrNdY9/tmJ/lpbWpJMgvTQq5j1W+R3cRf1FcG0j/AMQicd0SNJ0tdc5hY+aqE1E6N1nef/3dTNDiBLdx5uRmDxPmkSJZCChbR4l9k+R/RRzIMk/mfla1z+9Ud3kFmVg2jhC7iJdo413bEopmY1xkjUoKY8lzkiYNXj9UFeqYlFVLFaZ2xnmfLJMhhxkNmtd+I2sOqghqDDXSvDAMtXHkFdaenbGwRtFgLeZ6nqkoaQRN3LWPEnRx/uusiqG8j02lkXSd9lC4jW7o1UaJiFbYaqoYrihJIBSYriZJsCmNHRPleGNG848P79ECYdh0lTKI28dTwaOJK1PDqJkMbYmCwaPmeJPVNcAwdtPHujN5zc7meQ6BSa3EaZ2T0HzKEqFdo9oQhQCEICDOe06r3qimpmt3nv3Q0cPE8Fzj/S23qtLpwGNaDyH5LMHNE2OyyHNtNGwDo5wt/f5KyYpj4bmTkOHPhYLV7cRCRXnax4zjLY4i4eQ81x2cY0M33G7neI8deaz/AGgxYPazduAbuseQyA+d1f8AZYMdRRucSN4E3BLTcnXLVcm3TEaWGZwuTe2Radb6KGGEysNyWlu9bI5gKIr62WOVxvaxIB4XIyOSlKHHC6Id80EC27kbEgZuHJWIRYSEWTWmn32GYyNtbesADZo68fSy7xShzd4HK11oJHM0PLHWzFx53Tl4bzVYrJiDv9bpzFW3Gqipo1DG6ZrjJih0AAUS+clcy9QSL6xx1JXqmjc/T5qLwuQzymOMXYwgSye6CcwxvxOtn0VxhiDQAAhs3p8PaNRc9U/ji/fJcK2uigYZZnhjRxPE8ABxKqGP7aOY3fc9tLH7pkbv1DxzbFo3+r5LePHa/UOdskV7Xh7W2zzURVyhumnA8uhWM4p2k5nupKtx+N0oaP8AI0WXnBO06Xf3JzvMdlc23m9bj2h0OfVdreNasdlb7+mmYlW2GqpeLYiXGwKc4xWEi7XXacweh0PkmuCYO+ofyaPaeeB5DqvNp1NcLw2Sd+4wXPE8GjmT9FomC4NHTts3Nx9p5AufLkE6oKCOFm5G2w4niTzJ4pytaZIhCFUCEIQe0IQoBHLzCEIM2wz/ALQxP/Ei/wDjemW0WiEJZqOjCp9ln4P9RWn4X/KU3+H9UIWBW8e/1N+if7R/8qm8ihCsI77Kf8r+s/qphvveR/VCFoQuKewVwo9EIWVOVyqfZPkUIUEn2efybfxz/wDvCtMegSoRFN21/nKH/EP0WPdo/wDOy/id+qEL6fhdPNm/OFNXhCFrP+Uu8dQ1yH+Xi/AFfNkP5VqEL5s9tJpIhCqBCEIBCEIP/9k=";
let links = () =>
<div>
<h3> {"Bot" |> ReasonReact.string} </h3>
<AgentLink
agent={AgentLink.Agent.makeBot(
~name="Stan Bot",
~owner=
AgentLink.Agent.makeUser(
~name="Samantha Grey",
~image=image3,
(),
),
(),
)}
/>
<h3> {"User Simple" |> ReasonReact.string} </h3>
<AgentLink
agent={AgentLink.Agent.makeUser(
~name="Stan Lee",
~image=image1,
(),
)}
/>
<h3> {"User Ozzie" |> ReasonReact.string} </h3>
<AgentLink
agent={AgentLink.Agent.makeUser(
~name="Ozzie Gooen",
~image=image4,
(),
)}
/>
<h3> {"User with long name" |> ReasonReact.string} </h3>
<AgentLink
agent={AgentLink.Agent.makeUser(
~name="Stan Ben Goldmemberfeinsteinwatkins",
~image=image2,
(),
)}
/>
</div>;
let entry = EntryTypes.(entry(~title="AgentLink", ~render=links));