12 type (hecmwST_result_data):: adapRES
16 if(adapres%nn_component .gt.0)
then
17 call hecmw_set_result_node(adapres%nn_component,adapres%nn_dof,adapres%node_label, &
18 adapres%node_val_item)
19 deallocate (adapres%node_val_item)
21 if(adapres%ne_component .gt.0)
then
22 call hecmw_set_result_elem(adapres%ne_component,adapres%ne_dof, adapres%elem_label, &
23 adapres%elem_val_item)
24 deallocate (adapres%elem_val_item)
subroutine hecmw_dist_result_copy_f2c(adapRES)
Dynamic Load Balancing.
I/O and Utility memo) Intel 9 compiler generates codes to waste stack memory when an array of string ...