diff --git a/src/diagnose.F90 b/src/diagnose.F90 index 1863dccf6775751c2ee2b0f3c0630aebb96b1f06..0051085af38cc70bc3fffbced6e803d80a867249 100644 --- a/src/diagnose.F90 +++ b/src/diagnose.F90 @@ -154,7 +154,6 @@ SUBROUTINE diagnose_full(kstep) CALL putarrnd(fidres, "/data/metric/hatR", hatR(izs:ize,0:1), (/1, 1, 1/)) CALL putarrnd(fidres, "/data/metric/hatZ", hatZ(izs:ize,0:1), (/1, 1, 1/)) CALL putarrnd(fidres, "/data/metric/hatB", hatB(izs:ize,0:1), (/1, 1, 1/)) - CALL putarrnd(fidres, "/data/metric/Gamma_NL", Gamma_NL(izs:ize,0:1), (/1, 1, 1/)) CALL putarrnd(fidres, "/data/metric/dBdx", dBdx(izs:ize,0:1), (/1, 1, 1/)) CALL putarrnd(fidres, "/data/metric/dBdy", dBdy(izs:ize,0:1), (/1, 1, 1/)) CALL putarrnd(fidres, "/data/metric/dBdz", dBdz(izs:ize,0:1), (/1, 1, 1/))