/* example use of pmap_poly to infer projective mapping from a quadrilateral */
#include "poly.h"
#define SIZE 50
main()
{
 static poly p = {
 4,
 /* u v sx sy */
 {0, 0, 0, 0}, /* vert[0] */
 {1, 0, 40, 0}, /* vert[1] */
 {1, 1, 30, 30}, /* vert[2] */
 {0, 1, 10, 20} /* vert[3] */
 };
 double ST[3][3];
 double scr[3], tex[3];
 int x, y;
 /* compute screen to texture transform ST */
 pmap_poly(&p, ST);
 /* scan a square area of screen space, transforming to texture space */
 for (y=0; y<size; y++)
 for (x=0; x<size; x++) {
 scr[0] = x;
 scr[1] = y;
 scr[2] = 1.;
 mx3d_transform(scr, ST, tex);
 tex[0] /= tex[2];
 tex[1] /= tex[2];
 printf("scr(%d,%d) transforms to tex(%g,%g)\n",
 x, y, tex[0], tex[1]);
 }
}
</div><div class="naked_ctrl">
<form action="/index.cgi/larger-text" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="http://www.cs.cmu.edu/afs/cs.cmu.edu/user/ph/www/src/texfund/mapping_example.c">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="http://www.cs.cmu.edu/afs/cs.cmu.edu/user/ph/www/src/texfund/mapping_example.c" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast">配色反転</option>
<option value="larger-text" selected="selected">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>