19 #ifndef SWIGTEMPLATEDISAMBIGUATOR
20 # if defined(__SUNPRO_CC) && (__SUNPRO_CC <= 0x560)
21 # define SWIGTEMPLATEDISAMBIGUATOR template
22 # elif defined(__HP_aCC)
25 # define SWIGTEMPLATEDISAMBIGUATOR template
27 # define SWIGTEMPLATEDISAMBIGUATOR
33 # if defined(__cplusplus) || (defined(__GNUC__) && !defined(__STRICT_ANSI__))
34 # define SWIGINLINE inline
42 # if defined(__GNUC__)
43 # if !(defined(__cplusplus)) || (__GNUC__ > 3 || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4))
44 # define SWIGUNUSED __attribute__ ((__unused__))
49 # define SWIGUNUSED __attribute__ ((__unused__))
55 #ifndef SWIG_MSC_UNSUPPRESS_4505
56 # if defined(_MSC_VER)
57 # pragma warning(disable : 4505)
61 #ifndef SWIGUNUSEDPARM
63 # define SWIGUNUSEDPARM(p)
65 # define SWIGUNUSEDPARM(p) p SWIGUNUSED
71 # define SWIGINTERN static SWIGUNUSED
75 #ifndef SWIGINTERNINLINE
76 # define SWIGINTERNINLINE SWIGINTERN SWIGINLINE
80 #if (__GNUC__ >= 4) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4)
81 # ifndef GCC_HASCLASSVISIBILITY
82 # define GCC_HASCLASSVISIBILITY
87 # if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)
88 # if defined(STATIC_LINKED)
91 # define SWIGEXPORT __declspec(dllexport)
94 # if defined(__GNUC__) && defined(GCC_HASCLASSVISIBILITY)
95 # define SWIGEXPORT __attribute__ ((visibility("default")))
104 # if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)
105 # define SWIGSTDCALL __stdcall
112 #if !defined(SWIG_NO_CRT_SECURE_NO_DEPRECATE) && defined(_MSC_VER) && !defined(_CRT_SECURE_NO_DEPRECATE)
113 # define _CRT_SECURE_NO_DEPRECATE
117 #if !defined(SWIG_NO_SCL_SECURE_NO_DEPRECATE) && defined(_MSC_VER) && !defined(_SCL_SECURE_NO_DEPRECATE)
118 # define _SCL_SECURE_NO_DEPRECATE
124 #if defined(__GNUC__) && !defined(__INTEL_COMPILER)
125 typedef long long __int64;
129 #if defined(__x86_64)
175 while (except_ptr->
code != code && except_ptr->
code)
178 (*jenv)->ExceptionClear(jenv);
181 (*jenv)->ThrowNew(jenv, excep, msg);
187 #define SWIG_contract_assert(nullreturn, expr, msg) if (!(expr)) {SWIG_JavaThrowException(jenv, SWIG_JavaIllegalArgumentException, msg); return nullreturn; } else
198 return JNI_VERSION_1_2;
217 *pa = (
PLBOOL *) malloc( (
size_t) n *
sizeof (
PLBOOL ) );
218 for ( i = 0; i < n; i++ )
220 ( *pa )[i] = adat[i] ? 1 : 0;
230 *pa = (
PLINT *) malloc( (
size_t) n *
sizeof (
PLINT ) );
231 for ( i = 0; i < n; i++ )
233 ( *pa )[i] = adat[i];
243 *pa = (
PLFLT *) malloc( (
size_t) n *
sizeof (
PLFLT ) );
244 for ( i = 0; i < n; i++ )
246 ( *pa )[i] = adat[i];
256 *pa = (
PLFLT *) malloc( (
size_t) n *
sizeof (
PLFLT ) );
257 for ( i = 0; i < n; i++ )
259 ( *pa )[i] = adat[i];
271 *pa = (
PLFLT **) malloc( (
size_t) nx *
sizeof (
PLFLT * ) );
272 ( *pa )[0] = (
PLFLT *) malloc( (
size_t) ( nx * ny ) *
sizeof (
PLFLT ) );
274 for ( i = 0; i < nx; i++ )
276 ( *pa )[i] = ( *pa )[0] + i * ny;
277 for ( j = 0; j < ny; j++ )
278 ( *pa )[i][j] = adat[i][j];
290 *pa = (
PLFLT **) malloc( (
size_t) nx *
sizeof (
PLFLT * ) );
291 ( *pa )[0] = (
PLFLT *) malloc( (
size_t) ( nx * ny ) *
sizeof (
PLFLT ) );
293 for ( i = 0; i < nx; i++ )
295 ( *pa )[i] = ( *pa )[0] + i * ny;
296 for ( j = 0; j < ny; j++ )
297 ( *pa )[i][j] = adat[i][j];
312 x = (
double *) malloc( (
size_t) n *
sizeof ( double ) );
313 for ( i = 0; i < n; i++ )
315 x[i] = (double) dat[i];
318 jadat = ( *jenv )->NewDoubleArray( jenv, n );
319 ( *jenv )->SetDoubleArrayRegion( jenv, jadat, 0, n, x );
331 jdouble *jdata = ( *jenv )->GetDoubleArrayElements( jenv, jadat, 0 );
332 for ( i = 0; i < n; i++ )
334 dat[i] = (
PLFLT) jdata[i];
336 ( *jenv )->ReleaseDoubleArrayElements( jenv, jadat, jdata, 0 );
369 ( *cbenvMapform )->CallVoidMethod( cbenvMapform, mapformClass, mapformID, jx, jy );
386 const char *nativeString;
390 jmethodID labelID = 0;
394 jvalue = (jdouble) value;
396 if ( (
string == NULL ) || ( len == 0 ) )
403 if ( cached_jvm == NULL )
405 fprintf( stderr,
"Error! NULL jvm\n" );
408 ( *cached_jvm )->GetEnv( cached_jvm, (
void **) &cbenv, JNI_VERSION_1_2 );
411 fprintf( stderr,
"Thread not attached\n" );
412 if ( ( *cached_jvm )->AttachCurrentThread( cached_jvm, (
void **) &cbenv, NULL ) != 0 )
414 fprintf( stderr,
"Error attaching to JVM\n" );
418 if ( labelClass == 0 )
420 fprintf( stderr,
"Error - callback undefined\n" );
423 cls = ( *cbenv )->GetObjectClass( cbenv, labelClass );
426 fprintf( stderr,
"Error getting callback class\n" );
429 labelID = ( *cbenv )->GetMethodID( cbenv, cls,
"label",
"(ID)Ljava/lang/String;" );
432 javaString = (jstring) ( *cbenv )->CallObjectMethod( cbenv, labelClass, labelID, jaxis, jvalue );
433 nativeString = ( *cbenv )->GetStringUTFChars( cbenv, javaString, 0 );
434 strncpy(
string, nativeString, (
size_t) len );
435 ( *cbenv )->ReleaseStringUTFChars( cbenv, javaString, nativeString );
439 fprintf( stderr,
"Java callback not found\n" );
455 jdoubleArray jxt, jyt;
465 jdata = (jobject) data;
467 if ( cached_jvm == NULL )
469 fprintf( stderr,
"Error! NULL jvm\n" );
472 ( *cached_jvm )->GetEnv( cached_jvm, (
void **) &cbenv, JNI_VERSION_1_2 );
475 fprintf( stderr,
"Thread not attached\n" );
476 if ( ( *cached_jvm )->AttachCurrentThread( cached_jvm, (
void **) &cbenv, NULL ) != 0 )
478 fprintf( stderr,
"Error attaching to JVM\n" );
482 jxt = ( *cbenv )->NewDoubleArray( cbenv, 1 );
483 jyt = ( *cbenv )->NewDoubleArray( cbenv, 1 );
486 fprintf( stderr,
"Error - callback undefined\n" );
489 cls = ( *cbenv )->GetObjectClass( cbenv, ctClass );
492 fprintf( stderr,
"Error getting callback class\n" );
495 ctID = ( *cbenv )->GetMethodID( cbenv, cls,
"coordTransform",
"(DD[D[DLjava/lang/Object;)V" );
498 ( *cbenv )->CallVoidMethod( cbenv, ctClass, ctID, jx, jy, jxt, jyt, jdata );
499 xtval = ( *cbenv )->GetDoubleArrayElements( cbenv, jxt, JNI_FALSE );
500 ytval = ( *cbenv )->GetDoubleArrayElements( cbenv, jyt, JNI_FALSE );
501 *xt = (
PLFLT) xtval[0];
502 *yt = (
PLFLT) ytval[0];
506 fprintf( stderr,
"Java callback not found\n" );
516 jstring jresult = 0 ;
521 result = (
char *)(
"jdoubleArray");
522 if (result) jresult = (*jenv)->NewStringUTF(jenv, (
const char *)result);
528 jstring jresult = 0 ;
533 result = (
char *)(
"double[]");
534 if (result) jresult = (*jenv)->NewStringUTF(jenv, (
const char *)result);
540 jstring jresult = 0 ;
545 result = (
char *)(
"double[][]");
546 if (result) jresult = (*jenv)->NewStringUTF(jenv, (
const char *)result);
558 jresult = (jint)result;
570 jresult = (jint)result;
582 jresult = (jint)result;
594 jresult = (jint)result;
606 jresult = (jint)result;
618 jresult = (jint)result;
630 jresult = (jint)result;
642 jresult = (jint)result;
654 jresult = (jint)result;
666 jresult = (jint)result;
678 jresult = (jint)result;
690 jresult = (jint)result;
702 jresult = (jint)result;
714 jresult = (jint)result;
726 jresult = (jint)result;
738 jresult = (jint)result;
750 jresult = (jint)result;
762 jresult = (jint)result;
774 jresult = (jint)result;
786 jresult = (jint)result;
798 jresult = (jint)result;
810 jresult = (jint)result;
822 jresult = (jint)result;
834 jresult = (jint)result;
846 jresult = (jint)result;
858 jresult = (jint)result;
870 jresult = (jint)result;
882 jresult = (jint)result;
894 jresult = (jint)result;
906 jresult = (jint)result;
918 jresult = (jint)result;
930 jresult = (jint)result;
942 jresult = (jint)result;
954 jresult = (jint)result;
966 jresult = (jint)result;
978 jresult = (jint)result;
990 jresult = (jint)result;
1002 jresult = (jint)result;
1014 jresult = (jint)result;
1026 jresult = (jint)result;
1038 jresult = (jint)result;
1050 jresult = (jint)result;
1062 jresult = (jint)result;
1074 jresult = (jint)result;
1086 jresult = (jint)result;
1098 jresult = (jint)result;
1110 jresult = (jint)result;
1122 jresult = (jint)result;
1134 jresult = (jint)result;
1146 jresult = (jint)result;
1158 jresult = (jint)result;
1170 jresult = (jint)result;
1182 jresult = (jint)result;
1194 jresult = (jint)result;
1205 result = (int)(0x0001);
1206 jresult = (jint)result;
1217 result = (int)(0x0002);
1218 jresult = (jint)result;
1229 result = (int)(0x0004);
1230 jresult = (jint)result;
1241 result = (int)(0x0008);
1242 jresult = (jint)result;
1253 result = (int)(0x0010);
1254 jresult = (jint)result;
1265 result = (int)(0x0100);
1266 jresult = (jint)result;
1277 result = (int)(0x0200);
1278 jresult = (jint)result;
1289 result = (int)(0x0400);
1290 jresult = (jint)result;
1301 result = (int)(0x0800);
1302 jresult = (jint)result;
1313 result = (int)(0x1000);
1314 jresult = (jint)result;
1325 result = (int)(0x0000);
1326 jresult = (jint)result;
1337 result = (int)(0x0001);
1338 jresult = (jint)result;
1349 result = (int)(0x0002);
1350 jresult = (jint)result;
1361 result = (int)(0x0004);
1362 jresult = (jint)result;
1373 result = (int)(0x0008);
1374 jresult = (jint)result;
1385 result = (int)(0x0010);
1386 jresult = (jint)result;
1397 result = (int)(0x0020);
1398 jresult = (jint)result;
1409 result = (int)(0x0040);
1410 jresult = (jint)result;
1421 result = (int)(0x0080);
1422 jresult = (jint)result;
1433 result = (int)(0x80000000);
1434 jresult = (jint)result;
1445 result = (int)(0x00000000);
1446 jresult = (jint)result;
1457 result = (int)(0xf);
1458 jresult = (jint)result;
1469 result = (int)(0x7);
1470 jresult = (jint)result;
1481 result = (int)(0xf);
1482 jresult = (jint)result;
1493 result = (int)(0x0);
1494 jresult = (jint)result;
1505 result = (int)(0x1);
1506 jresult = (jint)result;
1517 result = (int)(0x2);
1518 jresult = (jint)result;
1529 result = (int)(0x0);
1530 jresult = (jint)result;
1541 result = (int)(0x1);
1542 jresult = (jint)result;
1553 result = (int)(0x2);
1554 jresult = (jint)result;
1565 result = (int)(0x3);
1566 jresult = (jint)result;
1577 result = (int)(0x4);
1578 jresult = (jint)result;
1589 result = (int)(0x0);
1590 jresult = (jint)result;
1601 result = (int)(0x1);
1602 jresult = (jint)result;
1613 result = (int)(0x2);
1614 jresult = (jint)result;
1625 result = (int)(0x0);
1626 jresult = (jint)result;
1637 result = (int)(0x1);
1638 jresult = (jint)result;
1650 jresult = (jint)result;
1662 jresult = (jint)result;
1673 result = (int)((-42));
1674 jresult = (jint)result;
1686 jresult = (jint)result;
1698 jresult = (jint)result;
1710 jresult = (jint)result;
1721 result = (int)(0x0);
1722 jresult = (jint)result;
1733 result = (int)(0x1);
1734 jresult = (jint)result;
1745 result = (int)(0x2);
1746 jresult = (jint)result;
1757 result = (int)(0x4);
1758 jresult = (jint)result;
1770 jresult = (jint)result;
1782 jresult = (jint)result;
1794 jresult = (jint)result;
1806 jresult = (jint)result;
1818 jresult = (jint)result;
1830 jresult = (jint)result;
1841 result = (int)(0x00);
1842 jresult = (jint)result;
1853 result = (int)(0x01);
1854 jresult = (jint)result;
1865 result = (int)(0x02);
1866 jresult = (jint)result;
1877 result = (int)(0x08);
1878 jresult = (jint)result;
1889 result = (int)(0x10);
1890 jresult = (jint)result;
1901 result = (int)(0x1);
1902 jresult = (jint)result;
1913 result = (int)(0x2);
1914 jresult = (jint)result;
1925 result = (int)(0x4);
1926 jresult = (jint)result;
1937 result = (int)(0x8);
1938 jresult = (jint)result;
1949 result = (int)(0x10);
1950 jresult = (jint)result;
1961 result = (int)(0x20);
1962 jresult = (jint)result;
1973 result = (int)(0x40);
1974 jresult = (jint)result;
1985 result = (int)(0x80);
1986 jresult = (jint)result;
1997 result = (int)(0x1);
1998 jresult = (jint)result;
2009 result = (int)(0x2);
2010 jresult = (jint)result;
2021 result = (int)(0x4);
2022 jresult = (jint)result;
2033 result = (int)(0x8);
2034 jresult = (jint)result;
2045 result = (int)(0x10);
2046 jresult = (jint)result;
2057 result = (int)(0x20);
2058 jresult = (jint)result;
2069 result = (int)(0x40);
2070 jresult = (jint)result;
2081 result = (int)(0x80);
2082 jresult = (jint)result;
2093 result = (int)(0x1);
2094 jresult = (jint)result;
2105 result = (int)(0x2);
2106 jresult = (jint)result;
2117 result = (int)(0x4);
2118 jresult = (jint)result;
2129 result = (int)(0x8);
2130 jresult = (jint)result;
2141 result = (int)(0x10);
2142 jresult = (jint)result;
2153 result = (int)(0x20);
2154 jresult = (jint)result;
2165 result = (int)(0x40);
2166 jresult = (jint)result;
2177 result = (int)(0x80);
2178 jresult = (jint)result;
2189 result = (int)(0x100);
2190 jresult = (jint)result;
2201 result = (int)(0x200);
2202 jresult = (jint)result;
2213 result = (int)(0x400);
2214 jresult = (jint)result;
2225 result = (int)(0x800);
2226 jresult = (jint)result;
2237 result = (int)(0x1000);
2238 jresult = (jint)result;
2249 result = (int)(0x2000);
2250 jresult = (jint)result;
2261 result = (int)(0x4000);
2262 jresult = (jint)result;
2273 result = (int)(0x8000);
2274 jresult = (jint)result;
2285 result = (int)(0x10000);
2286 jresult = (jint)result;
2297 result = (int)(0x0);
2298 jresult = (jint)result;
2309 result = (int)(0x1);
2310 jresult = (jint)result;
2321 result = (int)(0x2);
2322 jresult = (jint)result;
2333 result = (int)(0x4);
2334 jresult = (jint)result;
2345 result = (int)(0x001);
2346 jresult = (jint)result;
2357 result = (int)(0x002);
2358 jresult = (jint)result;
2369 result = (int)(0x003);
2370 jresult = (jint)result;
2381 result = (int)(0x004);
2382 jresult = (jint)result;
2393 result = (int)(0x008);
2394 jresult = (jint)result;
2405 result = (int)(0x010);
2406 jresult = (jint)result;
2417 result = (int)(0x020);
2418 jresult = (jint)result;
2429 result = (int)(0x040);
2430 jresult = (jint)result;
2441 result = (int)(0x080);
2442 jresult = (jint)result;
2453 result = (int)(0x100);
2454 jresult = (jint)result;
2467 if (arg1) (arg1)->type = arg2;
2479 result = (int) ((arg1)->type);
2480 jresult = (jint)result;
2492 arg2 = (
unsigned int)jarg2;
2493 if (arg1) (arg1)->state = arg2;
2500 unsigned int result;
2505 result = (
unsigned int) ((arg1)->state);
2506 jresult = (jlong)result;
2518 arg2 = (
unsigned int)jarg2;
2519 if (arg1) (arg1)->keysym = arg2;
2526 unsigned int result;
2531 result = (
unsigned int) ((arg1)->keysym);
2532 jresult = (jlong)result;
2544 arg2 = (
unsigned int)jarg2;
2545 if (arg1) (arg1)->button = arg2;
2552 unsigned int result;
2557 result = (
unsigned int) ((arg1)->button);
2558 jresult = (jlong)result;
2570 arg2 = (
PLINT)jarg2;
2571 if (arg1) (arg1)->subwindow = arg2;
2583 result = (
PLINT) ((arg1)->subwindow);
2584 jresult = (jint)result;
2598 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
2603 strncpy((
char*)arg1->
string, (
const char *)arg2, 16-1);
2610 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
2615 jstring jresult = 0 ;
2622 result = (
char *)(
char *) ((arg1)->
string);
2623 if (result) jresult = (*jenv)->NewStringUTF(jenv, (
const char *)result);
2636 if (arg1) (arg1)->pX = arg2;
2648 result = (int) ((arg1)->pX);
2649 jresult = (jint)result;
2662 if (arg1) (arg1)->pY = arg2;
2674 result = (int) ((arg1)->pY);
2675 jresult = (jint)result;
2687 arg2 = (
PLFLT)jarg2;
2688 if (arg1) (arg1)->dX = arg2;
2693 jdouble jresult = 0 ;
2700 result = (
PLFLT) ((arg1)->dX);
2701 jresult = (jdouble)result;
2713 arg2 = (
PLFLT)jarg2;
2714 if (arg1) (arg1)->dY = arg2;
2719 jdouble jresult = 0 ;
2726 result = (
PLFLT) ((arg1)->dY);
2727 jresult = (jdouble)result;
2739 arg2 = (
PLFLT)jarg2;
2740 if (arg1) (arg1)->wX = arg2;
2745 jdouble jresult = 0 ;
2752 result = (
PLFLT) ((arg1)->wX);
2753 jresult = (jdouble)result;
2765 arg2 = (
PLFLT)jarg2;
2766 if (arg1) (arg1)->wY = arg2;
2771 jdouble jresult = 0 ;
2778 result = (
PLFLT) ((arg1)->wY);
2779 jresult = (jdouble)result;
2802 free((
char *) arg1);
2812 arg1 = (
PLINT)jarg1;
2813 arg2 = (
PLINT)jarg2;
2826 arg1 = (
PLFLT)jarg1;
2827 arg2 = (
PLFLT)jarg2;
2828 arg3 = (
PLFLT)jarg3;
2829 arg4 = (
PLINT)jarg4;
2839 arg1 = (
PLINT)jarg1;
2856 arg1 = (
PLFLT)jarg1;
2857 arg2 = (
PLFLT)jarg2;
2858 arg3 = (
PLFLT)jarg3;
2859 arg4 = (
PLFLT)jarg4;
2860 arg5 = (
PLFLT)jarg5;
2861 arg6 = (
PLFLT)jarg6;
2862 arg7 = (
PLFLT)jarg7;
2864 arg8 = jarg8 ? 1 : 0;
2866 plarc(arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8);
2873 char *arg3 = (
char *) 0 ;
2876 char *arg6 = (
char *) 0 ;
2882 arg1 = (
PLFLT)jarg1;
2883 arg2 = (
PLFLT)jarg2;
2886 arg3 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg3, 0);
2889 arg4 = (
PLFLT)jarg4;
2890 arg5 = (
PLINT)jarg5;
2893 arg6 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg6, 0);
2896 arg7 = (
PLFLT)jarg7;
2897 arg8 = (
PLINT)jarg8;
2898 plaxes(arg1,arg2,(
char const *)arg3,arg4,arg5,(
char const *)arg6,arg7,arg8);
2899 if (arg3) (*jenv)->ReleaseStringUTFChars(jenv, jarg3, (
const char *)arg3);
2900 if (arg6) (*jenv)->ReleaseStringUTFChars(jenv, jarg6, (
const char *)arg6);
2906 PLFLT *arg2 = (PLFLT *) 0 ;
2907 PLFLT *arg3 = (PLFLT *) 0 ;
2913 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
2914 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
2920 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
2923 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
2924 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
2926 printf(
"Vectors must be same length.\n" );
2930 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
2932 arg4 = (
PLINT)jarg4;
2933 plbin(arg1,(
double const *)arg2,(
double const *)arg3,arg4);
2944 PLINT *arg1 = (PLINT *) 0 ;
2945 PLINT *arg2 = (PLINT *) 0 ;
2946 PLINT *arg3 = (PLINT *) 0 ;
2947 PLINT *arg4 = (PLINT *) 0 ;
2948 PLINT *arg5 = (PLINT *) 0 ;
2949 PLFLT *arg6 = (PLFLT *) 0 ;
2965 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
2977 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
2989 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
3001 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
3013 if ((*jenv)->GetArrayLength(jenv, jarg5) == 0) {
3025 if ((*jenv)->GetArrayLength(jenv, jarg6) == 0) {
3032 arg7 = (
PLFLT)jarg7;
3033 plbtime(arg1,arg2,arg3,arg4,arg5,arg6,arg7);
3035 jint jvalue = (jint)temp1;
3036 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
3039 jint jvalue = (jint)temp2;
3040 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
3043 jint jvalue = (jint)temp3;
3044 (*jenv)->SetIntArrayRegion(jenv, jarg3, 0, 1, &jvalue);
3047 jint jvalue = (jint)temp4;
3048 (*jenv)->SetIntArrayRegion(jenv, jarg4, 0, 1, &jvalue);
3051 jint jvalue = (jint)temp5;
3052 (*jenv)->SetIntArrayRegion(jenv, jarg5, 0, 1, &jvalue);
3055 jdouble jvalue = (jdouble)temp6;
3056 (*jenv)->SetDoubleArrayRegion(jenv, jarg6, 0, 1, &jvalue);
3075 char *arg1 = (
char *) 0 ;
3078 char *arg4 = (
char *) 0 ;
3086 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
3089 arg2 = (
PLFLT)jarg2;
3090 arg3 = (
PLINT)jarg3;
3093 arg4 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg4, 0);
3096 arg5 = (
PLFLT)jarg5;
3097 arg6 = (
PLINT)jarg6;
3098 plbox((
char const *)arg1,arg2,arg3,(
char const *)arg4,arg5,arg6);
3099 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
3100 if (arg4) (*jenv)->ReleaseStringUTFChars(jenv, jarg4, (
const char *)arg4);
3104 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plbox3(JNIEnv *jenv, jclass jcls, jstring jarg1, jstring jarg2, jdouble jarg3, jint jarg4, jstring jarg5, jstring jarg6, jdouble jarg7, jint jarg8, jstring jarg9, jstring jarg10, jdouble jarg11, jint jarg12) {
3105 char *arg1 = (
char *) 0 ;
3106 char *arg2 = (
char *) 0 ;
3109 char *arg5 = (
char *) 0 ;
3110 char *arg6 = (
char *) 0 ;
3113 char *arg9 = (
char *) 0 ;
3114 char *arg10 = (
char *) 0 ;
3122 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
3127 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
3130 arg3 = (
PLFLT)jarg3;
3131 arg4 = (
PLINT)jarg4;
3134 arg5 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg5, 0);
3139 arg6 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg6, 0);
3142 arg7 = (
PLFLT)jarg7;
3143 arg8 = (
PLINT)jarg8;
3146 arg9 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg9, 0);
3151 arg10 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg10, 0);
3152 if (!arg10) return ;
3154 arg11 = (
PLFLT)jarg11;
3155 arg12 = (
PLINT)jarg12;
3156 plbox3((
char const *)arg1,(
char const *)arg2,arg3,arg4,(
char const *)arg5,(
char const *)arg6,arg7,arg8,(
char const *)arg9,(
char const *)arg10,arg11,arg12);
3157 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
3158 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
3159 if (arg5) (*jenv)->ReleaseStringUTFChars(jenv, jarg5, (
const char *)arg5);
3160 if (arg6) (*jenv)->ReleaseStringUTFChars(jenv, jarg6, (
const char *)arg6);
3161 if (arg9) (*jenv)->ReleaseStringUTFChars(jenv, jarg9, (
const char *)arg9);
3162 if (arg10) (*jenv)->ReleaseStringUTFChars(jenv, jarg10, (
const char *)arg10);
3169 PLFLT *arg3 = (PLFLT *) 0 ;
3170 PLFLT *arg4 = (PLFLT *) 0 ;
3171 PLINT *arg5 = (PLINT *) 0 ;
3178 arg1 = (
PLFLT)jarg1;
3179 arg2 = (
PLFLT)jarg2;
3185 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
3197 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
3209 if ((*jenv)->GetArrayLength(jenv, jarg5) == 0) {
3218 jdouble jvalue = (jdouble)temp3;
3219 (*jenv)->SetDoubleArrayRegion(jenv, jarg3, 0, 1, &jvalue);
3222 jdouble jvalue = (jdouble)temp4;
3223 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
3226 jint jvalue = (jint)temp5;
3227 (*jenv)->SetIntArrayRegion(jenv, jarg5, 0, 1, &jvalue);
3247 arg1 = (
PLINT)jarg1;
3257 arg1 = (
PLFLT)jarg1;
3262 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plconfigtime(JNIEnv *jenv, jclass jcls, jdouble jarg1, jdouble jarg2, jdouble jarg3, jint jarg4, jboolean jarg5, jint jarg6, jint jarg7, jint jarg8, jint jarg9, jint jarg10, jdouble jarg11) {
3277 arg1 = (
PLFLT)jarg1;
3278 arg2 = (
PLFLT)jarg2;
3279 arg3 = (
PLFLT)jarg3;
3280 arg4 = (
PLINT)jarg4;
3282 arg5 = jarg5 ? 1 : 0;
3284 arg6 = (
PLINT)jarg6;
3285 arg7 = (
PLINT)jarg7;
3286 arg8 = (
PLINT)jarg8;
3287 arg9 = (
PLINT)jarg9;
3288 arg10 = (
PLINT)jarg10;
3289 arg11 = (
PLFLT)jarg11;
3290 plconfigtime(arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,arg11);
3295 PLFLT **arg1 = (PLFLT **) 0 ;
3302 PLFLT *arg8 = (PLFLT *) 0 ;
3312 int nx = ( *jenv )->GetArrayLength( jenv, jarg1 );
3315 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
3316 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
3318 ( *jenv )->EnsureLocalCapacity( jenv, nx );
3320 for ( i = 0; i < nx; i++ )
3322 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg1, i );
3323 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
3326 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
3327 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
3329 printf(
"Misshapen a array.\n" );
3330 for ( j = 0; j <= i; j++ )
3331 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
3343 for ( i = 0; i < nx; i++ )
3345 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
3346 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
3352 arg4 = (
PLINT)jarg4;
3353 arg5 = (
PLINT)jarg5;
3354 arg6 = (
PLINT)jarg6;
3355 arg7 = (
PLINT)jarg7;
3357 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg8, 0 );
3358 arg9 = ( *jenv )->GetArrayLength( jenv, jarg8 );
3360 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg8, jxdata, 0 );
3365 int nx = ( *jenv )->GetArrayLength( jenv, jarg10 );
3368 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
3369 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
3371 ( *jenv )->EnsureLocalCapacity( jenv, nx );
3373 for ( i = 0; i < nx; i++ )
3375 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg10, i );
3376 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
3379 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
3380 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
3382 printf(
"Misshapen a array.\n" );
3383 for ( j = 0; j <= i; j++ )
3384 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
3391 if ( !( ( nx == Xlen && ny ==
Ylen ) || ( nx == Xlen && ny == 1 ) ) )
3393 printf(
"Xlen =%d, nx =%d, Ylen =%d, ny =%d\n", Xlen, nx,
Ylen, ny );
3394 printf(
"X vector or matrix must match matrix dimensions.\n" );
3395 for ( i = 0; i < nx; i++ )
3396 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
3404 for ( i = 0; i < nx; i++ )
3406 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
3407 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
3417 int nx = ( *jenv )->GetArrayLength( jenv, jarg11 );
3420 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
3421 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
3423 ( *jenv )->EnsureLocalCapacity( jenv, nx );
3425 for ( i = 0; i < nx; i++ )
3427 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg11, i );
3428 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
3431 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
3432 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
3434 printf(
"Misshapen a array.\n" );
3435 for ( j = 0; j <= i; j++ )
3436 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
3443 if ( !( ( nx == Xlen && ny ==
Ylen ) || ( nx ==
Ylen && ny == 1 && ny == Alen ) ) )
3445 printf(
"Xlen =%d, nx =%d, Ylen =%d, Alen =%d, ny =%d\n",
3446 Xlen, nx,
Ylen, Alen, ny );
3447 printf(
"Y vector or matrix must match matrix dimensions.\n" );
3448 for ( i = 0; i < nx; i++ )
3449 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
3455 for ( i = 0; i < nx; i++ )
3457 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
3458 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
3470 plcont((
double const **)arg1,arg2,arg3,arg4,arg5,arg6,arg7,(
double const *)arg8,arg9,arg10,arg11);
3497 PLFLT *arg7 = (PLFLT *) 0 ;
3502 arg1 = (
PLINT)jarg1;
3503 arg2 = (
PLINT)jarg2;
3504 arg3 = (
PLINT)jarg3;
3505 arg4 = (
PLINT)jarg4;
3506 arg5 = (
PLINT)jarg5;
3507 arg6 = (
PLFLT)jarg6;
3513 if ((*jenv)->GetArrayLength(jenv, jarg7) == 0) {
3520 plctime(arg1,arg2,arg3,arg4,arg5,arg6,arg7);
3522 jdouble jvalue = (jdouble)temp7;
3523 (*jenv)->SetDoubleArrayRegion(jenv, jarg7, 0, 1, &jvalue);
3535 arg1 = (
PLINT)jarg1;
3537 arg2 = jarg2 ? 1 : 0;
3567 arg1 = (
PLFLT)jarg1;
3568 arg2 = (
PLFLT)jarg2;
3569 arg3 = (
PLFLT)jarg3;
3570 arg4 = (
PLFLT)jarg4;
3571 arg5 = (
PLINT)jarg5;
3572 arg6 = (
PLINT)jarg6;
3573 plenv(arg1,arg2,arg3,arg4,arg5,arg6);
3587 arg1 = (
PLFLT)jarg1;
3588 arg2 = (
PLFLT)jarg2;
3589 arg3 = (
PLFLT)jarg3;
3590 arg4 = (
PLFLT)jarg4;
3591 arg5 = (
PLINT)jarg5;
3592 arg6 = (
PLINT)jarg6;
3593 plenv0(arg1,arg2,arg3,arg4,arg5,arg6);
3606 PLFLT *arg2 = (PLFLT *) 0 ;
3607 PLFLT *arg3 = (PLFLT *) 0 ;
3608 PLFLT *arg4 = (PLFLT *) 0 ;
3613 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
3614 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
3620 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
3623 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
3624 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
3626 printf(
"Vectors must be same length.\n" );
3630 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
3633 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
3634 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
3636 printf(
"Vectors must be same length.\n" );
3640 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
3642 plerrx(arg1,(
double const *)arg2,(
double const *)arg3,(
double const *)arg4);
3657 PLFLT *arg2 = (PLFLT *) 0 ;
3658 PLFLT *arg3 = (PLFLT *) 0 ;
3659 PLFLT *arg4 = (PLFLT *) 0 ;
3664 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
3665 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
3671 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
3674 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
3675 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
3677 printf(
"Vectors must be same length.\n" );
3681 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
3684 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
3685 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
3687 printf(
"Vectors must be same length.\n" );
3691 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
3693 plerry(arg1,(
double const *)arg2,(
double const *)arg3,(
double const *)arg4);
3715 PLFLT *arg2 = (PLFLT *) 0 ;
3716 PLFLT *arg3 = (PLFLT *) 0 ;
3721 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
3722 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
3728 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
3731 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
3732 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
3734 printf(
"Vectors must be same length.\n" );
3738 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
3740 plfill(arg1,(
double const *)arg2,(
double const *)arg3);
3752 PLFLT *arg2 = (PLFLT *) 0 ;
3753 PLFLT *arg3 = (PLFLT *) 0 ;
3754 PLFLT *arg4 = (PLFLT *) 0 ;
3759 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
3760 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
3766 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
3769 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
3770 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
3772 printf(
"Vectors must be same length.\n" );
3776 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
3779 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
3780 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
3782 printf(
"Vectors must be same length.\n" );
3786 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
3788 plfill3(arg1,(
double const *)arg2,(
double const *)arg3,(
double const *)arg4);
3803 PLFLT *arg2 = (PLFLT *) 0 ;
3804 PLFLT *arg3 = (PLFLT *) 0 ;
3810 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
3811 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
3817 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
3820 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
3821 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
3823 printf(
"Vectors must be same length.\n" );
3827 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
3829 arg4 = (
PLFLT)jarg4;
3830 plgradient(arg1,(
double const *)arg2,(
double const *)arg3,arg4);
3852 arg1 = (
PLINT)jarg1;
3862 arg1 = (
PLINT)jarg1;
3868 PLFLT *arg1 = (PLFLT *) 0 ;
3869 PLFLT *arg2 = (PLFLT *) 0 ;
3880 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
3892 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
3901 jdouble jvalue = (jdouble)temp1;
3902 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
3905 jdouble jvalue = (jdouble)temp2;
3906 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
3915 PLINT *arg2 = (PLINT *) 0 ;
3916 PLINT *arg3 = (PLINT *) 0 ;
3917 PLINT *arg4 = (PLINT *) 0 ;
3924 arg1 = (
PLINT)jarg1;
3930 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
3942 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
3954 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
3963 jint jvalue = (jint)temp2;
3964 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
3967 jint jvalue = (jint)temp3;
3968 (*jenv)->SetIntArrayRegion(jenv, jarg3, 0, 1, &jvalue);
3971 jint jvalue = (jint)temp4;
3972 (*jenv)->SetIntArrayRegion(jenv, jarg4, 0, 1, &jvalue);
3982 PLINT *arg2 = (PLINT *) 0 ;
3983 PLINT *arg3 = (PLINT *) 0 ;
3984 PLINT *arg4 = (PLINT *) 0 ;
3985 PLFLT *arg5 = (PLFLT *) 0 ;
3993 arg1 = (
PLINT)jarg1;
3999 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
4011 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
4023 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
4035 if ((*jenv)->GetArrayLength(jenv, jarg5) == 0) {
4042 plgcol0a(arg1,arg2,arg3,arg4,arg5);
4044 jint jvalue = (jint)temp2;
4045 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
4048 jint jvalue = (jint)temp3;
4049 (*jenv)->SetIntArrayRegion(jenv, jarg3, 0, 1, &jvalue);
4052 jint jvalue = (jint)temp4;
4053 (*jenv)->SetIntArrayRegion(jenv, jarg4, 0, 1, &jvalue);
4056 jdouble jvalue = (jdouble)temp5;
4057 (*jenv)->SetDoubleArrayRegion(jenv, jarg5, 0, 1, &jvalue);
4067 PLINT *arg1 = (PLINT *) 0 ;
4068 PLINT *arg2 = (PLINT *) 0 ;
4069 PLINT *arg3 = (PLINT *) 0 ;
4081 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4093 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
4105 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
4114 jint jvalue = (jint)temp1;
4115 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4118 jint jvalue = (jint)temp2;
4119 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
4122 jint jvalue = (jint)temp3;
4123 (*jenv)->SetIntArrayRegion(jenv, jarg3, 0, 1, &jvalue);
4132 PLINT *arg1 = (PLINT *) 0 ;
4133 PLINT *arg2 = (PLINT *) 0 ;
4134 PLINT *arg3 = (PLINT *) 0 ;
4135 PLFLT *arg4 = (PLFLT *) 0 ;
4148 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4160 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
4172 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
4184 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
4193 jint jvalue = (jint)temp1;
4194 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4197 jint jvalue = (jint)temp2;
4198 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
4201 jint jvalue = (jint)temp3;
4202 (*jenv)->SetIntArrayRegion(jenv, jarg3, 0, 1, &jvalue);
4205 jdouble jvalue = (jdouble)temp4;
4206 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
4216 PLINT *arg1 = (PLINT *) 0 ;
4226 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4235 jint jvalue = (jint)temp1;
4236 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4243 char *arg1 = (
char *) 0 ;
4249 if ( jarg1 != NULL )
4252 jmethodID setLengthID;
4253 jclass sbufClass = ( *jenv )->GetObjectClass( jenv, jarg1 );
4255 jmethodID capacityID = ( *jenv )->GetMethodID( jenv, sbufClass,
"capacity",
"()I" );
4256 jint capacity = ( *jenv )->CallIntMethod( jenv, jarg1, capacityID );
4257 arg1 = (
char *) malloc( (
size_t) ( capacity + 1 ) );
4260 setLengthID = ( *jenv )->GetMethodID( jenv, sbufClass,
"setLength",
"(I)V" );
4261 ( *jenv )->CallVoidMethod( jenv, jarg1, setLengthID, (jint) 0 );
4269 jstring newString = ( *jenv )->NewStringUTF( jenv, arg1 );
4270 jclass sbufClass = ( *jenv )->GetObjectClass( jenv, jarg1 );
4271 jmethodID appendStringID = ( *jenv )->GetMethodID( jenv, sbufClass,
"append",
"(Ljava/lang/String;)Ljava/lang/StringBuffer;" );
4272 ( *jenv )->CallObjectMethod( jenv, jarg1, appendStringID, newString );
4284 PLFLT *arg1 = (PLFLT *) 0 ;
4285 PLFLT *arg2 = (PLFLT *) 0 ;
4286 PLFLT *arg3 = (PLFLT *) 0 ;
4287 PLFLT *arg4 = (PLFLT *) 0 ;
4300 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4312 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
4324 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
4336 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
4345 jdouble jvalue = (jdouble)temp1;
4346 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4349 jdouble jvalue = (jdouble)temp2;
4350 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
4353 jdouble jvalue = (jdouble)temp3;
4354 (*jenv)->SetDoubleArrayRegion(jenv, jarg3, 0, 1, &jvalue);
4357 jdouble jvalue = (jdouble)temp4;
4358 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
4368 PLFLT *arg1 = (PLFLT *) 0 ;
4378 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4387 jdouble jvalue = (jdouble)temp1;
4388 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4395 PLFLT *arg1 = (PLFLT *) 0 ;
4396 PLFLT *arg2 = (PLFLT *) 0 ;
4397 PLFLT *arg3 = (PLFLT *) 0 ;
4398 PLFLT *arg4 = (PLFLT *) 0 ;
4411 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4423 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
4435 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
4447 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
4456 jdouble jvalue = (jdouble)temp1;
4457 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4460 jdouble jvalue = (jdouble)temp2;
4461 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
4464 jdouble jvalue = (jdouble)temp3;
4465 (*jenv)->SetDoubleArrayRegion(jenv, jarg3, 0, 1, &jvalue);
4468 jdouble jvalue = (jdouble)temp4;
4469 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
4479 PLINT *arg1 = (PLINT *) 0 ;
4480 PLINT *arg2 = (PLINT *) 0 ;
4481 PLINT *arg3 = (PLINT *) 0 ;
4493 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4505 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
4517 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
4526 jint jvalue = (jint)temp1;
4527 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4530 jint jvalue = (jint)temp2;
4531 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
4534 jint jvalue = (jint)temp3;
4535 (*jenv)->SetIntArrayRegion(jenv, jarg3, 0, 1, &jvalue);
4554 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4563 jlong jvalue = (jlong)temp1;
4564 (*jenv)->SetLongArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4571 char *arg1 = (
char *) 0 ;
4577 if ( jarg1 != NULL )
4580 jmethodID setLengthID;
4581 jclass sbufClass = ( *jenv )->GetObjectClass( jenv, jarg1 );
4583 jmethodID capacityID = ( *jenv )->GetMethodID( jenv, sbufClass,
"capacity",
"()I" );
4584 jint capacity = ( *jenv )->CallIntMethod( jenv, jarg1, capacityID );
4585 arg1 = (
char *) malloc( (
size_t) ( capacity + 1 ) );
4588 setLengthID = ( *jenv )->GetMethodID( jenv, sbufClass,
"setLength",
"(I)V" );
4589 ( *jenv )->CallVoidMethod( jenv, jarg1, setLengthID, (jint) 0 );
4597 jstring newString = ( *jenv )->NewStringUTF( jenv, arg1 );
4598 jclass sbufClass = ( *jenv )->GetObjectClass( jenv, jarg1 );
4599 jmethodID appendStringID = ( *jenv )->GetMethodID( jenv, sbufClass,
"append",
"(Ljava/lang/String;)Ljava/lang/StringBuffer;" );
4600 ( *jenv )->CallObjectMethod( jenv, jarg1, appendStringID, newString );
4612 PLINT *arg1 = (PLINT *) 0 ;
4613 PLINT *arg2 = (PLINT *) 0 ;
4614 PLINT *arg3 = (PLINT *) 0 ;
4626 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4638 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
4650 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
4659 jint jvalue = (jint)temp1;
4660 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4663 jint jvalue = (jint)temp2;
4664 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
4667 jint jvalue = (jint)temp3;
4668 (*jenv)->SetIntArrayRegion(jenv, jarg3, 0, 1, &jvalue);
4677 PLINT *arg1 = (PLINT *) 0 ;
4687 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4696 jint jvalue = (jint)temp1;
4697 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4704 PLFLT *arg1 = (PLFLT *) 0 ;
4705 PLFLT *arg2 = (PLFLT *) 0 ;
4706 PLINT *arg3 = (PLINT *) 0 ;
4707 PLINT *arg4 = (PLINT *) 0 ;
4708 PLINT *arg5 = (PLINT *) 0 ;
4709 PLINT *arg6 = (PLINT *) 0 ;
4724 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
4736 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
4748 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
4760 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
4772 if ((*jenv)->GetArrayLength(jenv, jarg5) == 0) {
4784 if ((*jenv)->GetArrayLength(jenv, jarg6) == 0) {
4791 plgpage(arg1,arg2,arg3,arg4,arg5,arg6);
4793 jdouble jvalue = (jdouble)temp1;
4794 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
4797 jdouble jvalue = (jdouble)temp2;
4798 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
4801 jint jvalue = (jint)temp3;
4802 (*jenv)->SetIntArrayRegion(jenv, jarg3, 0, 1, &jvalue);
4805 jint jvalue = (jint)temp4;
4806 (*jenv)->SetIntArrayRegion(jenv, jarg4, 0, 1, &jvalue);
4809 jint jvalue = (jint)temp5;
4810 (*jenv)->SetIntArrayRegion(jenv, jarg5, 0, 1, &jvalue);
4813 jint jvalue = (jint)temp6;
4814 (*jenv)->SetIntArrayRegion(jenv, jarg6, 0, 1, &jvalue);
4833 PLFLT *arg1 = (PLFLT *) 0 ;
4834 PLFLT *arg2 = (PLFLT *) 0 ;
4835 PLFLT *arg3 = (PLFLT *) 0 ;
4837 PLFLT *arg5 = (PLFLT *) 0 ;
4839 PLFLT *arg7 = (PLFLT *) 0 ;
4841 PLFLT **arg9 = (PLFLT **) 0 ;
4848 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
4849 Alen = ( *jenv )->GetArrayLength( jenv, jarg1 );
4851 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
4854 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
4855 if ( ( *jenv )->GetArrayLength( jenv, jarg2 ) !=
Alen )
4857 printf(
"Vectors must be same length.\n" );
4861 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
4864 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
4865 arg4 = ( *jenv )->GetArrayLength( jenv, jarg3 );
4866 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
4868 printf(
"Vectors must be same length.\n" );
4872 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
4875 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg5, 0 );
4876 Xlen = ( *jenv )->GetArrayLength( jenv, jarg5 );
4879 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg5, jxdata, 0 );
4882 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg7, 0 );
4883 Ylen = ( *jenv )->GetArrayLength( jenv, jarg7 );
4886 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg7, jydata, 0 );
4891 int nx = ( *jenv )->GetArrayLength( jenv, jarg9 );
4895 ( *jenv )->EnsureLocalCapacity( jenv, nx );
4897 for ( i = 0; i < nx; i++ )
4899 ai = ( *jenv )->GetObjectArrayElement( jenv, jarg9, i );
4902 ny = ( *jenv )->GetArrayLength( jenv, ai );
4903 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai ) )
4905 printf(
"Misshapen a array.\n" );
4910 if ( nx != Xlen || ny !=
Ylen )
4912 printf(
"Vectors must match matrix.\n" );
4916 ptr = (PLFLT **) malloc( (
size_t) nx *
sizeof ( PLFLT * ) );
4917 ptr[0] = (PLFLT *) malloc( (
size_t) nx * ny *
sizeof (
PLFLT ) );
4918 for ( i = 0; i < nx; i++ )
4920 ptr[i] = ptr[0] + i * ny;
4925 arg10 = (
PLINT)jarg10;
4926 arg11 = (
PLFLT)jarg11;
4927 plgriddata((
double const *)arg1,(
double const *)arg2,(
double const *)arg3,arg4,(
double const *)arg5,arg6,(
double const *)arg7,arg8,arg9,arg10,arg11);
4933 int nx = ( *jenv )->GetArrayLength( jenv, jarg9 );
4938 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
4939 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
4941 for ( i = 0; i < nx; i++ )
4943 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg9, i );
4944 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
4947 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
4949 for ( i = 0; i < nx; i++ )
4951 for ( j = 0; j < ny; j++ )
4953 adat[i][j] = ptr[i][j];
4955 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
4956 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
4985 PLFLT *arg1 = (PLFLT *) 0 ;
4986 PLFLT *arg2 = (PLFLT *) 0 ;
4987 PLFLT *arg3 = (PLFLT *) 0 ;
4988 PLFLT *arg4 = (PLFLT *) 0 ;
5001 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
5013 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
5025 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
5037 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
5044 plgspa(arg1,arg2,arg3,arg4);
5046 jdouble jvalue = (jdouble)temp1;
5047 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
5050 jdouble jvalue = (jdouble)temp2;
5051 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
5054 jdouble jvalue = (jdouble)temp3;
5055 (*jenv)->SetDoubleArrayRegion(jenv, jarg3, 0, 1, &jvalue);
5058 jdouble jvalue = (jdouble)temp4;
5059 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
5069 PLINT *arg1 = (PLINT *) 0 ;
5079 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
5088 jint jvalue = (jint)temp1;
5089 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
5096 char *arg1 = (
char *) 0 ;
5102 if ( jarg1 != NULL )
5105 jmethodID setLengthID;
5106 jclass sbufClass = ( *jenv )->GetObjectClass( jenv, jarg1 );
5108 jmethodID capacityID = ( *jenv )->GetMethodID( jenv, sbufClass,
"capacity",
"()I" );
5109 jint capacity = ( *jenv )->CallIntMethod( jenv, jarg1, capacityID );
5110 arg1 = (
char *) malloc( (
size_t) ( capacity + 1 ) );
5113 setLengthID = ( *jenv )->GetMethodID( jenv, sbufClass,
"setLength",
"(I)V" );
5114 ( *jenv )->CallVoidMethod( jenv, jarg1, setLengthID, (jint) 0 );
5122 jstring newString = ( *jenv )->NewStringUTF( jenv, arg1 );
5123 jclass sbufClass = ( *jenv )->GetObjectClass( jenv, jarg1 );
5124 jmethodID appendStringID = ( *jenv )->GetMethodID( jenv, sbufClass,
"append",
"(Ljava/lang/String;)Ljava/lang/StringBuffer;" );
5125 ( *jenv )->CallObjectMethod( jenv, jarg1, appendStringID, newString );
5137 PLFLT *arg1 = (PLFLT *) 0 ;
5138 PLFLT *arg2 = (PLFLT *) 0 ;
5139 PLFLT *arg3 = (PLFLT *) 0 ;
5140 PLFLT *arg4 = (PLFLT *) 0 ;
5153 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
5165 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
5177 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
5189 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
5196 plgvpd(arg1,arg2,arg3,arg4);
5198 jdouble jvalue = (jdouble)temp1;
5199 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
5202 jdouble jvalue = (jdouble)temp2;
5203 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
5206 jdouble jvalue = (jdouble)temp3;
5207 (*jenv)->SetDoubleArrayRegion(jenv, jarg3, 0, 1, &jvalue);
5210 jdouble jvalue = (jdouble)temp4;
5211 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
5221 PLFLT *arg1 = (PLFLT *) 0 ;
5222 PLFLT *arg2 = (PLFLT *) 0 ;
5223 PLFLT *arg3 = (PLFLT *) 0 ;
5224 PLFLT *arg4 = (PLFLT *) 0 ;
5237 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
5249 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
5261 if ((*jenv)->GetArrayLength(jenv, jarg3) == 0) {
5273 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
5280 plgvpw(arg1,arg2,arg3,arg4);
5282 jdouble jvalue = (jdouble)temp1;
5283 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
5286 jdouble jvalue = (jdouble)temp2;
5287 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
5290 jdouble jvalue = (jdouble)temp3;
5291 (*jenv)->SetDoubleArrayRegion(jenv, jarg3, 0, 1, &jvalue);
5294 jdouble jvalue = (jdouble)temp4;
5295 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
5305 PLINT *arg1 = (PLINT *) 0 ;
5306 PLINT *arg2 = (PLINT *) 0 ;
5317 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
5329 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
5338 jint jvalue = (jint)temp1;
5339 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
5342 jint jvalue = (jint)temp2;
5343 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
5351 PLINT *arg1 = (PLINT *) 0 ;
5352 PLINT *arg2 = (PLINT *) 0 ;
5363 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
5375 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
5384 jint jvalue = (jint)temp1;
5385 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
5388 jint jvalue = (jint)temp2;
5389 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
5397 PLINT *arg1 = (PLINT *) 0 ;
5398 PLINT *arg2 = (PLINT *) 0 ;
5409 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
5421 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
5430 jint jvalue = (jint)temp1;
5431 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
5434 jint jvalue = (jint)temp2;
5435 (*jenv)->SetIntArrayRegion(jenv, jarg2, 0, 1, &jvalue);
5444 PLFLT *arg2 = (PLFLT *) 0 ;
5453 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
5454 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
5460 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
5462 arg3 = (
PLFLT)jarg3;
5463 arg4 = (
PLFLT)jarg4;
5464 arg5 = (
PLINT)jarg5;
5465 arg6 = (
PLINT)jarg6;
5466 plhist(arg1,(
double const *)arg2,arg3,arg4,arg5,arg6);
5477 PLFLT *arg4 = (PLFLT *) 0 ;
5478 PLFLT *arg5 = (PLFLT *) 0 ;
5479 PLFLT *arg6 = (PLFLT *) 0 ;
5486 arg1 = (
PLFLT)jarg1;
5487 arg2 = (
PLFLT)jarg2;
5488 arg3 = (
PLFLT)jarg3;
5494 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
5506 if ((*jenv)->GetArrayLength(jenv, jarg5) == 0) {
5518 if ((*jenv)->GetArrayLength(jenv, jarg6) == 0) {
5525 plhlsrgb(arg1,arg2,arg3,arg4,arg5,arg6);
5527 jdouble jvalue = (jdouble)temp4;
5528 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
5531 jdouble jvalue = (jdouble)temp5;
5532 (*jenv)->SetDoubleArrayRegion(jenv, jarg5, 0, 1, &jvalue);
5535 jdouble jvalue = (jdouble)temp6;
5536 (*jenv)->SetDoubleArrayRegion(jenv, jarg6, 0, 1, &jvalue);
5559 arg1 = (
PLFLT)jarg1;
5560 arg2 = (
PLFLT)jarg2;
5561 arg3 = (
PLFLT)jarg3;
5562 arg4 = (
PLFLT)jarg4;
5563 pljoin(arg1,arg2,arg3,arg4);
5568 char *arg1 = (
char *) 0 ;
5569 char *arg2 = (
char *) 0 ;
5570 char *arg3 = (
char *) 0 ;
5576 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
5581 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
5586 arg3 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg3, 0);
5589 pllab((
char const *)arg1,(
char const *)arg2,(
char const *)arg3);
5590 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
5591 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
5592 if (arg3) (*jenv)->ReleaseStringUTFChars(jenv, jarg3, (
const char *)arg3);
5596 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_pllegend(JNIEnv *jenv, jclass jcls, jdoubleArray jarg1, jdoubleArray jarg2, jint jarg3, jint jarg4, jdouble jarg5, jdouble jarg6, jdouble jarg7, jint jarg8, jint jarg9, jint jarg10, jint jarg11, jint jarg12, jintArray jarg13, jdouble jarg15, jdouble jarg16, jdouble jarg17, jdouble jarg18, jintArray jarg19, jobjectArray jarg20, jintArray jarg21, jintArray jarg22, jdoubleArray jarg23, jdoubleArray jarg24, jintArray jarg25, jintArray jarg26, jdoubleArray jarg27, jintArray jarg28, jdoubleArray jarg29, jintArray jarg30, jobjectArray jarg31) {
5597 PLFLT *arg1 = (PLFLT *) 0 ;
5598 PLFLT *arg2 = (PLFLT *) 0 ;
5610 PLINT *arg14 = (PLINT *) 0 ;
5615 PLINT *arg19 = (PLINT *) 0 ;
5616 char **arg20 = (
char **) 0 ;
5617 PLINT *arg21 = (PLINT *) 0 ;
5618 PLINT *arg22 = (PLINT *) 0 ;
5619 PLFLT *arg23 = (PLFLT *) 0 ;
5620 PLFLT *arg24 = (PLFLT *) 0 ;
5621 PLINT *arg25 = (PLINT *) 0 ;
5622 PLINT *arg26 = (PLINT *) 0 ;
5623 PLFLT *arg27 = (PLFLT *) 0 ;
5624 PLINT *arg28 = (PLINT *) 0 ;
5625 PLFLT *arg29 = (PLFLT *) 0 ;
5626 PLINT *arg30 = (PLINT *) 0 ;
5627 char **arg31 = (
char **) 0 ;
5638 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
5650 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
5657 arg3 = (
PLINT)jarg3;
5658 arg4 = (
PLINT)jarg4;
5659 arg5 = (
PLFLT)jarg5;
5660 arg6 = (
PLFLT)jarg6;
5661 arg7 = (
PLFLT)jarg7;
5662 arg8 = (
PLINT)jarg8;
5663 arg9 = (
PLINT)jarg9;
5664 arg10 = (
PLINT)jarg10;
5665 arg11 = (
PLINT)jarg11;
5666 arg12 = (
PLINT)jarg12;
5668 jint *jxdata = ( *jenv )->GetIntArrayElements( jenv, jarg13, 0 );
5669 arg13 = ( *jenv )->GetArrayLength( jenv, jarg13 );
5675 ( *jenv )->ReleaseIntArrayElements( jenv, jarg13, jxdata, 0 );
5677 arg15 = (
PLFLT)jarg15;
5678 arg16 = (
PLFLT)jarg16;
5679 arg17 = (
PLFLT)jarg17;
5680 arg18 = (
PLFLT)jarg18;
5682 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg19, 0 );
5683 if ( ( *jenv )->GetArrayLength( jenv, jarg19 ) !=
Alen )
5685 printf(
"Vectors must be same length.\n" );
5689 ( *jenv )->ReleaseIntArrayElements( jenv, jarg19, jydata, 0 );
5693 if ( jarg20 != NULL )
5695 int size = ( *jenv )->GetArrayLength( jenv, jarg20 );
5698 printf(
"Arrays must be the same length\n" );
5701 arg20 = (
char **) malloc( (
size_t) Alen *
sizeof (
char * ) );
5703 for ( i = 0; i <
Alen; i++ )
5705 jstring j_string = (jstring) ( *jenv )->GetObjectArrayElement( jenv, jarg20, i );
5706 const char * c_string = (
char *) ( *jenv )->GetStringUTFChars( jenv, j_string, 0 );
5707 arg20[i] = malloc( ( strlen( c_string ) + 1 ) *
sizeof (
const char * ) );
5708 strcpy( arg20[i], c_string );
5709 ( *jenv )->ReleaseStringUTFChars( jenv, j_string, c_string );
5710 ( *jenv )->DeleteLocalRef( jenv, j_string );
5719 if ( jarg21 != NULL )
5721 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg21, 0 );
5722 if ( ( *jenv )->GetArrayLength( jenv, jarg21 ) !=
Alen )
5724 printf(
"Vectors must be same length.\n" );
5728 ( *jenv )->ReleaseIntArrayElements( jenv, jarg21, jydata, 0 );
5736 if ( jarg22 != NULL )
5738 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg22, 0 );
5739 if ( ( *jenv )->GetArrayLength( jenv, jarg22 ) !=
Alen )
5741 printf(
"Vectors must be same length.\n" );
5745 ( *jenv )->ReleaseIntArrayElements( jenv, jarg22, jydata, 0 );
5753 if ( jarg23 != NULL )
5755 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg23, 0 );
5756 if ( ( *jenv )->GetArrayLength( jenv, jarg23 ) !=
Alen )
5758 printf(
"Vectors must be same length.\n" );
5762 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg23, jydata, 0 );
5770 if ( jarg24 != NULL )
5772 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg24, 0 );
5773 if ( ( *jenv )->GetArrayLength( jenv, jarg24 ) !=
Alen )
5775 printf(
"Vectors must be same length.\n" );
5779 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg24, jydata, 0 );
5787 if ( jarg25 != NULL )
5789 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg25, 0 );
5790 if ( ( *jenv )->GetArrayLength( jenv, jarg25 ) !=
Alen )
5792 printf(
"Vectors must be same length.\n" );
5796 ( *jenv )->ReleaseIntArrayElements( jenv, jarg25, jydata, 0 );
5804 if ( jarg26 != NULL )
5806 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg26, 0 );
5807 if ( ( *jenv )->GetArrayLength( jenv, jarg26 ) !=
Alen )
5809 printf(
"Vectors must be same length.\n" );
5813 ( *jenv )->ReleaseIntArrayElements( jenv, jarg26, jydata, 0 );
5821 if ( jarg27 != NULL )
5823 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg27, 0 );
5824 if ( ( *jenv )->GetArrayLength( jenv, jarg27 ) !=
Alen )
5826 printf(
"Vectors must be same length.\n" );
5830 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg27, jydata, 0 );
5838 if ( jarg28 != NULL )
5840 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg28, 0 );
5841 if ( ( *jenv )->GetArrayLength( jenv, jarg28 ) !=
Alen )
5843 printf(
"Vectors must be same length.\n" );
5847 ( *jenv )->ReleaseIntArrayElements( jenv, jarg28, jydata, 0 );
5855 if ( jarg29 != NULL )
5857 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg29, 0 );
5858 if ( ( *jenv )->GetArrayLength( jenv, jarg29 ) !=
Alen )
5860 printf(
"Vectors must be same length.\n" );
5864 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg29, jydata, 0 );
5872 if ( jarg30 != NULL )
5874 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg30, 0 );
5875 if ( ( *jenv )->GetArrayLength( jenv, jarg30 ) !=
Alen )
5877 printf(
"Vectors must be same length.\n" );
5881 ( *jenv )->ReleaseIntArrayElements( jenv, jarg30, jydata, 0 );
5890 if ( jarg31 != NULL )
5892 int size = ( *jenv )->GetArrayLength( jenv, jarg31 );
5895 printf(
"Arrays must be the same length\n" );
5898 arg31 = (
char **) malloc( (
size_t) Alen *
sizeof (
char * ) );
5900 for ( i = 0; i <
Alen; i++ )
5902 jstring j_string = (jstring) ( *jenv )->GetObjectArrayElement( jenv, jarg31, i );
5903 const char * c_string = (
char *) ( *jenv )->GetStringUTFChars( jenv, j_string, 0 );
5904 arg31[i] = malloc( ( strlen( c_string ) + 1 ) *
sizeof (
const char * ) );
5905 strcpy( arg31[i], c_string );
5906 ( *jenv )->ReleaseStringUTFChars( jenv, j_string, c_string );
5907 ( *jenv )->DeleteLocalRef( jenv, j_string );
5915 pllegend(arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,arg11,arg12,arg13,(
int const *)arg14,arg15,arg16,arg17,arg18,(
int const *)arg19,(
char const **)arg20,(
int const *)arg21,(
int const *)arg22,(
double const *)arg23,(
double const *)arg24,(
int const *)arg25,(
int const *)arg26,(
double const *)arg27,(
int const *)arg28,(
double const *)arg29,(
int const *)arg30,(
char const **)arg31);
5917 jdouble jvalue = (jdouble)temp1;
5918 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
5921 jdouble jvalue = (jdouble)temp2;
5922 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
5934 if ( arg20 != NULL )
5936 for ( i = 0; i <
Alen; i++ )
5942 if ( arg21 != NULL )
5946 if ( arg22 != NULL )
5950 if ( arg23 != NULL )
5954 if ( arg24 != NULL )
5958 if ( arg25 != NULL )
5962 if ( arg26 != NULL )
5966 if ( arg27 != NULL )
5970 if ( arg28 != NULL )
5974 if ( arg29 != NULL )
5978 if ( arg30 != NULL )
5983 if ( arg31 != NULL )
5985 for ( i = 0; i <
Alen; i++ )
5993 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plcolorbar(JNIEnv *jenv, jclass jcls, jdoubleArray jarg1, jdoubleArray jarg2, jint jarg3, jint jarg4, jdouble jarg5, jdouble jarg6, jdouble jarg7, jdouble jarg8, jint jarg9, jint jarg10, jint jarg11, jdouble jarg12, jdouble jarg13, jint jarg14, jdouble jarg15, jintArray jarg16, jobjectArray jarg18, jobjectArray jarg19, jdoubleArray jarg21, jintArray jarg22, jintArray jarg23, jobjectArray jarg24) {
5994 PLFLT *arg1 = (PLFLT *) 0 ;
5995 PLFLT *arg2 = (PLFLT *) 0 ;
6010 PLINT *arg17 = (PLINT *) 0 ;
6011 char **arg18 = (
char **) 0 ;
6013 char **arg20 = (
char **) 0 ;
6014 PLFLT *arg21 = (PLFLT *) 0 ;
6015 PLINT *arg22 = (PLINT *) 0 ;
6016 PLINT *arg23 = (PLINT *) 0 ;
6017 PLFLT **arg24 = (PLFLT **) 0 ;
6028 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
6040 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
6047 arg3 = (
PLINT)jarg3;
6048 arg4 = (
PLINT)jarg4;
6049 arg5 = (
PLFLT)jarg5;
6050 arg6 = (
PLFLT)jarg6;
6051 arg7 = (
PLFLT)jarg7;
6052 arg8 = (
PLFLT)jarg8;
6053 arg9 = (
PLINT)jarg9;
6054 arg10 = (
PLINT)jarg10;
6055 arg11 = (
PLINT)jarg11;
6056 arg12 = (
PLFLT)jarg12;
6057 arg13 = (
PLFLT)jarg13;
6058 arg14 = (
PLINT)jarg14;
6059 arg15 = (
PLFLT)jarg15;
6061 jint *jxdata = ( *jenv )->GetIntArrayElements( jenv, jarg16, 0 );
6062 arg16 = ( *jenv )->GetArrayLength( jenv, jarg16 );
6068 ( *jenv )->ReleaseIntArrayElements( jenv, jarg16, jxdata, 0 );
6072 if ( jarg18 != NULL )
6074 int size = ( *jenv )->GetArrayLength( jenv, jarg18 );
6077 printf(
"Arrays must be the same length\n" );
6080 arg18 = (
char **) malloc( (
size_t) Alen *
sizeof (
char * ) );
6082 for ( i = 0; i <
Alen; i++ )
6084 jstring j_string = (jstring) ( *jenv )->GetObjectArrayElement( jenv, jarg18, i );
6085 const char * c_string = (
char *) ( *jenv )->GetStringUTFChars( jenv, j_string, 0 );
6086 arg18[i] = malloc( ( strlen( c_string ) + 1 ) *
sizeof (
const char * ) );
6087 strcpy( arg18[i], c_string );
6088 ( *jenv )->ReleaseStringUTFChars( jenv, j_string, c_string );
6089 ( *jenv )->DeleteLocalRef( jenv, j_string );
6099 if ( jarg19 != NULL )
6101 int size = ( *jenv )->GetArrayLength( jenv, jarg19 );
6104 arg20 = (
char **) malloc( (
size_t) Alen *
sizeof (
char * ) );
6106 for ( i = 0; i <
Alen; i++ )
6108 jstring j_string = (jstring) ( *jenv )->GetObjectArrayElement( jenv, jarg19, i );
6109 const char * c_string = (
char *) ( *jenv )->GetStringUTFChars( jenv, j_string, 0 );
6110 arg20[i] = malloc( ( strlen( c_string ) + 1 ) *
sizeof (
const char * ) );
6111 strcpy( arg20[i], c_string );
6112 ( *jenv )->ReleaseStringUTFChars( jenv, j_string, c_string );
6113 ( *jenv )->DeleteLocalRef( jenv, j_string );
6123 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg21, 0 );
6124 if ( ( *jenv )->GetArrayLength( jenv, jarg21 ) !=
Alen )
6126 printf(
"Vectors must be same length.\n" );
6130 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg21, jydata, 0 );
6133 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg22, 0 );
6134 if ( ( *jenv )->GetArrayLength( jenv, jarg22 ) !=
Alen )
6136 printf(
"Vectors must be same length.\n" );
6140 ( *jenv )->ReleaseIntArrayElements( jenv, jarg22, jydata, 0 );
6144 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg23, 0 );
6145 if ( ( *jenv )->GetArrayLength( jenv, jarg23 ) !=
Alen )
6147 printf(
"Vectors must be same length.\n" );
6150 Xlen = ( *jenv )->GetArrayLength( jenv, jarg23 );
6152 for ( i = 0; i <
Xlen; i++ )
6153 if ( jydata[i] >
Ylen )
6156 ( *jenv )->ReleaseIntArrayElements( jenv, jarg23, jydata, 0 );
6161 int nx = ( *jenv )->GetArrayLength( jenv, jarg24 );
6164 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
6165 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
6167 ( *jenv )->EnsureLocalCapacity( jenv, nx );
6169 for ( i = 0; i < nx; i++ )
6171 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg24, i );
6172 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
6175 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
6176 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
6178 printf(
"Misshapen a array.\n" );
6179 for ( j = 0; j <= i; j++ )
6180 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
6187 if ( nx != Xlen || ny !=
Ylen )
6189 printf(
"Vectors must match matrix.\n" );
6190 for ( i = 0; i < nx; i++ )
6191 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6197 for ( i = 0; i < nx; i++ )
6199 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6200 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
6206 plcolorbar(arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,arg11,arg12,arg13,arg14,arg15,arg16,(
int const *)arg17,(
char const **)arg18,arg19,(
char const **)arg20,(
double const *)arg21,(
int const *)arg22,(
int const *)arg23,(
double const **)arg24);
6208 jdouble jvalue = (jdouble)temp1;
6209 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
6212 jdouble jvalue = (jdouble)temp2;
6213 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
6222 if ( arg18 != NULL )
6224 for ( i = 0; i <
Alen; i++ )
6231 if ( arg20 != NULL )
6233 for ( i = 0; i <
Alen; i++ )
6261 arg1 = (
PLFLT)jarg1;
6262 arg2 = (
PLFLT)jarg2;
6263 arg3 = (
PLFLT)jarg3;
6270 PLFLT *arg2 = (PLFLT *) 0 ;
6271 PLFLT *arg3 = (PLFLT *) 0 ;
6276 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
6277 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
6283 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
6286 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
6287 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
6289 printf(
"Vectors must be same length.\n" );
6293 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
6295 plline(arg1,(
double const *)arg2,(
double const *)arg3);
6307 PLFLT *arg2 = (PLFLT *) 0 ;
6308 PLFLT *arg3 = (PLFLT *) 0 ;
6309 PLFLT *arg4 = (PLFLT *) 0 ;
6314 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
6315 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
6321 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
6324 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
6325 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
6327 printf(
"Vectors must be same length.\n" );
6331 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
6334 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
6335 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
6337 printf(
"Vectors must be same length.\n" );
6341 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
6343 plline3(arg1,(
double const *)arg2,(
double const *)arg3,(
double const *)arg4);
6361 arg1 = (
PLINT)jarg1;
6367 PLFLT *arg1 = (PLFLT *) 0 ;
6368 PLFLT *arg2 = (PLFLT *) 0 ;
6369 PLFLT **arg3 = (PLFLT **) 0 ;
6377 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
6378 Xlen = ( *jenv )->GetArrayLength( jenv, jarg1 );
6380 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
6383 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
6384 Ylen = ( *jenv )->GetArrayLength( jenv, jarg2 );
6386 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
6391 int nx = ( *jenv )->GetArrayLength( jenv, jarg3 );
6394 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
6395 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
6397 ( *jenv )->EnsureLocalCapacity( jenv, nx );
6399 for ( i = 0; i < nx; i++ )
6401 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg3, i );
6402 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
6405 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
6406 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
6408 printf(
"Misshapen a array.\n" );
6409 for ( j = 0; j <= i; j++ )
6410 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
6417 if ( nx != Xlen || ny !=
Ylen )
6419 printf(
"Vectors must match matrix.\n" );
6420 for ( i = 0; i < nx; i++ )
6421 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6429 for ( i = 0; i < nx; i++ )
6431 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6432 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
6439 arg6 = (
PLINT)jarg6;
6440 plmesh((
double const *)arg1,(
double const *)arg2,(
double const **)arg3,arg4,arg5,arg6);
6455 PLFLT *arg1 = (PLFLT *) 0 ;
6456 PLFLT *arg2 = (PLFLT *) 0 ;
6457 PLFLT **arg3 = (PLFLT **) 0 ;
6461 PLFLT *arg7 = (PLFLT *) 0 ;
6467 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
6468 Xlen = ( *jenv )->GetArrayLength( jenv, jarg1 );
6470 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
6473 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
6474 Ylen = ( *jenv )->GetArrayLength( jenv, jarg2 );
6476 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
6481 int nx = ( *jenv )->GetArrayLength( jenv, jarg3 );
6484 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
6485 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
6487 ( *jenv )->EnsureLocalCapacity( jenv, nx );
6489 for ( i = 0; i < nx; i++ )
6491 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg3, i );
6492 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
6495 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
6496 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
6498 printf(
"Misshapen a array.\n" );
6499 for ( j = 0; j <= i; j++ )
6500 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
6507 if ( nx != Xlen || ny !=
Ylen )
6509 printf(
"Vectors must match matrix.\n" );
6510 for ( i = 0; i < nx; i++ )
6511 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6519 for ( i = 0; i < nx; i++ )
6521 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6522 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
6529 arg6 = (
PLINT)jarg6;
6531 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg7, 0 );
6532 arg8 = ( *jenv )->GetArrayLength( jenv, jarg7 );
6534 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg7, jxdata, 0 );
6536 plmeshc((
double const *)arg1,(
double const *)arg2,(
double const **)arg3,arg4,arg5,arg6,(
double const *)arg7,arg8);
6554 PLINT *arg1 = (PLINT *) 0 ;
6564 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
6573 jint jvalue = (jint)temp1;
6574 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
6581 char *arg1 = (
char *) 0 ;
6585 char *arg5 = (
char *) 0 ;
6591 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
6594 arg2 = (
PLFLT)jarg2;
6595 arg3 = (
PLFLT)jarg3;
6596 arg4 = (
PLFLT)jarg4;
6599 arg5 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg5, 0);
6602 plmtex((
char const *)arg1,arg2,arg3,arg4,(
char const *)arg5);
6603 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
6604 if (arg5) (*jenv)->ReleaseStringUTFChars(jenv, jarg5, (
const char *)arg5);
6609 char *arg1 = (
char *) 0 ;
6613 char *arg5 = (
char *) 0 ;
6619 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
6622 arg2 = (
PLFLT)jarg2;
6623 arg3 = (
PLFLT)jarg3;
6624 arg4 = (
PLFLT)jarg4;
6627 arg5 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg5, 0);
6630 plmtex3((
char const *)arg1,arg2,arg3,arg4,(
char const *)arg5);
6631 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
6632 if (arg5) (*jenv)->ReleaseStringUTFChars(jenv, jarg5, (
const char *)arg5);
6637 PLFLT *arg1 = (PLFLT *) 0 ;
6638 PLFLT *arg2 = (PLFLT *) 0 ;
6639 PLFLT **arg3 = (PLFLT **) 0 ;
6648 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
6649 Xlen = ( *jenv )->GetArrayLength( jenv, jarg1 );
6651 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
6654 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
6655 Ylen = ( *jenv )->GetArrayLength( jenv, jarg2 );
6657 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
6662 int nx = ( *jenv )->GetArrayLength( jenv, jarg3 );
6665 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
6666 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
6668 ( *jenv )->EnsureLocalCapacity( jenv, nx );
6670 for ( i = 0; i < nx; i++ )
6672 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg3, i );
6673 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
6676 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
6677 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
6679 printf(
"Misshapen a array.\n" );
6680 for ( j = 0; j <= i; j++ )
6681 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
6688 if ( nx != Xlen || ny !=
Ylen )
6690 printf(
"Vectors must match matrix.\n" );
6691 for ( i = 0; i < nx; i++ )
6692 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6700 for ( i = 0; i < nx; i++ )
6702 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6703 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
6710 arg6 = (
PLINT)jarg6;
6712 arg7 = jarg7 ? 1 : 0;
6714 plot3d((
double const *)arg1,(
double const *)arg2,(
double const **)arg3,arg4,arg5,arg6,arg7);
6729 PLFLT *arg1 = (PLFLT *) 0 ;
6730 PLFLT *arg2 = (PLFLT *) 0 ;
6731 PLFLT **arg3 = (PLFLT **) 0 ;
6735 PLFLT *arg7 = (PLFLT *) 0 ;
6741 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
6742 Xlen = ( *jenv )->GetArrayLength( jenv, jarg1 );
6744 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
6747 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
6748 Ylen = ( *jenv )->GetArrayLength( jenv, jarg2 );
6750 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
6755 int nx = ( *jenv )->GetArrayLength( jenv, jarg3 );
6758 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
6759 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
6761 ( *jenv )->EnsureLocalCapacity( jenv, nx );
6763 for ( i = 0; i < nx; i++ )
6765 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg3, i );
6766 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
6769 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
6770 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
6772 printf(
"Misshapen a array.\n" );
6773 for ( j = 0; j <= i; j++ )
6774 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
6781 if ( nx != Xlen || ny !=
Ylen )
6783 printf(
"Vectors must match matrix.\n" );
6784 for ( i = 0; i < nx; i++ )
6785 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6793 for ( i = 0; i < nx; i++ )
6795 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6796 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
6803 arg6 = (
PLINT)jarg6;
6805 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg7, 0 );
6806 arg8 = ( *jenv )->GetArrayLength( jenv, jarg7 );
6808 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg7, jxdata, 0 );
6810 plot3dc((
double const *)arg1,(
double const *)arg2,(
double const **)arg3,arg4,arg5,arg6,(
double const *)arg7,arg8);
6828 PLFLT *arg1 = (PLFLT *) 0 ;
6829 PLFLT *arg2 = (PLFLT *) 0 ;
6830 PLFLT **arg3 = (PLFLT **) 0 ;
6834 PLFLT *arg7 = (PLFLT *) 0 ;
6838 PLINT *arg11 = (PLINT *) 0 ;
6839 PLINT *arg12 = (PLINT *) 0 ;
6844 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
6845 Xlen = ( *jenv )->GetArrayLength( jenv, jarg1 );
6847 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
6850 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
6851 Ylen = ( *jenv )->GetArrayLength( jenv, jarg2 );
6853 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
6858 int nx = ( *jenv )->GetArrayLength( jenv, jarg3 );
6861 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
6862 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
6864 ( *jenv )->EnsureLocalCapacity( jenv, nx );
6866 for ( i = 0; i < nx; i++ )
6868 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg3, i );
6869 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
6872 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
6873 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
6875 printf(
"Misshapen a array.\n" );
6876 for ( j = 0; j <= i; j++ )
6877 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
6884 if ( nx != Xlen || ny !=
Ylen )
6886 printf(
"Vectors must match matrix.\n" );
6887 for ( i = 0; i < nx; i++ )
6888 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6896 for ( i = 0; i < nx; i++ )
6898 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
6899 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
6906 arg6 = (
PLINT)jarg6;
6908 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg7, 0 );
6909 arg8 = ( *jenv )->GetArrayLength( jenv, jarg7 );
6911 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg7, jxdata, 0 );
6913 arg9 = (
PLINT)jarg9;
6915 jint *jxdata = ( *jenv )->GetIntArrayElements( jenv, jarg10, 0 );
6916 arg10 = ( *jenv )->GetArrayLength( jenv, jarg10 );
6922 ( *jenv )->ReleaseIntArrayElements( jenv, jarg10, jxdata, 0 );
6925 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg12, 0 );
6926 if ( ( *jenv )->GetArrayLength( jenv, jarg12 ) !=
Alen )
6928 printf(
"Vectors must be same length.\n" );
6932 ( *jenv )->ReleaseIntArrayElements( jenv, jarg12, jydata, 0 );
6934 plot3dcl((
double const *)arg1,(
double const *)arg2,(
double const **)arg3,arg4,arg5,arg6,(
double const *)arg7,arg8,arg9,arg10,(
int const *)arg11,(
int const *)arg12);
6958 PLFLT *arg1 = (PLFLT *) 0 ;
6959 PLFLT *arg2 = (PLFLT *) 0 ;
6960 PLFLT **arg3 = (PLFLT **) 0 ;
6964 PLFLT *arg7 = (PLFLT *) 0 ;
6970 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
6971 Xlen = ( *jenv )->GetArrayLength( jenv, jarg1 );
6973 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
6976 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
6977 Ylen = ( *jenv )->GetArrayLength( jenv, jarg2 );
6979 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
6984 int nx = ( *jenv )->GetArrayLength( jenv, jarg3 );
6987 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
6988 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
6990 ( *jenv )->EnsureLocalCapacity( jenv, nx );
6992 for ( i = 0; i < nx; i++ )
6994 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg3, i );
6995 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
6998 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
6999 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
7001 printf(
"Misshapen a array.\n" );
7002 for ( j = 0; j <= i; j++ )
7003 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
7010 if ( nx != Xlen || ny !=
Ylen )
7012 printf(
"Vectors must match matrix.\n" );
7013 for ( i = 0; i < nx; i++ )
7014 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
7022 for ( i = 0; i < nx; i++ )
7024 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
7025 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
7032 arg6 = (
PLINT)jarg6;
7034 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg7, 0 );
7035 arg8 = ( *jenv )->GetArrayLength( jenv, jarg7 );
7037 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg7, jxdata, 0 );
7039 plsurf3d((
double const *)arg1,(
double const *)arg2,(
double const **)arg3,arg4,arg5,arg6,(
double const *)arg7,arg8);
7057 PLFLT *arg1 = (PLFLT *) 0 ;
7058 PLFLT *arg2 = (PLFLT *) 0 ;
7059 PLFLT **arg3 = (PLFLT **) 0 ;
7063 PLFLT *arg7 = (PLFLT *) 0 ;
7067 PLINT *arg11 = (PLINT *) 0 ;
7068 PLINT *arg12 = (PLINT *) 0 ;
7073 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
7074 Xlen = ( *jenv )->GetArrayLength( jenv, jarg1 );
7076 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
7079 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
7080 Ylen = ( *jenv )->GetArrayLength( jenv, jarg2 );
7082 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
7087 int nx = ( *jenv )->GetArrayLength( jenv, jarg3 );
7090 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
7091 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
7093 ( *jenv )->EnsureLocalCapacity( jenv, nx );
7095 for ( i = 0; i < nx; i++ )
7097 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg3, i );
7098 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
7101 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
7102 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
7104 printf(
"Misshapen a array.\n" );
7105 for ( j = 0; j <= i; j++ )
7106 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
7113 if ( nx != Xlen || ny !=
Ylen )
7115 printf(
"Vectors must match matrix.\n" );
7116 for ( i = 0; i < nx; i++ )
7117 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
7125 for ( i = 0; i < nx; i++ )
7127 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
7128 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
7135 arg6 = (
PLINT)jarg6;
7137 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg7, 0 );
7138 arg8 = ( *jenv )->GetArrayLength( jenv, jarg7 );
7140 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg7, jxdata, 0 );
7142 arg9 = (
PLINT)jarg9;
7144 jint *jxdata = ( *jenv )->GetIntArrayElements( jenv, jarg10, 0 );
7145 arg10 = ( *jenv )->GetArrayLength( jenv, jarg10 );
7151 ( *jenv )->ReleaseIntArrayElements( jenv, jarg10, jxdata, 0 );
7154 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg12, 0 );
7155 if ( ( *jenv )->GetArrayLength( jenv, jarg12 ) !=
Alen )
7157 printf(
"Vectors must be same length.\n" );
7161 ( *jenv )->ReleaseIntArrayElements( jenv, jarg12, jydata, 0 );
7163 plsurf3dl((
double const *)arg1,(
double const *)arg2,(
double const **)arg3,arg4,arg5,arg6,(
double const *)arg7,arg8,arg9,arg10,(
int const *)arg11,(
int const *)arg12);
7188 int *arg1 = (
int *) 0 ;
7189 char **arg2 = (
char **) 0 ;
7198 size1 = (int) ( ( *jenv )->GetArrayLength( jenv, jarg1 ) );
7200 arg2 = (
char **) malloc( (
size_t) ( size1 + 1 ) *
sizeof (
char * ) );
7202 for ( i = 0; i < size1; i++ )
7204 jstring j_string = (jstring) ( *jenv )->GetObjectArrayElement( jenv, jarg1, i );
7205 const char * c_string = (
char *) ( *jenv )->GetStringUTFChars( jenv, j_string, 0 );
7209 arg2[i] = malloc( ( strlen( c_string ) + 1 ) *
sizeof (
const char * ) );
7210 strcpy( arg2[i], c_string );
7211 ( *jenv )->ReleaseStringUTFChars( jenv, j_string, c_string );
7212 ( *jenv )->DeleteLocalRef( jenv, j_string );
7216 arg3 = (
PLINT)jarg3;
7218 jresult = (jint)result;
7224 for ( i = 0; i < size1; i++ )
7234 PLINT *arg2 = (PLINT *) 0 ;
7235 PLINT *arg3 = (PLINT *) 0 ;
7240 jint *jxdata = ( *jenv )->GetIntArrayElements( jenv, jarg1, 0 );
7241 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
7247 ( *jenv )->ReleaseIntArrayElements( jenv, jarg1, jxdata, 0 );
7250 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg3, 0 );
7251 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
7253 printf(
"Vectors must be same length.\n" );
7257 ( *jenv )->ReleaseIntArrayElements( jenv, jarg3, jydata, 0 );
7259 plpat(arg1,(
int const *)arg2,(
int const *)arg3);
7278 arg1 = (
PLINT)jarg1;
7279 arg2 = (
PLFLT)jarg2;
7280 arg3 = (
PLFLT)jarg3;
7281 arg4 = (
PLFLT)jarg4;
7282 arg5 = (
PLFLT)jarg5;
7283 plpath(arg1,arg2,arg3,arg4,arg5);
7289 PLFLT *arg2 = (PLFLT *) 0 ;
7290 PLFLT *arg3 = (PLFLT *) 0 ;
7296 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
7297 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
7303 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
7306 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
7307 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
7309 printf(
"Vectors must be same length.\n" );
7313 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
7315 arg4 = (
PLINT)jarg4;
7316 plpoin(arg1,(
double const *)arg2,(
double const *)arg3,arg4);
7328 PLFLT *arg2 = (PLFLT *) 0 ;
7329 PLFLT *arg3 = (PLFLT *) 0 ;
7330 PLFLT *arg4 = (PLFLT *) 0 ;
7336 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
7337 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
7343 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
7346 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
7347 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
7349 printf(
"Vectors must be same length.\n" );
7353 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
7356 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
7357 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
7359 printf(
"Vectors must be same length.\n" );
7363 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
7365 arg5 = (
PLINT)jarg5;
7366 plpoin3(arg1,(
double const *)arg2,(
double const *)arg3,(
double const *)arg4,arg5);
7381 PLFLT *arg2 = (PLFLT *) 0 ;
7382 PLFLT *arg3 = (PLFLT *) 0 ;
7383 PLFLT *arg4 = (PLFLT *) 0 ;
7390 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
7391 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
7397 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
7400 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
7401 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
7403 printf(
"Vectors must be same length.\n" );
7407 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
7410 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
7411 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
7413 printf(
"Vectors must be same length.\n" );
7417 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
7420 jboolean *jydata = ( *jenv )->GetBooleanArrayElements( jenv, jarg5, 0 );
7421 if ( ( *jenv )->GetArrayLength( jenv, jarg5 ) < Alen - 1 )
7423 printf(
"Vector must be at least length of others minus 1.\n" );
7427 ( *jenv )->ReleaseBooleanArrayElements( jenv, jarg5, jydata, 0 );
7430 arg6 = jarg6 ? 1 : 0;
7432 plpoly3(arg1,(
double const *)arg2,(
double const *)arg3,(
double const *)arg4,(
int const *)arg5,arg6);
7454 arg1 = (
PLINT)jarg1;
7455 arg2 = (
PLINT)jarg2;
7465 arg1 = (
PLINT)jarg1;
7476 char *arg6 = (
char *) 0 ;
7480 arg1 = (
PLFLT)jarg1;
7481 arg2 = (
PLFLT)jarg2;
7482 arg3 = (
PLFLT)jarg3;
7483 arg4 = (
PLFLT)jarg4;
7484 arg5 = (
PLFLT)jarg5;
7487 arg6 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg6, 0);
7490 plptex(arg1,arg2,arg3,arg4,arg5,(
char const *)arg6);
7491 if (arg6) (*jenv)->ReleaseStringUTFChars(jenv, jarg6, (
const char *)arg6);
7495 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plptex3(JNIEnv *jenv, jclass jcls, jdouble jarg1, jdouble jarg2, jdouble jarg3, jdouble jarg4, jdouble jarg5, jdouble jarg6, jdouble jarg7, jdouble jarg8, jdouble jarg9, jdouble jarg10, jstring jarg11) {
7506 char *arg11 = (
char *) 0 ;
7510 arg1 = (
PLFLT)jarg1;
7511 arg2 = (
PLFLT)jarg2;
7512 arg3 = (
PLFLT)jarg3;
7513 arg4 = (
PLFLT)jarg4;
7514 arg5 = (
PLFLT)jarg5;
7515 arg6 = (
PLFLT)jarg6;
7516 arg7 = (
PLFLT)jarg7;
7517 arg8 = (
PLFLT)jarg8;
7518 arg9 = (
PLFLT)jarg9;
7519 arg10 = (
PLFLT)jarg10;
7522 arg11 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg11, 0);
7523 if (!arg11) return ;
7525 plptex3(arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,(
char const *)arg11);
7526 if (arg11) (*jenv)->ReleaseStringUTFChars(jenv, jarg11, (
const char *)arg11);
7531 jdouble jresult = 0 ;
7537 jresult = (jdouble)result;
7553 PLFLT *arg4 = (PLFLT *) 0 ;
7554 PLFLT *arg5 = (PLFLT *) 0 ;
7555 PLFLT *arg6 = (PLFLT *) 0 ;
7562 arg1 = (
PLFLT)jarg1;
7563 arg2 = (
PLFLT)jarg2;
7564 arg3 = (
PLFLT)jarg3;
7570 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
7582 if ((*jenv)->GetArrayLength(jenv, jarg5) == 0) {
7594 if ((*jenv)->GetArrayLength(jenv, jarg6) == 0) {
7601 plrgbhls(arg1,arg2,arg3,arg4,arg5,arg6);
7603 jdouble jvalue = (jdouble)temp4;
7604 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
7607 jdouble jvalue = (jdouble)temp5;
7608 (*jenv)->SetDoubleArrayRegion(jenv, jarg5, 0, 1, &jvalue);
7611 jdouble jvalue = (jdouble)temp6;
7612 (*jenv)->SetDoubleArrayRegion(jenv, jarg6, 0, 1, &jvalue);
7626 arg1 = (
PLFLT)jarg1;
7627 arg2 = (
PLFLT)jarg2;
7633 PLINT *arg1 = (PLINT *) 0 ;
7634 PLINT *arg2 = (PLINT *) 0 ;
7635 PLINT *arg3 = (PLINT *) 0 ;
7641 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg1, 0 );
7642 Alen = ( *jenv )->GetArrayLength( jenv, jarg1 );
7644 ( *jenv )->ReleaseIntArrayElements( jenv, jarg1, jydata, 0 );
7647 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg2, 0 );
7648 if ( ( *jenv )->GetArrayLength( jenv, jarg2 ) !=
Alen )
7650 printf(
"Vectors must be same length.\n" );
7654 ( *jenv )->ReleaseIntArrayElements( jenv, jarg2, jydata, 0 );
7657 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg3, 0 );
7658 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
7660 printf(
"Vectors must be same length.\n" );
7663 arg4 = ( *jenv )->GetArrayLength( jenv, jarg3 );
7665 ( *jenv )->ReleaseIntArrayElements( jenv, jarg3, jydata, 0 );
7667 plscmap0((
int const *)arg1,(
int const *)arg2,(
int const *)arg3,arg4);
7681 PLINT *arg1 = (PLINT *) 0 ;
7682 PLINT *arg2 = (PLINT *) 0 ;
7683 PLINT *arg3 = (PLINT *) 0 ;
7684 PLFLT *arg4 = (PLFLT *) 0 ;
7690 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg1, 0 );
7691 Alen = ( *jenv )->GetArrayLength( jenv, jarg1 );
7693 ( *jenv )->ReleaseIntArrayElements( jenv, jarg1, jydata, 0 );
7696 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg2, 0 );
7697 if ( ( *jenv )->GetArrayLength( jenv, jarg2 ) !=
Alen )
7699 printf(
"Vectors must be same length.\n" );
7703 ( *jenv )->ReleaseIntArrayElements( jenv, jarg2, jydata, 0 );
7706 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg3, 0 );
7707 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
7709 printf(
"Vectors must be same length.\n" );
7713 ( *jenv )->ReleaseIntArrayElements( jenv, jarg3, jydata, 0 );
7716 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
7717 arg5 = ( *jenv )->GetArrayLength( jenv, jarg4 );
7718 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
7720 printf(
"Vectors must be same length.\n" );
7724 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
7726 plscmap0a((
int const *)arg1,(
int const *)arg2,(
int const *)arg3,(
double const *)arg4,arg5);
7747 arg1 = (
PLINT)jarg1;
7753 PLINT *arg1 = (PLINT *) 0 ;
7754 PLINT *arg2 = (PLINT *) 0 ;
7755 PLINT *arg3 = (PLINT *) 0 ;
7761 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg1, 0 );
7762 Alen = ( *jenv )->GetArrayLength( jenv, jarg1 );
7764 ( *jenv )->ReleaseIntArrayElements( jenv, jarg1, jydata, 0 );
7767 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg2, 0 );
7768 if ( ( *jenv )->GetArrayLength( jenv, jarg2 ) !=
Alen )
7770 printf(
"Vectors must be same length.\n" );
7774 ( *jenv )->ReleaseIntArrayElements( jenv, jarg2, jydata, 0 );
7777 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg3, 0 );
7778 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
7780 printf(
"Vectors must be same length.\n" );
7783 arg4 = ( *jenv )->GetArrayLength( jenv, jarg3 );
7785 ( *jenv )->ReleaseIntArrayElements( jenv, jarg3, jydata, 0 );
7787 plscmap1((
int const *)arg1,(
int const *)arg2,(
int const *)arg3,arg4);
7801 PLINT *arg1 = (PLINT *) 0 ;
7802 PLINT *arg2 = (PLINT *) 0 ;
7803 PLINT *arg3 = (PLINT *) 0 ;
7804 PLFLT *arg4 = (PLFLT *) 0 ;
7810 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg1, 0 );
7811 Alen = ( *jenv )->GetArrayLength( jenv, jarg1 );
7813 ( *jenv )->ReleaseIntArrayElements( jenv, jarg1, jydata, 0 );
7816 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg2, 0 );
7817 if ( ( *jenv )->GetArrayLength( jenv, jarg2 ) !=
Alen )
7819 printf(
"Vectors must be same length.\n" );
7823 ( *jenv )->ReleaseIntArrayElements( jenv, jarg2, jydata, 0 );
7826 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg3, 0 );
7827 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
7829 printf(
"Vectors must be same length.\n" );
7833 ( *jenv )->ReleaseIntArrayElements( jenv, jarg3, jydata, 0 );
7836 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
7837 arg5 = ( *jenv )->GetArrayLength( jenv, jarg4 );
7838 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
7840 printf(
"Vectors must be same length.\n" );
7844 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
7846 plscmap1a((
int const *)arg1,(
int const *)arg2,(
int const *)arg3,(
double const *)arg4,arg5);
7865 PLFLT *arg3 = (PLFLT *) 0 ;
7866 PLFLT *arg4 = (PLFLT *) 0 ;
7867 PLFLT *arg5 = (PLFLT *) 0 ;
7868 PLFLT *arg6 = (PLFLT *) 0 ;
7874 arg1 = jarg1 ? 1 : 0;
7877 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
7878 arg2 = ( *jenv )->GetArrayLength( jenv, jarg2 );
7884 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jxdata, 0 );
7887 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
7888 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
7890 printf(
"Vectors must be same length.\n" );
7894 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
7897 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg5, 0 );
7898 if ( ( *jenv )->GetArrayLength( jenv, jarg5 ) !=
Alen )
7900 printf(
"Vectors must be same length.\n" );
7904 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg5, jydata, 0 );
7907 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg6, 0 );
7908 if ( ( *jenv )->GetArrayLength( jenv, jarg6 ) !=
Alen )
7910 printf(
"Vectors must be same length.\n" );
7914 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg6, jydata, 0 );
7917 if ( jarg7 != NULL )
7919 jboolean *jydata = ( *jenv )->GetBooleanArrayElements( jenv, jarg7, 0 );
7920 if ( ( *jenv )->GetArrayLength( jenv, jarg7 ) < Alen - 1 )
7922 printf(
"Vector must be at least length of others minus 1.\n" );
7926 ( *jenv )->ReleaseBooleanArrayElements( jenv, jarg7, jydata, 0 );
7933 plscmap1l(arg1,arg2,(
double const *)arg3,(
double const *)arg4,(
double const *)arg5,(
double const *)arg6,(
int const *)arg7);
7956 PLFLT *arg3 = (PLFLT *) 0 ;
7957 PLFLT *arg4 = (PLFLT *) 0 ;
7958 PLFLT *arg5 = (PLFLT *) 0 ;
7959 PLFLT *arg6 = (PLFLT *) 0 ;
7960 PLFLT *arg7 = (PLFLT *) 0 ;
7966 arg1 = jarg1 ? 1 : 0;
7969 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
7970 arg2 = ( *jenv )->GetArrayLength( jenv, jarg2 );
7976 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jxdata, 0 );
7979 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
7980 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
7982 printf(
"Vectors must be same length.\n" );
7986 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
7989 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg5, 0 );
7990 if ( ( *jenv )->GetArrayLength( jenv, jarg5 ) !=
Alen )
7992 printf(
"Vectors must be same length.\n" );
7996 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg5, jydata, 0 );
7999 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg6, 0 );
8000 if ( ( *jenv )->GetArrayLength( jenv, jarg6 ) !=
Alen )
8002 printf(
"Vectors must be same length.\n" );
8006 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg6, jydata, 0 );
8009 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg7, 0 );
8010 if ( ( *jenv )->GetArrayLength( jenv, jarg7 ) !=
Alen )
8012 printf(
"Vectors must be same length.\n" );
8016 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg7, jydata, 0 );
8019 if ( jarg8 != NULL )
8021 jboolean *jydata = ( *jenv )->GetBooleanArrayElements( jenv, jarg8, 0 );
8022 if ( ( *jenv )->GetArrayLength( jenv, jarg8 ) < Alen - 1 )
8024 printf(
"Vector must be at least length of others minus 1.\n" );
8028 ( *jenv )->ReleaseBooleanArrayElements( jenv, jarg8, jydata, 0 );
8035 plscmap1la(arg1,arg2,(
double const *)arg3,(
double const *)arg4,(
double const *)arg5,(
double const *)arg6,(
double const *)arg7,(
int const *)arg8);
8063 arg1 = (
PLINT)jarg1;
8074 arg1 = (
PLFLT)jarg1;
8075 arg2 = (
PLFLT)jarg2;
8081 PLFLT *arg1 = (PLFLT *) 0 ;
8082 PLFLT *arg2 = (PLFLT *) 0 ;
8093 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
8105 if ((*jenv)->GetArrayLength(jenv, jarg2) == 0) {
8114 jdouble jvalue = (jdouble)temp1;
8115 (*jenv)->SetDoubleArrayRegion(jenv, jarg1, 0, 1, &jvalue);
8118 jdouble jvalue = (jdouble)temp2;
8119 (*jenv)->SetDoubleArrayRegion(jenv, jarg2, 0, 1, &jvalue);
8134 arg1 = (
PLINT)jarg1;
8135 arg2 = (
PLINT)jarg2;
8136 arg3 = (
PLINT)jarg3;
8137 arg4 = (
PLINT)jarg4;
8151 arg1 = (
PLINT)jarg1;
8152 arg2 = (
PLINT)jarg2;
8153 arg3 = (
PLINT)jarg3;
8154 arg4 = (
PLINT)jarg4;
8155 arg5 = (
PLFLT)jarg5;
8156 plscol0a(arg1,arg2,arg3,arg4,arg5);
8167 arg1 = (
PLINT)jarg1;
8168 arg2 = (
PLINT)jarg2;
8169 arg3 = (
PLINT)jarg3;
8182 arg1 = (
PLINT)jarg1;
8183 arg2 = (
PLINT)jarg2;
8184 arg3 = (
PLINT)jarg3;
8185 arg4 = (
PLFLT)jarg4;
8195 arg1 = (
PLINT)jarg1;
8205 arg1 = (
PLINT)jarg1;
8211 char *arg1 = (
char *) 0 ;
8217 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
8220 plsdev((
char const *)arg1);
8221 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
8233 arg1 = (
PLFLT)jarg1;
8234 arg2 = (
PLFLT)jarg2;
8235 arg3 = (
PLFLT)jarg3;
8236 arg4 = (
PLFLT)jarg4;
8251 arg1 = (
PLINT)jarg1;
8252 arg2 = (
PLINT)jarg2;
8253 arg3 = (
PLINT)jarg3;
8254 arg4 = (
PLINT)jarg4;
8255 arg5 = (
PLFLT)jarg5;
8256 arg6 = (
PLFLT)jarg6;
8257 plsdimap(arg1,arg2,arg3,arg4,arg5,arg6);
8266 arg1 = (
PLFLT)jarg1;
8279 arg1 = (
PLFLT)jarg1;
8280 arg2 = (
PLFLT)jarg2;
8281 arg3 = (
PLFLT)jarg3;
8282 arg4 = (
PLFLT)jarg4;
8295 arg1 = (
PLFLT)jarg1;
8296 arg2 = (
PLFLT)jarg2;
8297 arg3 = (
PLFLT)jarg3;
8298 arg4 = (
PLFLT)jarg4;
8308 arg1 = (
unsigned int)jarg1;
8325 char *arg1 = (
char *) 0 ;
8326 char *arg2 = (
char *) 0 ;
8333 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
8334 if (!arg1)
return 0;
8338 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
8339 if (!arg2)
return 0;
8341 result = (
PLINT)
plsetopt((
char const *)arg1,(
char const *)arg2);
8342 jresult = (jint)result;
8343 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
8344 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
8356 arg1 = (
PLINT)jarg1;
8357 arg2 = (
PLINT)jarg2;
8358 arg3 = (
PLINT)jarg3;
8374 char *arg1 = (
char *) 0 ;
8380 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
8384 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
8395 arg1 = (
PLINT)jarg1;
8396 arg2 = (
PLINT)jarg2;
8397 arg3 = (
PLINT)jarg3;
8402 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plshades(JNIEnv *jenv, jclass jcls, jobjectArray jarg1, jdouble jarg5, jdouble jarg6, jdouble jarg7, jdouble jarg8, jdoubleArray jarg9, jdouble jarg11, jint jarg12, jdouble jarg13, jboolean jarg15, jobjectArray jarg16, jobjectArray jarg17) {
8403 PLFLT **arg1 = (PLFLT **) 0 ;
8411 PLFLT *arg9 = (PLFLT *) 0 ;
8432 int nx = ( *jenv )->GetArrayLength( jenv, jarg1 );
8435 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
8436 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
8438 ( *jenv )->EnsureLocalCapacity( jenv, nx );
8440 for ( i = 0; i < nx; i++ )
8442 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg1, i );
8443 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
8446 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
8447 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
8449 printf(
"Misshapen a array.\n" );
8450 for ( j = 0; j <= i; j++ )
8451 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
8463 for ( i = 0; i < nx; i++ )
8465 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8466 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
8472 arg5 = (
PLFLT)jarg5;
8473 arg6 = (
PLFLT)jarg6;
8474 arg7 = (
PLFLT)jarg7;
8475 arg8 = (
PLFLT)jarg8;
8477 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg9, 0 );
8478 arg10 = ( *jenv )->GetArrayLength( jenv, jarg9 );
8480 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg9, jxdata, 0 );
8482 arg11 = (
PLFLT)jarg11;
8483 arg12 = (
PLINT)jarg12;
8484 arg13 = (
PLFLT)jarg13;
8486 arg15 = jarg15 ? 1 : 0;
8491 int nx = ( *jenv )->GetArrayLength( jenv, jarg16 );
8494 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
8495 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
8497 ( *jenv )->EnsureLocalCapacity( jenv, nx );
8499 for ( i = 0; i < nx; i++ )
8501 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg16, i );
8502 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
8505 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
8506 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
8508 printf(
"Misshapen a array.\n" );
8509 for ( j = 0; j <= i; j++ )
8510 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
8517 if ( !( ( nx == Xlen && ny ==
Ylen ) || ( nx == Xlen && ny == 1 ) ) )
8519 printf(
"Xlen =%d, nx =%d, Ylen =%d, ny =%d\n", Xlen, nx,
Ylen, ny );
8520 printf(
"X vector or matrix must match matrix dimensions.\n" );
8521 for ( i = 0; i < nx; i++ )
8522 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8530 for ( i = 0; i < nx; i++ )
8532 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8533 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
8543 int nx = ( *jenv )->GetArrayLength( jenv, jarg17 );
8546 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
8547 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
8549 ( *jenv )->EnsureLocalCapacity( jenv, nx );
8551 for ( i = 0; i < nx; i++ )
8553 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg17, i );
8554 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
8557 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
8558 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
8560 printf(
"Misshapen a array.\n" );
8561 for ( j = 0; j <= i; j++ )
8562 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
8569 if ( !( ( nx == Xlen && ny ==
Ylen ) || ( nx ==
Ylen && ny == 1 && ny == Alen ) ) )
8571 printf(
"Xlen =%d, nx =%d, Ylen =%d, Alen =%d, ny =%d\n",
8572 Xlen, nx,
Ylen, Alen, ny );
8573 printf(
"Y vector or matrix must match matrix dimensions.\n" );
8574 for ( i = 0; i < nx; i++ )
8575 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8581 for ( i = 0; i < nx; i++ )
8583 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8584 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
8596 plshades((
double const **)arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,(
double const *)arg9,arg10,arg11,arg12,arg13,arg14,arg15,arg16,arg17);
8616 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plshade(JNIEnv *jenv, jclass jcls, jobjectArray jarg1, jdouble jarg5, jdouble jarg6, jdouble jarg7, jdouble jarg8, jdouble jarg9, jdouble jarg10, jint jarg11, jdouble jarg12, jdouble jarg13, jint jarg14, jdouble jarg15, jint jarg16, jdouble jarg17, jboolean jarg19, jobjectArray jarg20, jobjectArray jarg21) {
8617 PLFLT **arg1 = (PLFLT **) 0 ;
8650 int nx = ( *jenv )->GetArrayLength( jenv, jarg1 );
8653 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
8654 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
8656 ( *jenv )->EnsureLocalCapacity( jenv, nx );
8658 for ( i = 0; i < nx; i++ )
8660 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg1, i );
8661 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
8664 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
8665 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
8667 printf(
"Misshapen a array.\n" );
8668 for ( j = 0; j <= i; j++ )
8669 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
8681 for ( i = 0; i < nx; i++ )
8683 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8684 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
8690 arg5 = (
PLFLT)jarg5;
8691 arg6 = (
PLFLT)jarg6;
8692 arg7 = (
PLFLT)jarg7;
8693 arg8 = (
PLFLT)jarg8;
8694 arg9 = (
PLFLT)jarg9;
8695 arg10 = (
PLFLT)jarg10;
8696 arg11 = (
PLINT)jarg11;
8697 arg12 = (
PLFLT)jarg12;
8698 arg13 = (
PLFLT)jarg13;
8699 arg14 = (
PLINT)jarg14;
8700 arg15 = (
PLFLT)jarg15;
8701 arg16 = (
PLINT)jarg16;
8702 arg17 = (
PLFLT)jarg17;
8704 arg19 = jarg19 ? 1 : 0;
8709 int nx = ( *jenv )->GetArrayLength( jenv, jarg20 );
8712 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
8713 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
8715 ( *jenv )->EnsureLocalCapacity( jenv, nx );
8717 for ( i = 0; i < nx; i++ )
8719 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg20, i );
8720 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
8723 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
8724 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
8726 printf(
"Misshapen a array.\n" );
8727 for ( j = 0; j <= i; j++ )
8728 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
8735 if ( !( ( nx == Xlen && ny ==
Ylen ) || ( nx == Xlen && ny == 1 ) ) )
8737 printf(
"Xlen =%d, nx =%d, Ylen =%d, ny =%d\n", Xlen, nx,
Ylen, ny );
8738 printf(
"X vector or matrix must match matrix dimensions.\n" );
8739 for ( i = 0; i < nx; i++ )
8740 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8748 for ( i = 0; i < nx; i++ )
8750 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8751 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
8761 int nx = ( *jenv )->GetArrayLength( jenv, jarg21 );
8764 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
8765 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
8767 ( *jenv )->EnsureLocalCapacity( jenv, nx );
8769 for ( i = 0; i < nx; i++ )
8771 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg21, i );
8772 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
8775 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
8776 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
8778 printf(
"Misshapen a array.\n" );
8779 for ( j = 0; j <= i; j++ )
8780 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
8787 if ( !( ( nx == Xlen && ny ==
Ylen ) || ( nx ==
Ylen && ny == 1 && ny == Alen ) ) )
8789 printf(
"Xlen =%d, nx =%d, Ylen =%d, Alen =%d, ny =%d\n",
8790 Xlen, nx,
Ylen, Alen, ny );
8791 printf(
"Y vector or matrix must match matrix dimensions.\n" );
8792 for ( i = 0; i < nx; i++ )
8793 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8799 for ( i = 0; i < nx; i++ )
8801 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
8802 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
8814 plshade((
double const **)arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,arg11,arg12,arg13,arg14,arg15,arg16,arg17,arg18,arg19,arg20,arg21);
8838 jobject obj = jarg1;
8841 if ( labelClass != 0 )
8843 ( *jenv )->DeleteGlobalRef( jenv, labelClass );
8850 labelClass = ( *jenv )->NewGlobalRef( jenv, obj );
8852 if ( labelClass != 0 )
8874 arg1 = (
PLFLT)jarg1;
8875 arg2 = (
PLFLT)jarg2;
8886 arg1 = (
PLFLT)jarg1;
8887 arg2 = (
PLFLT)jarg2;
8897 arg1 = (
PLINT)jarg1;
8912 arg1 = (
PLFLT)jarg1;
8913 arg2 = (
PLFLT)jarg2;
8914 arg3 = (
PLINT)jarg3;
8915 arg4 = (
PLINT)jarg4;
8916 arg5 = (
PLINT)jarg5;
8917 arg6 = (
PLINT)jarg6;
8918 plspage(arg1,arg2,arg3,arg4,arg5,arg6);
8923 char *arg1 = (
char *) 0 ;
8929 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
8933 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
8938 char *arg1 = (
char *) 0 ;
8945 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
8949 arg2 = jarg2 ? 1 : 0;
8951 plspal1((
char const *)arg1,arg2);
8952 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
8962 arg1 = jarg1 ? 1 : 0;
8973 arg1 = (
PLINT)jarg1;
8984 arg1 = (
PLINT)jarg1;
8985 arg2 = (
PLINT)jarg2;
8996 arg1 = (
PLFLT)jarg1;
8997 arg2 = (
PLFLT)jarg2;
9008 arg1 = (
PLINT)jarg1;
9009 arg2 = (
PLINT)jarg2;
9015 char *arg1 = (
char *) 0 ;
9023 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
9026 arg2 = (
PLINT)jarg2;
9027 arg3 = (
PLINT)jarg3;
9028 plstart((
char const *)arg1,arg2,arg3);
9029 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
9040 jobject obj = jarg1;
9045 ( *jenv )->DeleteGlobalRef( jenv, ctClass );
9052 ctClass = ( *jenv )->NewGlobalRef( jenv, obj );
9072 PLFLT *arg2 = (PLFLT *) 0 ;
9073 PLFLT *arg3 = (PLFLT *) 0 ;
9074 char *arg4 = (
char *) 0 ;
9079 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
9080 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
9086 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
9089 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
9090 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
9092 printf(
"Vectors must be same length.\n" );
9096 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
9100 arg4 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg4, 0);
9103 plstring(arg1,(
double const *)arg2,(
double const *)arg3,(
char const *)arg4);
9110 if (arg4) (*jenv)->ReleaseStringUTFChars(jenv, jarg4, (
const char *)arg4);
9116 PLFLT *arg2 = (PLFLT *) 0 ;
9117 PLFLT *arg3 = (PLFLT *) 0 ;
9118 PLFLT *arg4 = (PLFLT *) 0 ;
9119 char *arg5 = (
char *) 0 ;
9124 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
9125 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
9131 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
9134 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
9135 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
9137 printf(
"Vectors must be same length.\n" );
9141 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
9144 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg4, 0 );
9145 if ( ( *jenv )->GetArrayLength( jenv, jarg4 ) !=
Alen )
9147 printf(
"Vectors must be same length.\n" );
9151 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg4, jydata, 0 );
9155 arg5 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg5, 0);
9158 plstring3(arg1,(
double const *)arg2,(
double const *)arg3,(
double const *)arg4,(
char const *)arg5);
9168 if (arg5) (*jenv)->ReleaseStringUTFChars(jenv, jarg5, (
const char *)arg5);
9180 arg1 = (
PLINT)jarg1;
9181 arg2 = (
PLINT)jarg2;
9182 arg3 = (
PLFLT)jarg3;
9183 arg4 = (
PLFLT)jarg4;
9188 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plstripc(JNIEnv *jenv, jclass jcls, jintArray jarg1, jstring jarg2, jstring jarg3, jdouble jarg4, jdouble jarg5, jdouble jarg6, jdouble jarg7, jdouble jarg8, jdouble jarg9, jdouble jarg10, jboolean jarg11, jboolean jarg12, jint jarg13, jint jarg14, jintArray jarg15, jintArray jarg16, jobjectArray jarg17, jstring jarg18, jstring jarg19, jstring jarg20) {
9189 PLINT *arg1 = (PLINT *) 0 ;
9190 char *arg2 = (
char *) 0 ;
9191 char *arg3 = (
char *) 0 ;
9203 PLINT *arg15 = (PLINT *) 0 ;
9204 PLINT *arg16 = (PLINT *) 0 ;
9206 char *arg18 = (
char *) 0 ;
9207 char *arg19 = (
char *) 0 ;
9208 char *arg20 = (
char *) 0 ;
9218 if ((*jenv)->GetArrayLength(jenv, jarg1) == 0) {
9227 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
9232 arg3 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg3, 0);
9235 arg4 = (
PLFLT)jarg4;
9236 arg5 = (
PLFLT)jarg5;
9237 arg6 = (
PLFLT)jarg6;
9238 arg7 = (
PLFLT)jarg7;
9239 arg8 = (
PLFLT)jarg8;
9240 arg9 = (
PLFLT)jarg9;
9241 arg10 = (
PLFLT)jarg10;
9243 arg11 = jarg11 ? 1 : 0;
9246 arg12 = jarg12 ? 1 : 0;
9248 arg13 = (
PLINT)jarg13;
9249 arg14 = (
PLINT)jarg14;
9251 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg15, 0 );
9252 Alen = ( *jenv )->GetArrayLength( jenv, jarg15 );
9254 ( *jenv )->ReleaseIntArrayElements( jenv, jarg15, jydata, 0 );
9257 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg16, 0 );
9258 if ( ( *jenv )->GetArrayLength( jenv, jarg16 ) !=
Alen )
9260 printf(
"Vectors must be same length.\n" );
9264 ( *jenv )->ReleaseIntArrayElements( jenv, jarg16, jydata, 0 );
9268 int size = ( *jenv )->GetArrayLength( jenv, jarg17 );
9271 printf(
"legline must be an array of length 4\n" );
9274 arg17 = (
char **) malloc( 4 *
sizeof (
char * ) );
9276 for ( i = 0; i < 4; i++ )
9278 jstring j_string = (jstring) ( *jenv )->GetObjectArrayElement( jenv, jarg17, i );
9279 const char * c_string = (
char *) ( *jenv )->GetStringUTFChars( jenv, j_string, 0 );
9280 arg17[i] = malloc( ( strlen( c_string ) + 1 ) *
sizeof (
const char * ) );
9281 strcpy( arg17[i], c_string );
9282 ( *jenv )->ReleaseStringUTFChars( jenv, j_string, c_string );
9283 ( *jenv )->DeleteLocalRef( jenv, j_string );
9288 arg18 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg18, 0);
9289 if (!arg18) return ;
9293 arg19 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg19, 0);
9294 if (!arg19) return ;
9298 arg20 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg20, 0);
9299 if (!arg20) return ;
9301 plstripc(arg1,(
char const *)arg2,(
char const *)arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,arg11,arg12,arg13,arg14,(
int const *)arg15,(
int const *)arg16,(
char const *(*))arg17,(
char const *)arg18,(
char const *)arg19,(
char const *)arg20);
9303 jint jvalue = (jint)temp1;
9304 (*jenv)->SetIntArrayRegion(jenv, jarg1, 0, 1, &jvalue);
9307 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
9308 if (arg3) (*jenv)->ReleaseStringUTFChars(jenv, jarg3, (
const char *)arg3);
9317 for ( i = 0; i < 4; i++ )
9321 if (arg18) (*jenv)->ReleaseStringUTFChars(jenv, jarg18, (
const char *)arg18);
9322 if (arg19) (*jenv)->ReleaseStringUTFChars(jenv, jarg19, (
const char *)arg19);
9323 if (arg20) (*jenv)->ReleaseStringUTFChars(jenv, jarg20, (
const char *)arg20);
9332 arg1 = (
PLINT)jarg1;
9339 PLINT *arg2 = (PLINT *) 0 ;
9340 PLINT *arg3 = (PLINT *) 0 ;
9345 jint *jxdata = ( *jenv )->GetIntArrayElements( jenv, jarg1, 0 );
9346 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
9352 ( *jenv )->ReleaseIntArrayElements( jenv, jarg1, jxdata, 0 );
9355 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg3, 0 );
9356 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
9358 printf(
"Vectors must be same length.\n" );
9362 ( *jenv )->ReleaseIntArrayElements( jenv, jarg3, jydata, 0 );
9364 plstyl(arg1,(
int const *)arg2,(
int const *)arg3);
9375 PLFLT *arg1 = (PLFLT *) 0 ;
9376 PLFLT *arg2 = (PLFLT *) 0 ;
9383 if ( jarg1 != NULL )
9385 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
9386 Alen = ( *jenv )->GetArrayLength( jenv, jarg1 );
9388 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
9397 if ( jarg2 != NULL )
9399 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg2, 0 );
9400 arg3 = ( *jenv )->GetArrayLength( jenv, jarg2 );
9401 if ( ( *jenv )->GetArrayLength( jenv, jarg2 ) !=
Alen )
9403 printf(
"Vectors must be same length.\n" );
9407 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg2, jydata, 0 );
9416 arg4 = jarg4 ? 1 : 0;
9418 plsvect((
double const *)arg1,(
double const *)arg2,arg3,arg4);
9438 arg1 = (
PLFLT)jarg1;
9439 arg2 = (
PLFLT)jarg2;
9440 arg3 = (
PLFLT)jarg3;
9441 arg4 = (
PLFLT)jarg4;
9442 plsvpa(arg1,arg2,arg3,arg4);
9452 arg1 = (
PLINT)jarg1;
9453 arg2 = (
PLINT)jarg2;
9464 arg1 = (
PLINT)jarg1;
9465 arg2 = (
PLINT)jarg2;
9472 PLFLT *arg2 = (PLFLT *) 0 ;
9473 PLFLT *arg3 = (PLFLT *) 0 ;
9479 jdouble *jxdata = ( *jenv )->GetDoubleArrayElements( jenv, jarg1, 0 );
9480 arg1 = ( *jenv )->GetArrayLength( jenv, jarg1 );
9486 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg1, jxdata, 0 );
9489 jdouble *jydata = ( *jenv )->GetDoubleArrayElements( jenv, jarg3, 0 );
9490 if ( ( *jenv )->GetArrayLength( jenv, jarg3 ) !=
Alen )
9492 printf(
"Vectors must be same length.\n" );
9496 ( *jenv )->ReleaseDoubleArrayElements( jenv, jarg3, jydata, 0 );
9498 arg4 = (
PLINT)jarg4;
9499 plsym(arg1,(
double const *)arg2,(
double const *)arg3,arg4);
9515 arg1 = (
PLINT)jarg1;
9516 arg2 = (
PLINT)jarg2;
9529 char *arg1 = (
char *) 0 ;
9535 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
9539 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
9548 arg1 = (
PLFLT)jarg1;
9554 PLFLT **arg1 = (PLFLT **) 0 ;
9555 PLFLT **arg2 = (PLFLT **) 0 ;
9567 int nx = ( *jenv )->GetArrayLength( jenv, jarg1 );
9570 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
9571 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
9573 ( *jenv )->EnsureLocalCapacity( jenv, nx );
9575 for ( i = 0; i < nx; i++ )
9577 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg1, i );
9578 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
9581 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
9582 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
9584 printf(
"Misshapen a array.\n" );
9585 for ( j = 0; j <= i; j++ )
9586 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
9596 for ( i = 0; i < nx; i++ )
9598 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
9599 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
9608 int nx = ( *jenv )->GetArrayLength( jenv, jarg2 );
9611 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
9612 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
9614 ( *jenv )->EnsureLocalCapacity( jenv, nx );
9616 for ( i = 0; i < nx; i++ )
9618 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg2, i );
9619 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
9622 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
9623 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
9625 printf(
"Misshapen a array.\n" );
9626 for ( j = 0; j <= i; j++ )
9627 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
9634 if ( nx != Xlen || ny !=
Ylen )
9636 printf(
"Vectors must match matrix.\n" );
9637 for ( i = 0; i < nx; i++ )
9638 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
9646 for ( i = 0; i < nx; i++ )
9648 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
9649 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
9656 arg5 = (
PLFLT)jarg5;
9660 int nx = ( *jenv )->GetArrayLength( jenv, jarg6 );
9663 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
9664 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
9666 ( *jenv )->EnsureLocalCapacity( jenv, nx );
9668 for ( i = 0; i < nx; i++ )
9670 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg6, i );
9671 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
9674 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
9675 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
9677 printf(
"Misshapen a array.\n" );
9678 for ( j = 0; j <= i; j++ )
9679 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
9686 if ( !( ( nx == Xlen && ny ==
Ylen ) || ( nx == Xlen && ny == 1 ) ) )
9688 printf(
"Xlen =%d, nx =%d, Ylen =%d, ny =%d\n", Xlen, nx,
Ylen, ny );
9689 printf(
"X vector or matrix must match matrix dimensions.\n" );
9690 for ( i = 0; i < nx; i++ )
9691 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
9699 for ( i = 0; i < nx; i++ )
9701 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
9702 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
9712 int nx = ( *jenv )->GetArrayLength( jenv, jarg7 );
9715 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
9716 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
9718 ( *jenv )->EnsureLocalCapacity( jenv, nx );
9720 for ( i = 0; i < nx; i++ )
9722 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg7, i );
9723 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
9726 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
9727 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
9729 printf(
"Misshapen a array.\n" );
9730 for ( j = 0; j <= i; j++ )
9731 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
9738 if ( !( ( nx == Xlen && ny ==
Ylen ) || ( nx ==
Ylen && ny == 1 && ny == Alen ) ) )
9740 printf(
"Xlen =%d, nx =%d, Ylen =%d, Alen =%d, ny =%d\n",
9741 Xlen, nx,
Ylen, Alen, ny );
9742 printf(
"Y vector or matrix must match matrix dimensions.\n" );
9743 for ( i = 0; i < nx; i++ )
9744 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
9750 for ( i = 0; i < nx; i++ )
9752 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
9753 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
9765 plvect((
double const **)arg1,(
double const **)arg2,arg3,arg4,arg5,arg6,arg7);
9795 arg1 = (
PLFLT)jarg1;
9796 arg2 = (
PLFLT)jarg2;
9797 arg3 = (
PLFLT)jarg3;
9798 arg4 = (
PLFLT)jarg4;
9799 arg5 = (
PLFLT)jarg5;
9800 plvpas(arg1,arg2,arg3,arg4,arg5);
9812 arg1 = (
PLFLT)jarg1;
9813 arg2 = (
PLFLT)jarg2;
9814 arg3 = (
PLFLT)jarg3;
9815 arg4 = (
PLFLT)jarg4;
9816 plvpor(arg1,arg2,arg3,arg4);
9827 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plw3d(JNIEnv *jenv, jclass jcls, jdouble jarg1, jdouble jarg2, jdouble jarg3, jdouble jarg4, jdouble jarg5, jdouble jarg6, jdouble jarg7, jdouble jarg8, jdouble jarg9, jdouble jarg10, jdouble jarg11) {
9842 arg1 = (
PLFLT)jarg1;
9843 arg2 = (
PLFLT)jarg2;
9844 arg3 = (
PLFLT)jarg3;
9845 arg4 = (
PLFLT)jarg4;
9846 arg5 = (
PLFLT)jarg5;
9847 arg6 = (
PLFLT)jarg6;
9848 arg7 = (
PLFLT)jarg7;
9849 arg8 = (
PLFLT)jarg8;
9850 arg9 = (
PLFLT)jarg9;
9851 arg10 = (
PLFLT)jarg10;
9852 arg11 = (
PLFLT)jarg11;
9853 plw3d(arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,arg11);
9862 arg1 = (
PLFLT)jarg1;
9875 arg1 = (
PLFLT)jarg1;
9876 arg2 = (
PLFLT)jarg2;
9877 arg3 = (
PLFLT)jarg3;
9878 arg4 = (
PLFLT)jarg4;
9879 plwind(arg1,arg2,arg3,arg4);
9893 arg1 = jarg1 ? 1 : 0;
9901 if ( (*jenv)->GetArrayLength(jenv, jarg2) == 0 )
9910 jboolean jvalue = (jboolean) temp2;
9911 (*jenv)->SetBooleanArrayRegion(jenv, jarg2, 0, 1, &jvalue);
9919 char *arg2 = (
char *) 0 ;
9928 jobject obj = jarg1;
9931 jclass cls = ( *jenv )->GetObjectClass( jenv, obj );
9932 mapformID = ( *jenv )->GetMethodID( jenv, cls,
"mapform",
"([D[D)V" );
9934 cbenvMapform = jenv;
9944 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
9947 arg3 = (
PLFLT)jarg3;
9948 arg4 = (
PLFLT)jarg4;
9949 arg5 = (
PLFLT)jarg5;
9950 arg6 = (
PLFLT)jarg6;
9951 plmap(arg1,(
char const *)arg2,arg3,arg4,arg5,arg6);
9952 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
9958 char *arg2 = (
char *) 0 ;
9963 PLINT *arg7 = (PLINT *) 0 ;
9969 jobject obj = jarg1;
9972 jclass cls = ( *jenv )->GetObjectClass( jenv, obj );
9973 mapformID = ( *jenv )->GetMethodID( jenv, cls,
"mapform",
"([D[D)V" );
9975 cbenvMapform = jenv;
9985 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
9988 arg3 = (
PLFLT)jarg3;
9989 arg4 = (
PLFLT)jarg4;
9990 arg5 = (
PLFLT)jarg5;
9991 arg6 = (
PLFLT)jarg6;
9993 if ( jarg7 != NULL )
9995 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg7, 0 );
9996 arg8 = ( *jenv )->GetArrayLength( jenv, jarg7 );
9998 ( *jenv )->ReleaseIntArrayElements( jenv, jarg7, jydata, 0 );
10006 plmapline(arg1,(
char const *)arg2,arg3,arg4,arg5,arg6,(
int const *)arg7,arg8);
10007 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
10016 char *arg2 = (
char *) 0 ;
10017 char *arg3 = (
char *) 0 ;
10022 PLINT *arg8 = (PLINT *) 0 ;
10028 jobject obj = jarg1;
10031 jclass cls = ( *jenv )->GetObjectClass( jenv, obj );
10032 mapformID = ( *jenv )->GetMethodID( jenv, cls,
"mapform",
"([D[D)V" );
10033 mapformClass = obj;
10034 cbenvMapform = jenv;
10044 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
10045 if (!arg2) return ;
10049 arg3 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg3, 0);
10050 if (!arg3) return ;
10052 arg4 = (
PLFLT)jarg4;
10053 arg5 = (
PLFLT)jarg5;
10054 arg6 = (
PLFLT)jarg6;
10055 arg7 = (
PLFLT)jarg7;
10057 if ( jarg8 != NULL )
10059 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg8, 0 );
10060 arg9 = ( *jenv )->GetArrayLength( jenv, jarg8 );
10062 ( *jenv )->ReleaseIntArrayElements( jenv, jarg8, jydata, 0 );
10070 plmapstring(arg1,(
char const *)arg2,(
char const *)arg3,arg4,arg5,arg6,arg7,(
int const *)arg8,arg9);
10071 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
10072 if (arg3) (*jenv)->ReleaseStringUTFChars(jenv, jarg3, (
const char *)arg3);
10079 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plmaptex(JNIEnv *jenv, jclass jcls, jobject jarg1, jstring jarg2, jdouble jarg3, jdouble jarg4, jdouble jarg5, jstring jarg6, jdouble jarg7, jdouble jarg8, jdouble jarg9, jdouble jarg10, jint jarg11) {
10081 char *arg2 = (
char *) 0 ;
10085 char *arg6 = (
char *) 0 ;
10095 jobject obj = jarg1;
10098 jclass cls = ( *jenv )->GetObjectClass( jenv, obj );
10099 mapformID = ( *jenv )->GetMethodID( jenv, cls,
"mapform",
"([D[D)V" );
10100 mapformClass = obj;
10101 cbenvMapform = jenv;
10111 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
10112 if (!arg2) return ;
10114 arg3 = (
PLFLT)jarg3;
10115 arg4 = (
PLFLT)jarg4;
10116 arg5 = (
PLFLT)jarg5;
10119 arg6 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg6, 0);
10120 if (!arg6) return ;
10122 arg7 = (
PLFLT)jarg7;
10123 arg8 = (
PLFLT)jarg8;
10124 arg9 = (
PLFLT)jarg9;
10125 arg10 = (
PLFLT)jarg10;
10126 arg11 = (
PLINT)jarg11;
10127 plmaptex(arg1,(
char const *)arg2,arg3,arg4,arg5,(
char const *)arg6,arg7,arg8,arg9,arg10,arg11);
10128 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
10129 if (arg6) (*jenv)->ReleaseStringUTFChars(jenv, jarg6, (
const char *)arg6);
10135 char *arg2 = (
char *) 0 ;
10140 PLINT *arg7 = (PLINT *) 0 ;
10146 jobject obj = jarg1;
10149 jclass cls = ( *jenv )->GetObjectClass( jenv, obj );
10150 mapformID = ( *jenv )->GetMethodID( jenv, cls,
"mapform",
"([D[D)V" );
10151 mapformClass = obj;
10152 cbenvMapform = jenv;
10162 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
10163 if (!arg2) return ;
10165 arg3 = (
PLFLT)jarg3;
10166 arg4 = (
PLFLT)jarg4;
10167 arg5 = (
PLFLT)jarg5;
10168 arg6 = (
PLFLT)jarg6;
10170 if ( jarg7 != NULL )
10172 jint *jydata = ( *jenv )->GetIntArrayElements( jenv, jarg7, 0 );
10173 arg8 = ( *jenv )->GetArrayLength( jenv, jarg7 );
10175 ( *jenv )->ReleaseIntArrayElements( jenv, jarg7, jydata, 0 );
10183 plmapfill(arg1,(
char const *)arg2,arg3,arg4,arg5,arg6,(
int const *)arg7,arg8);
10184 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
10203 jobject obj = jarg1;
10206 jclass cls = ( *jenv )->GetObjectClass( jenv, obj );
10207 mapformID = ( *jenv )->GetMethodID( jenv, cls,
"mapform",
"([D[D)V" );
10208 mapformClass = obj;
10209 cbenvMapform = jenv;
10217 arg2 = (
PLFLT)jarg2;
10218 arg3 = (
PLFLT)jarg3;
10219 arg4 = (
PLFLT)jarg4;
10220 arg5 = (
PLFLT)jarg5;
10221 arg6 = (
PLFLT)jarg6;
10222 arg7 = (
PLFLT)jarg7;
10227 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plimage(JNIEnv *jenv, jclass jcls, jobjectArray jarg1, jdouble jarg4, jdouble jarg5, jdouble jarg6, jdouble jarg7, jdouble jarg8, jdouble jarg9, jdouble jarg10, jdouble jarg11, jdouble jarg12, jdouble jarg13) {
10228 PLFLT **arg1 = (PLFLT **) 0 ;
10247 int nx = ( *jenv )->GetArrayLength( jenv, jarg1 );
10250 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
10251 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
10253 ( *jenv )->EnsureLocalCapacity( jenv, nx );
10255 for ( i = 0; i < nx; i++ )
10257 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg1, i );
10258 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
10261 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
10262 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
10264 printf(
"Misshapen a array.\n" );
10265 for ( j = 0; j <= i; j++ )
10266 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
10278 for ( i = 0; i < nx; i++ )
10280 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
10281 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
10287 arg4 = (
PLFLT)jarg4;
10288 arg5 = (
PLFLT)jarg5;
10289 arg6 = (
PLFLT)jarg6;
10290 arg7 = (
PLFLT)jarg7;
10291 arg8 = (
PLFLT)jarg8;
10292 arg9 = (
PLFLT)jarg9;
10293 arg10 = (
PLFLT)jarg10;
10294 arg11 = (
PLFLT)jarg11;
10295 arg12 = (
PLFLT)jarg12;
10296 arg13 = (
PLFLT)jarg13;
10297 plimage((
double const **)arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,arg11,arg12,arg13);
10305 SWIGEXPORT void JNICALL
Java_plplot_core_plplotjavacJNI_plimagefr(JNIEnv *jenv, jclass jcls, jobjectArray jarg1, jdouble jarg4, jdouble jarg5, jdouble jarg6, jdouble jarg7, jdouble jarg8, jdouble jarg9, jdouble jarg10, jdouble jarg11, jobjectArray jarg12, jobjectArray jarg13) {
10306 PLFLT **arg1 = (PLFLT **) 0 ;
10325 int nx = ( *jenv )->GetArrayLength( jenv, jarg1 );
10328 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
10329 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
10331 ( *jenv )->EnsureLocalCapacity( jenv, nx );
10333 for ( i = 0; i < nx; i++ )
10335 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg1, i );
10336 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
10339 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
10340 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
10342 printf(
"Misshapen a array.\n" );
10343 for ( j = 0; j <= i; j++ )
10344 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
10356 for ( i = 0; i < nx; i++ )
10358 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
10359 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
10365 arg4 = (
PLFLT)jarg4;
10366 arg5 = (
PLFLT)jarg5;
10367 arg6 = (
PLFLT)jarg6;
10368 arg7 = (
PLFLT)jarg7;
10369 arg8 = (
PLFLT)jarg8;
10370 arg9 = (
PLFLT)jarg9;
10371 arg10 = (
PLFLT)jarg10;
10372 arg11 = (
PLFLT)jarg11;
10376 int nx = ( *jenv )->GetArrayLength( jenv, jarg12 );
10379 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
10380 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
10382 ( *jenv )->EnsureLocalCapacity( jenv, nx );
10384 for ( i = 0; i < nx; i++ )
10386 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg12, i );
10387 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
10390 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
10391 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
10393 printf(
"Misshapen a array.\n" );
10394 for ( j = 0; j <= i; j++ )
10395 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
10402 if ( !( ( nx == Xlen + 1 && ny ==
Ylen + 1 ) || ( nx == Xlen + 1 && ny == 1 ) ) )
10404 printf(
"Xlen =%d, nx =%d, Ylen =%d, ny =%d\n", Xlen, nx,
Ylen, ny );
10405 printf(
"X vector or matrix must match matrix dimensions.\n" );
10406 for ( i = 0; i < nx; i++ )
10407 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
10415 for ( i = 0; i < nx; i++ )
10417 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
10418 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
10428 int nx = ( *jenv )->GetArrayLength( jenv, jarg13 );
10431 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
10432 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
10434 ( *jenv )->EnsureLocalCapacity( jenv, nx );
10436 for ( i = 0; i < nx; i++ )
10438 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg13, i );
10439 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
10442 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
10443 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
10445 printf(
"Misshapen a array.\n" );
10446 for ( j = 0; j <= i; j++ )
10447 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
10454 if ( !( ( nx == Xlen + 1 && ny ==
Ylen + 1 ) || ( nx ==
Ylen + 1 && ny == 1 && ny == Alen ) ) )
10456 printf(
"Xlen =%d, nx =%d, Ylen =%d, Alen =%d, ny =%d\n",
10457 Xlen, nx,
Ylen, Alen, ny );
10458 printf(
"Y vector or matrix must match matrix dimensions.\n" );
10459 for ( i = 0; i < nx; i++ )
10460 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
10466 for ( i = 0; i < nx; i++ )
10468 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
10469 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
10481 plimagefr((
double const **)arg1,arg2,arg3,arg4,arg5,arg6,arg7,arg8,arg9,arg10,arg11,arg12,arg13);
10513 char *arg1 = (
char *) 0 ;
10514 char *arg2 = (
char *) 0 ;
10520 arg1 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg1, 0);
10521 if (!arg1) return ;
10525 arg2 = (
char *)(*jenv)->GetStringUTFChars(jenv, jarg2, 0);
10526 if (!arg2) return ;
10528 plSetUsage((
char const *)arg1,(
char const *)arg2);
10529 if (arg1) (*jenv)->ReleaseStringUTFChars(jenv, jarg1, (
const char *)arg1);
10530 if (arg2) (*jenv)->ReleaseStringUTFChars(jenv, jarg2, (
const char *)arg2);
10542 PLFLT **arg1 = (PLFLT **) 0 ;
10545 PLFLT *arg4 = (PLFLT *) 0 ;
10546 PLFLT *arg5 = (PLFLT *) 0 ;
10555 int nx = ( *jenv )->GetArrayLength( jenv, jarg1 );
10558 ai = (jobject *) malloc( (
size_t) nx *
sizeof ( jobject ) );
10559 adat = (jdouble **) malloc( (
size_t) nx *
sizeof ( jdouble * ) );
10561 ( *jenv )->EnsureLocalCapacity( jenv, nx );
10563 for ( i = 0; i < nx; i++ )
10565 ai[i] = ( *jenv )->GetObjectArrayElement( jenv, jarg1, i );
10566 adat[i] = ( *jenv )->GetDoubleArrayElements( jenv, ai[i], 0 );
10569 ny = ( *jenv )->GetArrayLength( jenv, ai[i] );
10570 else if ( ny != ( *jenv )->GetArrayLength( jenv, ai[i] ) )
10572 printf(
"Misshapen a array.\n" );
10573 for ( j = 0; j <= i; j++ )
10574 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[j], adat[j], 0 );
10586 for ( i = 0; i < nx; i++ )
10588 ( *jenv )->ReleaseDoubleArrayElements( jenv, ai[i], adat[i], 0 );
10589 ( *jenv )->DeleteLocalRef( jenv, ai[i] );
10600 if ((*jenv)->GetArrayLength(jenv, jarg4) == 0) {
10612 if ((*jenv)->GetArrayLength(jenv, jarg5) == 0) {
10621 jdouble jvalue = (jdouble)temp4;
10622 (*jenv)->SetDoubleArrayRegion(jenv, jarg4, 0, 1, &jvalue);
10625 jdouble jvalue = (jdouble)temp5;
10626 (*jenv)->SetDoubleArrayRegion(jenv, jarg5, 0, 1, &jvalue);
10646 jresult = (jint)result;