37 for ( i = 0; i < *
nx; i++ )
39 for ( j = 0; j < *
ny; j++ )
41 a[i][j] = z[i + j * *lx];
45 c_plot3dc( x, y, (
const PLFLT *
const *) a, *nx, *ny, *opt, clevel, *nlevel );
56 PLOT3DC__( x, y, z, nx, ny, opt, clevel, nlevel, lx );
72 if ( !( temp = (
PLFLT **) malloc( (
size_t) *nx *
sizeof (
PLFLT * ) ) ) )
74 plabort(
"PLSURF3D: Out of memory" );
78 for ( i = 0; i < *
nx; i++ )
80 if ( !( temp[i] = (
PLFLT *) malloc( (
size_t) *ny *
sizeof (
PLFLT ) ) ) )
84 for ( ii = 0; ii < i - 1; ii++ )
85 free( (
void *) temp[i] );
86 free( (
void *) temp );
87 plabort(
"PLSURF3D: Out of memory" );
92 for ( i = 0; i < *
nx; i++ )
93 for ( j = 0; j < *
ny; j++ )
94 temp[i][j] = *( z + j * *lx + i );
96 c_plsurf3d( x, y, (
const PLFLT *
const *) temp, *nx, *ny, *opt, clevel, *nlevel );
98 for ( i = 0; i < *
nx; i++ )
99 free( (
void *) temp[i] );
101 free( (
void *) temp );
108 PLINT optlocal, nlevel = 0;
111 optlocal = *opt |
MESH;
112 PLOT3DC__( x, y, z, nx, ny, &optlocal, &clevel, &nlevel, lx );
121 optlocal = *opt |
MESH;
122 PLOT3DC__( x, y, z, nx, ny, &optlocal, clevel, nlevel, lx );
130 PLINT optlocal, nlevel = 0;
133 optlocal = *opt | ( *side == 1 ?
DRAW_SIDES : 0 );
134 PLOT3DC__( x, y, z, nx, ny, &optlocal, &clevel, &nlevel, lx );