Présentation de transform_02.jps

/syracuse/var/syracuse/bbgraf/icons/transform_02.png
-20 20 setxrange -20 20 setyrange 7 setxunit %% on charge les definitions de ligne tenant compte de l'epaisseur usespecialline -3 3 setxrange -3 3 setyrange %% on definit la 'global transform' par z |--> z^3 /gtransform { 2 dict begin /z defpoint z z mulc z mulc end } def %% on dessine notre grille : orange 1 dict begin /ep@isseur .0125 def [-1.5 -.5 .5 1.5] dup {shrule} apply {svrule} apply end noir %% des lignes entre -2 et 2 ds le repere jps [-2 2 1 stepto] dup {shrule} apply {svrule} apply