diff options
| author | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-01-27 23:15:27 -0600 |
|---|---|---|
| committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2012-01-27 23:15:27 -0600 |
| commit | a494bab4c18566131a50493d887790f2e18f5d7a (patch) | |
| tree | e4f9a1241ac60200499c70694ce981ff8aedcf8f /Examples | |
| parent | 53e9c9afd8733ad9cd79793c1845de341e583dd3 (diff) | |
Cut down SimpleWaveScript.kranc to be a minimal example
Diffstat (limited to 'Examples')
| -rw-r--r-- | Examples/SimpleWaveScript.kranc | 14 |
1 files changed, 5 insertions, 9 deletions
diff --git a/Examples/SimpleWaveScript.kranc b/Examples/SimpleWaveScript.kranc index a034741..35b938f 100644 --- a/Examples/SimpleWaveScript.kranc +++ b/Examples/SimpleWaveScript.kranc @@ -1,19 +1,15 @@ -begin thorn simplewavescript +begin thorn SimpleWaveScript begin variables - phi pi Euc + phi pi end variables -begin temporaries - foo bar -end temporaries - -begin calculation initial_sine_calc +begin calculation initial_sine_calc scheduled at initial phi = sin(2*PI*(x-t)) - pi = -2*pi*cos(2*PI*(x-t))*if(true,1,0) + pi = -2*pi*cos(2*PI*(x-t)) end calculation -begin calculation calc_rhs +begin calculation calc_rhs scheduled at mol_calcrhs D_t phi = pi D_t pi = Euc^ij*D_ij phi end calculation |