Searched refs:C (Results 1 – 18 of 18) sorted by relevance
| /phasta/svLS/ |
| H A D | GE.f | 51 REAL*8, ALLOCATABLE :: C(:,:) local 60 ALLOCATE(C(N,N+1)) 62 C(:N,:N) = A 63 C(:,N+1) = B 67 pivot = ABS(C(m,m)) 69 IF (ABS(C(i,m)) .GT. pivot) THEN 71 pivot = ABS(C(i,m)) 80 saveEl = C(m,j) 81 C(m,j) = C(ipv,j) 82 C(ipv,j) = saveEl [all …]
|
| /phasta/phSolver/common/ |
| H A D | phIO.f | 6 & bind(C, NAME='phio_openfile') 14 & bind(C, NAME='phio_closefile') 22 & bind(C, NAME='phio_readheader') 35 & bind(C, NAME='phio_writeheader') 49 & bind(C, NAME='phio_readdatablock') 62 & bind(C, NAME='phio_writedatablock') 74 & bind(C, NAME='phio_appendInt') 82 & bind(C, NAME='phio_constructName')
|
| H A D | streamio.f | 4 bind(C, name='geomRestartStream') :: geomRestartStream 6 bind(C, name='restartStream') :: restartStream 9 & bind(C, NAME='streamio_setup_read') 17 & bind(C, NAME='streamio_setup_write')
|
| H A D | symtri.c | 25 #define C 0.166666666666667 macro 62 static double rst3[][3] = {{B,C,C},{C,B,C},{C,C,B}};
|
| H A D | phStr.f | 5 & bind(C, NAME='phstr_appendInt') 14 & bind(C, NAME='phstr_appendDbl') 23 & bind(C, NAME='phstr_appendStr')
|
| H A D | syncio.f | 5 & bind(C, NAME='syncio_setup_read') 11 & bind(C, NAME='syncio_setup_write')
|
| H A D | posixio.f | 4 & bind(C, NAME='posixio_setup')
|
| H A D | mkdir_mod.f | 4 integer function c_mkdir(path) bind(C, name="ph_mkdir")
|
| H A D | common.f | 1 subroutine initphcommonvars() bind(C, name='initPhastaCommonVars')
|
| H A D | input.config | 13 # common_c.h (to carry the parameter from C to Fortran) 239 …Tau C Scale Factor: 1.0 # taucfct best value depends … 434 AMG PPE Scale: 2 # 0: original, 1: by diag(C), 2: by diag(PPE)
|
| /phasta/phastaIO/phiotimer_empty/ |
| H A D | phiotimer_empty.f | 2 enum, bind(C) 7 & bind(C, NAME='phastaio_setfile')
|
| /phasta/ |
| H A D | CMakeLists.txt | 3 PROJECT(PHASTA Fortran C CXX ) 5 enable_language(C) 41 # stuff for C/C++ calls to Fortran -- still needs to be done properly...
|
| /phasta/phSolver/common/test/ |
| H A D | chdir_mod.f | 4 integer function c_chdir(path) bind(C, name="chdir")
|
| /phasta/phSolver/Test_C/ |
| H A D | solver.inp | 21 # common_c.h (to carry the parameter from C to Fortran) 73 Tau C Scale Factor: 1 # taucfct best value depends #}
|
| /phasta/phSolver/testIC-DSIM/ |
| H A D | solver.inp | 21 # common_c.h (to carry the parameter from C to Fortran)
|
| /phasta/phSolver/Test_IC/ |
| H A D | solver.inp | 21 # common_c.h (to carry the parameter from C to Fortran)
|
| /phasta/phSolver/AMG/ |
| H A D | amgread.txt | 30 Provides C function: LesPrecPPE. LesLIB calls this function for
|
| /phasta/phSolver/ |
| H A D | CHANGES | 102 syntax cleanup on lessKey function for C++ standards (partition.cc) 235 2) the myfles routines now call the C routines inside insted of fortran
|