Hello Robinson,
I would like to check what you really want to do. What is number 9475? Is it the global number of the node where you want to extract time series (before the partioning when you run a parallel simulation?)? If yes, your code implementation may be wrong.
With your code implementation, what is done is:
- you write in the FORMATTED RESULTS FILES (one for each subdomain, because the last SUBMIT argument of this keyword for file is 'PARAL') the water depth at the node with the local number MESH%KNOLG%I(9475) in the subdomain, whereas MESH%KNOLG%I(9475) gives an index of the global numbering corresponding to the node number 9475 in the local numbering. In parallel simulations, you run computation on each subdomain. Just try to change the number of PARALLEL PROCESSORS and I think that your extractions will be different.
If you want to extract time series at the global node number 9475, I would rather write something like:
IF(MOD(ATL,3600.D0).EQ.0.D0)THEN
IF(NCSIZE.GE.1) THEN
I = MESH%KNOGL%I(9475) ! I IS THE NODE WITH THE LOCAL NUMBER IN THE SUBDOMAIN CORRESPONDING TO THE NODE WITH THE GLOBAL NUMBER 9475
IF(I.NE.0) THEN ! IF IT IS EQUAL TO 0 THE NODE WITH THE GLOBAL NUMBER 9475 IS NOT PRESENT IN THE SUBDOMAIN
WRITE(29,1001) ATL/3600.D0,H%R(I)
ENDIF
ELSE
WRITE(29,1001) ATL/3600.D0,H%R(9475)
ENDIF
ENDIF
Just to check the extraction, if possible, try to run a simulation in scalar mode (PARALLEL PROCESSORS = 0) and compare the results.
Hope this helps,
Chi-Tuan