|
[Sponsors] |
June 5, 2000, 05:37 |
The Scheme of things...
|
#1 |
Guest
Posts: n/a
|
Dear all,
this is a question for the Scheme guru's out there. I'm trying to export a really long sequence of frames from Fluent to Ensight. I've written a journal file with what I want to do: (cx-gui-do cx-activate-item "MenuBar*ReadSubMenu*Data...") ;PATHNAME /export/home/mensgi5_a/menafe/Fluent/CoW/newgeom/NoLACA (cx-gui-do cx-set-text-entry "Select File*FilterText" "*.dat*") (cx-gui-do cx-activate-item "Select File*Apply") (cx-gui-do cx-set-text-entry "Select File*Text" "results/CoW0001.dat") (cx-gui-do cx-activate-item "Select File*OK") (cx-gui-do cx-activate-item "Export*PanelButtons*PushButton1(OK)") ;PATHNAME /export/home/mensgi5_a/menafe/Fluent/CoW/newgeom/NoLACA (cx-gui-do cx-set-text-entry "Select File*FilterText" "*") (cx-gui-do cx-activate-item "Select File*Apply") (cx-gui-do cx-set-text-entry "Select File*Text" "ensight/CoW%t") (cx-gui-do cx-activate-item "Select File*OK") The problem is that there are 400 time steps in this simulation and I don't think copying and pasting 400 times is my idea of fun. So I was wondering whether there is a way of converting this into a loop. I know nothing about scheme except for what the Journal facility in Fluent writes for me. Any charitative soul out there that could point me to the loop structure in scheme? Thank you all! AL |
|
June 5, 2000, 17:19 |
Re: The Scheme of things...
|
#2 |
Guest
Posts: n/a
|
Al, you can use a "do" loop, try this:
;; Loop 400 times (i goes from from 0 to 399) ;; Replace (display i) and (newline) lines with your code (do ((i 0 (+ i 1))) ((= i 400) (display "Done.\n")) (display i) ;; Your code here... (newline) ;; Your code here... ) ;; End do |
|
June 6, 2000, 03:55 |
Re: The Scheme of things...
|
#3 |
Guest
Posts: n/a
|
Cheers Chris!
I'll get right on it |
|
|
|
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 |
Implementation of QUICK scheme | Romuald Skoda | Main CFD Forum | 11 | November 6, 2017 21:20 |
AUSM scheme ? Central Scheme | boling | Main CFD Forum | 7 | January 7, 2016 02:41 |
2nd order upwind scheme (Fluent and CFX) | Far | FLUENT | 0 | May 22, 2011 01:50 |
extrapolation in MUSCL scheme | Chandra | Main CFD Forum | 6 | February 14, 2007 11:21 |