blob: 009506c714d3b80db3bfd395c316b6b7853004ff (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
|
# Beispielinputfile um epost zu steuern
#
# Führende und folgende Leerzeichen werden ignoriert.
# Leere oder mit # beginnende Zeilen werden ignoriert.
ohne Logdateien
#ohne Bildschirmausgaben
Palette
Name: erweiterter Regenbogen
ffffff
ff0000
ffff00
00ff00
00ffff
0000ff
ff00ff
000000
Ende
Palette
Name: rotblau
ff0000
ffffff
0000ff
Ende
Palette
Name: monoblau
000000
ff0000
Ende
Palette
Name: monogelb
000000
00ffff
Ende
!setze $iBereich: 0..0
!setze $jBereich: 0..99
#!setze $iBereich: 0
#!setze $jBereich: 00
Threadanzahl: 11
#externer Befehl: rm /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/*
externer Befehl: rm /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Videos/*
sequentiell lesen
!Schleife: $spezies: 1 2
!Schleife: $i: $iBereich
!Schleife: $j: $jBereich
Daten einlesen Phasenraum$spezies-$i-$j
Genauigkeit: double
PhaseSpace-Datei: /nfs/synologynfs/erich/Plasmapropagation/Daten/N$spezies-$i-$j_test.dat
Ende
maximale und minimale Dichten bestimmen Phasenraum$spezies-$i-$j
!Schleifenende
!Schleifenende
maximale und minimale Dichten angleichen Phasenraum$spezies-0-00
!Schleife: $i: $iBereich
!Schleife: $j: $jBereich
Phasenraum$spezies-$i-$j
!Schleifenende
!Schleifenende
Ende
!Schleifenende
!Schleife: $spezies: -beides 1 2
# !Schleife: $spezies: 1 2
!Schleife: $i: $iBereich
!Schleife: $j: $jBereich
?$spezies = -beides: lineares Bild Phasenraum1-$i-$j
?$spezies = -beides: Palette: monoblau
?$spezies = -beides: Daten: 1 Phasenraum2-$i-$j
?$spezies = -beides: Palette: 1 monogelb
?$spezies = -beides: Nachbearbeitung: 1 Log: 10^-4
?$spezies ≠ -beides: lineares Bild Phasenraum$spezies-$i-$j
?$spezies ≠ -beides: Palette: erweiterter Regenbogen
Minimaldichte: 10^-4
Nachbearbeitung: Log: 10^-4
Datei: /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/Phasenraum$spezies-$i$j.test.bmp
Schriftgröße: 60
Achse: oben 10+
Achse: links 2+
Achse: unten 10+
Achse: rechts 2+
Rahmen
Ende
externer Befehl: convert /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/Phasenraum$spezies-$i$j.test.bmp /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/Phasenraum$spezies-$i$j.test.png&
!Schleifenende
!Schleifenende
warte auf externe Befehle
# externer Befehl: rm /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/*.bmp
externer Befehl: ffmpeg -r 25 -i /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/Phasenraum$spezies-%03d.test.png /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Videos/Phasenraum$spezies-test.mp4 &
!Schleifenende
Dateiende
parallel lesen
!setze $symFelder: AY #VX1 # AY DAYDT # EX
!setze $asyFelder: N1 N2 #PXRIPPLE1
!setze $reineInputFelder: #PX1 PXSQR1
!Schleife: $Feld: $reineInputFelder $asyFelder $symFelder
Daten einlesen
Name: $Feld
Genauigkeit: double
xmax: 5
tmax: 2
SpaceTime-Datei: /nfs/synologynfs/erich/Plasmapropagation/Daten/$Feld-*_test.dat
Ende
!Schleifenende
!setze $asyBerFelder: #PXBreite
#Teile VX1 durch N1 zu VX1
#Ende
#Teile PX1 durch N1 zu PX1
#Ende
#Teile PXRIPPLE1 durch N1 zu PXRIPPLE1
#Ende
#Teile PXSQR1 durch N1 zu PXSQR1
#Ende
#Multipliziere PX1 mal PX1
# Name: PX1SQR
#Ende
#Linearkombination
# Name: PXBreite
# PXSQR1 1
# PX1SQR -1
#Ende
!Schleife: $Feld: $symFelder $asyFelder $asyBerFelder
lineares Bild $Feld
?$Feld in $symFelder $symBerFelder: Palette: rotblau
?$Feld in $symFelder $symBerFelder: maximale und minimale Dichten bestimmen (symmetrisch)
?$Feld in $asyFelder $asyBerFelder: Palette: erweiterter Regenbogen
?$Feld in $asyFelder $asyBerFelder: maximale und minimale Dichten bestimmen
?$Feld = N1: Minimaldichte: 10^-4
?$Feld = N1: Nachbearbeitung: Log: 10^-4
Datei: /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/$Feld_test.bmp
Schriftgröße: 60
Achse: oben 10+
Achse: links 2+
Achse: unten 10+
Achse: rechts 2+
Rahmen
?$Feld ≠ N1: !überspringe: 11
Legende: /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/$Feld_Legende.bmp
Schriftgröße: 30
Ausrichtung: senkrecht
Breite: 50
Höhe: 1000
Beschriftungen:
logarithmisch 10^-4 1 -1+
Beschriftungsende
Farbe linear
Rahmen
Ende
Ende
?$Feld = N1: externer Befehl: convert /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/$Feld_Legende.bmp /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/$Feld_Legende.png&
externer Befehl: convert /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/$Feld_test.bmp /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/$Feld_test.png&
!Schleifenende
warte auf externe Befehle
externer Befehl: rm /home_raid/erich/Dokumente/Prograemmchen/Plasmapropagation/Bilder/*.bmp
|
