File:Diag eq.svg

DescriptionDiag eq.svg Français : Courbe de variation de G(T,p) en fonction de Ksi; équilibre chimique. Date 3 May 2008 Source Own work Author Maghémite

($file = readdir(DIR)) { $ext = substr($file, length($file)-4); if ($ext eq '.svg') { print("$file\n"); ($pre, $name) = split(" - ", substr($file, 0, length($file)-4));

xov dsvdQOv A. || 5. d Igxiv corr.; ds xal A Edd. || 6. sxxoQsiv conj.; svg)OQstv U; d(poQsiv A Edd. Hist. Lib. V. Cap. 1. 1. dvgTtSQiaiQSxog conj. Sch

coord2angle=function(coord,filterout=TRUE) { diag=sqrt(coord[,1]^2+coord[,2]^2) psi=atan2(coord[,2],coord[,1]) phi=pi/2-atan(coord[,3]/diag) azi=pi/2-psi hoeh=pi/2-phi

## get the last 4 letters of the file name if ($ext eq '.svg') { ## if the file extension is '.svg' print("$file\n"); ## print file name ($pre, $name)