Revision 0461d2e117ce88704a56dd8bcbf6bf7787991b15 authored by Eh Tan on 08 November 2007, 23:28:46 UTC, committed by Eh Tan on 08 November 2007, 23:28:46 UTC
svn+ssh://svn@geodynamics.org/cig/mc/3D/CitcomS/trunk ........ r8194 | tan2 | 2007-10-30 14:49:58 -0700 (Tue, 30 Oct 2007) | 1 line Compute d(rho)/dr/rho from rho(r) ........ r8195 | tan2 | 2007-10-30 14:50:52 -0700 (Tue, 30 Oct 2007) | 1 line Fixed a bug in dimensionalizing density. Provided the formula of geoid calculation in the comments. Rearranged the order of functions. ........ r8196 | tan2 | 2007-10-30 14:53:50 -0700 (Tue, 30 Oct 2007) | 1 line A post-processing program to project geoid coefficents onto a regular (longitude, latitude) mesh ........ r8197 | tan2 | 2007-10-30 14:54:14 -0700 (Tue, 30 Oct 2007) | 1 line Added the C program project_geoid to the makefile ........ r8199 | tan2 | 2007-10-30 15:29:44 -0700 (Tue, 30 Oct 2007) | 1 line Minor modification ........ r8201 | tan2 | 2007-11-01 16:33:30 -0700 (Thu, 01 Nov 2007) | 1 line Print dv/v=dp/p=1.0 for the 1st Uzawa iteraion ........ r8202 | tan2 | 2007-11-01 16:33:50 -0700 (Thu, 01 Nov 2007) | 1 line Fixed an error in comment ........ r8204 | tan2 | 2007-11-05 17:03:35 -0800 (Mon, 05 Nov 2007) | 1 line Scaled topo with variable gravity. Fixed an error in comment. Rearranged computation. ........ r8205 | tan2 | 2007-11-05 17:03:55 -0800 (Mon, 05 Nov 2007) | 1 line Removed functions related sph. harm in lib/Regional_obsolete.c ........ r8206 | tan2 | 2007-11-05 17:04:20 -0800 (Mon, 05 Nov 2007) | 1 line Shrank the size of sph. harm arrays ........ r8207 | tan2 | 2007-11-05 17:04:43 -0800 (Mon, 05 Nov 2007) | 1 line Init'd some variables about vtk_io, which might be accessed with uninit'd values in output_finalize() ........ r8212 | tan2 | 2007-11-06 15:17:54 -0800 (Tue, 06 Nov 2007) | 1 line Fixed a few memory errors ........ r8213 | tan2 | 2007-11-06 15:18:12 -0800 (Tue, 06 Nov 2007) | 1 line Increase vlowstep to match the default value in pyre ........ r8214 | tan2 | 2007-11-06 15:18:35 -0800 (Tue, 06 Nov 2007) | 1 line Removed unused multigrid parameters ........ r8215 | tan2 | 2007-11-06 15:18:54 -0800 (Tue, 06 Nov 2007) | 1 line Added cgrad solver convergence parameters, increased buoyancy_ratio and lower the # of steps ........ r8226 | tan2 | 2007-11-07 11:51:56 -0800 (Wed, 07 Nov 2007) | 1 line Print a warning when matrix eqn solver not converging ........ r8227 | tan2 | 2007-11-07 11:52:17 -0800 (Wed, 07 Nov 2007) | 1 line Removed comp_el from default output, since it is not required for restart anymore. ........ r8228 | tan2 | 2007-11-07 11:52:39 -0800 (Wed, 07 Nov 2007) | 1 line Decreased the # of processors. This is the only way I can reproduce single-cell convection as in the manual. ........ r8235 | tan2 | 2007-11-08 11:18:26 -0800 (Thu, 08 Nov 2007) | 1 line Dereased the timestep size to reduce artifacts in advection ........ r8236 | tan2 | 2007-11-08 11:18:52 -0800 (Thu, 08 Nov 2007) | 1 line Update NEWS ........ r8237 | tan2 | 2007-11-08 11:19:12 -0800 (Thu, 08 Nov 2007) | 1 line Update the version number ........ r8241 | tan2 | 2007-11-08 13:17:14 -0800 (Thu, 08 Nov 2007) | 1 line Updated file ChangeLog to r8240 ........ r8242 | tan2 | 2007-11-08 13:36:55 -0800 (Thu, 08 Nov 2007) | 1 line Removed binary checkpoint files from makefile, as the file size is too big for distribution. ........ r8243 | tan2 | 2007-11-08 13:38:09 -0800 (Thu, 08 Nov 2007) | 1 line Updated file ChangeLog to r8242 ........ r8244 | tan2 | 2007-11-08 14:31:21 -0800 (Thu, 08 Nov 2007) | 1 line Replaced a system call by std C library remove() and disabled another system call (backup input file). Partially fixed issue130. All remaining system calls are in lib/Output_gzdir.c. ........ r8245 | tan2 | 2007-11-08 14:41:31 -0800 (Thu, 08 Nov 2007) | 1 line Updated file ChangeLog to r8244 ........
1 parent a828fa9
VelocityRTFtoXYZ.net
//
// time: Tue Dec 2 18:20:53 2003
//
// version: 3.2.0 (format), 4.3.0 (DX)
//
//
// Begin MDF
// MODULE VelocityRTFtoXYZ
// CATEGORY Macros
// DESCRIPTION transform velocity vector from spherical coordinate to Cartesian coordinate
// INPUT input_1; field; (no default);
// OUTPUT output_1; value or value list or field;
// End MDF
// workspace: width = 500, height = 400
// layout: snap = 0, width = 50, height = 50, align = NN
//
macro VelocityRTFtoXYZ(
input_1
) -> (
output_1
) {
//
// node Input[2]: x = 0, y = 0, inputs = 0, label = Input
// parameter: position = 1, name = 'input_1', value = ' ', descriptive = 0, description = ' ', required = 0, visible = 1
//
VelocityRTFtoXYZ_Input_2_out_1 = input_1;
//
// node Mark[17]: x = 85, y = 80, inputs = 2, label = Mark
// input[2]: defaulting = 0, visible = 1, type = 32, value = "positions"
//
VelocityRTFtoXYZ_Mark_17_out_1[cache: 0] =
Mark(
VelocityRTFtoXYZ_Input_2_out_1,
"positions"
) [instance: 17, cache: 1];
//
// node Compute[84]: x = 0, y = 126, inputs = 3, label = Compute
// input[1]: defaulting = 0, visible = 0, type = 32, value = "[$0.z*sin($1.x)*cos($1.y)+$0.x*cos($1.x)*cos($1.y)-$0.y*sin($1.y), $0.z*sin($1.x)*sin($1.y)+$0.x*cos($1.x)*sin($1.y)+$0.y*cos($1.y), $0.z*cos($1.x)-$0.x*sin($1.x)]"
// expression: value = [velocity.z*sin(positions.x)*cos(positions.y)+velocity.x*cos(positions.x)*cos(positions.y)-velocity.y*sin(positions.y), velocity.z*sin(positions.x)*sin(positions.y)+velocity.x*cos(positions.x)*sin(positions.y)+velocity.y*cos(positions.y), velocity.z*cos(positions.x)-velocity.x*sin(positions.x)]
// name[2]: value = velocity
// name[3]: value = positions
//
VelocityRTFtoXYZ_Compute_84_out_1[cache: 0] =
Compute(
"[$0.z*sin($1.x)*cos($1.y)+$0.x*cos($1.x)*cos($1.y)-$0.y*sin($1.y), $0.z*sin($1.x)*sin($1.y)+$0.x*cos($1.x)*sin($1.y)+$0.y*cos($1.y), $0.z*cos($1.x)-$0.x*sin($1.x)]",
VelocityRTFtoXYZ_Input_2_out_1,
VelocityRTFtoXYZ_Mark_17_out_1
) [instance: 84, cache: 1];
//
// node Output[2]: x = 0, y = 206, inputs = 1, label = Output
// parameter: position = 1, name = 'output_1', value = ' ', descriptive = 0, description = ' ', required = 0, visible = 1
//
output_1 = VelocityRTFtoXYZ_Compute_84_out_1;
// network: end of macro body
}
VelocityRTFtoXYZ_Input_2_out_1 = NULL;
VelocityRTFtoXYZ_Mark_17_out_1 = NULL;
VelocityRTFtoXYZ_Compute_84_out_1 = NULL;
Computing file changes ...