|
[Sponsors] |
March 4, 2008, 08:05 |
PB scheme GUI
|
#1 |
Guest
Posts: n/a
|
I'm now trying to run a scheme file for a GUI so that I could be able to change constants in a UDF file without recompilating it. Each time I try to load it, FLUENT returns an error "unbound variable", I'm working with Windows and it seems to run with LINUX.
Here is the scheme : (if(not(rp-var-object 'udf/pinh))(rp-var-define 'udf/pinh 50 'real #f)) (if(not(rp-var-object 'udf/pino))(rp-var-define 'udf/pino 50 'real #f)) (define gui-udf-entree (let((panel #f) (pinh) (pino)) (define (update-cb . args) (cx-set-real-entry pinh (rpgetvar 'udf/pinh)) (cx-set-real-entry pino (rpgetvar 'udf/pino)) ) (define (apply-cb . args) (rpsetvar 'udf/pinh (cx-show-real-entry pinh)) (rpsetvar 'udf/pino (cx-show-real-entry pino)) ) (lambda args (if (not panel) (begin (set! panel (cx-create-panel "Pressions intérieures" apply-cb update-cb)) (set! pinh (cx-create-real-entry panel "Pression intérieure Hydrogène" 'right-of 0 'below 0 )) (set! pino (cx-create-real-entry panel "Pression intérieure Oxygène" 'right-of 0 'below 0 )) )) (cx-show-panel panel)))) (cx-add-item "User-Defined""Données de l'UDF..."#\U #f cx-client? gui-udf-entree) Can you see where the problem is and why does it work with Linux and not Windows. Thank you Pierre-Louis |
|
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
how to understand high resolution scheme and high order scheme | iilw1314 | Main CFD Forum | 7 | April 12, 2022 12:29 |
When to use upwind or central differencing schemes? | quarkz | Main CFD Forum | 6 | August 19, 2011 03:24 |
2nd order upwind scheme (Fluent and CFX) | Far | FLUENT | 0 | May 22, 2011 01:50 |
Defining Multiphase by text and by gui = different result and Segmentation Violation | RPJones | FLUENT | 0 | June 9, 2009 16:24 |
extrapolation in MUSCL scheme | Chandra | Main CFD Forum | 6 | February 14, 2007 11:21 |