Soubor:Fork hologram with charge 1.svg
Velikost tohoto PNG náhledu tohoto SVG souboru: 600 × 600 pixelů. Jiná rozlišení: 240 × 240 pixelů | 480 × 480 pixelů | 768 × 768 pixelů | 1 024 × 1 024 pixelů | 2 048 × 2 048 pixelů | 1 250 × 1 250 pixelů.
Původní soubor (soubor SVG, nominální rozměr: 1 250 × 1 250 pixelů, velikost souboru: 193 KB)
|
Tento soubor pochází z Wikimedia Commons. Níže jsou zobrazeny informace, které obsahuje jeho tamější stránka s popisem souboru. |
Popis
| Popis |
English: Pitch-fork hologram that is used to create light beams with an optical vortex whose topological charge is equal to 1. Such beams carry one unit of orbital angular momentum. Čeština: Vidlicový hologram, jenž je používán pro tvorbu světelných svazků s optickým vírem, jehož topologický náboj je roven jedné. Takové svazky nesou jednotkový orbitální moment hybnosti. |
| Datum | |
| Zdroj | Vlastní dílo |
| Autor | JozumBjada |
Licence
Já, držitel autorských práv k tomuto dílu, ho tímto zveřejňuji za podmínek následující licence:
Tento soubor podléhá licenci Creative Commons Uveďte autora-Zachovejte licenci 4.0 International
- Dílo smíte:
- šířit – kopírovat, distribuovat a sdělovat veřejnosti
- upravovat – pozměňovat, doplňovat, využívat celé nebo částečně v jiných dílech
- Za těchto podmínek:
- uveďte autora – Máte povinnost uvést autorství, poskytnout odkaz na licenci a uvést, pokud jste provedli změny. Toho můžete docílit jakýmkoli rozumným způsobem, avšak ne způsobem naznačujícím, že by poskytovatel licence schvaloval nebo podporoval vás nebo vaše užití díla.
- zachovejte licenci – Pokud tento materiál jakkoliv upravíte, přepracujete nebo použijete ve svém díle, musíte své příspěvky šířit pod stejnou nebo slučitelnou licencí jako originál.
Source code
This figure was created using Wolfram language 12.0.0 for Microsoft Windows (64-bit) (April 6, 2019). The source code follows (formatted as a .wl package file).
(* ::Package:: *)
(* ::Title:: *)
(*Fork hologram*)
(* ::Input::Initialization:: *)
generateHologram[charge_,grating_:True,plotPoints_:200,binary_:False]:=Module[{slope=12,lim=2.5},
If[!grating,slope=0];
DensityPlot[Evaluate[If[binary,Sign,Identity]@Mod[slope x+Arg[Exp[-I charge ArcTan[x,y]]],2\[Pi],-\[Pi]]],{x,-lim,lim},{y,-lim,lim},Exclusions->(#1<=0&==0&),PlotPoints->plotPoints,PlotRangePadding->None,Frame->None,ColorFunction->GrayLevel,MaxRecursion->Automatic,ImageSize->1000]
];
(* ::Input:: *)
(*SetDirectory[NotebookDirectory[]]*)
(* ::Input:: *)
(*Export["fork1.png",generateHologram[1],ImageResolution->200]*)
(*Export["fork1.svg",generateHologram[1],ImageResolution->200]*)
Historie souboru
Kliknutím na datum a čas se zobrazí tehdejší verze souboru.
| Datum a čas | Náhled | Rozměry | Uživatel | Komentář | |
|---|---|---|---|---|---|
| současná | 15. 1. 2022, 21:16 | | 1 250 × 1 250 (193 KB) | JozumBjada | Cross-wiki upload from cs.wikipedia.org |
Využití souboru
Tento soubor používá následující stránka:
