/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/lib/ |
H A D | heat_LIB_NEUTRAL.f90 | 18 subroutine heat_put_neutral_601 ( hecMESH ) argument 26 type(hecmwST_local_mesh) :: hecMESH local 120 subroutine heat_put_neutral_402 ( hecMESH ) argument 127 type(hecmwST_local_mesh) :: hecMESH local 218 subroutine heat_put_neutral_403 ( hecMESH ) argument 224 type(hecmwST_local_mesh) :: hecMESH local 250 subroutine heat_put_neutral_404 ( hecMESH ) argument 257 type(hecmwST_local_mesh) :: hecMESH local 635 subroutine heat_put_neutral_451 ( hecMESH, hecHEAT ) argument 642 type(hecmwST_local_mesh) :: hecMESH local
|
H A D | solve_LINEQ.f90 | 15 subroutine solve_LINEQ(hecMESH, hecMAT) argument 19 type(hecmwST_local_mesh) :: hecMESH local
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/common/ |
H A D | hecmw2fstr_mesh_conv.f90 | 14 subroutine hecmw2fstr_mesh_conv( hecMESH ) argument 16 type (hecmwST_local_mesh) :: hecMESH local 26 subroutine fstr2hecmw_mesh_conv( hecMESH ) argument 28 type (hecmwST_local_mesh) :: hecMESH local
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/hecmw1/src/solver/mpc/ |
H A D | hecmw_mpc_prepost.f90 | 129 type (hecmwST_local_mesh), intent(in) :: hecMESH local 171 type (hecmwST_local_mesh), intent(in) :: hecMESH local 206 type (hecmwST_local_mesh), intent(in) :: hecMESH local 240 type (hecmwST_local_mesh), intent(inout) :: hecMESH local 279 type (hecmwST_local_mesh), intent(in) :: hecMESH local 351 type (hecmwST_local_mesh), intent(in) :: hecMESH local 384 type (hecmwST_local_mesh), intent(in) :: hecMESH local 407 subroutine hecmw_mpc_scale(hecMESH) argument 437 type (hecmwST_local_mesh), intent(in) :: hecMESH local 495 type (hecmwST_local_mesh), intent(in) :: hecMESH local [all …]
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/hecmw1/src/solver/communication/ |
H A D | hecmw_solver_misc.f90 | 20 type (hecmwST_local_mesh) :: hecMESH local 51 type (hecmwST_local_mesh) :: hecMESH local 81 type (hecmwST_local_mesh) :: hecMESH local 105 type (hecmwST_local_mesh) :: hecMESH local 133 type (hecmwST_local_mesh) :: hecMESH local 160 type (hecmwST_local_mesh) :: hecMESH local 182 subroutine hecmw_scale_R (hecMESH, ndof, alpha, X) argument 187 type (hecmwST_local_mesh) :: hecMESH local 209 subroutine hecmw_copy_R (hecMESH, ndof, X, Y) argument 214 type (hecmwST_local_mesh) :: hecMESH local [all …]
|
H A D | hecmw_comm_f.F90 | 14 subroutine hecmw_barrier (hecMESH) argument 17 type (hecmwST_local_mesh) :: hecMESH local 372 type (hecmwST_local_mesh) :: hecMESH local 407 type (hecmwST_local_mesh) :: hecMESH local 426 type (hecmwST_local_mesh) :: hecMESH local 461 type (hecmwST_local_mesh) :: hecMESH local 481 type (hecmwST_local_mesh) :: hecMESH local 505 type (hecmwST_local_mesh) :: hecMESH local 538 type (hecmwST_local_mesh) :: hecMESH local 561 type (hecmwST_local_mesh) :: hecMESH local [all …]
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/hecmw1/src/solver/las/ |
H A D | hecmw_solver_las.f90 | 42 subroutine hecmw_matvec (hecMESH, hecMAT, X, Y, COMMtime) argument 46 type (hecmwST_local_mesh), intent(in) :: hecMESH local 95 type (hecmwST_local_mesh), intent(in) :: hecMESH local 120 type ( hecmwST_local_mesh ), intent(in) :: hecMESH local 150 subroutine hecmw_Tvec (hecMESH, ndof, X, Y, COMMtime) argument 156 type (hecmwST_local_mesh), intent(in) :: hecMESH local 176 subroutine hecmw_Ttvec (hecMESH, ndof, X, Y, COMMtime) argument 181 type (hecmwST_local_mesh), intent(in) :: hecMESH local 204 type (hecmwST_local_mesh), intent(in) :: hecMESH local 248 subroutine hecmw_mat_diag_sr(hecMESH, hecMAT, COMMtime) argument [all …]
|
H A D | hecmw_solver_las_22.f90 | 35 type (hecmwST_local_mesh), intent(in) :: hecMESH local 82 type (hecmwST_local_mesh), intent(in) :: hecMESH local 252 type (hecmwST_local_mesh) :: hecMESH local 281 type ( hecmwST_local_mesh ), intent(in) :: hecMESH local 306 subroutine hecmw_Tvec_22 (hecMESH, X, Y, COMMtime) argument 310 type (hecmwST_local_mesh), intent(in) :: hecMESH local 353 subroutine hecmw_Ttvec_22 (hecMESH, X, Y, COMMtime) argument 357 type (hecmwST_local_mesh), intent(in) :: hecMESH local 403 type (hecmwST_local_mesh), intent(in) :: hecMESH local 421 subroutine hecmw_mat_diag_sr_22(hecMESH, hecMAT, COMMtime) argument [all …]
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/static/ |
H A D | fstr_Residual.f90 | 23 subroutine fstr_Update_NDForce(cstep,hecMESH,hecMAT,fstrSOLID,conMAT) argument 34 type(hecmwST_local_mesh), intent(in) :: hecMESH !< mesh information local 73 subroutine fstr_Update_NDForce_MPC( hecMESH, B ) argument 75 type(hecmwST_local_mesh), intent(in) :: hecMESH !< mesh information local 103 subroutine fstr_Update_NDForce_SPC( cstep, hecMESH, fstrSOLID, B ) argument 106 type(hecmwST_local_mesh), intent(in) :: hecMESH !< mesh information local 146 type(hecmwST_local_mesh), intent(in) :: hecMESH !< mesh information local 156 type(hecmwST_local_mesh), intent(in) :: hecMESH !< mesh information local 166 type(hecmwST_local_mesh), intent(in) :: hecMESH !< mesh information local 197 type(hecmwST_local_mesh), intent(in) :: hecMESH local [all …]
|
H A D | solve_LINEQ_mkl.F90 | 28 subroutine solve_LINEQ_MKL_contact_init(hecMESH,is_sym) argument 29 type (hecmwST_local_mesh), intent(in) :: hecMESH local 54 subroutine solve_LINEQ_MKL_contact(hecMESH,hecMAT,fstrMAT,istat,conMAT) argument 55 type (hecmwST_local_mesh), intent(in) :: hecMESH local
|
H A D | solve_LINEQ_contact.f90 | 27 subroutine solve_LINEQ_contact_init(hecMESH,hecMAT,fstrMAT,is_sym) argument 28 type (hecmwST_local_mesh) :: hecMESH !< hecmw mesh local 46 subroutine solve_LINEQ_contact(hecMESH,hecMAT,fstrMAT,istat,rf,conMAT) argument 48 type (hecmwST_local_mesh) :: hecMESH !< hecmw mesh local
|
H A D | solve_LINEQ_MUMPS_contact.f90 | 24 subroutine solve_LINEQ_MUMPS_contact_init(hecMESH,hecMAT,fstrMAT,is_sym) argument 26 type (hecmwST_local_mesh), intent(in) :: hecMESH local 65 subroutine solve_LINEQ_MUMPS_contact(hecMESH,hecMAT,fstrMAT,istat,conMAT) argument 67 type (hecmwST_local_mesh), intent(in) :: hecMESH local
|
H A D | readtemp.f90 | 13 …subroutine read_temperature_result(hecMESH, nstep, sstep, rtype, interval, factor, ctime, temp, te… argument 15 type(hecmwST_local_mesh), intent(in) :: hecMESH !< hecmw mesh local 32 …subroutine read_temperature_result_by_step(hecMESH, nstep, sstep, interval, factor, temp, temp_bak) argument 35 type(hecmwST_local_mesh), intent(in) :: hecMESH !< hecmw mesh local 87 subroutine read_temperature_result_by_time(hecMESH, nstep, sstep, ctime, temp) argument 90 type(hecmwST_local_mesh), intent(in) :: hecMESH !< hecmw mesh local 180 subroutine read_result_at(hecMESH, tstep, ttime, temp) argument 184 type(hecmwST_local_mesh), intent(in) :: hecMESH local 204 subroutine read_next_result(hecMESH, nstep, sstep, tstep, ttime, temp, ierr) argument 208 type(hecmwST_local_mesh), intent(in) :: hecMESH local
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/hecmw1/src/solver/ |
H A D | hecmw_solver.f90 | 9 subroutine hecmw_solve (hecMESH, hecMAT) argument 24 type (hecmwST_local_mesh) :: hecMESH local 88 subroutine hecmw_substitute_solver(hecMESH, hecMATorig, NDOF) argument 97 type (hecmwST_local_mesh) :: hecMESH local
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/heat/ |
H A D | heat_init.f90 | 9 subroutine heat_init(hecMESH, fstrHEAT) argument 13 type(hecmwST_local_mesh) :: hecMESH local 47 subroutine heat_init_log(hecMESH) argument 50 type(hecmwST_local_mesh) :: hecMESH local 74 subroutine heat_init_amplitude (hecMESH, fstrHEAT) argument 82 type(hecmwST_local_mesh) :: hecMESH local 158 subroutine heat_init_material (hecMESH, fstrHEAT) argument 166 type(hecmwST_local_mesh) :: hecMESH local
|
H A D | heat_io.f90 | 10 subroutine heat_input_restart(fstrHEAT, hecMESH, istep, tstep, tt) argument 13 type(hecmwST_local_mesh) :: hecMESH local 41 subroutine heat_output_log(hecMESH, fstrPARAM, fstrHEAT, tstep, ctime) argument 44 type(hecmwST_local_mesh) :: hecMESH local 89 subroutine heat_output_result(hecMESH, fstrHEAT, tstep, ctime, outflag) argument 92 type(hecmwST_local_mesh) :: hecMESH local 119 subroutine heat_output_visual(hecMESH, fstrRESULT, fstrHEAT, tstep, ctime, outflag) argument 123 type(hecmwST_local_mesh) :: hecMESH local 156 subroutine heat_output_restart(hecMESH, fstrHEAT, istep, tstep, current_time, outflag) argument 159 type(hecmwST_local_mesh) :: hecMESH local
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/hecmw1/src/solver/matrix/ |
H A D | hecmw_mat_id.f90 | 27 subroutine hecmw_mat_id_set(hecMAT, hecMESH, id) argument 30 type(hecmwST_local_mesh), intent(in), target :: hecMESH local 48 subroutine hecmw_mat_id_get(id, hecMAT, hecMESH) argument 52 type(hecmwST_local_mesh), pointer :: hecMESH local
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/hecmw1/src/operations/adaptation/ |
H A D | hecmw_adapt_active.f90 | 7 subroutine hecmw_adapt_active (hecMESH) argument 16 type (hecmwST_local_mesh) :: hecMESH local
|
H A D | hecmw_adapt_proc.f90 | 7 subroutine hecmw_adapt_proc (hecMESH) argument 10 type (hecmwST_local_mesh) :: hecMESH local
|
H A D | hecmw_adapt_init.f90 | 7 subroutine hecmw_adapt_init (hecMESH) argument 10 type (hecmwST_local_mesh) :: hecMESH local
|
H A D | hecmw_adapt_error_exit.f90 | 7 subroutine hecmw_adapt_ERROR_EXIT (hecMESH, IFLAG) argument 9 type (hecmwST_local_mesh) :: hecMESH local
|
H A D | hecmw_adapt_get_new_cell_info.f90 | 14 subroutine hecmw_adapt_GET_NEW_CELL_INFO (hecMESH) argument 20 type (hecmwST_local_mesh) :: hecMESH local
|
H A D | hecmw_adapt_extemb.f90 | 14 subroutine hecmw_adapt_EXTEMB (hecMESH) argument 23 type (hecmwST_local_mesh) :: hecMESH local
|
H A D | hecmw_adapt_new_cell_341.f90 | 14 subroutine hecmw_adapt_NEW_CELL_341 (hecMESH, icouN) argument 22 type (hecmwST_local_mesh) :: hecMESH local
|
H A D | hecmw_adapt_new_cell_351.f90 | 14 subroutine hecmw_adapt_NEW_CELL_351 (hecMESH, icouN) argument 22 type (hecmwST_local_mesh) :: hecMESH local
|