60 |
60 |
61 A:= p[xx ] + yy; AA:= p[A] + zz; AB:= p[A + 1] + zz; |
61 A:= p[xx ] + yy; AA:= p[A] + zz; AB:= p[A + 1] + zz; |
62 B:= p[xx + 1] + yy; BA:= p[B] + zz; BB:= p[B + 1] + zz; |
62 B:= p[xx + 1] + yy; BA:= p[B] + zz; BB:= p[B + 1] + zz; |
63 |
63 |
64 inoise:= |
64 inoise:= |
65 lerp(w, lerp(v, lerp(u, grad(p[AA ], x , y , z ), |
65 lerp(w, lerp(v, lerp(u, grad(p[AA ], x , y , z ), |
66 grad(p[BA ], x-N , y , z )), |
66 grad(p[BA ], x-N , y , z )), |
67 lerp(u, grad(p[AB ], x , y-N , z ), |
67 lerp(u, grad(p[AB ], x , y-N , z ), |
68 grad(p[BB ], x-N , y-N , z ))), |
68 grad(p[BB ], x-N , y-N , z ))), |
69 lerp(v, lerp(u, grad(p[AA+1], x , y , z-N ), |
69 lerp(v, lerp(u, grad(p[AA+1], x , y , z-N ), |
70 grad(p[BA+1], x-N , y , z-N )), |
70 grad(p[BA+1], x-N , y , z-N )), |