Changes between Version 38 and Version 39 of ModulesOnAstroBear


Ignore:
Timestamp:
01/21/13 12:44:16 (12 years ago)
Author:
Jonathan
Comment:

—

Legend:

Unmodified
Added
Removed
Modified

  • ModulesOnAstroBear

    v38 v39  
    242242{{{
    243243  SUBROUTINE ProblemGridInit(Info)
    244     TYPE(InfoDef), POINTER :: Info
     244    TYPE(InfoDef) :: Info
    245245    INTEGER :: i,j,k
    246246    REAL(KIND=xPREC) :: pos(3)
    … …  
    267267
    268268  SUBROUTINE ProblemBeforeStep(Info)
    269     TYPE(InfoDef), POINTER :: Info
     269    TYPE(InfoDef) :: Info
    270270    INTEGER :: i,j,k, mbc(3)
    271271    REAL(KIND=xPREC) :: pos(3)
    … …  
    322322 
    323323  SUBROUTINE ProblemGridInit(Info)
    324     TYPE(InfoDef), POINTER :: Info
     324    TYPE(InfoDef) :: Info
    325325    INTEGER :: i,j,k
    326326    REAL(KIND=xPREC) :: pos(3)
    … …  
    347347
    348348  SUBROUTINE ProblemBeforeStep(Info)
    349     TYPE(InfoDef), POINTER :: Info
     349    TYPE(InfoDef) :: Info
    350350    INTEGER :: i,j,k, mbc(3)
    351351    REAL(KIND=xPREC) :: pos(3)
    … …  
    429429 
    430430  SUBROUTINE ProblemGridInit(Info)
    431     TYPE(InfoDef), POINTER :: Info
     431    TYPE(InfoDef) :: Info
    432432  END SUBROUTINE
    433433 
    … …  
    482482{{{
    483483  SUBROUTINE ProblemGridInit(Info)
    484     TYPE(InfoDef), POINTER :: Info
     484    TYPE(InfoDef) :: Info
    485485    INTEGER :: i,j,k
    486486    REAL(KIND=qPREC) :: pos(3), dx