/*
This is the markdown text
used for documentation
| //following this: https://openfoamwiki.net/index.php/Main_ContribExamples/AxiSymmetric | |
| // /cygdrive/c/Users/sojoodif/surfdrive/sync/MyPhD/simulation/OpenFOAM/20180131_2 | |
| /*--------------------------------*- C++ -*----------------------------------*\ | |
| | ========= | | | |
| | \\ / F ield | OpenFOAM: The Open Source CFD Toolbox | | |
| | \\ / O peration | Version: 5 | | |
| | \\ / A nd | Web: www.OpenFOAM.org | | |
| | \\/ M anipulation | | | |
| \*---------------------------------------------------------------------------*/ | 
 
        | /* File CMAIN.C */ | |
| #include <stdio.h> | |
| extern int __stdcall FACT (int n); | |
| extern void __stdcall PYTHAGORAS (float a, float b, float *c); | |
| main() | |
| { | |
| float c; | 
| %%html | |
| <style> | |
| body { | |
| position: relative; | |
| min-height: 90vh; | |
| } | |
| .content-wrap { | |
| padding-bottom: 2.5rem; | |
| } | 
| function F=FmS(x, xy, v) | |
| K = Fmax * abs(xy - x) + k * (xy^2 - x^2) / 2; | |
| if abs(xy - x) < 1e-6 then | |
| F = k * x; | |
| else | |
| if K > 0 then | |
| vm = sqrt(2 * K / m); | |
| F = Fmax * sign(vm - v); | |
| else | |
| F = Fmax * sign(x - xy); | 
| docinfo.html | |
| Documentation.md | |
| pics/ | 
/*
This is the markdown text
used for documentation