Hello
Thanks so much for your help and time. I will try to increase the time step and see what happens. The parallel installation is working fine, since I have using the same cluster to ran the 2D simulations.
Some questions:
1) in the CONDIM subroutine, I wanted to initialize the temperature for the bottom layer to vary linearly with depth. Is it correct to do it like this:
IF(NTRAC.GT.0) THEN
DO ITRAC=1,NTRAC
! CALL OS( 'X=C ', X=TA%ADR(I)%P, C=TRAC0(I))
IF( ITRAC.EQ.1 ) THEN ! ITRAC=1: is your tracer
DO IPLAN = 1,NPLAN ! IPLAN=1: bed, IPLAN=NPLAN: surface
IF( IPLAN.GE.3 ) THEN
DO JPOIN = 1,NPOIN2
TA%ADR(1)%P%R((IPLAN-1)*NPOIN2+JPOIN)=24.D0
ENDDO
ELSEIF ( IPLAN.EQ.1 ) THEN
DO JPOIN = 1,NPOIN2
TA%ADR(1)%P%R((IPLAN-1)*NPOIN2+JPOIN)=5.D0
ENDDO
ELSE
DO JPOIN = 1,NPOIN2
TA%ADR(1)%P%R((IPLAN-1)*NPOIN2+JPOIN)=5.D0+19.D-1*
&abs(MESH3D%Z%R((IPLAN-1)*NPOIN2+JPOIN)-MESH3D%Z%R(JPOIN))
ENDDO
ENDIF
ENDDO
ENDIF
ENDDO
ENDIF
2)If I want to read the initial temperature from a file, how should I go about it?
3)This might be a very elementary question but I am getting confuse. In order to use mesh transformation=3, if the maximum depth in the domain is lets say around 12m, then:
ZPLANE%R(01) = -12.D0. Then what will happen if in the domain there some small areas that are below this level (-12.3 or 12.6m)? will they not be included? or this will cause an error?
Sorry for all the questions
Thanks in advance
Viviana