flow_points.tcl

00001 # 
00002 # load plugins
00003 # 
00004 load libfreeflow[info sharedlibextension]
00005 
00006 # remove all previous data and functionals
00007 clear_data
00008 
00009 # set name of surface
00010 set map_name "map_flow_points"
00011 
00012 # set tolerance for cg solver
00013 set tol 5e-7
00014 
00015 ##
00016 ## load initial data 
00017 ##
00018 
00019 # load curve from text file 
00020 curv_read "press.xyz" "press"
00021 
00022 # load points from text file 
00023 pnts_read "flow_point.txt" "center_flow_point"
00024 
00025 ##
00026 ## construct grid 
00027 ##
00028 grid_get  -1000 1000 5 -1000 1000 5
00029 
00030 ##
00031 ## create gridding rules
00032 ##
00033 
00034 # resulting surface at curve = value... 
00035 curve 250 "press"
00036 
00037 # law of conservation of mass
00038 lcm_simple 16.4 1 1e-6 
00039 
00040 # add flow from/to points
00041 flow_points "center_flow_point"
00042 
00043 ##
00044 ## run gridding algorithm
00045 ##
00046 surfit
00047 
00048 # unload grid from memory
00049 grid_unload
00050 
00051 # save all to surfit datafile 
00052 file_save "flow_points.dat"



surfit: open source gridding and contouring software.